~ubuntu-branches/ubuntu/karmic/rott/karmic-proposed

« back to all changes in this revision

Viewing changes to rott/rt_sc_a.asm

  • Committer: Bazaar Package Importer
  • Author(s): Fabian Greffrath
  • Date: 2008-01-27 20:00:00 UTC
  • mfrom: (1.1.1 upstream) (2.1.2 hardy)
  • Revision ID: james.westby@ubuntu.com-20080127200000-myle9y0099o45sfv
Tags: 1.0+dfsg-2
* debian/patches/01-custom-datapath.dpatch,
  debian/patches/13-improve-makefile.dpatch:
  + Changed DATADIR back to "/usr/share/games/rott/".

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
        .386
2
 
        .MODEL  flat
3
 
 
4
 
 
5
 
SCREENWIDTH = 96
6
 
 
7
 
 
8
 
.data
9
 
loopcount       dd      0
10
 
pixelcount      dd      0
11
 
EXTRN   _centery:DWORD
12
 
EXTRN   _centeryclipped:DWORD
13
 
EXTRN   _dc_yl:DWORD
14
 
EXTRN   _dc_yh:DWORD
15
 
EXTRN   _dc_iscale:DWORD
16
 
EXTRN   _dc_texturemid:DWORD
17
 
EXTRN   _ylookup:DWORD
18
 
;EXTRN   _dc_firstsource:DWORD
19
 
EXTRN   _dc_source:DWORD
20
 
EXTRN   _shadingtable:DWORD
21
 
 
22
 
.code
23
 
SEGMENT text USE32
24
 
        ALIGN   16
25
 
 
26
 
;================
27
 
;
28
 
; R_DrawColumn
29
 
;
30
 
;================
31
 
PROC   R_DrawColumn_
32
 
PUBLIC   R_DrawColumn_
33
 
        push    ebp
34
 
        mov     ebp,[_dc_yl]
35
 
        mov     ebx,ebp
36
 
        add     edi,[_ylookup+ebx*4]
37
 
        mov     eax,[_dc_yh]
38
 
        inc     eax
39
 
        sub     eax,ebp                         ; pixel count
40
 
        mov     [pixelcount],eax                ; save for final pixel
41
 
        js      done                            ; nothing to scale
42
 
        shr     eax,1                           ; double pixel count
43
 
        mov     [loopcount],eax
44
 
 
45
 
        mov     ecx,[_dc_iscale]
46
 
 
47
 
        mov     eax,[_centery]
48
 
        sub     eax,ebp
49
 
        imul    ecx
50
 
        mov     ebp,[_dc_texturemid]
51
 
        sub     ebp,eax
52
 
 
53
 
        mov     esi,[_dc_source]
54
 
 
55
 
 
56
 
        mov     ebx,[_dc_iscale]
57
 
        mov     eax,OFFSET patch1+2             ; convice tasm to modify code...
58
 
        mov     [eax],ebx
59
 
        mov     eax,OFFSET patch2+2             ; convice tasm to modify code...
60
 
        mov     [eax],ebx
61
 
 
62
 
; eax           aligned colormap
63
 
; ebx           aligned colormap
64
 
; ecx,edx       scratch
65
 
; esi           virtual source
66
 
; edi           moving destination pointer
67
 
; ebp           frac
68
 
 
69
 
        mov     ecx,ebp                         ; begin calculating first pixel
70
 
        add     ebp,ebx                         ; advance frac pointer
71
 
        shr     ecx,16                          ; finish calculation for first pixel
72
 
        mov     edx,ebp                         ; begin calculating second pixel
73
 
        add     ebp,ebx                         ; advance frac pointer
74
 
        shr     edx,16                          ; finish calculation for second pixel
75
 
        mov     eax,[_shadingtable]
76
 
        mov     ebx,eax
77
 
        ;mov     [_dc_firstsource],esi
78
 
        ;add     [_dc_firstsource],ecx
79
 
        mov     al,[esi+ecx]                    ; get first pixel
80
 
        mov     bl,[esi+edx]                    ; get second pixel
81
 
        mov     al,[eax]                        ; color translate first pixel
82
 
        mov     bl,[ebx]                        ; color translate second pixel
83
 
 
84
 
        test    [pixelcount],0fffffffeh
85
 
        jnz     doubleloop                      ; at least two pixels to map
86
 
        jmp     checklast
87
 
 
88
 
        ALIGN   16
89
 
doubleloop:
90
 
        mov     ecx,ebp                         ; begin calculating third pixel
91
 
patch1:
92
 
        add     ebp,12345678h                   ; advance frac pointer
93
 
        mov     [edi],al                        ; write first pixel
94
 
        shr     ecx,16                          ; finish calculation for third pixel
95
 
        mov     edx,ebp                         ; begin calculating fourth pixel
96
 
patch2:
97
 
        add     ebp,12345678h                   ; advance frac pointer
98
 
        mov     [edi+SCREENWIDTH],bl            ; write second pixel
99
 
        shr     edx,16                                      ; finish calculation for fourth pixel
100
 
        mov     al,[esi+ecx]                    ; get third pixel
101
 
        add     edi,SCREENWIDTH*2               ; advance to third pixel destination
102
 
        mov     bl,[esi+edx]                    ; get fourth pixel
103
 
        dec     [loopcount]                     ; done with loop?
104
 
        mov     al,[eax]                        ; color translate third pixel
105
 
        mov     bl,[ebx]                        ; color translate fourth pixel
106
 
        jnz     doubleloop
107
 
 
108
 
; check for final pixel
109
 
checklast:
110
 
        test    [pixelcount],1
111
 
        jz      done
112
 
        mov     [edi],al                        ; write final pixel
113
 
done:
114
 
        pop     ebp
115
 
        ret
116
 
 
117
 
ENDP
118
 
 
119
 
 
120
 
;================
121
 
;
122
 
; R_DrawSolidColumn
123
 
;
124
 
;================
125
 
PROC   R_DrawSolidColumn_
126
 
PUBLIC   R_DrawSolidColumn_
127
 
        mov     ecx,[_dc_yl]
128
 
        mov     eax,ecx
129
 
        add     edi,[_ylookup+eax*4]
130
 
        mov     eax,[_dc_yh]
131
 
        inc     eax
132
 
        sub     eax,ecx                         ; pixel count
133
 
        mov     [pixelcount],eax                ; save for final pixel
134
 
        js      soliddone                       ; nothing to scale
135
 
        shr     eax,1                           ; double pixel count
136
 
        mov     [loopcount],eax
137
 
 
138
 
        test    [pixelcount],0fffffffeh
139
 
        jnz     soliddoubleloop                      ; at least two pixels to map
140
 
        jmp     solidchecklast
141
 
 
142
 
        ALIGN   16
143
 
soliddoubleloop:
144
 
        mov     [edi],bl                        ; write first pixel
145
 
        add     edi,SCREENWIDTH                 ; advance to third pixel destination
146
 
        mov     [edi],bl                        ; write second pixel
147
 
        add     edi,SCREENWIDTH                 ; advance to fourth pixel destination
148
 
        dec     [loopcount]                     ; done with loop?
149
 
        jnz     soliddoubleloop
150
 
 
151
 
; check for final pixel
152
 
solidchecklast:
153
 
        test    [pixelcount],1
154
 
        jz      soliddone
155
 
        mov     [edi],bl                        ; write final pixel
156
 
soliddone:
157
 
        ret
158
 
 
159
 
ENDP
160
 
 
161
 
 
162
 
;================
163
 
;
164
 
; R_TransColumn
165
 
;
166
 
;================
167
 
PROC   R_TransColumn_
168
 
PUBLIC   R_TransColumn_
169
 
        mov     ebx,[_dc_yl]
170
 
        mov     eax,[_dc_yh]
171
 
        add     edi,[_ylookup+ebx*4]
172
 
        inc     eax
173
 
        sub     eax,ebx                         ; pixel count
174
 
        mov     [pixelcount],eax                ; save for final pixel
175
 
        js      tdone                           ; nothing to scale
176
 
        shr     eax,1                           ; double pixel count
177
 
        mov     [loopcount],eax
178
 
 
179
 
; eax           aligned colormap
180
 
; ebx           aligned colormap
181
 
; esi           moving destination pointer
182
 
; edi           moving destination pointer
183
 
 
184
 
        mov     eax,[_shadingtable]
185
 
        mov     esi,edi
186
 
        mov     ebx,eax
187
 
        add     esi,SCREENWIDTH
188
 
        mov     al,[BYTE PTR edi]               ; get first pixel
189
 
        mov     bl,[BYTE PTR esi]               ; get second pixel
190
 
        mov     al,[BYTE PTR eax]               ; color translate first pixel
191
 
        mov     bl,[BYTE PTR ebx]               ; color translate second pixel
192
 
 
193
 
        test    [pixelcount],0fffffffeh
194
 
        jnz     tdoubleloop                     ; at least two pixels to map
195
 
        jmp     tchecklast
196
 
 
197
 
        ALIGN   16
198
 
tdoubleloop:
199
 
        mov     [edi],al                        ; write first pixel
200
 
        mov     [esi],bl                        ; write second pixel
201
 
        add     edi,SCREENWIDTH*2               ; advance to third pixel destination
202
 
        add     esi,SCREENWIDTH*2               ; advance to third pixel destination
203
 
        mov     al,[edi]                        ; get third pixel
204
 
        mov     bl,[esi]                        ; get fourth pixel
205
 
        mov     al,[eax]                        ; color translate third pixel
206
 
        dec     [loopcount]                     ; done with loop?
207
 
        mov     bl,[ebx]                        ; color translate fourth pixel
208
 
        jnz     tdoubleloop
209
 
 
210
 
; check for final pixel
211
 
tchecklast:
212
 
        test    [pixelcount],1
213
 
        jz      tdone
214
 
        mov     [edi],al                        ; write final pixel
215
 
tdone:
216
 
        ret
217
 
 
218
 
ENDP
219
 
 
220
 
 
221
 
 
222
 
 
223
 
 
224
 
 
225
 
 
226
 
 
227
 
;================
228
 
;
229
 
; R_DrawClippedColumn
230
 
;
231
 
;================
232
 
PROC   R_DrawClippedColumn_
233
 
PUBLIC   R_DrawClippedColumn_
234
 
        push    ebp
235
 
        mov     ebp,[_dc_yl]
236
 
        mov     ebx,ebp
237
 
        add     edi,[_ylookup+ebx*4]
238
 
        mov     eax,[_dc_yh]
239
 
        inc     eax
240
 
        sub     eax,ebp                         ; pixel count
241
 
        mov     [pixelcount],eax                ; save for final pixel
242
 
        js      adone                            ; nothing to scale
243
 
        shr     eax,1                           ; double pixel count
244
 
        mov     [loopcount],eax
245
 
 
246
 
        mov     ecx,[_dc_iscale]
247
 
 
248
 
        mov     eax,[_centeryclipped]
249
 
        sub     eax,ebp
250
 
        imul    ecx
251
 
        mov     ebp,[_dc_texturemid]
252
 
        sub     ebp,eax
253
 
 
254
 
        mov     esi,[_dc_source]
255
 
 
256
 
 
257
 
        mov     ebx,[_dc_iscale]
258
 
        mov     eax,OFFSET apatch1+2            ; convice tasm to modify code...
259
 
        mov     [eax],ebx
260
 
        mov     eax,OFFSET apatch2+2            ; convice tasm to modify code...
261
 
        mov     [eax],ebx
262
 
 
263
 
; eax           aligned colormap
264
 
; ebx           aligned colormap
265
 
; ecx,edx       scratch
266
 
; esi           virtual source
267
 
; edi           moving destination pointer
268
 
; ebp           frac
269
 
 
270
 
        mov     ecx,ebp                         ; begin calculating first pixel
271
 
        add     ebp,ebx                         ; advance frac pointer
272
 
        shr     ecx,16                          ; finish calculation for first pixel
273
 
        mov     edx,ebp                         ; begin calculating second pixel
274
 
        add     ebp,ebx                         ; advance frac pointer
275
 
        shr     edx,16                          ; finish calculation for second pixel
276
 
        mov     eax,[_shadingtable]
277
 
        mov     ebx,eax
278
 
        mov     al,[esi+ecx]                    ; get first pixel
279
 
        mov     bl,[esi+edx]                    ; get second pixel
280
 
        mov     al,[eax]                        ; color translate first pixel
281
 
        mov     bl,[ebx]                        ; color translate second pixel
282
 
 
283
 
        test    [pixelcount],0fffffffeh
284
 
        jnz     adoubleloop                     ; at least two pixels to map
285
 
        jmp     achecklast
286
 
 
287
 
        ALIGN   16
288
 
adoubleloop:
289
 
        mov     ecx,ebp                         ; begin calculating third pixel
290
 
apatch1:
291
 
        add     ebp,12345678h                   ; advance frac pointer
292
 
        mov     [edi],al                        ; write first pixel
293
 
        shr     ecx,16                          ; finish calculation for third pixel
294
 
        mov     edx,ebp                         ; begin calculating fourth pixel
295
 
apatch2:
296
 
        add     ebp,12345678h                   ; advance frac pointer
297
 
        mov     [edi+SCREENWIDTH],bl            ; write second pixel
298
 
        shr     edx,16                          ; finish calculation for fourth pixel
299
 
        mov     al,[esi+ecx]                    ; get third pixel
300
 
        add     edi,SCREENWIDTH*2               ; advance to third pixel destination
301
 
        mov     bl,[esi+edx]                    ; get fourth pixel
302
 
        dec     [loopcount]                     ; done with loop?
303
 
        mov     al,[eax]                        ; color translate third pixel
304
 
        mov     bl,[ebx]                        ; color translate fourth pixel
305
 
        jnz     adoubleloop
306
 
 
307
 
; check for final pixel
308
 
achecklast:
309
 
        test    [pixelcount],1
310
 
        jz      adone
311
 
        mov     [edi],al                                ; write final pixel
312
 
adone:
313
 
        pop     ebp
314
 
        ret
315
 
 
316
 
ENDP
317
 
 
318
 
 
319
 
;================
320
 
;
321
 
; R_DrawWallColumn
322
 
;
323
 
;================
324
 
PROC     R_DrawWallColumn_
325
 
PUBLIC   R_DrawWallColumn_
326
 
        push    ebp
327
 
        mov     ebp,[_dc_yl]
328
 
        mov     ebx,ebp
329
 
        add     edi,[_ylookup+ebx*4]
330
 
        mov     eax,[_dc_yh]
331
 
;        inc     eax
332
 
        sub     eax,ebp                         ; pixel count
333
 
        mov     [pixelcount],eax                ; save for final pixel
334
 
        js      wcdone                            ; nothing to scale
335
 
        shr     eax,1                           ; double pixel count
336
 
        mov     [loopcount],eax
337
 
 
338
 
        mov     ecx,[_dc_iscale]
339
 
 
340
 
        mov     eax,[_centery]
341
 
        sub     eax,ebp
342
 
        imul    ecx
343
 
        mov     ebp,[_dc_texturemid]
344
 
        sub     ebp,eax
345
 
        shl     ebp,10
346
 
 
347
 
        mov     esi,[_dc_source]
348
 
 
349
 
 
350
 
        mov     ebx,[_dc_iscale]
351
 
        shl     ebx,10
352
 
        mov     eax,OFFSET wcpatch1+2             ; convice tasm to modify code...
353
 
        mov     [eax],ebx
354
 
        mov     eax,OFFSET wcpatch2+2             ; convice tasm to modify code...
355
 
        mov     [eax],ebx
356
 
 
357
 
; eax           aligned colormap
358
 
; ebx           aligned colormap
359
 
; ecx,edx       scratch
360
 
; esi           virtual source
361
 
; edi           moving destination pointer
362
 
; ebp           frac
363
 
 
364
 
        mov     ecx,ebp                         ; begin calculating first pixel
365
 
        add     ebp,ebx                         ; advance frac pointer
366
 
        shr     ecx,26                          ; finish calculation for first pixel
367
 
        mov     edx,ebp                         ; begin calculating second pixel
368
 
;        and     ecx,63
369
 
        add     ebp,ebx                         ; advance frac pointer
370
 
        shr     edx,26                          ; finish calculation for second pixel
371
 
        mov     eax,[_shadingtable]
372
 
;        and     edx,63
373
 
        mov     ebx,eax
374
 
        mov     al,[esi+ecx]                    ; get first pixel
375
 
        mov     bl,[esi+edx]                    ; get second pixel
376
 
        mov     al,[eax]                        ; color translate first pixel
377
 
        mov     bl,[ebx]                        ; color translate second pixel
378
 
 
379
 
        test    [pixelcount],0fffffffeh
380
 
        jnz     wcdoubleloop                      ; at least two pixels to map
381
 
        jmp     wcchecklast
382
 
 
383
 
        ALIGN   16
384
 
wcdoubleloop:
385
 
        mov     ecx,ebp                         ; begin calculating third pixel
386
 
wcpatch1:
387
 
        add     ebp,12345678h                   ; advance frac pointer
388
 
        mov     [edi],al                        ; write first pixel
389
 
        shr     ecx,26                          ; finish calculation for third pixel
390
 
        mov     edx,ebp                         ; begin calculating fourth pixel
391
 
;        and     ecx,63
392
 
wcpatch2:
393
 
        add     ebp,12345678h                   ; advance frac pointer
394
 
        mov     [edi+SCREENWIDTH],bl            ; write second pixel
395
 
        shr     edx,26                                      ; finish calculation for fourth pixel
396
 
        mov     al,[esi+ecx]                    ; get third pixel
397
 
;        and     edx,63
398
 
        add     edi,SCREENWIDTH*2               ; advance to third pixel destination
399
 
        mov     bl,[esi+edx]                    ; get fourth pixel
400
 
        dec     [loopcount]                     ; done with loop?
401
 
        mov     al,[eax]                        ; color translate third pixel
402
 
        mov     bl,[ebx]                        ; color translate fourth pixel
403
 
        jnz     wcdoubleloop
404
 
 
405
 
; check for final pixel
406
 
wcchecklast:
407
 
        test    [pixelcount],1
408
 
        jz      wcdone
409
 
        mov     [edi],al                        ; write final pixel
410
 
wcdone:
411
 
        pop     ebp
412
 
        ret
413
 
 
414
 
ENDP
415
 
 
416
 
 
417
 
ENDS
418
 
 
419
 
 
420
 
END
421