Prev: C26F Up: Map Next: C2BE
C29E: Parser: Find Phrase
Count how many of the typed tokens are real nouns.
Parser_FindPhrase C29E LD HL,$BB36 Start at the token buffer.
C2A1 LD B,$0A
C2A3 LD E,$00
Parser_FindPhrase_Loop C2A5 LD A,(HL) Jump to Parser_FindPhrase_Done if the end-of-list marker was pressed.
C2A6 CP $FF
C2A8 JR Z,Parser_FindPhrase_Done
C2AA EXX Jump to Parser_FindPhrase_Next if the search did not find a match.
C2AB LD HL,($BAEE)
C2AE LD BC,($BAFA)
C2B2 CPIR
C2B4 EXX
C2B5 JR NZ,Parser_FindPhrase_Next
C2B7 INC E Count one more match.
Parser_FindPhrase_Next C2B8 INC HL Repeat from Parser_FindPhrase_Loop for the remaining tokens.
C2B9 DJNZ Parser_FindPhrase_Loop
Parser_FindPhrase_Done C2BB XOR A Test whether E is zero.
C2BC OR E
C2BD RET Return.
Prev: C26F Up: Map Next: C2BE