| 1,643 → 1,115 |
|---|
| ;-procedure draws smooth shaded lines (I mean interpolation 24 bit-- |
| ;-color), with z coord interpolation-------------------------------- |
| ;-author: Maciej Guba (www.macgub.hekko.pl)------------------------- |
| ;-in : ------------------------------------------------------------- |
| ;----- edi - pointer to screen buffer ------------------------------ |
| ;----- esi - pointer to Z buffer ----------------------------------- |
| ;------ constans : SIZE_X, SIZE_Y - screen width and height--------- |
| ;----------------- ROUND - fixed point shift------------------------ |
| ;------ other parameters via stack---------------------------------- |
| smooth_line: |
| .x1 equ ebp+4 |
| .y1 equ ebp+6 |
| .z1 equ ebp+8 |
| .r1 equ ebp+10 |
| .g1 equ ebp+12 |
| .b1 equ ebp+14 |
| .x2 equ ebp+16 |
| .y2 equ ebp+18 |
| .z2 equ ebp+20 |
| .r2 equ ebp+22 |
| .g2 equ ebp+24 |
| .b2 equ ebp+26 |
| ; Line drawing procedure by Pablo Reda. |
| ; Gouraud extension by Maciej Guba. |
| ;**************************************************** |
| line_grd: ; eax=x1 ebx=y1 ecx=x2 edx=y2 |
| ; xmm0 - color1 argb as 4 dword float |
| ; xmm1 - color2 argb as 4 dword float |
| ; xmm2 - z1 as dword float |
| ; xmm3 - z2 as dword float |
| ; mm0 - Z buffer |
| ; mm1 - screen buffer |
| ; mm2 - screen width |
| |
| |
| .line_lenght equ ebp-2 |
| .delta equ ebp-6 |
| .delta_x equ ebp-10 |
| .delta_y equ ebp-14 |
| .dr equ ebp-18 |
| .dg equ ebp-22 |
| .db equ ebp-26 |
| .dz equ ebp-30 |
| .cr equ ebp-34 |
| .cg equ ebp-38 |
| .cb equ ebp-42 |
| .cz equ ebp-46 |
| cmp ebx,edx |
| ; je horizontal_grd |
| jg .noswap |
| xchg eax,ecx |
| xchg ebx,edx |
| movaps xmm7,xmm0 |
| movaps xmm0,xmm1 |
| movaps xmm1,xmm7 |
| movaps xmm7,xmm2 |
| movaps xmm2,xmm3 |
| movaps xmm3,xmm7 |
| .noswap: |
| |
| ;.line_lenght equ ebp-48 |
| .screen equ ebp-52 |
| .zbuffer equ ebp-56 |
| .ccoord equ ebp-60 ;current coordinate |
| .czbuf equ ebp-64 |
| .cscr equ ebp-68 |
| .xres equ ebp-72 |
| .yres equ ebp-76 |
| .xresm1 equ ebp-80 |
| .yresm1 equ ebp-84 |
| .xresp1 equ ebp-88 |
| .yresp1 equ ebp-92 |
| .xres3 equ ebp-96 |
| .xres4 equ ebp-100 |
| cvtsi2ss xmm7,eax |
| cvtsi2ss xmm6,ebx |
| cvtsi2ss xmm5,ecx |
| cvtsi2ss xmm4,edx |
| subss xmm7,xmm5 |
| subss xmm6,xmm4 |
| andps xmm7,[abs_mask] ; 0x7fff |
| andps xmm6,[abs_mask] ; 0x7fff |
| maxss xmm7,xmm6 ; xmm7 - delta |
| shufps xmm7,xmm7,0 |
| movaps xmm6,xmm3 |
| rcpps xmm7,xmm7 |
| subss xmm6,xmm2 |
| mulss xmm6,xmm7 ; xmm6 - delta z |
| movaps xmm5,xmm1 |
| subps xmm5,xmm0 |
| mulps xmm5,xmm7 ; xmm5 - delta col argb |
| |
| macro .update_cur_var |
| { |
| if Ext=NON |
| mov ebx,[.dz] |
| add [.cz],ebx |
| mov ebx,[.dr] |
| add [.cr],ebx |
| mov ebx,[.dg] |
| add [.cg],ebx |
| mov ebx,[.db] |
| add [.cb],ebx |
| elseif Ext=MMX |
| movq mm0,[.cz] |
| movq mm1,[.cg] |
| paddd mm0,mm2 ;[.dz] |
| paddd mm1,mm3 ;[.dg] |
| movq [.cz],mm0 |
| movq [.cg],mm1 |
| elseif Ext >= SSE2 |
| ; movups xmm1,[.cz] |
| paddd xmm1,xmm0 |
| ; movups [.cz],xmm1 |
| end if |
| } |
| macro .draw_pixel |
| { |
| mov [esi],ebx ; actualize Z buffer |
| if Ext>=SSE2 |
| movaps xmm7,xmm1 ;[.cb] ;;xmm1 |
| shufps xmm7,xmm7,00111001b |
| psrld xmm7,ROUND |
| packssdw xmm7,xmm7 |
| packuswb xmm7,xmm7 |
| pand xmm7,xmm6 ;[.mask] |
| movd [edi],xmm7 |
| else |
| |
| mov eax,[.cb] |
| sar eax,ROUND |
| mov [edi],al |
| ; and eax,0x000000ff ; clean unused bits |
| mov ebx,[.cg] |
| sar ebx,ROUND |
| mov [edi+1],bl |
| ; mov ah,bl |
| mov edx,[.cr] |
| sar edx,ROUND |
| mov [edi+2],dl |
| end if |
| ; shl ebx,16 |
| ; or eax,ebx |
| ; mov [edi],eax |
| } |
| macro .sort |
| { |
| |
| if Ext >= MMX |
| movq mm0,[.x1] |
| movq mm1,[.x2] |
| movq [.x1],mm1 |
| movq [.x2],mm0 |
| else |
| mov edx,[.x1] |
| xchg edx,[.x2] |
| mov [.x1],edx |
| mov edx,[.z1] |
| xchg edx,[.z2] |
| mov [.z1],edx |
| end if |
| mov edx,[.g1] |
| xchg edx,[.g2] |
| mov [.g1],edx |
| } |
| |
| |
| |
| emms |
| mov ebp,esp |
| sub esp,128 |
| mov eax,[.x1] ; check if parameters exceedes screen area |
| mov ebx,[.x2] |
| or eax,ebx |
| test eax,80008000h |
| jne .end_line |
| movzx edx,word [size_x_var] |
| mov [.xres],edx |
| dec edx |
| movzx ecx,word [size_y_var] |
| mov [.yres],ecx |
| dec ecx |
| cmp word[.x1],dx ;SIZE_X |
| jg .end_line |
| cmp word[.x2],dx ;SIZE_X |
| jg .end_line |
| cmp word[.y1],cx ;SIZE_Y |
| jg .end_line |
| cmp word[.y2],cx ;SIZE_Y |
| jg .end_line |
| |
| mov edx,[.xres] |
| shl edx,2 |
| mov [.xres4],edx |
| shr edx,2 |
| lea edx,[edx*3] |
| mov [.xres3],edx |
| mov edx,[.xres] |
| mov ecx,[.yres] |
| dec edx |
| dec ecx |
| mov [.xresm1],edx |
| mov [.yresm1],ecx |
| add edx,2 |
| add ecx,2 |
| mov [.xresp1],edx |
| mov [.yresp1],ecx |
| |
| mov [.screen],edi |
| mov cx,[.x1] |
| cmp cx,[.x2] |
| je .vertical_l |
| mov cx,[.y1] |
| cmp cx,[.y2] |
| je .horizontal_l |
| mov ax,[.x1] |
| sub ax,[.x2] |
| cmp ax,0 |
| jg @f |
| neg ax ; calc absolute value |
| @@: |
| mov [.delta_x],ax |
| mov bx,[.y1] |
| sub bx,[.y2] |
| cmp bx,0 |
| jg @f |
| neg bx |
| @@: |
| mov [.delta_y],bx |
| cmp ax,bx |
| je .deg45_l |
| jl .more_vertical_l |
| jg .more_horizon_l |
| jmp .end_line |
| ; |
| .horizontal_l: |
| mov ax,[.x1] |
| mov bx,[.x2] |
| cmp bx,ax |
| jge @f |
| |
| .sort |
| @@: |
| |
| mov bx,[.x2] |
| sub bx,[.x1] |
| movsx ebx,bx |
| cmp ebx,0 ;line lenght equql 0 |
| je .end_line |
| mov [.delta_x],ebx |
| |
| call .calc_delta |
| |
| mov eax,[.xres] ;SIZE_X |
| movsx ebx,word[.y1] |
| mul ebx |
| add esi,eax |
| lea eax,[eax*3] |
| add esi,eax |
| add edi,eax |
| movsx eax,word[.x1] |
| add esi,eax |
| lea eax,[eax*3] |
| add edi,eax |
| add esi,eax |
| |
| mov ecx,[.delta_x] |
| |
| movsx ebx,word[.r1] |
| shl ebx,ROUND |
| mov [.cr],ebx |
| movsx ebx,word[.g1] |
| shl ebx,ROUND |
| mov [.cg],ebx |
| movsx ebx,word[.b1] |
| shl ebx,ROUND |
| mov [.cb],ebx |
| movsx ebx,word[.z1] |
| shl ebx,ROUND |
| mov [.cz],ebx |
| if Ext >= SSE2 |
| movups xmm1,[.cz] |
| end if |
| .hdraw: |
| if Ext >= SSE2 |
| movd ebx,xmm1 |
| else |
| mov ebx,[.cz] |
| end if |
| cmp [esi],ebx |
| jle .skip |
| |
| .draw_pixel |
| |
| .skip: |
| add edi,3 |
| add esi,4 |
| |
| .update_cur_var |
| |
| loop .hdraw |
| jmp .end_line |
| |
| .vertical_l: |
| mov ax,[.y1] |
| cmp [.y2],ax |
| jge @f |
| |
| .sort |
| @@: |
| mov bx,[.y2] |
| sub bx,[.y1] |
| movsx ebx,bx |
| cmp ebx,0 |
| je .end_line |
| mov [.delta_y],ebx |
| |
| call .calc_delta |
| |
| mov eax,[.xres] ;SIZE_X |
| movsx ebx,word[.y1] |
| mul ebx |
| add esi,eax |
| lea eax,[eax*3] |
| add edi,eax |
| add esi,eax |
| movsx eax,word[.x1] |
| add esi,eax |
| lea eax,[eax*3] |
| add esi,eax |
| add edi,eax |
| |
| mov ecx,[.delta_y] |
| |
| movsx ebx,word[.r1] |
| shl ebx,ROUND |
| mov [.cr],ebx |
| movsx ebx,word[.g1] |
| shl ebx,ROUND |
| mov [.cg],ebx |
| movsx ebx,word[.b1] |
| shl ebx,ROUND |
| mov [.cb],ebx |
| movsx ebx,word[.z1] |
| shl ebx,ROUND |
| mov [.cz],ebx |
| if Ext >= SSE2 |
| movups xmm1,[.cz] |
| end if |
| |
| .v_draw: |
| if Ext >= SSE2 |
| movd ebx,xmm1 |
| else |
| mov ebx,[.cz] |
| end if |
| cmp [esi],ebx |
| jle @f |
| |
| .draw_pixel |
| |
| @@: |
| add edi,[.xres3] |
| add esi,[.xres4] |
| |
| .update_cur_var |
| |
| loop .v_draw |
| jmp .end_line |
| .deg45_l: |
| mov word[.line_lenght],ax |
| mov ax,[.x1] |
| cmp [.x2],ax |
| jge @f |
| |
| .sort |
| @@: |
| mov bx,[.y2] |
| sub bx,[.y1] |
| movsx ebx,bx |
| cmp ebx,0 |
| je .end_line |
| mov [.delta_y],ebx |
| mov bx,[.x2] |
| sub bx,[.x1] |
| movsx ebx,bx |
| mov [.delta_x],ebx |
| |
| call .calc_delta |
| |
| mov eax,[.xres] |
| movsx ebx,word[.y1] ;calc begin values in screen and Z buffers |
| mul ebx |
| lea ebx,[3*eax] |
| add edi,ebx |
| shl eax,2 |
| add esi,eax |
| movsx eax,word[.x1] |
| lea ebx,[eax*3] |
| add edi,ebx |
| shl eax,2 |
| add esi,eax |
| |
| movzx ecx,word[.line_lenght] |
| |
| movsx ebx,word[.r1] |
| shl ebx,ROUND |
| mov [.cr],ebx |
| movsx ebx,word[.g1] |
| shl ebx,ROUND |
| mov [.cg],ebx |
| movsx ebx,word[.b1] |
| shl ebx,ROUND |
| mov [.cb],ebx |
| movsx ebx,word[.z1] |
| shl ebx,ROUND |
| mov [.cz],ebx |
| .d45_draw: |
| if Ext >= SSE2 |
| movd ebx,xmm1 |
| else |
| mov ebx,[.cz] |
| end if |
| cmp [esi],ebx |
| jle @f |
| |
| .draw_pixel |
| |
| @@: |
| cmp dword[.delta_y],0 |
| jl @f |
| add edi,[.xres3] ;SIZE_X*3+3 |
| add edi,3 |
| add esi,[.xres4] ;SIZE_X*4+4 |
| add esi,4 |
| jmp .d45_1 |
| @@: |
| sub edi,[.xres3] ;(SIZE_X*3)-3 |
| sub edi,3 |
| sub esi,[.xres4] ;(SIZE_X*4)-4 |
| sub esi,4 |
| .d45_1: |
| .update_cur_var |
| |
| loop .d45_draw |
| jmp .end_line |
| |
| .more_vertical_l: |
| mov word[.line_lenght],bx |
| mov ax,[.y1] |
| cmp [.y2],ax |
| jge @f |
| .sort |
| @@: |
| mov bx,[.y2] |
| sub bx,[.y1] |
| movsx ebx,bx |
| cmp ebx,0 |
| je .end_line ;======================= |
| mov [.delta_y],ebx |
| |
| mov ax,[.x2] |
| sub ax,[.x1] |
| cwde |
| shl eax,ROUND |
| shl eax,16 |
| shl ecx,16 |
| sub eax,ecx |
| push ebx |
| push edx |
| sub ebx,edx |
| add ebx,1 |
| cdq |
| idiv ebx |
| mov [.delta],eax |
| mov esi,eax |
| add ecx,$7fff |
| pop ebx |
| pop edx |
| .lineas: |
| mov eax,ecx |
| add eax,esi |
| push ebx |
| push eax |
| push edx |
| shr ecx,16 |
| shr eax,16 |
| call horizontal_grd |
| pop edx |
| pop ecx |
| pop ebx |
| add ebx,1 |
| cmp ebx,edx |
| jle .lineas |
| ret |
| |
| call .calc_delta |
| |
| mov eax,[.xres] ;SIZE_X |
| movsx ebx,word[.y1] ;calc begin values in screen and Z buffers |
| mul ebx |
| lea ebx,[3*eax] |
| add esi,ebx |
| add esi,eax |
| add edi,ebx |
| mov [.cscr],edi |
| mov [.czbuf],esi |
| |
| movzx ecx,word[.line_lenght] |
| |
| movsx ebx,word[.r1] |
| shl ebx,ROUND |
| mov [.cr],ebx |
| movsx ebx,word[.g1] |
| shl ebx,ROUND |
| mov [.cg],ebx |
| movsx ebx,word[.b1] |
| shl ebx,ROUND |
| mov [.cb],ebx |
| movsx ebx,word[.z1] |
| shl ebx,ROUND |
| mov [.cz],ebx |
| if Ext >= SSE2 |
| movups xmm1,[.cz] |
| end if |
| movsx ebx,word[.x1] |
| shl ebx,ROUND |
| mov [.ccoord],ebx ; .ccoord -> x coordinate |
| .draw_m_v: |
| mov edi,[.cscr] |
| mov esi,[.czbuf] |
| mov eax,[.ccoord] |
| sar eax,ROUND |
| lea ebx,[eax*3] |
| add edi,ebx |
| add esi,ebx |
| add esi,eax |
| if Ext >= SSE2 |
| movd ebx,xmm1 |
| else |
| mov ebx,[.cz] |
| end if |
| cmp [esi],ebx |
| jle @f |
| |
| .draw_pixel |
| |
| horizontal_grd: ; eax=x1 ebx=y1 ecx=x2 |
| cmp ecx,eax |
| jg .m |
| xchg ecx,eax |
| .m: |
| sub ecx,eax |
| jnz .nn |
| add ecx,1 |
| .nn: |
| movd edx,mm2 |
| imul ebx,edx |
| add eax,ebx |
| movd edi,mm1 |
| lea edi,[edi+eax*4] |
| push eax |
| push ebx |
| movd ebx,mm0 |
| lea ebx,[ebx+eax*4] |
| .l: |
| ; movss xmm4,xmm2 ; xmm2 - cur z |
| ; cmpnltss xmm4,[ebx] |
| ; movd eax,xmm4 |
| ; or eax,eax |
| ; jnz @f |
| comiss xmm2,[ebx] |
| jng @f |
| movaps xmm4,xmm0 ; xmm0 - cur col |
| cvtps2dq xmm4,xmm4 |
| packssdw xmm4,xmm4 |
| packuswb xmm4,xmm4 |
| movd [edi],xmm4 |
| @@: |
| mov eax,[.delta] |
| mov ebx,[.xres3] |
| add [.ccoord],eax |
| mov eax,[.xres4] |
| add dword[.cscr],ebx ;SIZE_X*3 ; |
| add dword[.czbuf],eax ;SIZE_X*4 |
| .d_m_v1: |
| |
| .update_cur_var |
| |
| dec ecx |
| jnz .draw_m_v |
| jmp .end_line |
| |
| .more_horizon_l: |
| mov word[.line_lenght],ax |
| mov ax,[.x1] |
| cmp [.x2],ax |
| jge @f |
| |
| .sort |
| @@: |
| mov bx,[.x2] |
| sub bx,[.x1] |
| movsx ebx,bx |
| cmp ebx,0;======================= |
| je .end_line |
| mov [.delta_x],ebx |
| |
| mov ax,[.y2] |
| sub ax,[.y1] |
| cwde |
| shl eax,ROUND |
| cdq |
| idiv ebx |
| mov [.delta],eax |
| |
| call .calc_delta |
| |
| ;calc begin values in screen and Z buffers |
| movsx ebx,word[.x1] |
| mov eax,ebx |
| add esi,ebx |
| lea ebx,[3*ebx] |
| add esi,ebx |
| add edi,ebx |
| mov [.cscr],edi |
| mov [.czbuf],esi |
| |
| movzx ecx,word[.line_lenght] |
| |
| movsx ebx,word[.r1] |
| shl ebx,ROUND |
| mov [.cr],ebx |
| movsx ebx,word[.g1] |
| shl ebx,ROUND |
| mov [.cg],ebx |
| movsx ebx,word[.b1] |
| shl ebx,ROUND |
| mov [.cb],ebx |
| movsx ebx,word[.z1] |
| shl ebx,ROUND |
| mov [.cz],ebx |
| if Ext >= SSE2 |
| movups xmm1,[.cz] |
| end if |
| movsx ebx,word[.y1] |
| shl ebx,ROUND |
| mov [.ccoord],ebx ; .ccoord -> y coordinate |
| |
| .draw_m_h: |
| mov edi,[.cscr] |
| mov esi,[.czbuf] |
| mov eax,[.ccoord] ; ccoord - cur y coordinate |
| sar eax,ROUND |
| mov ebx,[.xres] ;SIZE_X |
| mul ebx |
| add esi,eax |
| lea eax,[eax*3] |
| add esi,eax |
| add edi,eax |
| if Ext >= SSE2 |
| movd ebx,xmm1 |
| else |
| mov ebx,[.cz] |
| end if |
| cmp [esi],ebx |
| jle @f |
| |
| .draw_pixel |
| |
| @@: |
| mov eax,[.delta] |
| add [.ccoord],eax |
| add dword[.cscr],3 ; |
| add dword[.czbuf],4 |
| |
| .update_cur_var |
| |
| dec ecx |
| jnz .draw_m_h |
| |
| .end_line: |
| mov esp,ebp |
| ret 24 |
| |
| .calc_delta: |
| mov ax,[.z2] |
| sub ax,[.z1] |
| cwde |
| shl eax,ROUND |
| cdq |
| idiv ebx |
| mov [.dz],eax |
| |
| mov ax,[.r2] |
| sub ax,[.r1] |
| cwde |
| shl eax,ROUND |
| cdq |
| idiv ebx |
| mov [.dr],eax |
| |
| mov ax,[.g2] |
| sub ax,[.g1] |
| cwde |
| shl eax,ROUND |
| cdq |
| idiv ebx |
| mov [.dg],eax |
| |
| mov ax,[.b2] |
| sub ax,[.b1] |
| cwde |
| shl eax,ROUND |
| cdq |
| idiv ebx |
| mov [.db],eax |
| if Ext=MMX | Ext = SSE |
| movq mm2,[.dz] |
| movq mm3,[.dg] |
| else if Ext >= SSE2 |
| movups xmm0,[.dz] |
| movups xmm6,[.mask] |
| end if |
| addss xmm2,xmm6 |
| addps xmm0,xmm5 |
| add edi,4 |
| sub ecx,1 |
| jnz .l |
| pop ebx |
| pop eax |
| ret |
| .mask: |
| dq 0xffffffff00ffffff |
| dq 0xffffffffffffffff |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |