Rooba
/
ReC98
mirror of https://github.com/nmlgc/ReC98.git
1
1
Fork 0
Code Issues Packages Projects Releases Wiki Activity

[Decompilation] [th01] Elis: Pattern 9/13 

The one where Elis' bat form fires pellets in a
𝄆 22----33----22----333---2 𝄇-spread loop.

Part of P0195, funded by Yanga.
This commit is contained in:
nmlgc 2022-05-15 18:24:59 +02:00
parent 4e9c39c9f7
commit f6a1711883
2 changed files with 16 additions and 68 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
th01/main/boss/b15m.cpp
View File

@ -1371,3 +1371,17 @@ void pattern_bat_alternating_narrow_and_wide_2_spreads(void)
}
}
}
void pattern_bat_alternating_2_and_3_spreads(void)
{
if(((boss_phase_frame % 50) < 10) && ((boss_phase_frame % 4) == 0)) {
form_fire_group(F_BAT, PG_2_SPREAD_NARROW_AIMED, 5.3125f);
}
if(
((boss_phase_frame % 50) >= 25) &&
((boss_phase_frame % 50) < 35) &&
((boss_phase_frame % 4) == 0)
) {
form_fire_group(F_BAT, PG_3_SPREAD_NARROW_AIMED, 5.3125f);
}
}

70
th01_reiiden.asm
View File

@ -17416,77 +17416,11 @@ ELIS_BASE_TOP = (PLAYFIELD_TOP + ((PLAYFIELD_H / 21) * 5) - (ELIS_GIRL_H / 2))
extern @bat_fly_random$qmit1:proc
extern @pattern_bat_slow_spreads$qv:proc
extern @pattern_bat_alternating_narrow_a$qv:proc
extern @pattern_bat_alternating_2_and_3_$qv:proc
main_35_TEXT ends
main_35__TEXT segment byte public 'CODE' use16
; =============== S U B R O U T I N E =======================================
; Attributes: bp-based frame
sub_26E8C proc far
push bp
mov bp, sp
mov ax, _boss_phase_frame
mov bx, 50
cwd
idiv bx
cmp dx, 10
jge short loc_26ECA
mov ax, _boss_phase_frame
mov bx, 4
cwd
idiv bx
or dx, dx
jnz short loc_26ECA
push PG_2_SPREAD_NARROW_AIMED or (((5 shl 4) + 5) shl 16)
mov ax, elis_bat.BE_cur_top
add ax, 12
push ax
mov ax, elis_bat.BE_cur_left
add ax, 20
push ax
push ds
push offset _Pellets
call @CPellets@add_group$qii14pellet_group_ti
add sp, 0Ch
loc_26ECA:
mov ax, _boss_phase_frame
mov bx, 50
cwd
idiv bx
cmp dx, 25
jl short loc_26F10
mov ax, _boss_phase_frame
cwd
idiv bx
cmp dx, 35
jge short loc_26F10
mov ax, _boss_phase_frame
mov bx, 4
cwd
idiv bx
or dx, dx
jnz short loc_26F10
push PG_3_SPREAD_NARROW_AIMED or (((5 shl 4) + 5) shl 16)
mov ax, elis_bat.BE_cur_top
add ax, 12
push ax
mov ax, elis_bat.BE_cur_left
add ax, 20
push ax
push ds
push offset _Pellets
call @CPellets@add_group$qii14pellet_group_ti
add sp, 0Ch
loc_26F10:
pop bp
retf
sub_26E8C endp
; =============== S U B R O U T I N E =======================================
; Attributes: bp-based frame
@ -18704,7 +18638,7 @@ loc_27BDB:
; ---------------------------------------------------------------------------
loc_27BE1:
call sub_26E8C
call @pattern_bat_alternating_2_and_3_$qv
pop bp
retf
; ---------------------------------------------------------------------------