mirror of https://github.com/nmlgc/ReC98.git
[Naming] [th04/th05] Character select screens
This commit is contained in:
wintiger0222
nmlgc
parent
02d1c04858
commit
b95a625d87
40
th04_op.asm
40
th04_op.asm
|
|
@ -367,7 +367,7 @@ sub_A8F1 proc near
|
|||
mov es:[bx+0Eh], al
|
||||
mov byte ptr es:[bx+12h], 30h ; '0'
|
||||
mov byte ptr es:[bx+13h], 30h ; '0'
|
||||
call sub_D708
|
||||
call playchar_menu
|
||||
or ax, ax
|
||||
jnz short loc_A96A
|
||||
les bx, _humaconfig
|
||||
|
|
@ -418,7 +418,7 @@ sub_A96C proc near
|
|||
mov byte ptr es:[bx+0Eh], 2
|
||||
mov byte ptr es:[bx+12h], 30h ; '0'
|
||||
mov byte ptr es:[bx+13h], 36h ; '6'
|
||||
call sub_D708
|
||||
call playchar_menu
|
||||
or ax, ax
|
||||
jnz short loc_A9C7
|
||||
les bx, _humaconfig
|
||||
|
|
@ -4066,7 +4066,7 @@ sub_D1F3 endp
|
|||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_D20A proc near
|
||||
darken_pic proc near
|
||||
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
|
|
@ -4129,7 +4129,7 @@ loc_D273:
|
|||
pop si
|
||||
leave
|
||||
retn 2
|
||||
sub_D20A endp
|
||||
darken_pic endp
|
||||
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
|
@ -4305,7 +4305,7 @@ sub_D3A2 proc near
|
|||
push 41
|
||||
call cdg_put_noalpha
|
||||
push 1
|
||||
call sub_D20A
|
||||
call darken_pic
|
||||
call grcg_setcolor pascal, (GC_RMW shl 16) + 1
|
||||
call grcg_byteboxfill_x pascal, ((296 / 8) shl 16) or 52, ((296 / 8) shl 16) or 287
|
||||
call grcg_byteboxfill_x pascal, (( 48 / 8) shl 16) or 288, ((296 / 8) shl 16) or 295
|
||||
|
|
@ -4324,7 +4324,7 @@ loc_D407:
|
|||
push 40
|
||||
call cdg_put_noalpha
|
||||
push 0
|
||||
call sub_D20A
|
||||
call darken_pic
|
||||
call grcg_setcolor pascal, (GC_RMW shl 16) + 1
|
||||
call grcg_byteboxfill_x pascal, ((584 / 8) shl 16) or 52, ((584 / 8) shl 16) or 287
|
||||
call grcg_byteboxfill_x pascal, ((336 / 8) shl 16) or 288, ((584 / 8) shl 16) or 295
|
||||
|
|
@ -4605,7 +4605,7 @@ sub_D650 endp
|
|||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_D6B2 proc near
|
||||
playchar_menu_init proc near
|
||||
push bp
|
||||
mov bp, sp
|
||||
mov PaletteTone, 0
|
||||
|
|
@ -4627,17 +4627,17 @@ sub_D6B2 proc near
|
|||
call palette_black_in
|
||||
pop bp
|
||||
retn
|
||||
sub_D6B2 endp
|
||||
playchar_menu_init endp
|
||||
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_D708 proc near
|
||||
playchar_menu proc near
|
||||
|
||||
var_2 = byte ptr -2
|
||||
var_1 = byte ptr -1
|
||||
@@input_locked = byte ptr -1
|
||||
|
||||
enter 2, 0
|
||||
push si
|
||||
|
|
@ -4744,11 +4744,11 @@ loc_D7B5:
|
|||
mov byte_132B8, al
|
||||
|
||||
loc_D7B8:
|
||||
call sub_D6B2
|
||||
call playchar_menu_init
|
||||
|
||||
loc_D7BB:
|
||||
call far ptr _input_reset_sense
|
||||
cmp [bp+var_1], 0
|
||||
cmp [bp+@@input_locked], 0
|
||||
jnz loc_D8DF
|
||||
test _key_det.lo, low INPUT_LEFT
|
||||
jnz short loc_D7D6
|
||||
|
|
@ -4843,14 +4843,14 @@ loc_D8B2:
|
|||
|
||||
loc_D8D7:
|
||||
mov al, _key_det.lo
|
||||
mov [bp+var_1], al
|
||||
mov [bp+@@input_locked], al
|
||||
jmp short loc_D8EA
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_D8DF:
|
||||
cmp _key_det, INPUT_NONE
|
||||
jnz short loc_D8EA
|
||||
mov [bp+var_1], 0
|
||||
mov [bp+@@input_locked], 0
|
||||
|
||||
loc_D8EA:
|
||||
push 1
|
||||
|
|
@ -4860,7 +4860,7 @@ loc_D8EA:
|
|||
|
||||
loc_D8F4:
|
||||
call far ptr _input_reset_sense
|
||||
cmp [bp+var_1], 0
|
||||
cmp [bp+@@input_locked], 0
|
||||
jnz loc_D9F8
|
||||
test _key_det.lo, low INPUT_UP
|
||||
jnz short loc_D90F
|
||||
|
|
@ -4906,11 +4906,11 @@ loc_D939:
|
|||
|
||||
loc_D986:
|
||||
test _key_det.hi, high INPUT_OK
|
||||
jnz short loc_D994
|
||||
jnz short @@z_pressed
|
||||
test _key_det.lo, low INPUT_SHOT
|
||||
jz short loc_D9D5
|
||||
|
||||
loc_D994:
|
||||
@@z_pressed:
|
||||
call snd_se_reset
|
||||
call snd_se_play pascal, 11
|
||||
call snd_se_update
|
||||
|
|
@ -4938,14 +4938,14 @@ loc_D9D5:
|
|||
|
||||
loc_D9F0:
|
||||
mov al, _key_det.lo
|
||||
mov [bp+var_1], al
|
||||
mov [bp+@@input_locked], al
|
||||
jmp short loc_DA03
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_D9F8:
|
||||
cmp _key_det, INPUT_NONE
|
||||
jnz short loc_DA03
|
||||
mov [bp+var_1], 0
|
||||
mov [bp+@@input_locked], 0
|
||||
|
||||
loc_DA03:
|
||||
push 1
|
||||
|
|
@ -4958,7 +4958,7 @@ loc_DA0D:
|
|||
pop si
|
||||
leave
|
||||
retn
|
||||
sub_D708 endp
|
||||
playchar_menu endp
|
||||
db 0
|
||||
|
||||
op_01_TEXT ends
|
||||
|
|
|
|||
|
|
@ -1,6 +1,6 @@
|
|||
/* ReC98
|
||||
* -----
|
||||
* Code segment #1 of TH02's OP.EXE
|
||||
* Code segment #1 of TH05's OP.EXE
|
||||
*/
|
||||
|
||||
extern "C" {
|
||||
|
|
|
|||
130
th05_op.asm
130
th05_op.asm
|
|
@ -168,7 +168,7 @@ sub_A39C proc near
|
|||
mov es:[bx+0Dh], al
|
||||
mov al, es:[bx+10h]
|
||||
mov es:[bx+0Eh], al
|
||||
call sub_D12D
|
||||
call playchar_menu
|
||||
or ax, ax
|
||||
jnz short loc_A443
|
||||
xor si, si
|
||||
|
|
@ -250,7 +250,7 @@ sub_A447 proc near
|
|||
mov byte ptr es:[bx+13h], 6
|
||||
mov byte ptr es:[bx+0Dh], 3
|
||||
mov byte ptr es:[bx+0Eh], 3
|
||||
call sub_D12D
|
||||
call playchar_menu
|
||||
or ax, ax
|
||||
jnz short loc_A4CB
|
||||
xor si, si
|
||||
|
|
@ -4061,7 +4061,7 @@ sub_CD94 endp
|
|||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_CE65 proc near
|
||||
darken_pic proc near
|
||||
|
||||
var_6 = dword ptr -6
|
||||
var_2 = word ptr -2
|
||||
|
|
@ -4141,7 +4141,7 @@ loc_CEE5:
|
|||
pop si
|
||||
leave
|
||||
retn 2
|
||||
sub_CE65 endp
|
||||
darken_pic endp
|
||||
|
||||
; ---------------------------------------------------------------------------
|
||||
off_CEF7 dw offset loc_CE7E
|
||||
|
|
@ -4153,11 +4153,11 @@ off_CEF7 dw offset loc_CE7E
|
|||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_CEFF proc near
|
||||
put_pic proc near
|
||||
|
||||
var_4 = word ptr -4
|
||||
var_2 = word ptr -2
|
||||
arg_0 = word ptr 4
|
||||
@@y = word ptr -4
|
||||
@@x = word ptr -2
|
||||
@@highlight = word ptr 4
|
||||
|
||||
enter 4, 0
|
||||
push si
|
||||
|
|
@ -4173,36 +4173,36 @@ arg_0 = word ptr 4
|
|||
@@reimu:
|
||||
mov si, 10h
|
||||
mov di, 30h ; '0'
|
||||
mov [bp+var_2], 0B0h ; '°'
|
||||
mov [bp+var_4], 0C0h
|
||||
mov [bp+@@x], 0B0h
|
||||
mov [bp+@@y], 0C0h
|
||||
jmp short loc_CF59
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
@@marisa:
|
||||
mov si, 110h
|
||||
mov di, 30h ; '0'
|
||||
mov [bp+var_2], 1B0h
|
||||
mov [bp+var_4], 0C0h
|
||||
mov [bp+@@x], 1B0h
|
||||
mov [bp+@@y], 0C0h
|
||||
jmp short loc_CF59
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
@@mima:
|
||||
mov si, 0A0h
|
||||
mov di, 0E0h
|
||||
mov [bp+var_2], 140h
|
||||
mov [bp+@@x], 140h
|
||||
jmp short loc_CF54
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
@@yuuka:
|
||||
mov si, 190h
|
||||
mov di, 0E0h
|
||||
mov [bp+var_2], 230h
|
||||
mov [bp+@@x], 230h
|
||||
|
||||
loc_CF54:
|
||||
mov [bp+var_4], 170h
|
||||
mov [bp+@@y], 170h
|
||||
|
||||
loc_CF59:
|
||||
cmp [bp+arg_0], 0
|
||||
cmp [bp+@@highlight], 0
|
||||
jnz loc_D012
|
||||
mov al, _playchar_menu_sel
|
||||
mov ah, 0
|
||||
|
|
@ -4267,11 +4267,11 @@ loc_CF8C:
|
|||
mov bx, ax
|
||||
cmp _cleared_with[bx], 0
|
||||
jz loc_D086
|
||||
mov ax, [bp+var_2]
|
||||
add ax, 0FFF8h
|
||||
mov ax, [bp+@@x]
|
||||
add ax, -8
|
||||
push ax
|
||||
mov ax, [bp+var_4]
|
||||
add ax, 0FFF8h
|
||||
mov ax, [bp+@@y]
|
||||
add ax, -8
|
||||
push ax
|
||||
push 44
|
||||
call cdg_put
|
||||
|
|
@ -4320,10 +4320,10 @@ loc_D054:
|
|||
mov bx, ax
|
||||
cmp _cleared_with[bx], 0
|
||||
jz short loc_D07F
|
||||
call cdg_put pascal, [bp+var_2], [bp+var_4], 44
|
||||
call cdg_put pascal, [bp+@@x], [bp+@@y], 44
|
||||
|
||||
loc_D07F:
|
||||
call sub_CE65 pascal, word ptr _playchar_menu_sel
|
||||
call darken_pic pascal, word ptr _playchar_menu_sel
|
||||
|
||||
loc_D086:
|
||||
pop di
|
||||
|
|
@ -4336,7 +4336,7 @@ off_D08D dw offset @@reimu
|
|||
dw offset @@marisa
|
||||
dw offset @@mima
|
||||
dw offset @@yuuka
|
||||
sub_CEFF endp
|
||||
put_pic endp
|
||||
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
|
|
@ -4344,15 +4344,15 @@ sub_CEFF endp
|
|||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_D095 proc near
|
||||
playchar_menu_init proc near
|
||||
|
||||
var_2 = word ptr -2
|
||||
@@i = word ptr -2
|
||||
|
||||
enter 2, 0
|
||||
push si
|
||||
mov al, _playchar_menu_sel
|
||||
mov ah, 0
|
||||
mov [bp+var_2], ax
|
||||
mov [bp+@@i], ax
|
||||
mov PaletteTone, 0
|
||||
call far ptr palette_show
|
||||
graph_accesspage 1
|
||||
|
|
@ -4360,8 +4360,7 @@ var_2 = word ptr -2
|
|||
call pi_slot_palette_apply pascal, 0
|
||||
call pi_slot_put pascal, large 0, 0
|
||||
call pi_slot_free pascal, 0
|
||||
push 0
|
||||
call graph_copy_page
|
||||
call graph_copy_page pascal, 0
|
||||
call bgimage_snap
|
||||
graph_accesspage 1
|
||||
graph_showpage 0
|
||||
|
|
@ -4373,7 +4372,7 @@ var_2 = word ptr -2
|
|||
loc_D0F7:
|
||||
mov al, _playchar_menu_sel
|
||||
mov ah, 0
|
||||
cmp ax, [bp+var_2]
|
||||
cmp ax, [bp+@@i]
|
||||
jz short loc_D106
|
||||
mov ax, 1
|
||||
jmp short loc_D108
|
||||
|
|
@ -4384,14 +4383,14 @@ loc_D106:
|
|||
|
||||
loc_D108:
|
||||
push ax
|
||||
call sub_CEFF
|
||||
call put_pic
|
||||
inc si
|
||||
inc _playchar_menu_sel
|
||||
|
||||
loc_D111:
|
||||
cmp si, PLAYCHAR_COUNT
|
||||
jl short loc_D0F7
|
||||
mov al, byte ptr [bp+var_2]
|
||||
mov al, byte ptr [bp+@@i]
|
||||
mov _playchar_menu_sel, al
|
||||
push 0
|
||||
call graph_copy_page
|
||||
|
|
@ -4400,20 +4399,20 @@ loc_D111:
|
|||
pop si
|
||||
leave
|
||||
retn
|
||||
sub_D095 endp
|
||||
playchar_menu_init endp
|
||||
|
||||
|
||||
; =============== S U B R O U T I N E =======================================
|
||||
|
||||
; Attributes: bp-based frame
|
||||
|
||||
sub_D12D proc near
|
||||
playchar_menu proc near
|
||||
|
||||
@@i = word ptr -4
|
||||
var_1 = byte ptr -1
|
||||
@@input_locked = byte ptr -1
|
||||
|
||||
enter 4, 0
|
||||
mov [bp+var_4], 0
|
||||
mov [bp+@@i], 0
|
||||
jmp short loc_D146
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
|
|
@ -4426,6 +4425,7 @@ loc_D138:
|
|||
loc_D146:
|
||||
cmp [bp+@@i], PLAYCHAR_COUNT
|
||||
jl short loc_D138
|
||||
|
||||
les bx, _ksoconfig
|
||||
cmp byte ptr es:[bx+13h], 6
|
||||
jnz short @@not_extra
|
||||
|
|
@ -4467,78 +4467,69 @@ loc_D191:
|
|||
loc_D19C:
|
||||
cmp [bp+@@i], PLAYCHAR_COUNT
|
||||
jl short loc_D191
|
||||
|
||||
les bx, _ksoconfig
|
||||
mov al, es:[bx+11h]
|
||||
mov _rank, al
|
||||
mov _playchar_menu_sel, PLAYCHAR_REIMU
|
||||
|
||||
loc_D1B2:
|
||||
call sub_D095
|
||||
call playchar_menu_init
|
||||
|
||||
loc_D1B5:
|
||||
call _input_reset_sense_held
|
||||
cmp [bp+var_1], 0
|
||||
cmp [bp+@@input_locked], 0
|
||||
jnz loc_D2EC
|
||||
test _key_det.lo, low INPUT_LEFT
|
||||
jnz short loc_D1D0
|
||||
jnz short @@left_or_right_pressed
|
||||
test _key_det.lo, low INPUT_RIGHT
|
||||
jz short loc_D223
|
||||
|
||||
loc_D1D0:
|
||||
@@left_or_right_pressed:
|
||||
call snd_se_reset
|
||||
call snd_se_play pascal, 1
|
||||
call snd_se_update
|
||||
graph_accesspage 1
|
||||
push 1
|
||||
call sub_CEFF
|
||||
call put_pic pascal, 1
|
||||
xor _playchar_menu_sel, 1 ; 0<->1 2<->3
|
||||
push 0
|
||||
call sub_CEFF
|
||||
call put_pic pascal, 0
|
||||
mov vsync_Count1, 0
|
||||
push 1
|
||||
call frame_delay
|
||||
call frame_delay pascal, 1
|
||||
graph_showpage 1
|
||||
push 0
|
||||
call graph_copy_page
|
||||
call graph_copy_page pascal, 0
|
||||
mov vsync_Count1, 0
|
||||
push 1
|
||||
call frame_delay
|
||||
call frame_delay pascal, 1
|
||||
graph_showpage 0
|
||||
|
||||
loc_D223:
|
||||
test _key_det.lo, low INPUT_UP
|
||||
jnz short loc_D231
|
||||
jnz short @@up_or_down_pressed
|
||||
test _key_det.lo, low INPUT_DOWN
|
||||
jz short loc_D284
|
||||
|
||||
loc_D231:
|
||||
@@up_or_down_pressed:
|
||||
call snd_se_reset
|
||||
call snd_se_play pascal, 1
|
||||
call snd_se_update
|
||||
graph_accesspage 1
|
||||
push 1
|
||||
call sub_CEFF
|
||||
call put_pic pascal, 1
|
||||
xor _playchar_menu_sel, 2 ; 0<->2 1<->3
|
||||
push 0
|
||||
call sub_CEFF
|
||||
call put_pic pascal, 0
|
||||
mov vsync_Count1, 0
|
||||
push 1
|
||||
call frame_delay
|
||||
call frame_delay pascal, 1
|
||||
graph_showpage 1
|
||||
push 0
|
||||
call graph_copy_page
|
||||
call graph_copy_page pascal, 0
|
||||
mov vsync_Count1, 0
|
||||
push 1
|
||||
call frame_delay
|
||||
call frame_delay pascal, 1
|
||||
graph_showpage 0
|
||||
|
||||
loc_D284:
|
||||
test _key_det.hi, high INPUT_OK
|
||||
jnz short loc_D292
|
||||
jnz short @@z_pressed
|
||||
test _key_det.lo, low INPUT_SHOT
|
||||
jz short @@unable_to_select
|
||||
|
||||
loc_D292:
|
||||
@@z_pressed:
|
||||
mov al, _playchar_menu_sel
|
||||
mov ah, 0
|
||||
mov bx, ax
|
||||
|
|
@ -4556,13 +4547,11 @@ loc_D292:
|
|||
xor ax, ax
|
||||
leave
|
||||
retn
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
@@unable_to_select:
|
||||
test _key_det.hi, high INPUT_CANCEL
|
||||
jz short loc_D2E4
|
||||
push 1
|
||||
call palette_black_out
|
||||
call palette_black_out pascal, 1
|
||||
call bgimage_free
|
||||
mov ax, 1
|
||||
leave
|
||||
|
|
@ -4571,23 +4560,22 @@ loc_D292:
|
|||
|
||||
loc_D2E4:
|
||||
mov al, _key_det.lo
|
||||
mov [bp+var_1], al
|
||||
mov [bp+@@input_locked], al
|
||||
jmp short loc_D2F7
|
||||
; ---------------------------------------------------------------------------
|
||||
|
||||
loc_D2EC:
|
||||
cmp _key_det, INPUT_NONE
|
||||
jnz short loc_D2F7
|
||||
mov [bp+var_1], 0
|
||||
mov [bp+@@input_locked], 0
|
||||
|
||||
loc_D2F7:
|
||||
push 1
|
||||
call frame_delay
|
||||
call frame_delay pascal, 1
|
||||
jmp loc_D1B5
|
||||
; ---------------------------------------------------------------------------
|
||||
leave
|
||||
retn
|
||||
sub_D12D endp
|
||||
playchar_menu endp
|
||||
|
||||
; ---------------------------------------------------------------------------
|
||||
db 0
|
||||
|
|
|
|||
Loading…
Reference in New Issue