45309: Routine at B0FD
| 45309 |
LD BC,8 |
| 45312 |
BIT 3,E |
| 45314 |
JR NZ,45319 |
| 45316 |
CALL 44742 |
| 45319 |
PUSH IY |
| 45321 |
POP HL |
| 45322 |
ADD HL,BC |
| 45323 |
PUSH DE |
| 45324 |
PUSH HL |
| 45325 |
BIT 3,E |
| 45327 |
JR NZ,45336 |
| 45329 |
SET 3,E |
| 45331 |
CALL 44713 |
| 45334 |
JR 45343 |
| 45336 |
LD HL,40978 |
| 45339 |
INC (HL) |
| 45340 |
CALL 44650 |
| 45343 |
PUSH IY |
| 45345 |
POP HL |
| 45346 |
LD BC,24 |
| 45349 |
ADD HL,BC |
| 45350 |
POP DE |
| 45351 |
EX DE,HL |
| 45352 |
LD BC,6 |
| 45355 |
LDIR |
| 45357 |
POP DE |
| 45358 |
LD A,E |
| 45359 |
OR 199 |
| 45361 |
LD E,A |
| 45362 |
JP 43729 |
| 45365 |
CALL 45025 |
| 45368 |
LD A,2 |
| 45370 |
LD (40996),A |
| 45373 |
JR 45387 |
| 45375 |
BIT 3,E |
| 45377 |
JR Z,45387 |
| 45379 |
PUSH DE |
| 45380 |
CALL 44713 |
| 45383 |
CALL 44650 |
| 45386 |
POP DE |
| 45387 |
SET 7,(IY+25) |
| 45391 |
JR 45358 |
| 45393 |
CALL 45025 |
| 45396 |
LD A,2 |
| 45398 |
LD (40996),A |
| 45401 |
JR 45415 |
| 45403 |
BIT 3,E |
| 45405 |
JR Z,45415 |
| 45407 |
PUSH DE |
| 45408 |
CALL 44713 |
| 45411 |
CALL 44650 |
| 45414 |
POP DE |
| 45415 |
SET 6,(IY+25) |
| 45419 |
JR 45358 |
