Prev: 7795 Up: Map Next: 77C9
77A2: Parse a preposition
PARSE_PREPOSITION 77A2 CALL ADD_PREPOSITION Into PHRASE
PARSE_PREPOSITION_0 77A5 CALL NEXT_TOKEN Another preposition follows? Add that too
77A8 CP $70
77AA JR Z,PARSE_PREPOSITION
77AC CP $80 An article: allowed once, then dropped
77AE JR NZ,PHRASE_GOES_ON
77B0 BIT 4,E
77B2 CALL Z,ORDERS_ONLY
77B5 RES 4,E
77B7 JR PARSE_PREPOSITION_0
This entry point is used by the routine at PARSE_ADJECTIVE.
PHRASE_GOES_ON 77B9 CP $60 An adjective or a noun: carry on building the phrase
77BB JR Z,PARSE_ADJECTIVE
77BD CP $50
77BF JR Z,PARSE_NOUN
77C1 LD HL,(VARIABLES) Anything else: put it back, and file the phrase without a noun
77C4 LD (TOKEN_POINTER),HL
77C7 JR AS_NOUN
Prev: 7795 Up: Map Next: 77C9