WebSVN – Kolibri OS – Diff – /programs/demos/view3ds/a_procs.inc

 ;========================================================
 if Ext > SSE2
  ;--------------------------------------------------------------------
-init_point_lights:
-  ;      mov       eax,1000
-  ;      cvtsi2ss  xmm1,eax
-  ;      shufps    xmm1,xmm1,11000000b
-  ;      mov       esi,lights_aligned
-  ;      mov       edi,point_light_coords
-  ;      mov       ecx,3
-  ;    @@:
-  ;      movaps    xmm0,[esi]
-  ;      addps     xmm0,[f05xz]
-  ;      mulps     xmm0,xmm1
-  ;      movaps    [edi],xmm0
-  ;      add       esi,64
-   ;     add       edi,16
-   ;     loop      @b
+init_point_lights:
       mov       ecx,3
       mov       edi,point_light_coords
     @@:
       push      ecx
       xor       ecx,ecx
       movzx     edx,word[size_x_var]
       call      random
       cvtsi2ss  xmm0,eax
       movss     [edi+4],xmm0
-   ;   movzx     ebx,word[size_x_var]
-   ;   shl       ebx,2
-   ;   neg       ebx
       mov       ecx,-1900
-   ;   sub       ecx,100
       mov       edx,-600
       call      random
       cvtsi2ss  xmm0,eax
       movss     [edi+8],xmm0
-   ;   mov       dword[edi+8],-1700.0
       mov       [edi+12],dword 0
       add       edi,16
       pop       ecx
       loop      @b
 ;      cmpnless xmm0,[eps]
 ;      movd     eax,xmm0
 ;      or       eax,eax
 ;      jz       @f
       comiss   xmm0,[eps]
-      jl       @f
+      jb       @f
       rcpss    xmm0,.det
       movss    .invdet,xmm0
    ;   cmpnless xmm1,[eps]
    ;   movmskps eax,xmm1
    ;   test     eax,1
    ;   jz       @f
       comiss   xmm1,[eps]
-      jl       @f
+      jb       @f
       mov      eax,1
       cmp      .ift,0
     .ed_cnt   equ [ebp-4]
     .edd_ptr  equ [ebp-8]
+    .counter  equ [ebp-12]
+       mov     ebx, 12
+       mov     eax, 68
+       mov     ecx,[triangles_count_var]
+       lea     ecx,[ecx*3]
+       shl     ecx,4
+       add     ecx,1024
+       mov     edx,[edges_ptr]
+       int     0x40                   ;  -> allocate memory to edges
-    .counter  equ [ebp-12]
+       mov     [edges_ptr], eax   ;  -> eax = pointer to allocated mem
     mov     ebx,[edges_ptr]
     add     ebx,24
     add     eax,12
     loop    @b
     mov     ebx,[edges_ptr]
     mov     ecx,[triangles_count_var]
     lea     ecx,[ecx*3]
+  .mxd:
-  .mxd:
+    mov     eax,[ebx]
-    mov     eax,[ebx]
+    mov     edx,[ebx+4]
     cmp     eax,[ebx+4]
-    jl      @f
+    cmovg   eax,edx
-    movq    xmm0,[ebx]
+    cmovg   edx,[ebx]
-    pshufd  xmm0,xmm0,11100001b
-    movq    [ebx],xmm0
+    mov     [ebx],eax
-  @@:
+    mov     [ebx+4],edx
     add     ebx,8
    lea    ecx,[ecx*3]
    mov    esi,ecx
    shl    esi,3
    add    esi,ebx
    dec    ecx
  .ccc:
    mov    eax,[ebx+8]
    cmp    eax,[ebx]
-   jge    .g
+   jae    .g
    movq   xmm0,[ebx+8]
    push   ebx
  .c:
    cmp    ebx,esi
-   jge    .done
+   jae    .done
    cmp    ebx,[edges_ptr]
-   jl     .done
+   jb     .done
    cmp    eax,[ebx]
-   jge    .done
+   jae    .done
    movq   xmm7,[ebx]
    movq   [ebx+8],xmm7
    sub    ebx,8
    jnz    .c
    movq   [ebx+8],xmm0
  .p:
    pop    ebx
  .g:
    add    ebx,8
-   dec    ecx
-   cmp    ecx,1
-   jnz    .ccc
+   loop    .ccc
   ; insert sort again
    mov    ebx,[edges_ptr]
    mov    ecx,[triangles_count_var]
    mov    eax,[ebx]          ; count
  .aa:
    inc    ecx
    add    ebx,8
    cmp    ebx,esi
-   jge    .br         ; break
+   jae    .br         ; break
    cmp    eax,[ebx]
    je     .aa
    mov    .counter,ecx
    pop    ebx
    mov    edi,ebx
    jmp    .ff
  @@:
    mov    eax,[ebx+12]
    mov    edx,[ebx+8]
    cmp    eax,[ebx+4]
-   jge    .gg2
+   jae    .gg2
    movq   xmm0,[ebx+8]
    push   ebx
  .c2:
    cmp    eax,[ebx+4]
-   jge    .done2
+   jae    .done2
    movq   xmm7,[ebx]
    movq   [ebx+8],xmm7
    sub    ebx,8
    jmp    .ff
  .br: ;break
    add   esp,8
  .ff:
    ; count edges
-   mov    ecx,0
-   mov    edx,[triangles_count_var]
+   mov    ecx,[triangles_count_var]
-   lea    edx,[edx*3]
+   lea    ecx,[ecx*3+3]
-   mov    ebx,[edges_ptr]
+   mov    esi,[edges_ptr]
-;   mov    esi,edx
+   xor    edx,edx
-;   shl    esi,3
-;   add    esi,[edges_ptr]
+   cld
+ .nx:
- .nx:
+   lodsd
-   movq    xmm0,[ebx]
+   mov    ebx,eax
-   add     ebx,8
+   lodsd
-;   cmp     ebx,esi
+   cmp    ebx,[esi]
-;   jae     @f
+   jnz    .ic
-   movq    xmm1,[ebx]
-; @@:
+   cmp    eax,[esi+4]
-   pcmpeqd xmm0,xmm1
+   jnz    .ic
-   pmovmskb eax,xmm0
+   loop   .nx
-   and     eax,0xff
+   jmp    .endc
+ .ic:
-   cmp     eax,0xff
-   jz      @f
+   inc    edx
-   inc     ecx
+   loop   .nx
-  @@:
+  .endc:
-   dec     edx
+    mov     .ed_cnt,edx
-   jnz     .nx
+    mov     ecx,edx
     mov     .ed_cnt,ecx
     lea     ecx,[ecx*3]
-    shl     ecx,2
+    shl     ecx,3
     add     ecx,65536
     mov     ebx,12
     mov     eax,68
-    mov     edx,.edd_ptr
-    int     0x40                   ;  -> allocate memory to triangles
+    mov     edx,.edd_ptr
-    mov     .edd_ptr, eax   ;  -> eax = pointer to allocated mem
+    int     0x40            ;  -> allocate memory to new edges
+    mov     .edd_ptr, eax   ;  -> eax = pointer to allocated mem
-   mov      ebx,[edges_ptr]
+   mov    ecx,[triangles_count_var]
+   lea    ecx,[ecx*3]
+   add    ecx,ecx
-   mov      ecx,[triangles_count_var]
+   mov    esi,[edges_ptr]
+   mov    edi,eax
-   lea      ecx,[ecx*3]
+   xor    edx,edx
+   cld
-  .seek:
+ .nx1:
-   movq     xmm0,[ebx]
+   lodsd
-   movq     xmm1,[ebx+8]
+   mov    ebx,eax
-   pcmpeqd  xmm1,xmm0
+   lodsd
-   pmovmskb edx,xmm1
+   cmp    ebx,[esi]
+   jnz    .ic1
+   cmp    eax,[esi+4]
+   jnz    .ic1
+   loop   .nx1
-   and      edx,0xff
+   jmp    .endc1
-   cmp      edx,0xff
+ .ic1:
+   xchg   eax,ebx
-   je       @f
+   stosd
-   movq     [eax],xmm0
+   mov    eax,ebx
-   add      eax,8
+   stosd
- @@:
+   inc    edx
    mul     edx
    add     eax,ebx
    mov     edi,[screen_ptr]
    lea     eax,[eax*3]
    add     edi,eax
-   xor     eax,eax
+   or      eax,-1
-   not     eax
+;   not     eax
    stosd
  @@:
    loop    .drw

Subversion Repositories Kolibri OS

(root)/programs/demos/view3ds/a_procs.inc – Rev 9512 → 9740