hexen2/H2MP/code/surf16.asm
2000-11-10 00:00:00 +00:00

458 lines
11 KiB
NASM

.386P
.model FLAT
externdef _d_zistepu:dword
externdef _d_pzbuffer:dword
externdef _d_zistepv:dword
externdef _d_zrowbytes:dword
externdef _d_ziorigin:dword
externdef _r_turb_s:dword
externdef _r_turb_t:dword
externdef _r_turb_pdest:dword
externdef _r_turb_spancount:dword
externdef _r_turb_turb:dword
externdef _r_turb_pbase:dword
externdef _r_turb_sstep:dword
externdef _r_turb_tstep:dword
externdef _r_bmodelactive:dword
externdef _d_sdivzstepu:dword
externdef _d_tdivzstepu:dword
externdef _d_sdivzstepv:dword
externdef _d_tdivzstepv:dword
externdef _d_sdivzorigin:dword
externdef _d_tdivzorigin:dword
externdef _sadjust:dword
externdef _tadjust:dword
externdef _bbextents:dword
externdef _bbextentt:dword
externdef _cacheblock:dword
externdef _d_viewbuffer:dword
externdef _cachewidth:dword
externdef _d_pzbuffer:dword
externdef _d_zrowbytes:dword
externdef _d_zwidth:dword
externdef _d_scantable:dword
externdef _r_lightptr:dword
externdef _r_numvblocks:dword
externdef _prowdestbase:dword
externdef _pbasesource:dword
externdef _r_lightwidth:dword
externdef _lightright:dword
externdef _lightrightstep:dword
externdef _lightdeltastep:dword
externdef _lightdelta:dword
externdef _lightright:dword
externdef _lightdelta:dword
externdef _sourcetstep:dword
externdef _surfrowbytes:dword
externdef _lightrightstep:dword
externdef _lightdeltastep:dword
externdef _r_sourcemax:dword
externdef _r_stepback:dword
externdef _colormap:dword
externdef _blocksize:dword
externdef _sourcesstep:dword
externdef _lightleft:dword
externdef _blockdivshift:dword
externdef _blockdivmask:dword
externdef _lightleftstep:dword
externdef _r_origin:dword
externdef _r_ppn:dword
externdef _r_pup:dword
externdef _r_pright:dword
externdef _ycenter:dword
externdef _xcenter:dword
externdef _d_vrectbottom_particle:dword
externdef _d_vrectright_particle:dword
externdef _d_vrecty:dword
externdef _d_vrectx:dword
externdef _d_pix_shift:dword
externdef _d_pix_min:dword
externdef _d_pix_max:dword
externdef _d_y_aspect_shift:dword
externdef _screenwidth:dword
externdef _r_leftclipped:dword
externdef _r_leftenter:dword
externdef _r_rightclipped:dword
externdef _r_rightenter:dword
externdef _modelorg:dword
externdef _xscale:dword
externdef _r_refdef:dword
externdef _yscale:dword
externdef _r_leftexit:dword
externdef _r_rightexit:dword
externdef _r_lastvertvalid:dword
externdef _cacheoffset:dword
externdef _newedges:dword
externdef _removeedges:dword
externdef _r_pedge:dword
externdef _r_framecount:dword
externdef _r_u1:dword
externdef _r_emitted:dword
externdef _edge_p:dword
externdef _surface_p:dword
externdef _surfaces:dword
externdef _r_lzi1:dword
externdef _r_v1:dword
externdef _r_ceilv1:dword
externdef _r_nearzi:dword
externdef _r_nearzionly:dword
externdef _edge_aftertail:dword
externdef _edge_tail:dword
externdef _current_iv:dword
externdef _edge_head_u_shift20:dword
externdef _span_p:dword
externdef _edge_head:dword
externdef _fv:dword
externdef _edge_tail_u_shift20:dword
externdef _r_apverts:dword
externdef _r_anumverts:dword
externdef _aliastransform:dword
externdef _r_avertexnormals:dword
externdef _r_plightvec:dword
externdef _r_ambientlight:dword
externdef _r_shadelight:dword
externdef _aliasxcenter:dword
externdef _aliasycenter:dword
externdef _a_sstepxfrac:dword
externdef _r_affinetridesc:dword
externdef _acolormap:dword
externdef _d_pcolormap:dword
externdef _r_affinetridesc:dword
externdef _d_sfrac:dword
externdef _d_ptex:dword
externdef _d_pedgespanpackage:dword
externdef _d_tfrac:dword
externdef _d_light:dword
externdef _d_zi:dword
externdef _d_pdest:dword
externdef _d_pz:dword
externdef _d_aspancount:dword
externdef _erroradjustup:dword
externdef _errorterm:dword
externdef _d_xdenom:dword
externdef _r_p0:dword
externdef _r_p1:dword
externdef _r_p2:dword
externdef _a_tstepxfrac:dword
externdef _r_sstepx:dword
externdef _r_tstepx:dword
externdef _a_ststepxwhole:dword
externdef _zspantable:dword
externdef _skintable:dword
externdef _r_zistepx:dword
externdef _erroradjustdown:dword
externdef _d_countextrastep:dword
externdef _ubasestep:dword
externdef _a_ststepxwhole:dword
externdef _a_tstepxfrac:dword
externdef _r_lstepx:dword
externdef _a_spans:dword
externdef _erroradjustdown:dword
externdef _d_pdestextrastep:dword
externdef _d_pzextrastep:dword
externdef _d_sfracextrastep:dword
externdef _d_ptexextrastep:dword
externdef _d_countextrastep:dword
externdef _d_tfracextrastep:dword
externdef _d_lightextrastep:dword
externdef _d_ziextrastep:dword
externdef _d_pdestbasestep:dword
externdef _d_pzbasestep:dword
externdef _d_sfracbasestep:dword
externdef _d_ptexbasestep:dword
externdef _ubasestep:dword
externdef _d_tfracbasestep:dword
externdef _d_lightbasestep:dword
externdef _d_zibasestep:dword
externdef _zspantable:dword
externdef _r_lstepy:dword
externdef _r_sstepy:dword
externdef _r_tstepy:dword
externdef _r_zistepy:dword
externdef _D_PolysetSetEdgeTable:dword
externdef _D_RasterizeAliasPolySmooth:dword
externdef float_point5:dword
externdef Float2ToThe31nd:dword
externdef izistep:dword
externdef izi:dword
externdef FloatMinus2ToThe31nd:dword
externdef float_1:dword
externdef float_particle_z_clip:dword
externdef float_minus_1:dword
externdef float_0:dword
externdef fp_16:dword
externdef fp_64k:dword
externdef fp_1m:dword
externdef fp_1m_minus_1:dword
externdef fp_8:dword
externdef entryvec_table:dword
externdef advancetable:dword
externdef sstep:dword
externdef tstep:dword
externdef pspantemp:dword
externdef counttemp:dword
externdef jumptemp:dword
externdef reciprocal_table:dword
externdef DP_Count:dword
externdef DP_u:dword
externdef DP_v:dword
externdef DP_32768:dword
externdef DP_Color:dword
externdef DP_Pix:dword
externdef DP_EntryTable:dword
externdef pbase:dword
externdef s:dword
externdef t:dword
externdef sfracf:dword
externdef tfracf:dword
externdef snext:dword
externdef tnext:dword
externdef spancountminus1:dword
externdef zi16stepu:dword
externdef sdivz16stepu:dword
externdef tdivz16stepu:dword
externdef zi8stepu:dword
externdef sdivz8stepu:dword
externdef tdivz8stepu:dword
externdef reciprocal_table_16:dword
externdef entryvec_table_16:dword
externdef ceil_cw:dword
externdef single_cw:dword
externdef fp_64kx64k:dword
externdef pz:dword
externdef spr8entryvec_table:dword
externdef _snd_scaletable:dword
externdef _paintbuffer:dword
externdef _snd_linear_count:dword
externdef _snd_p:dword
externdef _snd_vol:dword
externdef _snd_out:dword
externdef _vright:dword
externdef _vup:dword
externdef _vpn:dword
externdef _BOPS_Error:dword
_DATA SEGMENT
k dd 0
loopentry dd 0
align 4
blockjumptable16:
dd LEnter2_16
dd LEnter4_16
dd 0, LEnter8_16
dd 0, 0, 0, LEnter16_16
_DATA ENDS
_TEXT SEGMENT
align 4
public _R_Surf16Start
_R_Surf16Start:
align 4
public _R_DrawSurfaceBlock16
_R_DrawSurfaceBlock16:
push ebp
push edi
push esi
push ebx
mov eax,ds:dword ptr[_blocksize]
mov edi,ds:dword ptr[_prowdestbase]
mov esi,ds:dword ptr[_pbasesource]
mov ebx,ds:dword ptr[_sourcesstep]
mov ecx,ds:dword ptr[blockjumptable16-4+eax*2]
mov ds:dword ptr[k],eax
mov ds:dword ptr[loopentry],ecx
mov edx,ds:dword ptr[_lightleft]
mov ebp,ds:dword ptr[_lightright]
Lblockloop16:
sub ebp,edx
mov cl,ds:byte ptr[_blockdivshift]
sar ebp,cl
jns Lp1_16
test ebp,ds:dword ptr[_blockdivmask]
jz Lp1_16
inc ebp
Lp1_16:
sub eax,eax
sub ecx,ecx
jmp dword ptr[loopentry]
align 4
LEnter16_16:
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch0:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch1:
mov ds:word ptr[2+edi],cx
add edi,04h
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch2:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch3:
mov ds:word ptr[2+edi],cx
add edi,04h
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch4:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch5:
mov ds:word ptr[2+edi],cx
add edi,04h
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch6:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch7:
mov ds:word ptr[2+edi],cx
add edi,04h
LEnter8_16:
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch8:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch9:
mov ds:word ptr[2+edi],cx
add edi,04h
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch10:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch11:
mov ds:word ptr[2+edi],cx
add edi,04h
LEnter4_16:
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch12:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch13:
mov ds:word ptr[2+edi],cx
add edi,04h
LEnter2_16:
mov al,ds:byte ptr[esi]
mov cl,ds:byte ptr[esi+ebx]
mov ah,dh
add edx,ebp
mov ch,dh
lea esi,ds:dword ptr[esi+ebx*2]
mov ax,ds:word ptr[12345678h+eax*2]
LBPatch14:
add edx,ebp
mov ds:word ptr[edi],ax
mov cx,ds:word ptr[12345678h+ecx*2]
LBPatch15:
mov ds:word ptr[2+edi],cx
add edi,04h
mov esi,ds:dword ptr[_pbasesource]
mov edx,ds:dword ptr[_lightleft]
mov ebp,ds:dword ptr[_lightright]
mov eax,ds:dword ptr[_sourcetstep]
mov ecx,ds:dword ptr[_lightrightstep]
mov edi,ds:dword ptr[_prowdestbase]
add esi,eax
add ebp,ecx
mov eax,ds:dword ptr[_lightleftstep]
mov ecx,ds:dword ptr[_surfrowbytes]
add edx,eax
add edi,ecx
mov ds:dword ptr[_pbasesource],esi
mov ds:dword ptr[_lightright],ebp
mov eax,ds:dword ptr[k]
mov ds:dword ptr[_lightleft],edx
dec eax
mov ds:dword ptr[_prowdestbase],edi
mov ds:dword ptr[k],eax
jnz Lblockloop16
pop ebx
pop esi
pop edi
pop ebp
ret
public _R_Surf16End
_R_Surf16End:
_TEXT ENDS
_DATA SEGMENT
align 4
LPatchTable16:
dd LBPatch0-4
dd LBPatch1-4
dd LBPatch2-4
dd LBPatch3-4
dd LBPatch4-4
dd LBPatch5-4
dd LBPatch6-4
dd LBPatch7-4
dd LBPatch8-4
dd LBPatch9-4
dd LBPatch10-4
dd LBPatch11-4
dd LBPatch12-4
dd LBPatch13-4
dd LBPatch14-4
dd LBPatch15-4
_DATA ENDS
_TEXT SEGMENT
align 4
public _R_Surf16Patch
_R_Surf16Patch:
push ebx
mov eax,ds:dword ptr[_colormap]
mov ebx,offset LPatchTable16
mov ecx,16
LPatchLoop16:
mov edx,ds:dword ptr[ebx]
add ebx,4
mov ds:dword ptr[edx],eax
dec ecx
jnz LPatchLoop16
pop ebx
ret
_TEXT ENDS
END