Routines
Prev: 33445 Up: Map Next: 33527
33459: Command: Dispatch A Control
Used by the routines at Command_PRINT, DisplayLocateHelpMessage, GameOver, PercentageAscii, LoadGame and SaveGame.
Dispatches a control key to the routine that handles it.
CommandDispatchAControl 33459 LD A,(46814) Read *46814.
33462 LD D,A Keep the class being matched.
33463 JP InglishPrepareTheClause_3 Jump back to InglishPrepareTheClause_3 to clear the matcher scratch.
Test the matcher phase. Reached through the special-key table at 33393, dispatched from Command_MatchASpecialKey.
33466 LD A,(46873) Jump to Inglish_AskWhat_0 if *46873 is not 1.
33469 CP 1
33471 JP NZ,Inglish_AskWhat_0
33474 LD A,2 Write 2 to *46873.
33476 LD (46873),A
33479 LD A,(IY+1) Set bit 7 of the next byte of this record.
33482 OR 128 Merge in 128.
33484 LD (IY+1),A Store that byte.
33487 JP InglishPrepareTheClause_3 Jump back to InglishPrepareTheClause_3 to clear the matcher scratch.
Test the matcher phase. Reached through the special-key table at 33393, dispatched from Command_MatchASpecialKey.
33490 LD A,(46873) Jump to InglishPrepareTheClause_3 if *46873 is 2.
33493 CP 2
33495 JP Z,InglishPrepareTheClause_3
33498 LD A,1 Write 1 to *46873.
33500 LD (46873),A
33503 JP InglishPrepareTheClause_3 Jump back to InglishPrepareTheClause_3 to clear the matcher scratch.
Reached through the special-key table at 33393, dispatched from Command_MatchASpecialKey.
33506 PUSH DE Point HL at the six match bytes.
33507 LD HL,46816
33510 LD DE,30079 Name the matcher patch at 30079 as the copy destination.
33513 LD BC,6 Copy the prepared bytes.
33516 LDIR
33518 POP DE Restore the caller's pointer from the stack and test its top bit.
33519 BIT 7,E
33521 CALL Command_FollowTheGrammarFlag Call Command_FollowTheGrammarFlag to follow the grammar flag.
33524 JP InglishPrepareTheClause_3 Jump back to InglishPrepareTheClause_3 to clear the matcher scratch.
Prev: 33445 Up: Map Next: 33527