| MainMenu |
B5B3 |
XOR A |
|
B5B4 |
LD (IgnoreEnergy),A |
|
B5B7 |
CALL ScreenClearSimple |
|
B5BA |
LD HL,Str_MainMenu |
|
B5BD |
LD DE,$0003 |
|
B5C0 |
CALL String_DrawDouble |
|
B5C3 |
CALL Menu_UpdateKeys |
| MainMenu_0 |
B5C6 |
CALL Game_MenuKeyScan |
|
B5C9 |
CALL Game_InputAsAscii |
|
B5CC |
CP $31 |
|
B5CE |
JR NZ,MainMenu_1 |
|
B5D0 |
CALL Beep_BasicKey |
|
B5D3 |
CALL Game_InputSetSinclair |
|
B5D6 |
CALL Menu_UpdateKeys |
|
B5D9 |
JR MainMenu_0 |
| MainMenu_1 |
B5DB |
CP $32 |
|
B5DD |
JR NZ,MainMenu_2 |
|
B5DF |
CALL Beep_BasicKey |
|
B5E2 |
CALL Game_InputSetKempston |
|
B5E5 |
CALL Menu_UpdateKeys |
|
B5E8 |
JR MainMenu_0 |
| MainMenu_2 |
B5EA |
CP $33 |
|
B5EC |
JR NZ,MainMenu_3 |
|
B5EE |
CALL Beep_BasicKey |
|
B5F1 |
CALL Game_InputSetKeys |
|
B5F4 |
JR MainMenu |
| MainMenu_3 |
B5F6 |
CP $01 |
|
B5F8 |
JR NZ,MainMenu_0 |
|
B5FA |
RET |