Prev: DFCC Up: Map Next: E151
E03A: Routine at E03A
Used by the routines at DFCC and E17B.
E03A LD C,A
E03B LD A,($A036)
E03E CALL FindCharacter
This entry point is used by the routine at DFCC.
E041 LD (IY+$00),C
E044 LD IY,($A017)
E048 LD A,C
E049 CALL FetchObjectDataPointer
E04C LD ($A017),IX
E050 LD A,(IY+$01)
E053 LD (IX+$01),A
E056 LD (IY+$01),$FF
E05A LD A,(IY+$0F)
E05D LD (IX+$0F),A
E060 LD (IY+$0F),$00
E064 LD B,$00
E066 INC B
E067 LD A,B
E068 CP $6E
E06A JR Z,$E07C
E06C CALL FetchObjectDataPointer
E06F LD A,($A036)
E072 CP (IX+$01)
E075 JR NZ,$E066
E077 LD (IX+$01),C
E07A JR $E066
E07C CALL FindCharacterScriptEntry
E07F JR Z,$E086
E081 LD (IX+$00),C
E084 JR $E07C
E086 LD A,C
E087 LD ($A036),A
E08A OR $01
E08C RET
E08D ADC A,L
E08E INC B
E08F ADD A,A
E090 PUSH IY
E092 DEFB $FD
E093 RST $38
E094 SBC A,E
E095 RET PO
E096 DEC B
E097 SBC A,(IY+$6B)
E09A DEC BC
E09B LD (BC),A
E09C DEC E
E09D CALL M,$0BFF
E0A0 ADC A,B
E0A1 NOP
E0A2 RLCA
E0A3 XOR L
E0A4 RET PO
E0A5 LD (BC),A
E0A6 LD E,L
E0A7 RLCA
E0A8 DEC (HL)
E0A9 POP HL
E0AA DEFB $FD
E0AB RST $38
E0AC DEC BC
E0AD LD C,L
E0AE RLCA
E0AF INC E
E0B0 RET PO
E0B1 LD A,($A00A)
E0B4 CP $58
E0B6 JR NZ,$E0DD
E0B8 LD A,($9FE1)
E0BB CP $01
E0BD JR NZ,$E0DD
E0BF LD IX,($A015)
E0C3 SET 7,(IX+$06)
E0C7 SET 7,(IX+$05)
E0CB LD A,($A00A)
E0CE LD (IX+$0F),A
E0D1 LD A,($A034)
E0D4 LD (IX+$01),A
E0D7 LD HL,$7B5A
E0DA CALL PrintTextAndHandleControlCharacters
E0DD OR $01
E0DF RET
E0E0 ADC A,B
E0E1 NOP
E0E2 RLCA
E0E3 DEC (HL)
E0E4 POP HL
E0E5 DEFB $FD
E0E6 RST $38
E0E7 INC BC
E0E8 EX DE,HL
E0E9 RET PO
E0EA DEC BC
E0EB NOP
E0EC NOP
E0ED LD A,$51
E0EF JP $9C56
E0F2 ADC A,B
E0F3 NOP
E0F4 RLCA
E0F5 DEC (HL)
E0F6 POP HL
E0F7 DEFB $FD
E0F8 RST $38
E0F9 INC BC
E0FA DEFB $FD
E0FB RET PO
E0FC DEC BC
E0FD NOP
E0FE NOP
E0FF LD A,$3F
E101 JP $9C56
E104 EX AF,AF'
E105 LD H,B
E106 LD A,$01
E108 LD ($CAAE),A
E10B LD A,($A036)
E10E AND A
E10F RET NZ
E110 CALL PrintObjectDescriptionText
E113 LD IX,($A013)
E117 BIT 5,(IX+$05)
E11B RET NZ
E11C SET 5,(IX+$05)
E120 LD HL,$7BF7
E123 LD (IX+$0D),L
E126 LD (IX+$0E),H
E129 LD HL,$7C13
E12C CALL PrintTextAndHandleControlCharacters
E12F CALL PrintNewline
E132 OR $01
E134 RET
E135 LD A,B
E136 LD D,B
E137 LD L,$DF
E139 ADD A,B
E13A LD B,B
E13B NOP
E13C NOP
E13D NOP
E13E LD A,$01
E140 LD ($CAAE),A
E143 LD A,($A036)
E146 AND A
E147 RET NZ
E148 CALL LookupAndPrintDisplayText
E14B CALL PrintNewline
E14E OR $01
E150 RET
Prev: DFCC Up: Map Next: E151