Prev: 31587 Up: Map Next: 31646
31608: Inglish: Split The Clause Flags
Splits the clause flags into the noun-print flag, the second-noun flag and the bytes kept for the match.
Inglish_SplitTheClauseFlags 31608 LD A,(46878) Read *46878.
31611 AND 64 Keep only bit 6.
31613 LD (46865),A Store the result at 46865.
31616 LD A,(46877) Read *46877.
31619 LD B,A Copy the result into B.
31620 AND 1 Keep only bit 0.
31622 LD (46863),A Store the result at 46863.
31625 LD A,B Use the phrase scratch byte again.
31626 AND 128 Keep only bit 7.
31628 JR Z,Inglish_SplitTheClauseFlags_StoreTheNounPrintFlag Jump to Inglish_SplitTheClauseFlags_StoreTheNounPrintFlag if bit 7 of the phrase scratch byte is clear.
31630 LD A,1 Set the noun-print flag.
Inglish_SplitTheClauseFlags_StoreTheNounPrintFlag 31632 LD (46846),A Update *46846.
31635 LD A,B Use the phrase scratch byte again.
31636 AND 64 Keep only bit 6.
31638 JR Z,Inglish_SplitTheClauseFlags_StoreTheSecondNounFlag Jump to Inglish_SplitTheClauseFlags_StoreTheSecondNounFlag if bit 6 of the phrase scratch byte is clear.
31640 LD A,1 Set the second-noun flag.
Inglish_SplitTheClauseFlags_StoreTheSecondNounFlag 31642 LD (46847),A Update *46847.
31645 RET Return.
Prev: 31587 Up: Map Next: 31646