mirror of https://github.com/nmlgc/ReC98.git
34 lines
682 B
NASM
34 lines
682 B
NASM
public EXALICE_PHASE_NEXT
|
|
exalice_phase_next proc near
|
|
|
|
@@next_end_hp = word ptr 4
|
|
@@explosion_type = word ptr 6
|
|
|
|
push bp
|
|
mov bp, sp
|
|
push si
|
|
mov si, [bp+@@explosion_type]
|
|
cmp si, ET_NONE
|
|
jz short @@set
|
|
call @boss_explode_small$q16explosion_type_t pascal, si
|
|
cmp _boss_phase_timed_out, 0
|
|
jnz short @@set
|
|
mov _bullet_zap_drop_point_items, 1
|
|
mov _bullet_zap_active, 1
|
|
call @boss_items_drop$qv
|
|
|
|
@@set:
|
|
mov _boss_phase_timed_out, 1
|
|
inc _boss_phase
|
|
mov _boss_phase_frame, 0
|
|
mov _boss_mode, 0
|
|
mov _boss_phase_state, 0
|
|
mov ax, _boss_phase_end_hp
|
|
mov _boss_hp, ax
|
|
mov ax, [bp+@@next_end_hp]
|
|
mov _boss_phase_end_hp, ax
|
|
pop si
|
|
pop bp
|
|
retn 4
|
|
exalice_phase_next endp
|