ReC98/th04/scroll_y_3.asm

; 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