7733: Routine at 7733
| 7733 |
BIT 3,E |
| 7735 |
JR NZ,$7755 |
| 7737 |
CALL $75F1 |
| 773A |
JR NZ,$7755 |
| 773C |
LD HL,($7574) |
| 773F |
LD ($B6DC),HL |
| 7742 |
LD D,$B0 |
| 7744 |
LD A,($7576) |
| 7747 |
LD E,A |
| 7748 |
LD A,($7579) |
| 774B |
LD ($B706),A |
| 774E |
LD IY,($7577) |
| 7752 |
JP $75FA |
| 7755 |
CALL $785F |
| 7758 |
BIT 1,E |
| 775A |
JP Z,$7929 |
| 775D |
BIT 0,E |
| 775F |
JR Z,$7767 |
| 7761 |
CALL $7914 |
| 7764 |
JP $75B4 |
| 7767 |
PUSH DE |
| 7768 |
PUSH BC |
| 7769 |
LD HL,($B6DC) |
| 776C |
PUSH HL |
| 776D |
CALL $7873 |
| 7770 |
CP $00 |
| 7772 |
JR Z,$776D |
| 7774 |
SET 0,E |
| 7776 |
CP $20 |
| 7778 |
JR Z,$7782 |
| 777A |
POP HL |
| 777B |
LD ($B6DC),HL |
| 777E |
POP BC |
| 777F |
POP DE |
| 7780 |
JR $7761 |
| 7782 |
CALL $7914 |
| 7785 |
POP HL |
| 7786 |
POP BC |
| 7787 |
POP HL |
| 7788 |
LD L,$02 |
| 778A |
CALL $7918 |
| 778D |
JP $75B4 |
