Routines
Prev: 76F2 Up: Map Next: 772F
770B: Inglish: Save The Match
Saves the bytes of a match so it can be restored if a later try fails. Reached through the jump table at JumpTable, dispatched from 75D0.
InglishSaveTheMatch 770B RES 3,E Clear the flags so bit 3 is off.
770D PUSH DE
InglishSaveTheMatch_Loop 770E CALL Inglish_ReadTheNextGrammarByte Call Inglish_ReadTheNextGrammarByte to read the next grammar byte.
7711 CP $A0 Jump back to InglishSaveTheMatch_Loop if the grammar byte is A0.
7713 JR Z,InglishSaveTheMatch_Loop
7715 DEC HL Step back one byte through the text.
7716 DEC HL Step back one byte through the text.
7717 LD ($7574),HL Remember the text pointer at InglishPrepareTheClause.
771A LD ($B6DC),HL Update *B6DC.
771D POP DE Take the low byte of the saved word.
771E LD A,E
771F LD ($7576),A Store the result at 7576.
7722 LD ($7577),IY Store IY at 7577.
7726 LD A,($B706) Read *B706.
7729 LD ($7579),A Store the result at 7579.
772C JP InglishMatchOneWord Jump to InglishMatchOneWord to match one word.
View the equivalent code in;
Prev: 76F2 Up: Map Next: 772F