Prev: 43022 Up: Map Next: 43055
43029: Read The High Byte Of The Token
Used by the routines at 54294 and ReadScheduleField.
Keeps the low digit of the token and folds it into the dictionary page.
43029 PUSH AF Keep the token and take its high byte.
43030 LD A,D
43031 AND %00001111 Keep the dictionary page (the low nibble of the token's high byte).
43033 LD D,A Keep the low digit of the token in D.
43034 POP AF Restore the saved result from the stack.
43035 OR D Set the bits from D.
43036 LD D,A Fold the saved token bits back into D.
43037 AND %00001111 Keep the dictionary page of the folded token, ready to test the whole token.
43039 OR E Fold in the low byte of the token, so the zero flag shows an empty token.
43040 RET Z Return if the folded token is zero.
Print text token.
43041 CALL PrintTextToken Call PrintTextToken to print the dictionary word.
43044 LD A,(42986) Read the token match flag at 42986 and point HL at the token format flag at TokenFormatFlag.
43047 PUSH HL
43048 LD HL,40998
43051 OR (HL) Set the bits from *HL.
43052 LD (HL),A Store the result at the pointer.
43053 POP HL Restore the text pointer from the stack.
43054 RET Return.
Prev: 43022 Up: Map Next: 43055