Prev: 7CCB Up: Map Next: 7D17
7CFC: Inglish: Run The First Noun Test
Used by the routine at Inglish_FindTheFirstNoun.
Runs the first-noun test through the clause handler, stores the object, and runs the action handler until the message-suppressed flag is set.
Inglish_RunTheFirstNounTest 7CFC LD HL,$7942 Point HL at the first copy window.
7CFF CALL Inglish_JumpToTheClauseHandler Call Inglish_JumpToTheClauseHandler to jump to the clause handler.
7D02 CP $FF Return when the clause marker is FF.
7D04 RET Z
7D05 LD ($B6E8),A Update *CurrentObject.
7D08 LD HL,$793D Point HL at the match buffer.
7D0B SET 1,(HL) Mark the match buffer so bit 1 is on.
7D0D CALL Turn_RunTheActionHandler Call Turn_RunTheActionHandler to run the action handler.
Test the message-suppressed flag.
7D10 LD A,($B6FB) Loop back to Inglish_RunTheFirstNounTest to keep running the action while the message-suppressed flag is clear.
7D13 AND A
7D14 JR Z,Inglish_RunTheFirstNounTest
7D16 RET Return.
View the equivalent code in;
Prev: 7CCB Up: Map Next: 7D17