Prev: 9C59 Up: Map Next: 9F50
9DE0: DarkPowerEtc spell
dark_power_spell 9DE0 LD A,(computer_player_flag)
9DE3 OR A
9DE4 JP NZ,dark_power_spell_12
9DE7 CALL routine09
9DEA LD A,(spell_success_flag)
9DED OR A
9DEE JR NZ,dark_power_spell_0
9DF0 CALL routine11
9DF3 RET
dark_power_spell_0 9DF4 CALL clear_bottom_row
9DF7 LD A,(spell_success_flag)
9DFA OR A
9DFB RET Z
9DFC LD B,$01
9DFE LD A,(CURSP)
9E01 CP $2F
9E03 JP M,dark_power_spell_1
9E06 LD B,$03
dark_power_spell_1 9E08 PUSH BC
dark_power_spell_2 9E09 CALL routine41
9E0C CALL $02BF
9E0F CP $53
9E11 JR Z,dark_power_spell_3
9E13 CP $4B
9E15 JR NZ,dark_power_spell_2
9E17 LD HL,sound_effect_18
9E1A CALL play_sound_effect_in_HL
9E1D EI
9E1E POP BC
9E1F RET
dark_power_spell_3 9E20 LD HL,(object_table_entry_pointer)
9E23 LD A,(HL)
9E24 OR A
9E25 JR Z,dark_power_spell_2
9E27 CP $29
9E29 JP P,dark_power_spell_4
9E2C CP $22
9E2E JP P,dark_power_spell_2
dark_power_spell_4 9E31 CALL dark_power_spell_5
9E34 POP BC
9E35 DJNZ dark_power_spell_1
9E37 RET
dark_power_spell_5 9E38 LD HL,sound_effect_05
9E3B LD (sound_effect_pointer),HL
9E3E CALL routine50
9E41 HALT
9E42 DI
9E43 LD HL,$D808
9E46 LD ($5C36),HL
9E49 CALL play_sound_effect_pointer
9E4C LD B,$03
dark_power_spell_6 9E4E PUSH BC
9E4F LD B,$07
dark_power_spell_7 9E51 PUSH BC
9E52 LD A,B
9E53 ADD A,$40
9E55 LD ($5C8D),A
9E58 LD A,$00
9E5A LD ($5C8E),A
9E5D LD HL,(object_table_entry_pointer)
9E60 CALL routine53
9E63 LD (cursor_coordinates),HL
9E66 LD A,$02
9E68 CALL $1601
9E6B LD BC,(cursor_coordinates)
9E6F CALL GET_LC
9E72 LD A,$16
9E74 RST $10
9E75 LD A,B
9E76 RST $10
9E77 LD A,C
9E78 RST $10
9E79 LD A,$20
9E7B RST $10
9E7C LD A,$20
9E7E RST $10
9E7F INC B
9E80 LD A,$16
9E82 RST $10
9E83 LD A,B
9E84 RST $10
9E85 LD A,C
9E86 RST $10
9E87 LD A,$20
9E89 RST $10
9E8A LD A,$20
9E8C RST $10
9E8D CALL sound_effect_playback
9E90 POP BC
9E91 DJNZ dark_power_spell_7
9E93 POP BC
9E94 DJNZ dark_power_spell_6
9E96 CALL routine50
9E99 HALT
9E9A LD A,$FF
9E9C LD ($5C8E),A
9E9F LD HL,(object_table_entry_pointer)
9EA2 LD D,(HL)
9EA3 LD E,$13
9EA5 CALL GETCHR
9EA8 LD E,A
9EA9 CALL get_random
9EAC INC E
9EAD CP E
9EAE JP P,dark_power_spell_8
9EB1 CALL routine50
9EB4 HALT
9EB5 RET
dark_power_spell_8 9EB6 LD HL,(object_table_entry_pointer)
9EB9 LD A,(HL)
9EBA CP $29
9EBC JP M,dark_power_spell_9
9EBF CALL disbelieve_spell_4
9EC2 LD HL,(object_table_entry_pointer)
9EC5 LD A,(HL)
9EC6 SUB $29
9EC8 LD (unknown16),A
9ECB CALL WIZKIL_10
9ECE CALL routine50
9ED1 HALT
9ED2 RET
dark_power_spell_9 9ED3 LD (HL),$01
9ED5 LD DE,$0281
9ED8 ADD HL,DE
9ED9 LD A,(HL)
9EDA OR A
9EDB JR Z,dark_power_spell_10
9EDD LD (HL),$00
9EDF LD HL,(object_table_entry_pointer)
9EE2 LD (HL),A
9EE3 JR dark_power_spell_11
dark_power_spell_10 9EE5 LD HL,(object_table_entry_pointer)
9EE8 LD DE,$0321
9EEB ADD HL,DE
9EEC LD A,(HL)
9EED LD HL,(object_table_entry_pointer)
9EF0 LD (HL),A
dark_power_spell_11 9EF1 CALL disbelieve_spell_4
9EF4 CALL routine50
9EF7 HALT
9EF8 RET
dark_power_spell_12 9EF9 CALL display_wizard_spell_range
9EFC CALL routine09
9EFF LD A,(spell_success_flag)
9F02 OR A
9F03 JR NZ,dark_power_spell_13
9F05 CALL routine11
9F08 RET
dark_power_spell_13 9F09 LD B,$01
9F0B LD A,(CURSP)
9F0E CP $2F
9F10 JP M,dark_power_spell_14
9F13 LD B,$03
dark_power_spell_14 9F15 PUSH BC
9F16 LD HL,(D_ADD)
9F19 LD (X_ADD),HL
9F1C LD (TEMADD),HL
9F1F CALL FIREON
9F22 LD HL,INBUF
9F25 LD (BUFPNT),HL
dark_power_spell_15 9F28 CALL GETPLA
9F2B CP $FF
9F2D JR NZ,dark_power_spell_16
9F2F POP BC
9F30 RET
dark_power_spell_16 9F31 LD D,$00
9F33 LD E,A
9F34 LD HL,map_object_table
9F37 ADD HL,DE
9F38 LD (object_table_entry_pointer),HL
9F3B LD A,(HL)
9F3C OR A
9F3D JR Z,dark_power_spell_15
9F3F CP $29
9F41 JP P,dark_power_spell_17
9F44 CP $22
9F46 JP P,dark_power_spell_15
dark_power_spell_17 9F49 CALL dark_power_spell_5
9F4C POP BC
9F4D DJNZ dark_power_spell_14
9F4F RET
Prev: 9C59 Up: Map Next: 9F50