46274: Routine at B4C2
| 46274 |
LD HL,24744 |
| 46277 |
LD BC,1809 |
| 46280 |
EXX |
| 46281 |
LD A,(24128) |
| 46284 |
LD L,A |
| 46285 |
LD H,0 |
| 46287 |
EXX |
| 46288 |
PUSH BC |
| 46289 |
LD (HL),228 |
| 46291 |
INC HL |
| 46292 |
INC HL |
| 46293 |
LD A,(DE) |
| 46294 |
LD (HL),A |
| 46295 |
INC DE |
| 46296 |
INC HL |
| 46297 |
LD A,(DE) |
| 46298 |
LD (HL),A |
| 46299 |
INC HL |
| 46300 |
INC DE |
| 46301 |
LD A,(DE) |
| 46302 |
LD (HL),A |
| 46303 |
DEC DE |
| 46304 |
DEC DE |
| 46305 |
INC HL |
| 46306 |
EXX |
| 46307 |
LD A,(HL) |
| 46308 |
INC HL |
| 46309 |
AND A |
| 46310 |
JP P,46377 |
| 46313 |
OR 252 |
| 46315 |
EXX |
| 46316 |
LD (HL),A |
| 46317 |
INC HL |
| 46318 |
EXX |
| 46319 |
LD A,(HL) |
| 46320 |
INC HL |
| 46321 |
AND 3 |
| 46323 |
OR 252 |
| 46325 |
SUB 1 |
| 46327 |
EXX |
| 46328 |
LD (HL),A |
| 46329 |
INC HL |
| 46330 |
EXX |
| 46331 |
LD A,(HL) |
| 46332 |
INC HL |
| 46333 |
AND 7 |
| 46335 |
CP 2 |
| 46337 |
JR NC,46341 |
| 46339 |
LD A,7 |
| 46341 |
OR 64 |
| 46343 |
EXX |
| 46344 |
LD (HL),A |
| 46345 |
INC HL |
| 46346 |
INC HL |
| 46347 |
LD (HL),0 |
| 46349 |
INC HL |
| 46350 |
DJNZ 46347 |
| 46352 |
EXX |
| 46353 |
LD A,(HL) |
| 46354 |
INC HL |
| 46355 |
AND 7 |
| 46357 |
INC A |
| 46358 |
EXX |
| 46359 |
LD (HL),A |
| 46360 |
INC HL |
| 46361 |
LD (HL),A |
| 46362 |
LD A,L |
| 46363 |
ADD A,7 |
| 46365 |
LD L,A |
| 46366 |
LD A,H |
| 46367 |
ADC A,0 |
| 46369 |
LD H,A |
| 46370 |
POP BC |
| 46371 |
DEC C |
| 46372 |
JR NZ,46288 |
| 46374 |
JP 47494 |
| 46377 |
AND 3 |
| 46379 |
INC A |
| 46380 |
JR 46315 |
