44072: Routine at AC28
44072 |
EI |
44073 |
LD A,126 |
44075 |
OUT (253),A |
44077 |
IN A,(254) |
44079 |
BIT 0,A |
44081 |
RET NZ |
44082 |
CPL |
44083 |
AND %00011110 |
44085 |
RET NZ |
44086 |
LD A,126 |
44088 |
OUT (253),A |
44090 |
IN A,(254) |
44092 |
BIT 0,A |
44094 |
JR Z,44086 |
44096 |
LD HL,23672 |
44099 |
LD A,(HL) |
44100 |
CP (HL) |
44101 |
JR Z,44100 |
44103 |
LD A,D |
44104 |
ADD A,4 |
44106 |
LD D,A |
44107 |
RLCA |
44108 |
RLCA |
44109 |
AND %00000010 |
44111 |
OR %00000001 |
44113 |
OUT (254),A |
44115 |
LD A,126 |
44117 |
OUT (253),A |
44119 |
IN A,(254) |
44121 |
BIT 0,A |
44123 |
JR NZ,44096 |
44125 |
LD A,126 |
44127 |
OUT (253),A |
44129 |
IN A,(254) |
44131 |
BIT 0,A |
44133 |
JR Z,44125 |
44135 |
XOR A |
44136 |
OUT (254),A |
44138 |
RET |
44139 |
LD HL,44151 |
44142 |
LD DE,38658 |
44145 |
LD BC,144 |
44148 |
LDIR |
44150 |
RET |