Prev: 28025 Up: Map Next: 28418
28317: Title Screen
TitleScreen 28317 LD HL,28317 Write TitleScreen to *ERR_SP.
28320 LD (23613),HL
28323 DEC HL Set the stack pointer to 28316.
28324 LD SP,HL
28325 CALL DisplayTitleScreen Call DisplayTitleScreen.
28328 LD A,(28418) Highlight the currently selected menu item in ControlMethod.
28331 CALL HighlightMenuLine
28334 CALL ResetThemeTune Call ResetThemeTune.
TitleScreen_Loop 28337 CALL 654 Call KEY_SCAN.
28340 LD A,%00001111 Mask off bits 4-7.
28342 AND E
28343 CP 4 Jump to TitleScreenRouting if there is any input.
28345 JR Z,TitleScreenRouting
28347 CP 12
28349 JR Z,TitleScreenRouting
28351 CP 3
28353 JR Z,TitleScreenRouting
28355 CP 11
28357 JR Z,TitleScreenRouting
TitleScreenNoInput 28359 CALL HandlerThemeTune Call HandlerThemeTune.
28362 JR TitleScreen_Loop Loop back around to TitleScreen_Loop.
Handler directing the keypress to the appropriate routines.
TitleScreenRouting 28364 LD A,E Fetch the user input.
28365 CP 35 Jump to TitleScreenNoInput if E is 35.
28367 JR Z,TitleScreenNoInput
28369 CP 36 Jump to TitleScreen_DefineKeysSelected if "DEFINE KEYBOARD" was selected.
28371 JR Z,TitleScreen_DefineKeysSelected
28373 CP 28 Jump to TitleScreen_KempstonSelected if "KEMPSTON" was selected.
28375 JR Z,TitleScreen_KempstonSelected
28377 CP 20 Jump to TitleScreen_CursorSelected if "CURSOR" was selected.
28379 JR Z,TitleScreen_CursorSelected
28381 CP 12 Jump to TitleScreen_SinclairIF2Selected if "SINCLAIR IF2" was selected.
28383 JR Z,TitleScreen_SinclairIF2Selected
28385 CP 4 Jump to TitleScreen_KeyboardSelected if "KEYBOARD" was selected.
28387 JR Z,TitleScreen_KeyboardSelected
28389 CP 3 Jump to StartGame if "START GAME" was selected.
28391 JP Z,StartGame
28394 CP 11 Jump to DisplayInformationPages if "INFORMATION" was selected.
28396 JP Z,DisplayInformationPages
28399 CP 19 Jump to DisplayWinnersListPage if "WINNERS LIST" was selected.
28401 JP Z,DisplayWinnersListPage
Else "9" was pressed which is "RETURN TO BASIC".
28404 LD HL,28419 Delete the game code and jump to RESET.
28407 LD DE,28420
28410 LD BC,37116
28413 LDIR
28415 JP 100
Prev: 28025 Up: Map Next: 28418