Prev: DC15 Up: Map Next: DD0B
DC6C: Check Character ID
CheckCharacterID DC6C LD A,($A036)
DC6F CP $00
DC71 RET Z
DC72 CP $01
DC74 RET Z
DC75 CP $64
DC77 RET Z
DC78 OR $01
DC7A RET
DC7B JR NZ,CheckCharacterID_0
DC7D CALL CheckCharacterID
DC80 RET NZ
DC81 CALL PrintNewline
DC84 LD A,($A00A)
DC87 CALL ProcessLocationTokenDisplay
DC8A OR $01
DC8C RET
CheckCharacterID_0 DC8D LD L,D
DC8E DJNZ ReturnZero_1
DC90 DEFB $DD
DC91 LD IX,($A013)
DC95 LD IY,($A017)
DC99 LD A,(IY+$01)
DC9C LD (IX+$01),A
DC9F OR $01
DCA1 RET
DCA2 CALL ProcessObjectFromA034_D26C
DCA5 JR C,CheckCharacterID_2
This entry point is used by the routine at E17B.
CheckCharacterID_1 DCA7 LD A,($A036)
DCAA LD HL,$A034
DCAD CALL CheckCharacterIDRange_0
DCB0 JP C,ReturnZero
DCB3 OR $01
DCB5 RET
CheckCharacterID_2 DCB6 LD HL,$DCBB
DCB9 XOR A
DCBA RET
DCBB LD HL,$68B7
DCBE JP PrintTextAndHandleControlCharacters
DCC1 LD L,C
DCC2 DJNZ ReturnZero_4
DCC4 CALL C,$2ADD
DCC7 INC DE
DCC8 AND B
DCC9 LD A,($A036)
DCCC LD (IX+$01),A
DCCF OR $01
DCD1 RET
DCD2 LD A,($A033)
DCD5 CALL CheckObjectAttributeWithFlag_3
CheckCharacterID_3 DCD8 CP $FF
DCDA JP Z,ReturnZero
This entry point is used by the routine at ReturnZero.
CheckCharacterID_4 DCDD CALL CheckFlagAndJumpToNewline
DCE0 LD IY,($A017)
DCE4 LD A,(IY+$01)
DCE7 CP $FF
DCE9 JP NZ,ReturnZero
DCEC LD A,(IX+$02)
DCEF AND A
DCF0 JP Z,ReturnZero
DCF3 LD A,(IX+$01)
DCF6 CALL $DD35
DCF9 JP NZ,ReturnZero
DCFC OR $01
DCFE RET
DCFF NOP
DD00 NOP
DD01 NOP
DD02 NOP
DD03 LD H,B
DD04 JR NZ,CheckCharacterID_3
DD06 CALL C,$7EDD
DD09 LD (BC),A
DD0A LD B,A
Prev: DC15 Up: Map Next: DD0B