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

[Reverse-engineering] [th04/th05] Boss battle backdrop rendering 

Funded by zorg.
This commit is contained in:
nmlgc 2018-12-22 13:02:18 +01:00
parent d211a22c9f
commit 25ee5990aa
4 changed files with 61 additions and 112 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
th04/boss_backdrop.asm Normal file
View File

@ -0,0 +1,22 @@
; Renders the boss battle background image at the given position, surrounded
; by the given background [color].
; void boss_backdrop_render(int x, int y, char color)
public _boss_backdrop_render
_boss_backdrop_render proc near
@@color = byte ptr 4
@@y = word ptr 6
@@x = word ptr 8
push bp
mov bp, sp
call _cdg_put_noalpha pascal, [bp+@@x], [bp+@@y], 16
call _grcg_setmode_tdw
mov ah, [bp+@@color]
call _grcg_setcolor_direct_noint_1
call _boss_backdrop_colorfill
GRCG_OFF_CLOBBERING dx
pop bp
retn 6
_boss_backdrop_render endp

5
th04/boss_backdrop[bss].asm Normal file
View File

@ -0,0 +1,5 @@
; Called with the GRCG set to the [color] parameter to boss_bg_render(), this
; function is supposed to fill the entire playfield area around the background
; image with the given color.
public _boss_backdrop_colorfill
_boss_backdrop_colorfill dw ?

74
th04_main.asm
View File

@ -15321,29 +15321,7 @@ loc_12152:
retn
sub_12124 endp
; =============== S U B R O U T I N E =======================================
; Attributes: bp-based frame
sub_12157 proc near
arg_0 = byte ptr 4
@@y = word ptr 6
@@x = word ptr 8
push bp
mov bp, sp
call _cdg_put_noalpha pascal, [bp+@@x], [bp+@@y], 16
call _grcg_setmode_tdw
mov ah, [bp+arg_0]
call _grcg_setcolor_direct_noint_1
call fp_2CDCC
GRCG_OFF_CLOBBERING dx
pop bp
retn 6
sub_12157 endp
include th04/boss_backdrop.asm
; =============== S U B R O U T I N E =======================================
@ -15364,9 +15342,7 @@ sub_1217E proc near
loc_12199:
cmp byte_26719, 1
jnz short loc_121BF
push 200088h
push 1
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 136, 1
mov ax, word_2D02E
mov word_2CDCE, ax
mov ax, word_2671A
@ -15381,9 +15357,7 @@ loc_12199:
loc_121BF:
cmp byte_26719, 0FEh
jnb short loc_121D3
push 200088h
push 1
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 136, 1
pop bp
retn
; ---------------------------------------------------------------------------
@ -15418,9 +15392,7 @@ sub_121EB proc near
jz short loc_1223D
cmp byte_26719, 1
jnz short loc_1221B
push 200060h
push 0
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 96, 0
mov ax, word_2D02E
mov word_2CDCE, ax
mov ax, word_2671A
@ -15435,9 +15407,7 @@ sub_121EB proc near
loc_1221B:
cmp byte_26719, 0FEh
jnb short loc_1222F
push 200060h
push 0
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 96, 0
pop bp
retn
; ---------------------------------------------------------------------------
@ -15501,9 +15471,7 @@ sub_1226F proc near
loc_12285:
cmp byte_26719, 2
jnz short loc_122AB
push 200010h
push 0
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 16, 0
mov ax, word_2D02E
mov word_2CDCE, ax
mov ax, word_2671A
@ -15518,9 +15486,7 @@ loc_12285:
loc_122AB:
cmp byte_26719, 0FEh
jnb short loc_122BF
push 200010h
push 0
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 16, 0
pop bp
retn
; ---------------------------------------------------------------------------
@ -15598,9 +15564,7 @@ loc_12327:
loc_12338:
cmp byte_26719, 0FEh
jnb short loc_1234C
push 600048h
push 1
call sub_12157
call _boss_backdrop_render pascal, (96 shl 16) or 72, 1
leave
retn
; ---------------------------------------------------------------------------
@ -15678,9 +15642,7 @@ loc_123B4:
loc_123C5:
cmp byte_26719, 0FEh
jnb short loc_123D9
push 800080h
push 0
call sub_12157
call _boss_backdrop_render pascal, (128 shl 16) or 128, 0
leave
retn
; ---------------------------------------------------------------------------
@ -16471,9 +16433,7 @@ loc_129D2:
loc_129E3:
cmp byte_26719, 0FEh
jnb short loc_129F7
push 200010h
push 1
call sub_12157
call _boss_backdrop_render pascal, (32 shl 16) or 16, 1
leave
retn
; ---------------------------------------------------------------------------
@ -37615,7 +37575,7 @@ sub_1DFEF proc far
mov _boss_sprite_cur, 128
mov word_2D030, 180h
mov word_2D032, 100h
mov fp_2CDCC, offset sub_EDE2
mov _boss_backdrop_colorfill, offset sub_EDE2
push ds
push offset aSt00_bmt ; "st00.bmt"
call super_entry_bfnt
@ -37661,7 +37621,7 @@ sub_1E0B3 proc far
mov _boss_sprite_cur, 0
mov word_2D030, 180h
mov word_2D032, 180h
mov fp_2CDCC, offset sub_EA70
mov _boss_backdrop_colorfill, offset sub_EA70
push ds
push offset aSt01_bmt ; "st01.bmt"
call super_entry_bfnt
@ -37709,7 +37669,7 @@ sub_1E186 proc far
mov _boss_sprite_cur, 134
mov word_2D030, 180h
mov word_2D032, 180h
mov fp_2CDCC, offset sub_BECC
mov _boss_backdrop_colorfill, offset sub_BECC
push ds
push offset aSt02_bmt ; "st02.bmt"
call super_entry_bfnt
@ -37792,7 +37752,7 @@ loc_1E371:
mov _boss_sprite_cur, 128
mov word_2D030, 180h
mov word_2D032, 180h
mov fp_2CDCC, offset sub_BEDA
mov _boss_backdrop_colorfill, offset sub_BEDA
push ds
push offset aSt03_bmt ; "st03.bmt"
call super_entry_bfnt
@ -37843,7 +37803,7 @@ sub_1E3C2 proc far
mov _boss_sprite_cur, 128
mov word_2D030, 1A0h
mov word_2D032, 1A0h
mov fp_2CDCC, offset sub_BFF8
mov _boss_backdrop_colorfill, offset sub_BFF8
call _cdg_load_single_noalpha pascal, 16, ds, offset aSt04bk_cdg, 0
push ds
push offset aSt04_bb ; "st04.bb"
@ -37932,7 +37892,7 @@ sub_1E518 proc far
mov _boss_sprite_cur, 128
mov word_2D030, 180h
mov word_2D032, 300h
mov fp_2CDCC, offset sub_C148
mov _boss_backdrop_colorfill, offset sub_C148
mov byte_2D01E, 0
call _cdg_load_single_noalpha pascal, 16, ds, offset aSt06bk_cdg, 0
push ds
@ -53344,7 +53304,7 @@ include th04/circles[bss].asm
dword_2CDC6 dd ?
byte_2CDCA db ?
db ?
fp_2CDCC dw ?
include th04/boss_backdrop[bss].asm
word_2CDCE dw ?
byte_2CDD0 db ?
byte_2CDD1 db ?

72
th05_main.asm
View File

@ -4586,29 +4586,7 @@ loc_D060:
retn
sub_D032 endp
; =============== S U B R O U T I N E =======================================
; Attributes: bp-based frame
sub_D065 proc near
arg_0 = byte ptr 4
arg_2 = word ptr 6
arg_4 = word ptr 8
push bp
mov bp, sp
call _cdg_put_noalpha pascal, [bp+arg_4], [bp+arg_2], 16
call _grcg_setmode_tdw
mov ah, [bp+arg_0]
call _grcg_setcolor_direct_noint_1
call fp_2449A
GRCG_OFF_CLOBBERING dx
pop bp
retn 6
sub_D065 endp
include th04/boss_backdrop.asm
; =============== S U B R O U T I N E =======================================
@ -4627,9 +4605,7 @@ sub_D08C proc near
loc_D09F:
cmp boss_phase, 1
jnz short loc_D0C8
push 400010h
push 0
call sub_D065
call _boss_backdrop_render pascal, (64 shl 16) or 16, 0
mov ax, word_2D086
mov word_2449C, ax
mov ax, boss_phase_frame
@ -4646,9 +4622,7 @@ loc_D09F:
loc_D0C8:
cmp boss_phase, 0FEh
jnb short loc_D0DC
push 400010h
push 0
call sub_D065
call _boss_backdrop_render pascal, (64 shl 16) or 16, 0
pop bp
retn
; ---------------------------------------------------------------------------
@ -4723,9 +4697,7 @@ loc_D142:
loc_D153:
cmp boss_phase, 0FEh
jnb short loc_D167
push 200010h
push 1
call sub_D065
call _boss_backdrop_render pascal, (32 shl 16) or 16, 1
jmp short loc_D17D
; ---------------------------------------------------------------------------
@ -4801,9 +4773,7 @@ loc_D1CE:
loc_D1DF:
cmp boss_phase, 0FEh
jnb short loc_D1F3
push 2000DDh
push 1
call sub_D065
call _boss_backdrop_render pascal, (32 shl 16) or 221, 1
jmp short loc_D209
; ---------------------------------------------------------------------------
@ -4883,9 +4853,7 @@ loc_D25C:
loc_D272:
cmp boss_phase, 0FEh
jnb short loc_D286
push 600048h
push 1
call sub_D065
call _boss_backdrop_render pascal, (96 shl 16) or 72, 1
leave
retn
; ---------------------------------------------------------------------------
@ -4958,9 +4926,7 @@ loc_D2E5:
loc_D2FB:
cmp boss_phase, 0FEh
jnb short loc_D30F
push 200010h
push 1
call sub_D065
call _boss_backdrop_render pascal, (32 shl 16) or 16, 1
leave
retn
; ---------------------------------------------------------------------------
@ -5999,9 +5965,7 @@ var_1 = byte ptr -1
enter 2, 0
cmp boss_phase, 0
jnz short loc_DA9E
push 200078h
push 1
call sub_D065
call _boss_backdrop_render pascal, (32 shl 16) or 120, 1
leave
retn
; ---------------------------------------------------------------------------
@ -6016,9 +5980,7 @@ loc_DA9E:
mov [bp+var_1], al
cmp [bp+var_1], 8
jnb short loc_DAC4
push 200078h
push 1
call sub_D065
call _boss_backdrop_render pascal, (32 shl 16) or 120, 1
jmp short loc_DAC7
; ---------------------------------------------------------------------------
@ -19492,7 +19454,7 @@ sub_14544 proc near
mov _boss_sprite_left, 186
mov _boss_sprite_right, 184
mov _boss_sprite_stay, 180
mov fp_2449A, offset sub_DD42
mov _boss_backdrop_colorfill, offset sub_DD42
push ds
push offset aSt00_bmt ; "st00.bmt"
call super_entry_bfnt
@ -19536,7 +19498,7 @@ sub_14613 proc near
mov _boss_sprite_cur, 180
mov word_2D088, 180h
mov word_2D08A, 180h
mov fp_2449A, offset sub_DEA6
mov _boss_backdrop_colorfill, offset sub_DEA6
push ds
push offset aSt01_bmt ; "st01.bmt"
call super_entry_bfnt
@ -19580,7 +19542,7 @@ sub_146D0 proc near
mov _boss_sprite_cur, 180
mov word_2D088, 180h
mov word_2D08A, 180h
mov fp_2449A, offset sub_DEB4
mov _boss_backdrop_colorfill, offset sub_DEB4
mov _boss_sprite_left, 188
mov _boss_sprite_right, 186
mov _boss_sprite_stay, 180
@ -19632,7 +19594,7 @@ sub_1479F proc near
mov byte_2635C, 0B4h
mov word_2D088, 180h
mov word_2D08A, 180h
mov fp_2449A, offset sub_DEC2
mov _boss_backdrop_colorfill, offset sub_DEC2
push ds
push offset aSt03_bmt ; "st03.bmt"
call super_entry_bfnt
@ -19680,7 +19642,7 @@ sub_14879 proc near
mov _boss_sprite_cur, 180
mov word_2D088, 180h
mov word_2D08A, 180h
mov fp_2449A, offset sub_E01E
mov _boss_backdrop_colorfill, offset sub_E01E
push ds
push offset aSt04_bmt ; "st04.bmt"
call super_entry_bfnt
@ -19724,7 +19686,7 @@ sub_14976 proc near
mov _boss_sprite_cur, 180
mov word_2D088, 180h
mov word_2D08A, 180h
mov fp_2449A, offset sub_E914
mov _boss_backdrop_colorfill, offset sub_E914
call _cdg_load_all_noalpha pascal, 16, ds, offset aSt05bk_cdg
call _cdg_load_all_noalpha pascal, 17, ds, offset aSt05bk2_cdg
push ds
@ -19765,7 +19727,7 @@ sub_14A06 proc near
mov _boss_sprite_cur, 180
mov word_2D088, 180h
mov word_2D08A, 180h
mov fp_2449A, offset sub_E914
mov _boss_backdrop_colorfill, offset sub_E914
push ds
push offset aSt06_bmt ; "st06.bmt"
call super_entry_bfnt
@ -43150,7 +43112,7 @@ word_24494 dw ?
word_24496 dw ?
byte_24498 db ?
db ?
fp_2449A dw ?
include th04/boss_backdrop[bss].asm
word_2449C dw ?
dd ? ;
dd ? ;