C713: Routine at C713
| C713 |
LD HL,($C4E5) |
| C716 |
LD A,(HL) |
| C717 |
AND A |
| C718 |
JP Z,$C777 |
| C71B |
INC HL |
| C71C |
LD ($C4E5),HL |
| C71F |
LD HL,$5800 |
| C722 |
LD A,($C42E) |
| C725 |
LD B,$40 |
| C727 |
LD (HL),A |
| C728 |
INC HL |
| C729 |
DJNZ $C727 |
| C72B |
LD B,$15 |
| C72D |
LD DE,$001F |
| C730 |
LD (HL),A |
| C731 |
ADD HL,DE |
| C732 |
LD (HL),A |
| C733 |
INC HL |
| C734 |
DJNZ $C730 |
| C736 |
LD B,$20 |
| C738 |
LD (HL),A |
| C739 |
INC HL |
| C73A |
DJNZ $C738 |
| C73C |
LD HL,($C4E5) |
| C73F |
DEC HL |
| C740 |
LD C,(HL) |
| C741 |
LD H,$58 |
| C743 |
LD A,($C420) |
| C746 |
LD L,A |
| C747 |
LD B,$07 |
| C749 |
LD (HL),C |
| C74A |
INC HL |
| C74B |
DJNZ $C749 |
| C74D |
LD A,$BF |
| C74F |
IN A,($FE) |
| C751 |
AND $10 |
| C753 |
JP Z,$C760 |
| C756 |
LD A,$FD |
| C758 |
IN A,($FE) |
| C75A |
AND $08 |
| C75C |
JP Z,GameEntryPoint |
| C75F |
RET |
| C760 |
CALL PollHKey |
| C763 |
DEC D |
| C764 |
JP NZ,$C760 |
| C767 |
CALL PollHKey |
| C76A |
DEC E |
| C76B |
JP NZ,$C767 |
| C76E |
CALL PollHKey |
| C771 |
DEC D |
| C772 |
JP NZ,$C76E |
| C775 |
RET |
| C776 |
RET |
| C777 |
LD HL,$C70C |
| C77A |
JP $C716 |
