![]() |
Routines |
| Prev: 76EC | Up: Map | Next: 770B |
| InglishAcceptTheClause | 76F2 | BIT 2,E | Jump to Inglish_AskWhat_0 if bit 2 of the grammar flag is clear. | |
| 76F4 | JP Z,Inglish_AskWhat_0 | |||
|
Test the matcher phase.
|
||||
| 76F7 | LD A,($B719) | Jump to InglishAcceptTheClause_StoreThePair if *B719 is not 02. | ||
| 76FA | CP $02 | |||
| 76FC | JR NZ,InglishAcceptTheClause_StoreThePair | |||
| 76FE | CALL Inglish_ClearTheMatcherPhase | Call Inglish_ClearTheMatcherPhase to clear the matcher phase. | ||
| InglishAcceptTheClause_StoreThePair | 7701 | RES 2,E | Clear the flags so bit 2 is off. | |
| 7703 | LD L,$02 | Two bytes of the accepted pair are stored. | ||
| 7705 | CALL Inglish_StoreTheBytePair_0 | Call Inglish_StoreTheBytePair_0 to store the pair of clause bytes. | ||
| 7708 | JP InglishPrepareTheClause_3 | Jump back to InglishPrepareTheClause_3 to clear the matcher scratch. | ||
| Prev: 76EC | Up: Map | Next: 770B |