53B1: Clear the screen and request the input method (keyboard, joystick, Int2)
|
53B1 |
|
LD BC,$0280 |
|
53B4 |
|
LD DE,$5801 |
|
53B7 |
|
LD HL,$5800 |
|
53BA |
|
LD (HL),$30 |
|
53BC |
|
LDIR |
|
53BE |
|
LD C,$80 |
|
53C0 |
|
LD (HL),$36 |
|
53C2 |
|
LDIR |
|
53C4 |
|
CALL $53AB |
|
53C7 |
|
LD H,$40 |
|
53C9 |
|
LD D,H |
|
53CA |
|
LD (HL),L |
|
53CB |
|
LD B,$10 |
|
53CD |
|
LDIR |
|
53CF |
|
LD B,$A0 |
|
53D1 |
|
LD (HL),C |
|
53D2 |
|
INC L |
|
53D3 |
|
DJNZ $53D1 |
|
53D5 |
|
LD L,B |
|
53D6 |
|
INC H |
|
53D7 |
|
BIT 3,H |
|
53D9 |
|
JR Z,$53CF |
|
53DB |
|
LD A,$80 |
|
53DD |
|
LD ($7FFF),A |
|
53E0 |
|
NOP |
|
53E1 |
|
CALL $50A0 |
|
53E4 |
|
LD A,$F6 |
|
53E6 |
|
LD HL,$4040 |
|
53E9 |
|
CALL $50BC |
|
53EC |
|
LD HL,$5C3B |
|
53EF |
|
RES 5,(HL) |
|
53F1 |
|
JP $54A0 |