37834: Routine at 93CA
| 37834 |
PUSH IX |
| 37836 |
CALL 37734 |
| 37839 |
EXX |
| 37840 |
LD HL,23296 |
| 37843 |
LD DE,25600 |
| 37846 |
EXX |
| 37847 |
LD HL,(28064) |
| 37850 |
LD DE,(28066) |
| 37854 |
LD IX,22528 |
| 37858 |
LD B,0 |
| 37860 |
LD A,B |
| 37861 |
CP E |
| 37862 |
JR C,37894 |
| 37864 |
LD A,D |
| 37865 |
CP B |
| 37866 |
JR C,37894 |
| 37868 |
LD C,0 |
| 37870 |
LD A,C |
| 37871 |
CP L |
| 37872 |
JR C,37884 |
| 37874 |
LD A,H |
| 37875 |
CP C |
| 37876 |
JR C,37884 |
| 37878 |
EXX |
| 37879 |
CALL 37921 |
| 37882 |
JR 37887 |
| 37884 |
CALL 37912 |
| 37887 |
INC C |
| 37888 |
BIT 5,C |
| 37890 |
JR Z,37870 |
| 37892 |
JR 37903 |
| 37894 |
PUSH BC |
| 37895 |
LD B,32 |
| 37897 |
CALL 37912 |
| 37900 |
DJNZ 37897 |
| 37902 |
POP BC |
| 37903 |
INC B |
| 37904 |
LD A,B |
| 37905 |
CP 24 |
| 37907 |
JR NZ,37860 |
| 37909 |
POP IX |
| 37911 |
RET |
| 37912 |
LD (IX+0),9 |
| 37916 |
EXX |
| 37917 |
LD A,255 |
| 37919 |
LD (HL),A |
| 37920 |
LD (DE),A |
| 37921 |
INC HL |
| 37922 |
INC HL |
| 37923 |
INC HL |
| 37924 |
INC DE |
| 37925 |
INC DE |
| 37926 |
INC DE |
| 37927 |
EXX |
| 37928 |
INC IX |
| 37930 |
RET |
