30515: Routine at 7733
| 30515 |
BIT 3,E |
| 30517 |
JR NZ,30549 |
| 30519 |
CALL 30193 |
| 30522 |
JR NZ,30549 |
| 30524 |
LD HL,(30068) |
| 30527 |
LD (46812),HL |
| 30530 |
LD D,176 |
| 30532 |
LD A,(30070) |
| 30535 |
LD E,A |
| 30536 |
LD A,(30073) |
| 30539 |
LD (46854),A |
| 30542 |
LD IY,(30071) |
| 30546 |
JP 30202 |
| 30549 |
CALL 30815 |
| 30552 |
BIT 1,E |
| 30554 |
JP Z,31017 |
| 30557 |
BIT 0,E |
| 30559 |
JR Z,30567 |
| 30561 |
CALL 30996 |
| 30564 |
JP 30132 |
| 30567 |
PUSH DE |
| 30568 |
PUSH BC |
| 30569 |
LD HL,(46812) |
| 30572 |
PUSH HL |
| 30573 |
CALL 30835 |
| 30576 |
CP 0 |
| 30578 |
JR Z,30573 |
| 30580 |
SET 0,E |
| 30582 |
CP 32 |
| 30584 |
JR Z,30594 |
| 30586 |
POP HL |
| 30587 |
LD (46812),HL |
| 30590 |
POP BC |
| 30591 |
POP DE |
| 30592 |
JR 30561 |
| 30594 |
CALL 30996 |
| 30597 |
POP HL |
| 30598 |
POP BC |
| 30599 |
POP HL |
| 30600 |
LD L,2 |
| 30602 |
CALL 31000 |
| 30605 |
JP 30132 |
