2020-08-25 18:29:24 +00:00
|
|
|
HUD_CONTINUES_LEFT = HUD_LEFT + ((SCORE_DIGITS - 1) * 2)
|
2019-09-18 16:33:38 +00:00
|
|
|
|
|
|
|
; Only prints the seven score digits, in contrast to the TH04/TH05 version!
|
|
|
|
|
2020-08-20 19:59:45 +00:00
|
|
|
; void pascal near hud_score_put(utram_y_t y, long value);
|
2019-09-18 16:33:38 +00:00
|
|
|
public HUD_SCORE_PUT
|
|
|
|
hud_score_put proc near
|
|
|
|
@@result = word ptr [bp-4]
|
|
|
|
@@digit = word ptr [bp-2]
|
|
|
|
@@value = dword ptr [bp+4]
|
|
|
|
@@y = word ptr [bp+8]
|
|
|
|
|
|
|
|
push bp
|
|
|
|
mov bp, sp
|
|
|
|
sub sp, 4
|
|
|
|
push si
|
|
|
|
push di
|
|
|
|
mov si, offset _SEVEN_DIGIT_POWERS_OF_10
|
2020-08-25 18:29:24 +00:00
|
|
|
mov di, HUD_LEFT
|
2019-09-18 16:33:38 +00:00
|
|
|
jmp short @@more_digits?
|
|
|
|
|
|
|
|
@@put:
|
|
|
|
mov eax, @@value
|
|
|
|
cdq
|
|
|
|
idiv dword ptr [si]
|
|
|
|
mov @@result, ax
|
|
|
|
movsx eax, @@result
|
|
|
|
imul eax, [si]
|
|
|
|
sub @@value, eax
|
|
|
|
add si, 4
|
|
|
|
mov ax, @@result
|
|
|
|
add ax, GB_DIGITS
|
|
|
|
mov @@digit, ax
|
|
|
|
call gaiji_putca pascal, di, @@y, ax, TX_WHITE
|
|
|
|
add di, 2
|
|
|
|
|
|
|
|
@@more_digits?:
|
2020-08-25 18:29:24 +00:00
|
|
|
cmp di, HUD_CONTINUES_LEFT
|
2019-09-18 16:33:38 +00:00
|
|
|
jl short @@put
|
|
|
|
pop di
|
|
|
|
pop si
|
|
|
|
leave
|
|
|
|
retn 6
|
|
|
|
hud_score_put endp
|
|
|
|
|
|
|
|
|
2020-08-20 19:59:45 +00:00
|
|
|
; void pascal near hud_continues_put(utram_y_t y, int continues_used);
|
2019-09-18 16:33:38 +00:00
|
|
|
public HUD_CONTINUES_PUT
|
|
|
|
hud_continues_put proc near
|
|
|
|
|
|
|
|
@@continues_displayed = word ptr [bp-2]
|
|
|
|
@@continues_used = word ptr [bp+4]
|
|
|
|
@@y = word ptr [bp+6]
|
|
|
|
|
|
|
|
push bp
|
|
|
|
mov bp, sp
|
|
|
|
sub sp, 2
|
|
|
|
push si
|
|
|
|
mov si, @@continues_used
|
|
|
|
cmp si, 10
|
|
|
|
jl short @@put
|
|
|
|
mov si, 9
|
|
|
|
|
|
|
|
@@put:
|
|
|
|
lea ax, [si+GB_DIGITS]
|
|
|
|
mov @@continues_displayed, ax
|
2020-08-25 18:29:24 +00:00
|
|
|
call gaiji_putca pascal, HUD_CONTINUES_LEFT, @@y, ax, TX_WHITE
|
2019-09-18 16:33:38 +00:00
|
|
|
pop si
|
|
|
|
leave
|
|
|
|
retn 4
|
|
|
|
hud_continues_put endp
|