routine81 |
D7A6 |
LD HL,(D_ADD) |
|
D7A9 |
LD (TEMADD),HL |
|
D7AC |
CALL EN_AN |
|
D7AF |
LD HL,(TEMADD) |
|
D7B2 |
LD (D_ADD),HL |
|
D7B5 |
LD HL,INBUF |
|
D7B8 |
LD (BUFPNT),HL |
|
D7BB |
LD A,(SRTCNT) |
|
D7BE |
INC A |
|
D7BF |
CALL SORT |
routine81_0 |
D7C2 |
CALL GETPLA |
|
D7C5 |
CP $FF |
|
D7C7 |
JR NZ,routine81_1 |
|
D7C9 |
LD A,$00 |
|
D7CB |
LD (unknown10),A |
|
D7CE |
RET |
routine81_1 |
D7CF |
LD HL,map_object_table |
|
D7D2 |
LD D,$00 |
|
D7D4 |
LD E,A |
|
D7D5 |
ADD HL,DE |
|
D7D6 |
LD (object_table_entry_pointer),HL |
|
D7D9 |
LD A,(HL) |
|
D7DA |
CP $22 |
|
D7DC |
JP P,disbelieve_spell_7 |
|
D7DF |
LD DE,$01E1 |
|
D7E2 |
ADD HL,DE |
|
D7E3 |
BIT 5,(HL) |
|
D7E5 |
JR NZ,routine81_0 |
|
D7E7 |
CALL display_wizard_spell_range |
|
D7EA |
CALL disbelieve_spell_2 |
|
D7ED |
RET |