Routines
Prev: A7C5 Up: Map Next: A7EA
A7D0: Check Token Match And Set Flag
Used by the routines at ProcessTextTokenWithAttributes, CheckObjectHasSpecialDescription and CheckObjectAttributeWithFlag.
Input
DE Token value to check
CheckTokenMatchAndSetFlag A7D0 XOR A Write 00 to *A7EA.
A7D1 LD ($A7EA),A
A7D4 BIT 7,D Jump to PrintTokenBasedOnParameters if bit 7 of D is not set.
A7D6 JR Z,PrintTokenBasedOnParameters
A7D8 LD A,E A=E.
A7D9 LD HL,$09EE HL=09EE.
A7DC CP L Jump to CheckTokenMatchAndSetFlag_0 if A is not equal to L.
A7DD JR NZ,CheckTokenMatchAndSetFlag_0
A7DF LD A,D A=D.
A7E0 AND %00001111 Keep only bits 0-3.
A7E2 CP H Return if A is equal to H.
A7E3 RET Z
CheckTokenMatchAndSetFlag_0 A7E4 LD A,$01 Write 01 to *A7EA.
A7E6 LD ($A7EA),A
A7E9 RET Return.
Prev: A7C5 Up: Map Next: A7EA