96F3: routine08
| routine08 |
96F3 |
LD HL,unknown_table_3 |
|
96F6 |
LD A,(current_player) |
|
96F9 |
LD D,$00 |
|
96FB |
LD E,A |
|
96FC |
ADD HL,DE |
|
96FD |
BIT 4,(HL) |
|
96FF |
JP NZ,routine06_7 |
|
9702 |
CALL GETHIS |
|
9705 |
CALL RANDY |
|
9708 |
ADD A,$0C |
|
970A |
LD HL,(HISPEL) |
|
970D |
DEC HL |
|
970E |
LD (HL),A |
|
970F |
LD A,$13 |
|
9711 |
CALL SORT |
|
9714 |
CALL GETHIS |
|
9717 |
LD B,$14 |
| routine08_0 |
9719 |
PUSH BC |
|
971A |
LD A,$01 |
|
971C |
LD (unknown10),A |
|
971F |
LD HL,(HISPEL) |
|
9722 |
LD A,(HL) |
|
9723 |
OR A |
|
9724 |
JR Z,routine08_2 |
|
9726 |
LD (CURSP),A |
|
9729 |
CALL CHAN_C |
|
972C |
LD L,(IX+$05) |
|
972F |
LD H,(IX+$06) |
|
9732 |
LD ($9736),HL |
|
9735 |
CALL creature_cast_spell |
|
9738 |
CALL clear_bottom_row |
|
973B |
LD A,(unknown10) |
|
973E |
OR A |
|
973F |
JR Z,routine08_2 |
|
9741 |
LD A,(CURSP) |
|
9744 |
CP $01 |
|
9746 |
JR Z,routine08_1 |
|
9748 |
LD HL,(HISPEL) |
|
974B |
LD (HL),$00 |
| routine08_1 |
974D |
POP BC |
|
974E |
JP routine06_7 |
| routine08_2 |
9751 |
POP BC |
|
9752 |
LD HL,(HISPEL) |
|
9755 |
INC HL |
|
9756 |
INC HL |
|
9757 |
LD (HISPEL),HL |
|
975A |
DJNZ routine08_0 |
|
975C |
JP routine06_7 |
