| routine77 |
D686 |
LD A,$01 |
|
D688 |
LD (unknown11),A |
|
D68B |
LD A,(computer_player_flag) |
|
D68E |
OR A |
|
D68F |
JR NZ,routine77_0 |
|
D691 |
CALL routine13 |
|
D694 |
RET |
| routine77_0 |
D695 |
CALL routine55 |
|
D698 |
LD A,$03 |
|
D69A |
LD (unknown18),A |
|
D69D |
LD A,(CURSP) |
|
D6A0 |
CP $22 |
|
D6A2 |
JP M,creature_cast_spell_1 |
|
D6A5 |
LD A,$0D |
|
D6A7 |
LD (unknown18),A |
|
D6AA |
CALL routine60 |
| routine77_1 |
D6AD |
CALL routine61_0 |
|
D6B0 |
CP $4B |
|
D6B2 |
JR NZ,routine77_2 |
|
D6B4 |
LD A,$00 |
|
D6B6 |
LD (unknown10),A |
|
D6B9 |
RET |
| routine77_2 |
D6BA |
CALL OFBORD |
|
D6BD |
JR Z,routine77_1 |
|
D6BF |
CALL routine14 |
|
D6C2 |
JR NZ,routine77_1 |
|
D6C4 |
LD HL,(object_table_entry_pointer) |
|
D6C7 |
LD A,(HL) |
|
D6C8 |
OR A |
|
D6C9 |
JR Z,routine77_3 |
|
D6CB |
LD DE,$0141 |
|
D6CE |
ADD HL,DE |
|
D6CF |
LD A,(HL) |
|
D6D0 |
CP $04 |
|
D6D2 |
JR NZ,routine77_1 |
| routine77_3 |
D6D4 |
CALL display_wizard_spell_range |
|
D6D7 |
CALL routine20 |
|
D6DA |
LD A,(CURSP) |
|
D6DD |
CP $22 |
|
D6DF |
JP P,creature_cast_spell_5 |
|
D6E2 |
CALL get_random |
|
D6E5 |
CP $02 |
|
D6E7 |
JP P,creature_cast_spell_5 |
|
D6EA |
LD A,$01 |
|
D6EC |
LD (unknown02),A |
|
D6EF |
CALL routine09 |
|
D6F2 |
LD A,(spell_success_flag) |
|
D6F5 |
OR A |
|
D6F6 |
CALL NZ,routine16 |
|
D6F9 |
LD A,$00 |
|
D6FB |
LD (unknown02),A |
|
D6FE |
CALL routine11 |
|
D701 |
RET |
