![]() |
Routines |
Prev: 52614 | Up: Map | Next: 52801 |
Used by the routines at DisplayIntroductionScreen and SetKempstonJoystick.
|
|||||
|
|||||
TitleScreen | 52689 | LD A,0 | Write INK: BLACK, PAPER: BLACK (0) to *ATTR_P. | ||
52691 | LD (23693),A | ||||
52694 | CALL ClearScreen | Call ClearScreen. | |||
52697 | LD A,0 | Set the border to BLACK using BORDER. | |||
52699 | CALL 8859 | ||||
52702 | LD A,0 | Write INK: BLACK, PAPER: BLACK (0) to *Active_BorderColour. | |||
52704 | LD (23504),A | ||||
This entry point is used by the routines at SetCursorJoystick, SetKempstonJoystick, SetInterface2Joystick, SetUserDefinedKeys and SetDefaultKeys.
|
|||||
Print_TitleScreen | 52707 | LD DE,55805 | DE=Messaging_TitleScreen. | ||
52710 | CALL PrintString | Call PrintString. | |||
52713 | LD A,(23530) | Call InverseOn if *ControlMethod is set to Keyboard Input (36). | |||
52716 | CP 36 | ||||
52718 | CALL Z,InverseOn | ||||
52721 | CALL PrintString | Call PrintString with Messaging_MenuKeyboard. | |||
52724 | LD A,(23530) | Call InverseOn if *ControlMethod is set to Interface 2 joystick (28). | |||
52727 | CP 28 | ||||
52729 | CALL Z,InverseOn | ||||
52732 | CALL PrintString | Call PrintString with Messaging_MenuInterface2Joystick. | |||
52735 | LD A,(23530) | Call InverseOn if *ControlMethod is set to Cursor joystick (20). | |||
52738 | CP 20 | ||||
52740 | CALL Z,InverseOn | ||||
52743 | CALL PrintString | Call PrintString with Messaging_MenuCursorJoystick. | |||
52746 | LD A,(23530) | Call InverseOn if *ControlMethod is set to Kempston joystick (12). | |||
52749 | CP 12 | ||||
52751 | CALL Z,InverseOn | ||||
52754 | CALL PrintString | Call PrintString with Messaging_MenuKempstonJoystick. | |||
52757 | LD A,(23530) | A=*ControlMethod (unused, A is overwritten immediately by PrintString on the next line). | |||
52760 | CALL PrintString | Call PrintString with Messaging_MenuDefineKeys. | |||
52763 | CALL PrintString | Call PrintString with Messaging_MenuStartGame. | |||
Keep looping until we get user input.
|
|||||
TitleScreen_InputLoop | 52766 | CALL MenuKeypress | Call MenuKeypress. | ||
52769 | CP 36 | Jump to SetDefaultKeys if A is set to Keyboard input (36). | |||
52771 | JP Z,SetDefaultKeys | ||||
52774 | CP 28 | Jump to SetInterface2Joystick if A is set to Interface 2 joystick (28). | |||
52776 | JP Z,SetInterface2Joystick | ||||
52779 | CP 20 | Jump to SetCursorJoystick if A is set to Cursor joystick (20). | |||
52781 | JP Z,SetCursorJoystick | ||||
52784 | CP 12 | Jump to SetKempstonJoystick if A is set to Kempston joystick (12). | |||
52786 | JP Z,SetKempstonJoystick | ||||
52789 | CP 4 | Jump to SetUserDefinedKeys if A is set to User-Defined key input (4). | |||
52791 | JP Z,SetUserDefinedKeys | ||||
52794 | CP 35 | Jump to TitleScreen_InputLoop if A is NOT set to start the game (35). | |||
52796 | JR NZ,TitleScreen_InputLoop | ||||
Else, the player has selected "0" to start the game.
|
|||||
52798 | JP StartGame | Jump to StartGame. |
Prev: 52614 | Up: Map | Next: 52801 |