Prev: 31347 Up: Map Next: 31418
31393: Inglish: Note The First Noun
Used by the routine at Inglish_ScoreTheCurrentAction.
Notes the first noun in the saved object pointer when the phrase scratch byte is clear and the noun-print flag is set.
Inglish_NoteTheFirstNoun 31393 LD A,(46876) Read *46876.
31396 AND A Return if the phrase scratch byte is not zero.
31397 RET NZ
This entry point is used by the routine at Inglish_BuildTheActionSentence.
Inglish_NoteTheFirstNoun_0 31398 LD A,(46878) Read *46878.
31401 RRCA Expose the low bit of the clause being built.
31402 RRCA Expose the low bit of the clause being built.
31403 CALL Inglish_ChooseTheObjectTable Call Inglish_ChooseTheObjectTable to choose the object table.
31406 LD A,(46846) Read *46846.
31409 AND A Call ExitsPointAtTheExitList if the noun-print flag is not zero.
31410 CALL NZ,ExitsPointAtTheExitList
31413 LD (31054),IX Remember this record in the saved object pointer.
31417 RET Return.
Prev: 31347 Up: Map Next: 31418