36172: Routine at 8D4C
36172 |
LD A,30 |
36174 |
LD (31033),A |
36177 |
LD A,(47082) |
36180 |
ADD A,A |
36181 |
LD HL,36358 |
36184 |
CALL PrintLine_9 |
36187 |
LD E,(HL) |
36188 |
INC HL |
36189 |
LD D,(HL) |
36190 |
PUSH DE |
36191 |
POP IY |
36193 |
LD A,(IY+0) |
36196 |
LD (36279),A |
36199 |
AND A |
36200 |
RET Z |
36201 |
LD IX,36280 |
36205 |
PUSH AF |
36206 |
LD (IX+1),6 |
36210 |
LD L,(IY+1) |
36213 |
LD H,(IY+2) |
36216 |
INC IY |
36218 |
INC IY |
36220 |
LD (IX+2),L |
36223 |
LD (IX+4),H |
36226 |
CALL 46724 |
36229 |
CALL 39184 |
36232 |
LD A,(IX+4) |
36235 |
ADD A,5 |
36237 |
LD (IX+4),A |
36240 |
CALL 36532 |
36243 |
LD A,(36168) |
36246 |
RRA |
36247 |
JR C,36256 |
36249 |
LD (IX+1),7 |
36253 |
CALL 39184 |
36256 |
LD A,(IX+2) |
36259 |
ADD A,5 |
36261 |
LD (IX+2),A |
36264 |
LD DE,16 |
36267 |
ADD IX,DE |
36269 |
POP AF |
36270 |
DEC A |
36271 |
JR NZ,36205 |
36273 |
LD A,23 |
36275 |
LD (31033),A |
36278 |
RET |