mirror of https://github.com/nmlgc/ReC98.git
52 lines
840 B
NASM
52 lines
840 B
NASM
; See scroll_subpixel_y_to_vram_seg1().
|
|
public scroll_subpixel_y_to_vram_seg3
|
|
scroll_subpixel_y_to_vram_seg3 proc near
|
|
@@sy = word ptr 2
|
|
|
|
mov bx, sp
|
|
mov ax, ss:[bx+@@sy]
|
|
sar ax, 4
|
|
cmp _scroll_active, 0
|
|
jz short @@lt400?
|
|
add ax, _scroll_line
|
|
|
|
@@lt400?:
|
|
cmp ax, RES_Y
|
|
jl short @@lt0?
|
|
sub ax, RES_Y
|
|
jmp short @@ret
|
|
|
|
@@lt0?:
|
|
or ax, ax
|
|
jge short @@ret
|
|
add ax, RES_Y
|
|
|
|
@@ret:
|
|
ret 2
|
|
scroll_subpixel_y_to_vram_seg3 endp
|
|
|
|
|
|
; Like the one above, but transforming even if scrolling is disabled.
|
|
public scroll_subpixel_y_to_vram_always
|
|
scroll_subpixel_y_to_vram_always proc near
|
|
@@sy = word ptr 2
|
|
|
|
mov bx, sp
|
|
mov ax, ss:[bx+@@sy]
|
|
sar ax, 4
|
|
add ax, _scroll_line
|
|
cmp ax, RES_Y
|
|
jl short @@lt0?
|
|
sub ax, RES_Y
|
|
jmp short @@ret
|
|
|
|
@@lt0?:
|
|
or ax, ax
|
|
jge short @@ret
|
|
add ax, RES_Y
|
|
|
|
@@ret:
|
|
ret 2
|
|
scroll_subpixel_y_to_vram_always endp
|
|
nop
|