6227: Routine at 6227
| 6227 |
DEC A |
| 6228 |
JR NZ,$624B |
| 622A |
LD DE,$00C8 |
| 622D |
SBC HL,DE |
| 622F |
RET C |
| 6230 |
LD HL,$0000 |
| 6233 |
LD ($5B2C),HL |
| 6236 |
LD A,$03 |
| 6238 |
LD ($5B00),A |
| 623B |
LD A,$0F |
| 623D |
LD ($5B3A),A |
| 6240 |
LD HL,$0F1F |
| 6243 |
LD C,$2C |
| 6245 |
LD A,$01 |
| 6247 |
CALL $6114 |
| 624A |
RET |
| 624B |
DEC A |
| 624C |
JP NZ,$6329 |
| 624F |
LD A,($5B36) |
| 6252 |
RRA |
| 6253 |
RRA |
| 6254 |
AND $03 |
| 6256 |
LD ($5B41),A |
| 6259 |
JR NZ,$627C |
| 625B |
LD A,($5B3A) |
| 625E |
LD H,A |
| 625F |
LD A,$0A |
| 6261 |
LD L,$1F |
| 6263 |
PUSH HL |
| 6264 |
LD C,$2C |
| 6266 |
CALL $6114 |
| 6269 |
POP HL |
| 626A |
LD A,$0F |
| 626C |
SUB H |
| 626D |
JR Z,$6279 |
| 626F |
LD B,A |
| 6270 |
INC H |
| 6271 |
LD DE,$634F |
| 6274 |
LD C,$24 |
| 6276 |
CALL $6186 |
| 6279 |
JP $6306 |
| 627C |
DEC A |
| 627D |
JR NZ,$6296 |
| 627F |
LD A,R |
| 6281 |
RRA |
| 6282 |
AND $06 |
| 6284 |
ADD A,$02 |
| 6286 |
LD HL,($5B39) |
| 6289 |
LD L,A |
| 628A |
LD A,H |
| 628B |
CP $0F |
| 628D |
JR Z,$625B |
| 628F |
INC A |
| 6290 |
LD ($5B3A),A |
| 6293 |
LD A,L |
| 6294 |
JR $6261 |
| 6296 |
DEC A |
| 6297 |
JR NZ,$62B9 |
| 6299 |
LD A,($5B36) |
| 629C |
RRA |
| 629D |
AND $06 |
| 629F |
INC A |
| 62A0 |
LD HL,($5B39) |
| 62A3 |
LD L,A |
| 62A4 |
LD A,($5B27) |
| 62A7 |
LD D,A |
| 62A8 |
LD A,$05 |
| 62AA |
SUB D |
| 62AB |
ADD A,$07 |
| 62AD |
CP H |
| 62AE |
LD A,H |
| 62AF |
JR Z,$625B |
| 62B1 |
DEC A |
| 62B2 |
DEC H |
| 62B3 |
LD ($5B3A),A |
| 62B6 |
LD A,L |
| 62B7 |
JR $6261 |
| 62B9 |
LD A,($5B42) |
| 62BC |
AND $01 |
| 62BE |
JR Z,$62C6 |
| 62C0 |
XOR A |
| 62C1 |
LD ($5B41),A |
| 62C4 |
JR $625B |
| 62C6 |
LD A,$28 |
| 62C8 |
LD C,A |
| 62C9 |
LD ($5B3D),A |
| 62CC |
LD A,R |
| 62CE |
RRA |
| 62CF |
AND $0C |
| 62D1 |
LD L,A |
| 62D2 |
RRA |
| 62D3 |
RRA |
| 62D4 |
LD ($5B28),A |
| 62D7 |
ADD A,L |
| 62D8 |
LD L,A |
| 62D9 |
CP $0F |
| 62DB |
JR NZ,$62E3 |
| 62DD |
LD A,$28 |
| 62DF |
LD C,A |
| 62E0 |
LD ($5B3D),A |
| 62E3 |
LD H,$00 |
| 62E5 |
LD DE,$633B |
| 62E8 |
ADD HL,DE |
| 62E9 |
EX DE,HL |
| 62EA |
LD A,$04 |
| 62EC |
LD ($5B00),A |
| 62EF |
LD HL,($5B39) |
| 62F2 |
LD L,$1F |
| 62F4 |
PUSH HL |
| 62F5 |
DEC H |
| 62F6 |
DEC H |
| 62F7 |
LD B,$02 |
| 62F9 |
CALL $6186 |
| 62FC |
LD ($5B3B),DE |
| 6300 |
POP HL |
| 6301 |
LD A,$09 |
| 6303 |
JP $6261 |
| 6306 |
LD A,($5B41) |
| 6309 |
LD ($5B42),A |
| 630C |
LD A,($5B27) |
| 630F |
LD L,$00 |
| 6311 |
LD H,A |
| 6312 |
LD DE,$012C |
| 6315 |
ADD HL,DE |
| 6316 |
EX DE,HL |
| 6317 |
LD HL,($5B2C) |
| 631A |
SBC HL,DE |
| 631C |
RET C |
| 631D |
LD A,$05 |
| 631F |
LD ($5B00),A |
| 6322 |
LD HL,$0000 |
| 6325 |
LD ($5B2C),HL |
| 6328 |
RET |
| 6329 |
DEC A |
| 632A |
JR NZ,$6358 |
| 632C |
LD DE,($5B3B) |
| 6330 |
LD A,$03 |
| 6332 |
LD ($5B00),A |
| 6335 |
LD A,($5B3D) |
| 6338 |
LD C,A |
| 6339 |
JR $62EF |
