Routines
Prev: B3C7 Up: Map Next: B60B
B3C9: WIZKIL
Used by the routines at lightning_spell, INTERO and routine25.
WIZKIL B3C9 DI
B3CA LD HL,num_dead_wizards
B3CD INC (HL)
B3CE LD HL,sound_effect_17
B3D1 CALL play_sound_effect_in_HL
B3D4 LD HL,(object_table_entry_pointer)
B3D7 LD C,(HL)
B3D8 DEC C
B3D9 LD B,$00
B3DB SLA C
B3DD LD HL,nothing_pointer
B3E0 ADD HL,BC
B3E1 LD E,(HL)
B3E2 INC HL
B3E3 LD D,(HL)
B3E4 LD HL,$0017
B3E7 ADD HL,DE
B3E8 LD E,(HL)
B3E9 INC HL
B3EA LD D,(HL)
B3EB EX DE,HL
B3EC LD (C_DATA),HL
B3EF LD B,$08
WIZKIL_0 B3F1 PUSH BC
B3F2 LD HL,(object_table_entry_pointer)
B3F5 LD (temp_entry_pointer),HL
B3F8 CALL address_to_coordinate
B3FB LD (unknown46),HL
B3FE LD A,H
B3FF LD (unknown42),A
B402 LD (unknown43),A
B405 LD A,L
B406 LD (unknown44),A
B409 LD (unknown45),A
B40C DEC B
B40D LD A,$40
B40F ADD A,B
B410 LD ($5C8F),A
B413 LD B,$1D
WIZKIL_1 B415 PUSH BC
B416 LD A,(unknown42)
B419 DEC A
B41A JR Z,WIZKIL_2
B41C LD (unknown42),A
B41F LD H,A
B420 LD A,(unknown46)
B423 LD L,A
B424 LD (LC_POS),HL
B427 CALL P_CHAR
WIZKIL_2 B42A LD A,(unknown43)
B42D INC A
B42E CP $14
B430 JR Z,WIZKIL_3
B432 LD (unknown43),A
B435 LD H,A
B436 LD A,(unknown46)
B439 LD L,A
B43A LD (LC_POS),HL
B43D CALL P_CHAR
WIZKIL_3 B440 LD A,(unknown44)
B443 DEC A
B444 JR Z,WIZKIL_4
B446 LD (unknown44),A
B449 LD L,A
B44A LD A,($B3C8)
B44D LD H,A
B44E LD (LC_POS),HL
B451 CALL P_CHAR
WIZKIL_4 B454 LD A,(unknown45)
B457 INC A
B458 CP $1E
B45A JR Z,WIZKIL_5
B45C LD (unknown45),A
B45F LD L,A
B460 LD A,($B3C8)
B463 LD H,A
B464 LD (LC_POS),HL
B467 CALL P_CHAR
WIZKIL_5 B46A LD A,(unknown42)
B46D CP $01
B46F JR Z,WIZKIL_6
B471 LD H,A
B472 LD A,(unknown44)
B475 CP $01
B477 JR Z,WIZKIL_6
B479 LD L,A
B47A LD (LC_POS),HL
B47D CALL P_CHAR
WIZKIL_6 B480 LD A,(unknown42)
B483 CP $01
B485 JR Z,WIZKIL_7
B487 LD H,A
B488 LD A,(unknown45)
B48B CP $1D
B48D JR Z,WIZKIL_7
B48F LD L,A
B490 LD (LC_POS),HL
B493 CALL P_CHAR
WIZKIL_7 B496 LD A,(unknown43)
B499 CP $13
B49B JR Z,WIZKIL_8
B49D LD H,A
B49E LD A,(unknown44)
B4A1 CP $01
B4A3 JR Z,WIZKIL_8
B4A5 LD L,A
B4A6 LD (LC_POS),HL
B4A9 CALL P_CHAR
WIZKIL_8 B4AC LD A,(unknown43)
B4AF CP $13
B4B1 JR Z,WIZKIL_9
B4B3 LD H,A
B4B4 LD A,(unknown45)
B4B7 CP $1D
B4B9 JR Z,WIZKIL_9
B4BB LD L,A
B4BC LD (LC_POS),HL
B4BF CALL P_CHAR
WIZKIL_9 B4C2 CALL sound_effect_playback
B4C5 POP BC
B4C6 DEC B
B4C7 JP NZ,WIZKIL_1
B4CA POP BC
B4CB DEC B
B4CC JP NZ,WIZKIL_0
B4CF LD HL,(object_table_entry_pointer)
B4D2 LD A,(HL)
B4D3 SUB $29
B4D5 LD (unknown16),A
B4D8 LD (HL),$00
B4DA LD HL,unknown_table_3
B4DD LD D,$00
B4DF LD E,A
B4E0 ADD HL,DE
B4E1 SET 4,(HL)
B4E3 LD HL,(object_table_entry_pointer)
B4E6 LD DE,$0321
B4E9 ADD HL,DE
B4EA LD A,(HL)
B4EB LD HL,(object_table_entry_pointer)
B4EE LD (HL),A
B4EF CALL routine50
B4F2 HALT
B4F3 DI
B4F4 LD HL,sound_effect_20
B4F7 CALL play_sound_effect_in_HL
This entry point is used by the routine at dark_power_spell.
WIZKIL_10 B4FA LD B,$09
B4FC LD HL,WOOP_D
B4FF LD (C_DATA),HL
B502 LD A,$46
B504 LD ($5C8F),A
WIZKIL_11 B507 PUSH BC
B508 LD A,B
B509 LD (unknown15),A
B50C LD B,$9F
B50E LD HL,map_object_table
B511 LD (unknown14),HL
WIZKIL_12 B514 PUSH BC
B515 LD HL,(unknown14)
B518 LD A,(HL)
B519 OR A
B51A JP Z,WIZKIL_18
B51D CP $29
B51F JP P,WIZKIL_18
B522 LD DE,$0141
B525 ADD HL,DE
B526 LD A,(HL)
B527 CP $04
B529 JR NZ,WIZKIL_13
B52B LD DE,$00A0
B52E ADD HL,DE
B52F LD A,(HL)
B530 BIT 3,A
B532 JP Z,WIZKIL_18
WIZKIL_13 B535 LD HL,(unknown14)
B538 LD DE,$01E1
B53B ADD HL,DE
B53C LD A,(HL)
B53D AND $07
B53F LD HL,(unknown16)
B542 CP L
B543 JR Z,WIZKIL_14
B545 LD HL,(unknown14)
B548 LD A,(HL)
B549 CP $22
B54B JP NZ,WIZKIL_18
B54E LD DE,$0281
B551 ADD HL,DE
B552 LD A,(HL)
B553 OR A
B554 JP Z,WIZKIL_18
B557 LD DE,$00A0
B55A ADD HL,DE
B55B LD A,(HL)
B55C LD HL,(unknown16)
B55F CP L
B560 JP NZ,WIZKIL_18
WIZKIL_14 B563 LD HL,(unknown14)
B566 LD (temp_entry_pointer),HL
B569 CALL address_to_coordinate
B56C LD (LC_POS),HL
B56F CALL P_CHAR
B572 LD A,(unknown15)
B575 DEC A
B576 JR NZ,WIZKIL_18
B578 LD HL,(unknown14)
B57B LD DE,$01E1
B57E ADD HL,DE
B57F LD A,(HL)
B580 AND $07
B582 LD HL,(unknown16)
B585 CP L
B586 JR Z,WIZKIL_15
B588 LD HL,(unknown14)
B58B LD DE,$0281
B58E ADD HL,DE
B58F LD (HL),$00
B591 LD DE,$00A0
B594 ADD HL,DE
B595 LD (HL),$00
B597 JR WIZKIL_18
WIZKIL_15 B599 LD HL,(unknown14)
B59C LD A,(HL)
B59D CP $22
B59F JR NZ,WIZKIL_16
B5A1 LD DE,$0281
B5A4 ADD HL,DE
B5A5 LD A,(HL)
B5A6 OR A
B5A7 JR Z,WIZKIL_16
B5A9 LD (HL),$00
B5AB LD HL,(unknown14)
B5AE LD (HL),A
B5AF LD DE,$0321
B5B2 ADD HL,DE
B5B3 LD A,(HL)
B5B4 LD (HL),$00
B5B6 LD DE,$0140
B5B9 SBC HL,DE
B5BB LD (HL),A
B5BC JR WIZKIL_18
WIZKIL_16 B5BE LD HL,(unknown14)
B5C1 LD DE,$0281
B5C4 ADD HL,DE
B5C5 LD A,(HL)
B5C6 LD (HL),$00
B5C8 OR A
B5C9 JR Z,WIZKIL_17
B5CB LD HL,(unknown14)
B5CE LD (HL),A
B5CF JR WIZKIL_18
WIZKIL_17 B5D1 LD HL,(unknown14)
B5D4 LD DE,$0321
B5D7 ADD HL,DE
B5D8 LD A,(HL)
B5D9 LD HL,(unknown14)
B5DC LD (HL),A
B5DD OR A
B5DE JR Z,WIZKIL_18
B5E0 LD DE,$0141
B5E3 ADD HL,DE
B5E4 LD A,$04
B5E6 LD (HL),$04
WIZKIL_18 B5E8 POP BC
B5E9 LD HL,(unknown14)
B5EC INC HL
B5ED LD (unknown14),HL
B5F0 DEC B
B5F1 JP NZ,WIZKIL_12
B5F4 CALL sound_effect_playback
B5F7 POP BC
B5F8 LD HL,(C_DATA)
B5FB LD DE,$0020
B5FE ADD HL,DE
B5FF LD (C_DATA),HL
B602 DEC B
B603 JP NZ,WIZKIL_11
B606 CALL routine50
B609 HALT
B60A RET
Prev: B3C7 Up: Map Next: B60B