37798: Routine at 93A6
| 37798 |
LD HL,(24698) |
| 37801 |
LD (IX+3),H |
| 37804 |
LD (IX+2),L |
| 37807 |
LD A,(24700) |
| 37810 |
ADD A,8 |
| 37812 |
CP 175 |
| 37814 |
JR C,37818 |
| 37816 |
LD A,175 |
| 37818 |
LD (IX+4),A |
| 37821 |
CALL 34561 |
| 37824 |
CALL 34611 |
| 37827 |
CALL 37980 |
| 37830 |
JR Z,37859 |
| 37832 |
BIT 0,(IX+8) |
| 37836 |
RET NZ |
| 37837 |
LD (IX+0),47 |
| 37841 |
LD HL,24704 |
| 37844 |
RES 0,(HL) |
| 37846 |
LD A,(24701) |
| 37849 |
LD (IX+5),A |
| 37852 |
LD (IX+6),16 |
| 37856 |
JP 47299 |
| 37859 |
RES 0,(IX+8) |
| 37863 |
RET |
| 37864 |
LD A,(IX+6) |
| 37867 |
CP 48 |
| 37869 |
JR NC,37877 |
| 37871 |
INC (IX+6) |
| 37874 |
INC (IX+6) |
| 37877 |
SRA A |
| 37879 |
SRA A |
| 37881 |
SRA A |
| 37883 |
SRA A |
| 37885 |
ADD A,(IX+4) |
| 37888 |
LD (IX+4),A |
| 37891 |
CP 176 |
| 37893 |
JR C,37941 |
| 37895 |
CALL 37307 |
| 37898 |
LD A,183 |
| 37900 |
LD (IX+4),A |
| 37903 |
LD DE,28672 |
| 37906 |
EX DE,HL |
| 37907 |
ADD HL,DE |
| 37908 |
LD (HL),3 |
| 37910 |
INC DE |
| 37911 |
LD A,D |
| 37912 |
AND 3 |
| 37914 |
LD D,A |
| 37915 |
LD HL,28672 |
| 37918 |
ADD HL,DE |
| 37919 |
LD (HL),3 |
| 37921 |
LD A,(IX+2) |
| 37924 |
AND 248 |
| 37926 |
LD L,A |
| 37927 |
LD (IX+2),L |
| 37930 |
CALL 39086 |
| 37933 |
CALL 34561 |
| 37936 |
LD (IX+0),0 |
| 37940 |
RET |
| 37941 |
LD A,(IX+5) |
| 37944 |
SRA A |
| 37946 |
SRA A |
| 37948 |
SRA A |
| 37950 |
SRA A |
| 37952 |
LD C,A |
| 37953 |
LD B,0 |
| 37955 |
JP P,37960 |
| 37958 |
LD B,255 |
| 37960 |
LD L,(IX+2) |
| 37963 |
LD H,(IX+3) |
| 37966 |
ADD HL,BC |
| 37967 |
LD (IX+3),H |
| 37970 |
LD (IX+2),L |
| 37973 |
CALL 34561 |
| 37976 |
CALL 34611 |
| 37979 |
RET |
