WebSVN – Kolibri OS – Diff – /programs/demos/view3ds/3glass.inc

-; Real Phong's shading implemented if flat assembler
+; Glass like rendering triangle by Maciej Guba.
-; by Maciej Guba.
-; http://macgub.vxm.pl
+; http://macgub.hekko.pl, macgub3@wp.pl
 ROUND2 equ 10
-real_phong_tri_z:
+glass_tri:
-;----procedure render Phongs shaded triangle with z coord
+;----procedure render glass like triangle with z coord --
 ;----interpolation ( Catmull alghoritm )-----------------
 ;----I normalize normal vector in every pixel -----------
 ;------------------in - eax - x1 shl 16 + y1 ------------
 ;---------------------- ebx - x2 shl 16 + y2 ------------
+;---------------------- ecx - x3 shl 16 + y3 ------------
-;---------------------- ecx - x3 shl 16 + y3 ------------
+;---------------------- edx - ptr to stencil_buff -------
 ;---------------------- esi - pointer to Z-buffer filled-
 ;----------------------   with dd float variables--------
 ;---------------------- edi - pointer to screen buffer---
 ;---------------------- xmm0 - 1st normal vector --------
   .cnv1   equ [ebp-208]  ; cur normal vectors
   .cnv2   equ [ebp-224]
   .cz2    equ [ebp-228]
-  .cz1    equ [ebp-232]
+  .cz1    equ [ebp-232]
   .stencil_buff equ [ebp-236]
    movaps .z1,xmm4
    mov    .y1,eax
    mov    .y2,ebx
+   mov    .y3,ecx
-   mov    .y3,ecx
+   mov    .stencil_buff, edx
    movdqa   .y_min,xmm5
 if 1                            ; check if at last only fragment
 end if
    movaps   .1_nv,xmm0
    movaps   .2_nv,xmm1
    movaps   .3_nv,xmm2
    movaps   .l_v,xmm3
-   mov      .Zbuf,esi
+ ;  mov      .Zbuf,esi
    mov      .screen,edi
        movaps   xmm1,.cnv2
        movlps   xmm3,.cz1
        movaps   xmm4,.l_v
        sar      ebx,ROUND2
        sar      eax,ROUND2
+       mov      edx,.stencil_buff
        mov      edi,.screen
-       mov      esi,.Zbuf
+   ;    mov      esi,.Zbuf
-       call     real_phong_line_z
+       call     glass_line
        popad
        movaps   xmm0,.cnv1
        movaps   xmm1,.cnv2
        movlps   xmm3,.cz1
        movaps   xmm4,.l_v
        sar      ebx,ROUND2
        sar      eax,ROUND2
+       mov      edx,.stencil_buff
        mov      edi,.screen
-       mov      esi,.Zbuf
+  ;     mov      esi,.Zbuf
-       call     real_phong_line_z
+       call     glass_line
        popad
        movaps   xmm0,.cnv1
       add   esp,512
       pop   ebp
 ret
 align 16
-real_phong_line_z:
+glass_line:
 ; in:
 ;    xmm0 - normal vector 1
 ;    xmm1 - normal vect 2
 ;    xmm3 - lo -> hi z1, z2 coords as dwords floats
 ;    xmm2 - lo -> hi y_min, y_max, x_min, x_max
 ;           as dword integers
 ;    xmm4 - normalized light vector
 ;    eax - x1
 ;    ebx - x2
+;    ecx - y
-;    ecx - y
+;    edx - stencil buff ptr
 ;    edi - screen buffer
-;    esi - z buffer filled with dd floats
+;    esi - z buffer ===> not needed in glass rendering
    push  ebp
    mov   ebp,esp
-   sub   esp,160
+   sub   esp,256
    sub   ebp,16
    and   ebp,0xfffffff0
  .y_min  equ [ebp-80]
  .dn     equ [ebp-96]
  .dz     equ [ebp-100]
  .y      equ [ebp-104]
  .cnv    equ [ebp-128]
+ .col_sum_b  equ [ebp-136]
+ .col_sum_g  equ [ebp-140]
+ .col_sum_r  equ [ebp-144]
+ .cur_col equ [ebp-160]
+ .stencil_buf equ [ebp-164]
         mov    .y,ecx
         packssdw xmm2,xmm2
         movq   .y_min,xmm2
         movaps  .lv,xmm4
         movaps  .n1,xmm0
         movaps  .n2,xmm1
         mov     .lx1,eax
         mov     .lx2,ebx
+        mov     .stencil_buf,edx
         movlps  .z1,xmm3
         sub     ebx,eax
         cvtsi2ss xmm7,ebx
         psrldq  xmm3,4
         subss   xmm3,.z1
         divss   xmm3,xmm7
         movss   .dz,xmm3
         mov      ebx,.lx1
         cmp      bx,.x_min     ; clipping on function4
         jge      @f
         movzx    eax,word .x_min
         movzx   eax,word .x_max
         cmp     .lx2,eax
         jl      @f
         mov     .lx2,eax
       @@:
-        movzx   eax,word[size_x_var]
+        movzx   eax,word[xres_var]
         mul     dword .y
-      ;  mov     edx,.x1
         add     eax,.lx1
         shl     eax,2
         add     edi,eax
-        add     esi,eax
+        mov     ebx,eax
+        add     ebx,.stencil_buf
         mov     ecx,.lx2
+        sub     ecx,.lx1
         sub     ecx,.lx1
         movaps  xmm0,.n1
         movss   xmm2,.z1
 align 16
-   .ddraw:
-        movss    xmm7,xmm2
-        cmpnltss xmm7,dword[esi]
-        movd     eax,xmm7
-        or       eax,eax
-        jnz      .skip
-        movss    [esi],xmm2
+   .ddraw:
         movaps   xmm7,xmm0
+        mulps    xmm7,xmm7 ; normalize
-        mulps    xmm7,xmm7 ; normalize
+        andps    xmm7,[zero_hgst_dd]
         haddps   xmm7,xmm7
         haddps   xmm7,xmm7
         rsqrtps  xmm7,xmm7
+        mulps    xmm7,xmm0
-        mulps    xmm7,xmm0
+       ; maxps    xmm7,[the_zero]
         movaps   .cnv,xmm7
+        mov      edx,lights_aligned  ; lights_aligned - global variable
+        xorps    xmm1,xmm1           ; instead global can be used .lv - light vect.
+      .again_col:
+        movaps    xmm3,.cnv
+        mulps     xmm3,[edx]
+        haddps    xmm3,xmm3
+        haddps    xmm3,xmm3   ; xmm3 - dot pr
+      ; cmp       [bump_flag],1     ; on/off temporaly
+                                    ; depend on bump button
+      ; je        @f
+      ; stencil
+        movss     xmm5,xmm2
+        movss     xmm6,xmm2
+        addss     xmm5,[aprox]
+        subss     xmm6,[aprox]
+        cmpnltss  xmm5,dword[ebx]
+        cmpnltss  xmm6,dword[ebx]
+        xorps     xmm5,xmm6
+        movd      eax,xmm5
-        mov      edx,lights_aligned    ; lights - global variable
+        or        eax,eax
-        xorps    xmm1,xmm1     ; instead global can be used .lv - light vect.
+        jz       .no_reflective
-      @@:
+     @@:
-        movaps    xmm6,[edx+16]
+        movaps    xmm6,xmm3   ;xmm7
-        movaps    xmm5,[edx]
-        movaps    xmm3,[edx+48]
-        andps     xmm5,[zero_hgst_dd]  ; global
+        mulps     xmm6,xmm6
-        mulps    xmm5,.cnv  ;.lv  ; last dword should be zeroed
+        mulps     xmm6,xmm6
-        haddps   xmm5,xmm5
-        haddps   xmm5,xmm5
-   ;     mulps    xmm5,[env_const2]
-   ;     maxps    xmm5,[dot_min]
+        mulps     xmm6,xmm6
-   ;     minps    xmm5,[dot_max]
-        movaps   xmm7,xmm5
+        mulps     xmm6,xmm6
-      ;  mulps    xmm7,[env_const2]
-     ;   mulps    xmm7,[env_const2]
+        mulps     xmm6,xmm6
-     ;   maxps    xmm7,[dot_min]
-     ;   minps    xmm7,[dot_max]
+        mulps     xmm6,[edx+48]
+      .no_reflective:
-        mulps    xmm7,xmm7
+        movaps    xmm7,xmm3
-        mulps    xmm7,xmm7
+        mulps     xmm7,[edx+16]
-        mulps    xmm5,xmm6
+        addps     xmm7,xmm6
-        mulps    xmm7,xmm7
+        addps     xmm7,[edx+32]
-        mulps    xmm7,xmm3
-        addps    xmm5,xmm7
+        minps     xmm7,[mask_255f]   ; global
-        minps    xmm5,[mask_255f]   ; global
-        maxps    xmm1,xmm5
-     ;   movq     xmm3,[edx+20]    ; minimal color
-     ;   punpcklwd xmm3,[minimum0]
-     ;   cvtdq2ps xmm3,xmm3
-     ;   maxps    xmm1,xmm3
+        maxps     xmm1,xmm7
-        add      edx,64
+        add       edx,64     ; size of one light in aligned list
-        cmp      edx,lights_aligned_end    ; global
-        jnz      @b
+        cmp       edx,lights_aligned_end
+        jl        .again_col
         cvtps2dq  xmm1,xmm1
-        cvtps2dq xmm1,xmm1
+        movd      xmm6,[edi]
+        packssdw  xmm1,xmm1
-        packssdw xmm1,xmm1
+        packuswb  xmm1,xmm1
+        paddusb   xmm1,xmm6
+        movd      [edi],xmm1
         packuswb xmm1,xmm1
         movd     [edi],xmm1
      .skip:
         add      edi,4
-        add      esi,4
+        add      ebx,4  ; stencil_buff
         addps    xmm0,.dn
         addss    xmm2,.dz
         sub      ecx,1
         jnz      .ddraw
   .end_rp_line:

Subversion Repositories Kolibri OS

(root)/programs/demos/view3ds/3glass.inc – Rev 8047 → 8666