dxx-rebirth/texmap/tmapfade.asm

117 lines
3 KiB
NASM

; $Id: tmapfade.asm,v 1.3 2004-08-28 23:17:46 schaffner Exp $
;THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
;SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
;END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
;ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
;IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
;SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
;FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
;CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
;AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
;COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
;
;
; .
;
;
[BITS 32]
global _asm_tmap_scanline_shaded
global asm_tmap_scanline_shaded
[SECTION .data]
%include "tmap_inc.asm"
_loop_count dd 0
[SECTION .text]
; --------------------------------------------------------------------------------------------------
; Enter:
; _xleft fixed point left x coordinate
; _xright fixed point right x coordinate
; _y fixed point y coordinate
;**; _pixptr address of source pixel map
; for (x = (int) xleft; x <= (int) xright; x++) {
; _setcolor(read_pixel_from_tmap(srcb,((int) (u/z)) & 63,((int) (v/z)) & 63));
; _setpixel(x,y);
;
; z += dz_dx;
; }
align 4
_asm_tmap_scanline_shaded:
asm_tmap_scanline_shaded:
; push fs
pusha
; mov fs, [_gr_fade_table_selector] ; DPH: No selectors in windows
; Setup for loop: _loop_count iterations = (int) xright - (int) xleft
; edi initial row pointer = y*320+x
; set edi = address of first pixel to modify
mov edi,[_fx_y]
cmp edi,_window_bottom
jae near _none_to_do
imul edi,[_bytes_per_row]
mov eax,[_fx_xleft]
test eax,eax
jns eax_ok
sub eax,eax
eax_ok:
add edi,eax
add edi,[_write_buffer]
; set _loop_count = # of iterations
mov eax,[_fx_xright]
cmp eax,[_window_right]
jl eax_ok1
mov eax,[_window_right]
eax_ok1: cmp eax,[_window_left]
jg eax_ok2
mov eax,[_window_left]
eax_ok2:
mov ebx,[_fx_xleft]
sub eax,ebx
js near _none_to_do
cmp eax,[_window_width]
jbe _ok_to_do
mov eax,[_window_width]
_ok_to_do:
mov [_loop_count], eax
mov ecx, 0
mov ch,[_tmap_flat_shade_value]
and ch, 31
;_size = (_end1 - _start1)/num_iters
mov eax,num_iters-1
sub eax,[_loop_count]
jns j_eax_ok1
inc eax ; sort of a hack, but we can get -1 here and want to be graceful
jns j_eax_ok1 ; if we jump, we had -1, which is kind of ok, if not, we int 3
int 3 ; oops, going to jump behind _start1, very bad...
sub eax,eax ; ok to continue
j_eax_ok1: imul eax,eax,(_end1 - _start1)/num_iters
add eax, _start1 ;originally offset _start1
jmp eax
align 4
_start1:
%rep num_iters
mov cl, [edi] ; get pixel
mov al, [_gr_fade_table + ecx] ; darken pixel
mov [edi], al ; write pixel
inc edi ; goto next pixel
%endrep
_end1:
_none_to_do: popa
; pop fs
ret