amd64 fixes
[btb/d2x.git] / texmap / tmapfade.asm
1 ; $Id: tmapfade.asm,v 1.3 2004-08-28 23:17:46 schaffner Exp $
2 ;THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 ;SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
4 ;END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ;ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 ;IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 ;SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 ;FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 ;CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
10 ;AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 ;COPYRIGHT 1993-1998 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
12 ;
13 ;
14 ; .
15 ;
16 ;
17 [BITS 32]
18 global  _asm_tmap_scanline_shaded
19 global  asm_tmap_scanline_shaded
20
21 [SECTION .data]
22
23 %include        "tmap_inc.asm"
24 _loop_count             dd      0
25
26 [SECTION .text]
27
28 ; --------------------------------------------------------------------------------------------------
29 ; Enter:
30 ;       _xleft  fixed point left x coordinate
31 ;       _xright fixed point right x coordinate
32 ;       _y      fixed point y coordinate
33 ;**;    _pixptr address of source pixel map
34
35 ;   for (x = (int) xleft; x <= (int) xright; x++) {
36 ;      _setcolor(read_pixel_from_tmap(srcb,((int) (u/z)) & 63,((int) (v/z)) & 63));
37 ;      _setpixel(x,y);
38 ;
39 ;      z += dz_dx;
40 ;   }
41 align 4
42
43 _asm_tmap_scanline_shaded:
44 asm_tmap_scanline_shaded:
45 ;        push fs
46         pusha
47
48 ;        mov     fs, [_gr_fade_table_selector] ; DPH: No selectors in windows
49
50 ; Setup for loop:       _loop_count  iterations = (int) xright - (int) xleft
51 ;       edi     initial row pointer = y*320+x
52
53 ; set edi = address of first pixel to modify
54         mov     edi,[_fx_y]
55  cmp edi,_window_bottom
56  jae near _none_to_do
57
58         imul    edi,[_bytes_per_row]
59         mov     eax,[_fx_xleft]
60         test    eax,eax
61         jns     eax_ok
62         sub     eax,eax
63 eax_ok:
64         add     edi,eax
65         add     edi,[_write_buffer]
66
67 ; set _loop_count = # of iterations
68         mov     eax,[_fx_xright]
69
70         cmp     eax,[_window_right]
71         jl      eax_ok1
72         mov     eax,[_window_right]
73 eax_ok1:        cmp     eax,[_window_left]
74         jg      eax_ok2
75         mov     eax,[_window_left]
76 eax_ok2:
77         mov     ebx,[_fx_xleft]
78         sub     eax,ebx
79         js      near _none_to_do
80         cmp     eax,[_window_width]
81         jbe     _ok_to_do
82         mov     eax,[_window_width]
83 _ok_to_do:
84         mov     [_loop_count], eax
85
86         mov     ecx, 0
87         mov     ch,[_tmap_flat_shade_value]
88         and     ch, 31
89
90 ;_size = (_end1 - _start1)/num_iters
91         mov     eax,num_iters-1
92         sub     eax,[_loop_count]
93         jns     j_eax_ok1
94         inc     eax     ; sort of a hack, but we can get -1 here and want to be graceful
95         jns     j_eax_ok1       ; if we jump, we had -1, which is kind of ok, if not, we int 3
96         int     3       ; oops, going to jump behind _start1, very bad...
97         sub     eax,eax ; ok to continue
98 j_eax_ok1:      imul    eax,eax,(_end1 - _start1)/num_iters
99         add     eax, _start1        ;originally offset _start1
100         jmp     eax
101
102         align   4
103 _start1:
104
105 %rep num_iters
106         mov     cl, [edi]               ; get pixel
107         mov     al, [_gr_fade_table + ecx]            ; darken pixel
108         mov     [edi], al               ; write pixel
109         inc     edi                     ; goto next pixel
110 %endrep
111 _end1:
112
113 _none_to_do:    popa
114 ;                pop     fs
115         ret
116