WebSVN – Kolibri OS – Diff – /programs/demos/3DS/VIEW3DS.ASM

-	call	 alloc_mem_for_tp
+        call     alloc_mem_for_tp
-	mov	 [re_alloc_flag],0
+        mov      [re_alloc_flag],0
      end if
-	mov	 bl,[generator_flag]
+        mov      bl,[generator_flag]
-	or	 bl,bl
+       ; or       bl,bl
-	jz	 .next_m2
+       ; jz       .next_m2
-	cmp	 bl,1
+        cmp      bl,1
-	jne	 @f
+        jne      @f
-	call	 generate_object
+        call     generate_object
-	jmp	 .calc_norm
+        jmp      .calc_norm
       @@:
-	cmp	 bl,4
+        cmp      bl,4
     push eax
-	mov	esi,[points_normals_ptr]
+        mov     esi,[points_normals_ptr]
-	mov	edi,[points_normals_rot_ptr]
+        mov     edi,[points_normals_rot_ptr]
-	mov	ebx,matrix
+        mov     ebx,matrix
-	movzx	ecx,[points_count_var]
+        mov     ecx,[points_count_var]
-	call	rotary
+        call    rotary
-	mov	esi,matrix
+        mov     esi,matrix
-	call	add_scale_to_matrix
+        call    add_scale_to_matrix
-	mov	esi,[points_ptr]
+        mov     esi,[points_ptr]
-	mov	edi,[points_rotated_ptr]
+        mov     edi,[points_rotated_ptr]
-	mov	ebx,matrix
+        mov     ebx,matrix
-	movzx	ecx,[points_count_var]
+        mov     ecx,[points_count_var]
-	call	rotary
+        call    rotary
 ;    RDTSC
 ;    pop    ebx
 ;    sub    eax,ebx
 ;    sub    eax,41
 ;    push   eax
-	mov	esi,[points_rotated_ptr]
+        mov     esi,[points_rotated_ptr]
-	mov	edi,[points_translated_ptr]
+        mov     edi,[points_translated_ptr]
-	movzx	ecx,[points_count_var]
+        mov     ecx,[points_count_var]
-	call	translate_points
+        call    translate_points
-;	 cmp	 [dr_flag],5
+;        cmp     [dr_flag],5
-;	 jne	 @f
+;        jne     @f
-;	 call	 calc_attenuation_light
+;        call    calc_attenuation_light
 ;     @@:
-	cmp	[fire_flag],0
+        cmp     [fire_flag],0
-	jne	@f
+        jne     @f
-	call	clrscr		; clear the screen
+        call    clrscr          ; clear the screen
      @@:
-	cmp	[catmull_flag],1  ;non sort if Catmull = on
+    ;    cmp     [catmull_flag],1  ;non sort if Catmull = on
-	je	.no_sort
+    ;    je      .no_sort
-	call	sort_triangles
+    ; 64 indexes    call    sort_triangles
       .no_sort:
 ;--------------------------------------------------------------------------------
 ;-------------------------PROCEDURES---------------------------------------------
 ;--------------------------------------------------------------------------------
-include "TEX3.INC"
+;include "TEX3.INC"
 include "FLAT_CAT.INC"
 include "TEX_CAT.INC"
 include "BUMP_CAT.INC"
 include "3DMATH.INC"
 include "GRD_LINE.INC"
-include "GRD3.INC"
+;include "GRD3.INC"
-include "FLAT3.INC"
+;include "FLAT3.INC"
-include "BUMP3.INC"
+;include "BUMP3.INC"
 include "B_PROCS.INC"
 include "A_PROCS.INC"
 include "GRD_CAT.INC"
 include "BUMP_TEX.INC"
 include "GRD_TEX.INC"
       fldpi
-      fadd	st,st
+      fadd      st,st
-      mov	esi,[points_ptr]
+      mov       esi,[points_ptr]
-      mov	edi,tex_points
+      mov       edi,tex_points
-      movzx	ecx,[points_count_var]
+      mov       ecx,[points_count_var]
-      inc	ecx
+      inc       ecx
-;      cmp	 [map_tex_flag],1
+;      cmp       [map_tex_flag],1
-;      jne	 .cylindric
+;      jne       .cylindric
       ; spherical mapping around y axle
-	mov	ebp,triangles
+        mov     ebp,triangles
      @@:
-	push	ebx
+        push    ebx
-	mov	ebx,vectors
+        mov     ebx,vectors
-	movzx	esi,word[ebp]	       ; first point index
+        mov     esi,dword[ebp]              ; first point index
-	lea	esi,[esi*3]
+        lea     esi,[esi*3]
-	lea	esi,[points+esi*2]     ; esi - pointer to 1st 3d point
+        lea     esi,[points+esi*2]     ; esi - pointer to 1st 3d point
-	movzx	edi,word[ebp+2]        ; second point index
+        movzx   edi,dword[ebp+4]        ; second point index
-	lea	edi,[edi*3]
+        lea     edi,[edi*3]
-	lea	edi,[points+edi*2]     ; edi - pointer to 2nd 3d point
+        lea     edi,[points+edi*2]     ; edi - pointer to 2nd 3d point
-	call	make_vector
+        call    make_vector
-	add	ebx,12
+        add     ebx,12
-	mov	esi,edi
+        mov     esi,edi
-	movzx	edi,word[ebp+4]        ; third point index
+        movzx   edi,dword[ebp+8]        ; third point index
-	lea	edi,[edi*3]
+        lea     edi,[edi*3]
-	lea	edi,[points+edi*2]
+        lea     edi,[points+edi*2]
-	call	make_vector
+        call    make_vector
-	mov	edi,ebx 		; edi - pointer to 2nd vector
+        mov     edi,ebx                 ; edi - pointer to 2nd vector
-	mov	esi,ebx
+        mov     esi,ebx
-	sub	esi,12			; esi - pointer to 1st vector
+        sub     esi,12                  ; esi - pointer to 1st vector
-	pop	ebx
+        pop     ebx
-	call	cross_product
+        call    cross_product
-	mov	edi,ebx
+        mov     edi,ebx
-	call	normalize_vector
+        call    normalize_vector
-	add	ebp,6
+        add     ebp,12
-	add	ebx,12
+        add     ebx,12
-	cmp	dword[ebp],-1
+        cmp     dword[ebp],-1
-	jne	@b
+        jne     @b
 ret
 end if
 init_point_normals:
+init_point_normals:
 .x equ dword [ebp-4]
 .y equ dword [ebp-8]
 .z equ dword [ebp-12]
-.point_number equ word [ebp-26]
+.point_number equ dword [ebp-28]
-.hit_faces    equ word [ebp-28]
+.hit_faces    equ dword [ebp-32]
-	fninit
+        fninit
-	mov	  ebp,esp
+        mov       ebp,esp
-	sub	  esp,28
+        sub       esp,32
-	mov	  edi,[points_normals_ptr]
+        mov       edi,[points_normals_ptr]
-	mov	  .point_number,0
+        mov       .point_number,0
     .ipn_loop:
-	mov	  .hit_faces,0
+        mov       .hit_faces,0
-	mov	  .x,0
+        mov       .x,0
-	xor	  ecx,ecx	       ; ecx - triangle number
+        xor       ecx,ecx              ; ecx - triangle number
     .ipn_check_face:
-	xor	  ebx,ebx	       ; ebx - 'position' in one triangle
+        xor       ebx,ebx              ; ebx - 'position' in one triangle
     .ipn_check_vertex:
-	movzx	  eax,word[esi+ebx]    ;  eax - point_number
+        mov       eax,dword[esi+ebx]    ;  eax - point_number
-	cmp	  ax,.point_number
+        cmp       eax,.point_number
-	jne	  .ipn_next_vertex
+        jne       .ipn_next_vertex
-	push	  esi
+        push      esi
-	mov	  esi,ecx
+        mov       esi,ecx
-	lea	  esi,[esi*3]
+        lea       esi,[esi*3]
-       ; lea	   esi,[triangles_normals+esi*4]
+       ; lea       esi,[triangles_normals+esi*4]
-	shl	  esi,2
+        shl       esi,2
-	pop	  esi
+        pop       esi
-	inc	  .hit_faces
+        inc       .hit_faces
-	jmp	  .ipn_next_face
+        jmp       .ipn_next_face
     .ipn_next_vertex:
-	add	  ebx,2
+        add       ebx,4
-	cmp	  ebx,6
+        cmp       ebx,12
-	jne	  .ipn_check_vertex
+        jne       .ipn_check_vertex
     .ipn_next_face:
-	add	  esi,6
+        add       esi,12
-	inc	  ecx
+        inc       ecx
-	cmp	  cx,[triangles_count_var]
+        cmp       ecx,[triangles_count_var]
-	jne	  .ipn_check_face
+        jne       .ipn_check_face
-	fld	  .x
+        fld       .x
-	fidiv	  .hit_faces
+        fidiv     .hit_faces
-	fstp	  dword[edi+vec_x]
+        fstp      dword[edi+vec_x]
-	fstp	  dword[edi+vec_z]
+        fstp      dword[edi+vec_z]
-	call	  normalize_vector
+        call      normalize_vector
-	add	  edi,12  ;type vector 3d
+        add       edi,12  ;type vector 3d
-	inc	  .point_number
+        inc       .point_number
-	mov	  dx,.point_number
+        mov       edx,.point_number
-	cmp	  dx,[points_count_var]
+        cmp       edx,[points_count_var]
-	jne	  .ipn_loop
+        jne       .ipn_loop
-	mov	  esp,ebp
+        mov       esp,ebp
 ret
 ;===============================================================
 init_triangles_normals2:
-	mov	ebx,[triangles_normals_ptr]
+        mov     ebx,[triangles_normals_ptr]
+        mov     ebp,[triangles_ptr]
-	mov	ebp,[triangles_ptr]
+        mov     ecx,[triangles_count_var]
+     @@:
-     @@:
+        push    ecx
-	push	ebx
+        push    ebx
-	mov	ebx,vectors
+        mov     ebx,vectors
-	movzx	esi,word[ebp]	       ; first point index
+        mov     esi,dword[ebp]          ; first point index
-	lea	esi,[esi*3]
+        lea     esi,[esi*3]
-;	 lea	 esi,[points+esi*2]	; esi - pointer to 1st 3d point
+;        lea     esi,[points+esi*2]     ; esi - pointer to 1st 3d point
-	shl	esi,2
+        shl     esi,2
-	add	esi,[points_ptr]
+        add     esi,[points_ptr]
-	movzx	edi,word[ebp+2] 	 ; first point index
+        mov     edi,dword[ebp+4]          ; first point index
-	lea	edi,[edi*3]
+        lea     edi,[edi*3]
-	shl	edi,2
+        shl     edi,2
-	add	edi,[points_ptr]
+        add     edi,[points_ptr]
-;	 movzx	 edi,word[ebp+2]	; second point index
+;        movzx   edi,word[ebp+2]        ; second point index
-;	 lea	 edi,[edi*3]
+;        lea     edi,[edi*3]
-;	 lea	 edi,[points+edi*2]	; edi - pointer to 2nd 3d point
+;        lea     edi,[points+edi*2]     ; edi - pointer to 2nd 3d point
-	call	make_vector_r
+        call    make_vector_r
-	add	ebx,12
+        add     ebx,12
-	mov	esi,edi
+        mov     esi,edi
-	movzx	edi,word[ebp+4]        ; third point index
+        mov     edi,dword[ebp+8]        ; third point index
-	lea	edi,[edi*3]
+        lea     edi,[edi*3]
-	shl	edi,2
+        shl     edi,2
-	add	edi,[points_ptr]
+        add     edi,[points_ptr]
-;	 lea	 edi,[points+edi*2]
+;        lea     edi,[points+edi*2]
-	pop	ebx
+        pop     ebx
-	call	cross_product
+        call    cross_product
-	mov	edi,ebx
+        mov     edi,ebx
-	call	normalize_vector
+        call    normalize_vector
-	add	ebp,6
+        add     ebp,12
-	add	ebx,12
+        add     ebx,12
-	cmp	dword[ebp],-1
+        pop     ecx
+        sub     ecx,1
+        jnz     @b
+       ; cmp     dword[ebp],-1
-	jne	@b
+       ; jne     @b
 ret
 if 0 ; ind 64 but
 ;=================================================================
 sort_triangles:
-	mov	esi,[triangles_ptr]
+        mov     esi,[triangles_ptr]
-	mov	edi,triangles_with_z
+        mov     edi,triangles_with_z
-;	 emms
+;        emms
 ;      end if
-	movsd  ; copy end mark too
+        movsd  ; copy end mark too
 ret
 end if ; 64 ind
 clrscr:
-	mov	edi,[screen_ptr]
+        mov     edi,[screen_ptr]
-	movzx	ecx,word[size_x_var]
+        movzx   ecx,word[size_x_var]
-	movzx	eax,word[size_y_var]
+        movzx   eax,word[size_y_var]
-	imul	ecx,eax
+        imul    ecx,eax
-	lea	ecx,[ecx*3]
+        lea     ecx,[ecx*3]
+        mov esi,[triangles_ptr]
-	mov esi,[triangles_ptr]
+        mov [edges_counter],0
+        mov ecx,[triangles_count_var]
-	mov [edges_counter],0
+    .again_dts:
-    .again_dts:
+        push    ecx
-	mov ebp,[points_translated_ptr]
+        mov     ebp,[points_translated_ptr]
-      if Ext=NON
+      if Ext >= SSE2
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	mov	[point_index1],ax
+        mov     [point_index1],eax
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	add	eax,eax
+        add     eax,eax
-	push	ebp
+        push    ebp
-	add	ebp,eax
+        add     ebp,eax
-	mov	eax,[ebp]
+        mov     eax,[ebp]
-	cmp	[vertex_edit_no],0
+   ;     cmp     [vertex_edit_no],0
-	jne	@f
+   ;     jne     @f
+   ;
-      @@:
+   ;   @@:
-	mov	dword[xx1],eax
+        mov     dword[xx1],eax
+        mov     eax,[ebp+4]
-	mov	eax,[ebp+4]
+        mov     [zz1],ax
-	mov	[zz1],ax
-	pop	ebp
+        pop     ebp
-	movzx	eax,word[esi+2]
+        mov     eax,dword[esi+4]
-	mov	[point_index2],ax
+        mov     [point_index2],eax
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	mov	[zz2],ax
+        mov     [zz2],ax
-	pop	ebp
+        pop     ebp
-	movzx	eax,word[esi+4]        ; xyz3 = [ebp+[esi+4]*6]
+        mov     eax,dword[esi+8]        ; xyz3 = [ebp+[esi+4]*6]
-	mov	[point_index3],ax
+        mov     [point_index3],eax
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	add	eax,eax
+        add     eax,eax
-    ;	 push	 ebp
+    ;    push    ebp
-	add	ebp,eax
+        add     ebp,eax
-	mov	eax,[ebp]
+        mov     eax,[ebp]
-	mov	dword[xx3],eax
+        mov     dword[xx3],eax
-	mov	eax,[ebp+4]
+        mov     eax,[ebp+4]
-	mov	[zz3],ax
+        mov     [zz3],ax
       else
-	mov	eax,dword[esi]		 ; don't know MMX
+        movq    mm0,[esi]           ; don't know MMX
-	mov	dword[point_index1],eax
+        mov     qword[point_index1],mm0
-       ; shr	 eax,16
+       ; shr     eax,16
-       ; mov	 [point_index2],ax
+       ; mov     [point_index2],ax
-	mov	ax,word[esi+4]
+        mov     eax,dword[esi+8]
-	mov	[point_index3],ax
+        mov     [point_index3],eax
+        movdqu  xmm0,[esi]
-	movq	mm0,[esi]
+        paddd   xmm0,xmm0
+        movdqa  xmm1,xmm0
+        paddd   xmm0,xmm0
-	pmullw	mm0,qword[const6]
+        paddd   xmm0,xmm1
-	movd	eax,mm0
+        movd    eax,xmm0
-	psrlq	mm0,16
+        psrldq  xmm0,4
-	movd	ebx,mm0
+        movd    ebx,xmm0
-	psrlq	mm0,16
+        psrldq  xmm0,4
-	movd	ecx,mm0
+        movd    ecx,xmm0
-	and	eax,0FFFFh
+        and     eax,0FFFFh
-	and	ebx,0FFFFh
+        and     ebx,0FFFFh
-	and	ecx,0FFFFh
+        and     ecx,0FFFFh
-	movq	mm0,[ebp+eax]
+        movq    mm0,[ebp+eax]
-	jne	.no_culling
+        jne     .no_culling
-	mov	esi,point_index1	  ; *********************************
+        mov     esi,point_index1          ; *********************************
-	mov	ecx,3			  ;
+        mov     ecx,3                     ;
       @@:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	shl	eax,2
+        shl     eax,2
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-;	 lea	 eax,[eax+point_normals_rotated]
+;        lea     eax,[eax+point_normals_rotated]
-	fld	dword[eax+8]		 ; *****************************
+        fld     dword[eax+8]             ; *****************************
-	ftst				 ; CHECKING OF Z COOFICIENT OF
+        ftst                             ; CHECKING OF Z COOFICIENT OF
-				      ; ****************
+                                      ; ****************
-	mov	esi,point_index3      ; do Gouraud shading
+        mov     esi,point_index3      ; do Gouraud shading
-	mov	ecx,3
+        mov     ecx,3
       .again_grd_draw:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	shl	eax,2
+        shl     eax,2
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-	; texture x=(rotated point normal -> x * 255)+255
+        ; texture x=(rotated point normal -> x * 255)+255
-	fld	dword[eax]	 ; x cooficient of normal vector
+        fld     dword[eax]       ; x cooficient of normal vector
-	fimul	[correct_tex]
+        fimul   [correct_tex]
-	shl	 eax,TEX_SHIFT
+        shl      eax,TEX_SHIFT
-	add	 eax,ebx
+        add      eax,ebx
-	lea	 eax,[eax*3+color_map]
+        lea      eax,[eax*3+color_map]
-	mov	 eax,dword[eax]
+        mov      eax,dword[eax]
-	cmp	[catmull_flag],1      ; put on stack z coordinate if necessary
+     ;   cmp     [catmull_flag],1      ; put on stack z coordinate if necessary
-	jne	 @f
+     ;   jne      @f
-	lea	 edx,[ecx*3]
+        lea      edx,[ecx*3]
-	push	 word[edx*2+xx1-2]    ; zz1 ,2 ,3
+        push     word[edx*2+xx1-2]    ; zz1 ,2 ,3
-      @@:
+     ; @@:
-	ror	 eax,16 	      ; eax -0xxxrrggbb -> 0xggbbxxrr
+        ror      eax,16               ; eax -0xxxrrggbb -> 0xggbbxxrr
-	xor	 ah,ah
+        xor      ah,ah
-	push	 ax	    ;r
+        push     ax         ;r
-	rol	 eax,8		      ; eax-0xggbb00rr -> 0xbb00rrgg
+        rol      eax,8                ; eax-0xggbb00rr -> 0xbb00rrgg
-	xor	 ah,ah
+        xor      ah,ah
-	push	 ax	    ;g
+        push     ax         ;g
-	shr	 eax,24
+        shr      eax,24
-	push	 ax	    ;b
+        push     ax         ;b
-	sub	 esi,2
+        sub      esi,4
-	dec	 cx
+        dec      cx
-	jnz	 .again_grd_draw
+        jnz      .again_grd_draw
-	jmp	 .both_draw
+        jmp      .both_draw
-	and	 eax,ebx
+        and      eax,ebx
-	push	 eax
+        push     eax
-	neg	 al
+        neg      al
-	push	 ax
+        push     ax
-	cmp	[catmull_flag],1
+     ;   cmp     [catmull_flag],1
-	jne	 @f
+     ;   jne      @f
-	push	 [zz2]
+        push     [zz2]
-      @@:
+     ; @@:
-	mov	 eax,dword[yy2]
+        mov      eax,dword[yy2]
-	and	 eax,ebx
+        and      eax,ebx
-	push	 eax
+        push     eax
-	neg	 al
+        neg      al
-	push	 ax
+        push     ax
-	cmp	[catmull_flag],1
+      ;  cmp     [catmull_flag],1
-	jne	 @f
+      ;  jne      @f
-	push	 [zz1]
+        push     [zz1]
-      @@:
+    ;  @@:
-	mov	 eax,dword[yy1]
+        mov      eax,dword[yy1]
-	and	 eax,ebx
+        and      eax,ebx
-	push	 eax
+        push     eax
-	neg	 al
+        neg      al
-	push	 ax
+        push     ax
     .both_draw:
-	ror	ebx,16
+        ror     ebx,16
-	mov	ecx,dword[xx3]
+        mov     ecx,dword[xx3]
-	ror	ecx,16
+        ror     ecx,16
-	mov	edi,[screen_ptr]
+        mov     edi,[screen_ptr]
-	cmp	[catmull_flag],0
+  ;      cmp     [catmull_flag],0
-	je	@f
+  ;      je      @f
-  ;	 lea	 esi,[Z_buffer]
-	mov	esi,[Zbuffer_ptr]
+        mov     esi,[Zbuffer_ptr]
-	call	gouraud_triangle_z
+        call    gouraud_triangle_z
-	jmp	.end_draw
+     ;   jmp     .end_draw
-       @@:
+     ;  @@:
-	call	gouraud_triangle
+     ;   call    gouraud_triangle
-	jmp	.end_draw
+        jmp     .end_draw
-     .flat_draw:		     ;**************************
+     .flat_draw:                     ;**************************
-				     ; FLAT DRAWING
+                                     ; FLAT DRAWING
-	movzx	eax,[point_index1]
+        mov     eax,[point_index1]
-	movzx	ebx,[point_index2]
+        mov     ebx,[point_index2]
-	movzx	ecx,[point_index3]
+        mov     ecx,[point_index3]
-	shl	eax,2
+        shl     eax,2
-	shl	ebx,2
+        shl     ebx,2
-	shl	ecx,2
+        shl     ecx,2
-	lea	eax,[eax*3]  ;+point_normals_rotated]
+        lea     eax,[eax*3]  ;+point_normals_rotated]
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-	fistp	dword[esp-8]   ;  y
+        fistp   dword[esp-8]   ;  y
-	mov	edx,dword[esp-8]
+        mov     edx,dword[esp-8]
-	shl	edx,TEX_SHIFT
+        shl     edx,TEX_SHIFT
-	add	edx,dword[esp-4]
+        add     edx,dword[esp-4]
-	lea	eax,[3*edx+color_map]
+        lea     eax,[3*edx]
+        add     eax,color_map
-	mov	edx,dword[eax]
+        mov     edx,dword[eax]
-	and	edx,0x00ffffff	  ; edx = 0x00rrggbb
+        and     edx,0x00ffffff    ; edx = 0x00rrggbb
-	mov	ebx,dword[xx2]
+        mov     ebx,dword[xx2]
-	ror	ebx,16
+        ror     ebx,16
-	mov	ecx,dword[xx3]
+        mov     ecx,dword[xx3]
-	ror	ecx,16
+        ror     ecx,16
-       ; mov	 edi,screen
+        mov     edi,[screen_ptr]
-	mov	edi,[screen_ptr]
-	cmp	[catmull_flag],0
+  ;      cmp     [catmull_flag],0
-	je	@f
+  ;      je      @f
-   ;	 lea	 esi,[Z_buffer]
-	mov	esi,[Zbuffer_ptr]
+        mov     esi,[Zbuffer_ptr]
-	push	word[zz3]
+        push    word[zz3]
-	push	word[zz2]
+        push    word[zz2]
-	push	word[zz1]
+        push    word[zz1]
-	call	flat_triangle_z
+        call    flat_triangle_z
-	jmp	.end_draw
+        jmp     .end_draw
-      @@:
+  ;    @@:
-	call	draw_triangle
+  ;      call    draw_triangle
-	jmp	.end_draw
+  ;      jmp     .end_draw
       .env_mapping:
        ; fninit
-	cmp	[catmull_flag],0
+   ;     cmp     [catmull_flag],0
-	je	@f
+   ;     je      @f
-	push	[zz3]
+        push    [zz3]
-	push	[zz2]
+        push    [zz2]
-	push	[zz1]
+        push    [zz1]
-      @@:
+    ;  @@:
-	mov	esi,point_index1
+        mov     esi,point_index1
-	sub	esp,12
+        sub     esp,12
-	mov	edi,esp
+        mov     edi,esp
-	mov	ecx,3
+        mov     ecx,3
       @@:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	shl	eax,2
+        shl     eax,2
-	add	eax,[points_normals_rot_ptr]	   ;point_normals_rotated
+        add     eax,[points_normals_rot_ptr]       ;point_normals_rotated
 ; #
-;	 fld	 dword[eax]
+;        fld     dword[eax]
-;	 fmul	 dword[eax+4]
+;        fmul    dword[eax+4]
-	fiadd	[correct_tex]
+        fiadd   [correct_tex]
-	fistp	word[edi+2]
+        fistp   word[edi+2]
 ; # end of last ch.
-	add	edi,4
+        add     edi,4
-	add	esi,2
+        add     esi,4
-	loop	@b
+        loop    @b
-	mov	eax,dword[xx1]
+        mov     eax,dword[xx1]
-	ror	eax,16
+        ror     eax,16
-	mov	ebx,dword[xx2]
+        mov     ebx,dword[xx2]
-	ror	ebx,16
+        ror     ebx,16
-	mov	ecx,dword[xx3]
+        mov     ecx,dword[xx3]
-	ror	ecx,16
+        ror     ecx,16
-	mov	edi,[screen_ptr]
+        mov     edi,[screen_ptr]
-	mov	esi,envmap
+        mov     esi,envmap
-	cmp	[catmull_flag],0
+  ;      cmp     [catmull_flag],0
-	je	@f
-  ;	 mov	 edx,Z_buffer
+  ;      je      @f
-	mov	edx,[Zbuffer_ptr]
+        mov     edx,[Zbuffer_ptr]
-	call	tex_triangle_z
+        call    tex_triangle_z
-	jmp	.end_draw
+   ;     jmp     .end_draw
-      @@:
+   ;   @@:
-	call	tex_triangle
+   ;     call    tex_triangle
-	jmp	.end_draw
+        jmp     .end_draw
 ;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
      .cubic_env_mapping:
        ; fninit
-	cmp	[catmull_flag],0
+    ;    cmp     [catmull_flag],0
-	je	@f
+    ;    je      @f
-	push	[zz3]
+        push    [zz3]
-	push	[zz2]
+        push    [zz2]
-	push	[zz1]
+        push    [zz1]
-      @@:
+    ;  @@:
-	mov	esi,point_index1
+        mov     esi,point_index1
-	sub	esp,12
+        sub     esp,12
-	mov	edi,esp
+        mov     edi,esp
-	mov	ecx,3
+        mov     ecx,3
       @@:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	shl	eax,2
+        shl     eax,2
-	add	eax,[points_normals_rot_ptr]  ;point_normals_rotated
+        add     eax,[points_normals_rot_ptr]  ;point_normals_rotated
 ; #
-	fld	dword[eax]
+        fld     dword[eax]
-;	 fiadd	 [correct_tex]
+;        fiadd   [correct_tex]
-;	 fistp	 word[edi+2]
+;        fistp   word[edi+2]
 ; # end of last ch.
-	add	edi,4
+        add     edi,4
-	add	esi,2
+        add     esi,4
-	loop	@b
+        loop    @b
-	mov	eax,dword[xx1]
+        mov     eax,dword[xx1]
-	ror	eax,16
+        ror     eax,16
-	mov	ebx,dword[xx2]
+        mov     ebx,dword[xx2]
-	ror	ebx,16
+        ror     ebx,16
-	mov	ecx,dword[xx3]
+        mov     ecx,dword[xx3]
-	ror	ecx,16
+        ror     ecx,16
-	mov	edi,[screen_ptr]
+        mov     edi,[screen_ptr]
-	mov	esi,envmap_cub
+        mov     esi,envmap_cub
-	cmp	[catmull_flag],0
+ ;       cmp     [catmull_flag],0
-	je	@f
-  ;	 mov	 edx,Z_buffer
+ ;       je      @f
-	mov	edx,[Zbuffer_ptr]
+        mov     edx,[Zbuffer_ptr]
-	call	tex_triangle_z
+        call    tex_triangle_z
-	jmp	.end_draw
+ ;       jmp     .end_draw
-      @@:
+ ;     @@:
-	call	tex_triangle
+ ;       call    tex_triangle
-	jmp	.end_draw
+        jmp     .end_draw
 ;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
       .bump_mapping:
-	; fninit
-	cmp	[catmull_flag],0
+        ; fninit
+  ;      cmp     [catmull_flag],0
-	je	@f
+  ;      je      @f
 ;	 push	 Z_buffer
-	push	[Zbuffer_ptr]
+        push    [Zbuffer_ptr]
-	push	[zz3]
+        push    [zz3]
-	push	[zz2]
+        push    [zz2]
-	push	[zz1]
+        push    [zz1]
-      @@:
+;      @@:
-	mov	esi,point_index1
+        mov     esi,point_index1
-	sub	esp,12
+        sub     esp,12
-	mov	edi,esp
+        mov     edi,esp
-	mov	ecx,3
+        mov     ecx,3
       @@:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	shl	eax,2
+        shl     eax,2
-	add	eax,[points_normals_rot_ptr]  ;point_normals_rotated
+        add     eax,[points_normals_rot_ptr]  ;point_normals_rotated
-	fiadd	[correct_tex]
+        fiadd   [correct_tex]
-	fistp	word[edi+2]
+        fistp   word[edi+2]
-	add	edi,4
+        add     edi,4
-	add	esi,2
+        add     esi,4
-	loop	@b
+        loop    @b
-	movzx  esi,[point_index3]      ; bump map coords
+        mov    esi,[point_index3]      ; bump map coords
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index2]
+        mov    esi,[point_index2]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-;	lea    esi,[esi*3]
+;       lea    esi,[esi*3]
-;	lea    esi,[points+2+esi*2]
+;       lea    esi,[points+2+esi*2]
-	push   dword[esi]
+        push   dword[esi]
-  ;	push   dword[xx2]
+  ;     push   dword[xx2]
-	movzx  esi,[point_index1]
+        mov    esi,[point_index1]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-;	lea	esi,[esi*3]
+;       lea     esi,[esi*3]
-;	lea	esi,[points+2+esi*2]
+;       lea     esi,[points+2+esi*2]
-	mov	edi,[screen_ptr]
+        mov     edi,[screen_ptr]
-	mov	esi,envmap
+        mov     esi,envmap
-	mov	edx,bumpmap	       ;BUMP_MAPPING
+        mov     edx,bumpmap            ;BUMP_MAPPING
-	cmp	[catmull_flag],0
+ ;       cmp     [catmull_flag],0
-	je	@f
+ ;       je      @f
-	call	bump_triangle_z
+        call    bump_triangle_z
-	jmp	.end_draw
+ ;       jmp     .end_draw
-      @@:
+ ;     @@:
-	call	bump_triangle
+ ;       call    bump_triangle
-	jmp	.end_draw
+        jmp     .end_draw
       .tex_mapping:
-	; fninit
+        ; fninit
-	cmp	[catmull_flag],0
+  ;      cmp     [catmull_flag],0
-	je	@f
+  ;      je      @f
-	push	[zz3]
+        push    [zz3]
-	push	[zz2]
+        push    [zz2]
-	push	[zz1]
+        push    [zz1]
-      @@:
+   ;   @@:
-	movzx  esi,[point_index3]      ; tex map coords
+        mov    esi,[point_index3]      ; tex map coords
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index2]
+        mov    esi,[point_index2]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index1]
+        mov    esi,[point_index1]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	mov	ecx,dword[xx3]
+        mov     ecx,dword[xx3]
-	ror	ecx,16
+        ror     ecx,16
-	mov	edi,[screen_ptr]
+        mov     edi,[screen_ptr]
-	mov	esi,texmap
+        mov     esi,texmap
-	cmp	[catmull_flag],0
+   ;     cmp     [catmull_flag],0
-	je	@f
+   ;     je      @f
-   ;	 mov	 edx,Z_buffer
-	mov	edx,[Zbuffer_ptr]
+         mov     edx,[Zbuffer_ptr]
-	call	tex_triangle_z
+        call    tex_triangle_z
- ;	 call	 tex_plus_grd_trianlgle
+;        jmp     .end_draw
-	jmp	.end_draw
-      @@:
+;      @@:
-	call	tex_triangle
+;        call    tex_triangle
-	jmp	.end_draw
+        jmp     .end_draw
 ;      .ray:
-;	 grd_triangle according to points index
+;        grd_triangle according to points index
-;	 cmp	 [catmull_flag],0
+;        cmp     [catmull_flag],0
-;	 je	 @f
+;        je      @f
-;	 push	 [zz3]			 ; spot light with attenuation
+;        push    [zz3]                   ; spot light with attenuation
-	 mov	ebp,esp
+         mov    ebp,esp
-	 sub	esp,4
+         sub    esp,4
-	 push	ebp
+         push   ebp
-	 movzx	esi,[point_index3]	; tex map coords
+         mov    esi,[point_index3]      ; tex map coords
-	 shl	esi,2
+         shl    esi,2
-	 add	esi,tex_points
+         add    esi,tex_points
-	 push	dword[esi]		; texture coords as first
+         push   dword[esi]              ; texture coords as first
-	 movzx	esi,[point_index2]	; group of parameters
+         mov    esi,[point_index2]      ; group of parameters
-	 shl	esi,2
+         shl    esi,2
-	 add	esi,tex_points
+         add    esi,tex_points
-	 push	dword[esi]
+         push   dword[esi]
-	 movzx	esi,[point_index1]
+         mov    esi,[point_index1]
-	 shl	esi,2
+         shl    esi,2
-	 add	esi,tex_points
+         add    esi,tex_points
-	 push	dword[esi]
+         push   dword[esi]
-	lea	 edx,[ecx*3]
+        lea      edx,[ecx*3]
-	push	 word[edx*2+xx1-2]    ; zz1 ,2 ,3
+        push     word[edx*2+xx1-2]    ; zz1 ,2 ,3
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	shl	eax,2
+        shl     eax,2
-	lea	eax,[eax*3] ;+point_normals_rotated]
+        lea     eax,[eax*3] ;+point_normals_rotated]
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-	; texture x=(rotated point normal -> x * 255)+255
+        ; texture x=(rotated point normal -> x * 255)+255
-	push	 ax	    ;g
+        push     ax         ;g
-	shr	 eax,24
+        shr      eax,24
-	push	 ax	    ;b
+        push     ax         ;b
-	sub	 esi,2
+        sub      esi,4
-	dec	 cx
+        dec      cx
-	jnz	 .aagain_grd_draw
+        jnz      .aagain_grd_draw
-	mov	eax,dword[xx1]
+        mov     eax,dword[xx1]
-	push	word[zz3]
+        push    word[zz3]
-	push	word[zz2]
+        push    word[zz2]
-	push	word[zz1]
+        push    word[zz1]
-	movzx  esi,[point_index3]      ; tex map coords
+        mov    esi,[point_index3]      ; tex map coords
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index2]
+        mov    esi,[point_index2]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index1]
+        mov    esi,[point_index1]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	mov	esi,point_index1     ; env coords
+        mov     esi,point_index1     ; env coords
-	sub	esp,12
+        sub     esp,12
-	mov	edi,esp
+        mov     edi,esp
-	mov	ecx,3
+        mov     ecx,3
       @@:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	shl	eax,2
+        shl     eax,2
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-	fiadd	[correct_tex]
+        fiadd   [correct_tex]
-	fistp	word[edi+2]
+        fistp   word[edi+2]
-	add	edi,4
+        add     edi,4
-	add	esi,2
+        add     esi,4
-	loop	@b
+        loop    @b
-	mov	eax,dword[xx1]
+        mov     eax,dword[xx1]
-	ror	eax,16
+        ror     eax,16
-	call	two_tex_triangle_z
+        call    two_tex_triangle_z
-	jmp	.end_draw
+        jmp     .end_draw
    .bump_tex:
-	movzx  esi,[point_index3]      ; tex map coords
+        mov    esi,[point_index3]      ; tex map coords
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index2]
+        mov    esi,[point_index2]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index1]
+        mov    esi,[point_index1]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	sub	esp,12
+        sub     esp,12
-	mov	edi,esp
+        mov     edi,esp
-	mov	ecx,3
+        mov     ecx,3
       @@:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	shl	eax,2
+        shl     eax,2
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-	; texture x=(rotated point normal -> x * 255)+255
+        ; texture x=(rotated point normal -> x * 255)+255
-	fld	dword[eax]
+        fld     dword[eax]
-	fimul	[correct_tex]
+        fimul   [correct_tex]
-	fiadd	[correct_tex]
+        fiadd   [correct_tex]
-	fistp	word[edi+2]
+        fistp   word[edi+2]
-	add	edi,4
+        add     edi,4
-	add	esi,2
+        add     esi,4
-	loop	@b
+        loop    @b
-;	 push  dword 1 shl 16 + 1  ; emap coords
+;        push  dword 1 shl 16 + 1  ; emap coords
-;	 push  dword 127 shl 16 + 1
+;        push  dword 127 shl 16 + 1
-;	 push  dword 127 shl 16 + 127
+;        push  dword 127 shl 16 + 127
-	movzx  esi,[point_index3]      ; bump map coords
+        mov    esi,[point_index3]      ; bump map coords
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index2]
+        mov    esi,[point_index2]
-	shl    esi,2
+        shl    esi,2
-	add    esi,tex_points
+        add    esi,tex_points
-	push   dword[esi]
+        push   dword[esi]
-	movzx  esi,[point_index1]
+        mov    esi,[point_index1]
-	shl    esi,2
+        shl    esi,2
       .draw_smooth_line:
-	mov	esi,point_index3
+        mov     esi,point_index3
-	mov	ecx,3
+        mov     ecx,3
       .again_line_param:
-	movzx	eax,word[esi]
+        mov     eax,dword[esi]
-	shl	eax,2
+        shl     eax,2
-	lea	eax,[eax*3]
+        lea     eax,[eax*3]
-	add	eax,[points_normals_rot_ptr]
+        add     eax,[points_normals_rot_ptr]
-	; texture ;x=(rotated point normal -> x * 255)+255
+        ; texture ;x=(rotated point normal -> x * 255)+255
-	fld	dword[eax]	 ; x cooficient of normal vector
+        fld     dword[eax]       ; x cooficient of normal vector
-	lea	 ebx,[ecx-1]
+        lea      ebx,[ecx-1]
-	shl	 ebx,2
+        shl      ebx,2
-	mov	 [ebx+col1],eax
+        mov      [ebx+col1],eax
-	sub	 esi,2
+        sub      esi,4
-	dec	 ecx
+        dec      ecx
-	jnz	 .again_line_param
+        jnz      .again_line_param
-;	 mov	 eax,[edges_ptr]	 ;   this not works correctly
+;        mov     eax,[edges_ptr]         ;   this not works correctly
       @@:
       .end_draw:
-	pop	esi
+        pop     esi
-	add	esi,6
+        add     esi,12
-	inc	[edges_counter]
+        inc     [edges_counter]
+        pop     ecx
+        sub     ecx,1
-	cmp	dword[esi],-1
+     ;   cmp     dword[esi],-1
-	jne	.again_dts
+        jnz     .again_dts
 ret
        pop   esi
        add   esi,6
        inc   dword[.counter]
        mov   ecx,[.counter]
-       cmp   cx,[points_count_var]
+       cmp   ecx,[points_count_var]
        jng   .loop
        mov   esp,ebp
        pop   ebp
-read_tp_variables:	      ; read [triangles_count_var] and	[points_count_var]
+read_tp_variables:            ; read [triangles_count_var] and  [points_count_var]
-			      ; and  allocate memory
+                              ; and  allocate memory
-	xor	ebx,ebx
+        xor     ebx,ebx
-	xor	ebp,ebp
+        xor     ebp,ebp
-	mov	[points_count_var],bx
+        mov     [points_count_var],ebx
-	mov	[triangles_count_var],bx
+        mov     [triangles_count_var],ebx
    if USE_LFN = 0
-	mov	esi,SourceFile
+        mov     esi,SourceFile
    else
-	mov	esi,[fptr]
+        mov     esi,[fptr]
    end if
-	add	esi,[esi+2]
+        add     esi,[esi+2]
-	jmp	@b
+        jmp     @b
       @@:
-	movzx	ecx,word[esi+6]
+        movzx   ecx,word[esi+6]
-	add	[points_count_var],cx
+        add     [points_count_var],ecx
-	mov	edx,ecx
+        mov     edx,ecx
-	add	esi,8
+        add     esi,8
      @@:
-	add	esi,[esi+2]
+        add     esi,[esi+2]
-	jmp	@b
+        jmp     @b
       @@:
-	movzx	ecx,word[esi+6]
+        movzx   ecx,word[esi+6]
-	add	[triangles_count_var],cx
+        add     [triangles_count_var],ecx
-	add	esi,8
+        add     esi,8
       @@:
-	add	esi,8
+        add     esi,8
-	dec	ecx
+        dec     ecx
-	add	esi,[esi+2]
+        add     esi,[esi+2]
-	jmp	@b
+        jmp     @b
       @@:
-	movzx	ecx,word[esi+6]
+        movzx   ecx,word[esi+6]
-	add	[points_count_var],cx
+        add     [points_count_var],ecx
-	mov	edx,ecx
+        mov     edx,ecx
-	add	esi,8
+        add     esi,8
      @@:
-	push	edi
+        push    edi
-	pop	dword[edi+ebx*2+4]
+        pop     dword[edi+ebx*2+4]
-	push	dword[esi+8]
+        push    dword[esi+8]
-	pop	dword[edi+ebx*2+8]
+        pop     dword[edi+ebx*2+8]
-	pop	edi
+        pop     edi
 ;	 fld	 dword[esi+4]
-;	 fstp	 dword[real_points+ebx*2+0]  ; x
-;	 fld	 dword[esi+8]
-;	 fstp	dword[real_points+ebx*2+4]  ; y
-;	 fld	 dword[esi+0]
-;	 fstp	dword[real_points+ebx*2+8]  ; z
-	add	ebx,6
+        add     ebx,6
-	add	esi,12
+        add     esi,12
-	dec	ecx
+        dec     ecx
-	jnz	@b
+        jnz     @b
-	add	esi,[esi+2]
+        add     esi,[esi+2]
-	jmp	@b
+        jmp     @b
       @@:
-	movzx	ecx,word[esi+6]
+        movzx   ecx,word[esi+6]
-	add	[triangles_count_var],cx
+        add     [triangles_count_var],ecx
-	add	esi,8
+        add     esi,8
-	;mov	 edi,triangles
+        ;mov     edi,triangles
       @@:
-	movsd
+        movzx   eax,word[esi]
+        stosd
-	movsw
+        movzx   eax,word[esi+2]
+        stosd
-	add	word[edi-6],bp
+        movzx   eax,word[esi+4]
+        stosd
+        add     dword[edi-12],ebp
-	add	word[edi-4],bp
+        add     dword[edi-8],ebp
-	add	word[edi-2],bp
+        add     dword[edi-4],ebp
-	add	esi,2
+        add     esi,8
-	dec	ecx
+        dec     ecx
-	jnz	@b
+        jnz     @b
-	add	ebp,edx
+        add     ebp,edx
-	jmp	.find4k
+        jmp     .find4k
-	mov	eax,-1 ;<---mark if OK
+        mov     eax,-1 ;<---mark if OK
       .exit:
     @@:
-	mov	ebx,20
+        mov     ebx,20
     .alloc:
-	movzx	ecx, [triangles_count_var]
+        mov     ecx,[triangles_count_var]
-	inc	ecx
+        add     ecx,20
-	lea	ecx, [ecx*3]
+        lea     ecx, [ecx*3]
-	add	ecx, ecx
+        shl     ecx,2
-	mov	edx,[triangles_ptr]
+        mov     edx,[triangles_ptr]
-	int	0x40		       ;  -> allocate memory to triangles
+        int     0x40                   ;  -> allocate memory to triangles
-	mov	[triangles_ptr], eax   ;  -> eax = pointer to allocated mem
+        mov     [triangles_ptr], eax   ;  -> eax = pointer to allocated mem
-;	 mov	 [triangles_w_z_ptr], eax   ; for trainagles_with_z list
+;        mov     [triangles_w_z_ptr], eax   ; for trainagles_with_z list
-					    ; ststic  memory
+                                            ; ststic  memory
-	mov	eax, 68
+        mov     eax, 68
-	movzx	ecx, [triangles_count_var]
+        mov     ecx, [triangles_count_var]
-	lea	ecx, [3+ecx*3]
+        lea     ecx, [3+ecx*3]
-	shl	ecx, 2
+        shl     ecx, 2
-	mov	edx,[triangles_normals_ptr]
+        mov     edx,[triangles_normals_ptr]
-	int	0x40			       ;  -> allocate memory for triangles normals
+        int     0x40                           ;  -> allocate memory for triangles normals
-	mov	[triangles_normals_ptr], eax   ;  -> eax = pointer to allocated mem
+        mov     [triangles_normals_ptr], eax   ;  -> eax = pointer to allocated mem
-   ;	 int	 0x40
+   ;     int     0x40
-   ;	 mov	 dword[vertices_index_ptr], eax
+   ;     mov     dword[vertices_index_ptr], eax
-	mov	eax, 68
+        mov     eax, 68
-	movzx	ecx, [points_count_var]
+        mov     ecx, [points_count_var]
-	lea	ecx,[3+ecx*3]
+        lea     ecx,[3+ecx*3]
-	shl	ecx, 2
+        shl     ecx, 2
-	mov	edx,[points_normals_ptr]
+        mov     edx,[points_normals_ptr]
-	int	0x40
+        int     0x40
-	mov	[points_normals_ptr], eax
+        mov     [points_normals_ptr], eax
-	mov	eax, 68
+        mov     eax, 68
-    ;	 mov	 ebx, 12
+    ;    mov     ebx, 12
-	movzx	ecx, [points_count_var]
+        mov     ecx, [points_count_var]
-	lea	ecx,[3+ecx*3]
+        lea     ecx,[3+ecx*3]
-	shl	ecx, 2
+        shl     ecx, 2
-	mov	edx,[points_normals_rot_ptr]
+        mov     edx,[points_normals_rot_ptr]
-	int	0x40
+        int     0x40
-	int	0x40
+        int     0x40
-	mov	[points_rotated_ptr], eax
+        mov     [points_rotated_ptr], eax
-	mov	eax, 68
+        mov     eax, 68
-	movzx	ecx, [points_count_var]
+        mov     ecx, [points_count_var]
-	inc	ecx
+        inc     ecx
-	shl	ecx, 3
+        shl     ecx, 3
-	mov	edx,[points_translated_ptr]
+        mov     edx,[points_translated_ptr]
-	int	0x40
+        int     0x40
-	mov	[points_translated_ptr], eax
+        mov     [points_translated_ptr], eax
 if USE_LFN
 ;-
     mov     eax, 68
     mov     ebx, 11
-    int     0x40		   ;  -> init heap
+    int     0x40                   ;  -> create heap
-    ;mov     eax, 70
+ ;    mov     eax, 70
-    ;mov     ebx, file_info
+ ;    mov     ebx, file_info
-    ;mov     dword[ebx], 5	   ;  -> subfunction number
+ ;    mov     dword[ebx], 5          ;  -> subfunction number
-    ;int     0x40		   ;  -> read file size
+ ;    int     0x40                   ;  -> read file size
-    ;mov     ebx, [fptr]
+ ;    mov     ebx, [fptr]
-    ;mov     ebx, dword[ebx+32]
+ ;    mov     ebx, dword[ebx+32]
-    ;inc     ebx
+ ;    inc     ebx
-    ;mov     [fsize], ebx
+ ;    mov     [fsize], ebx
-    ;mov     eax, 68
+    ;   mov     eax, 68
-    ;mov     ebx, 12
+    ;   mov     ebx, 12
-    ;mov     ecx, [fsize]
+    ;   mov     ecx, [fsize]
-    ;int     0x40		   ;  -> allocate memory for file
+    ;   int     0x40                   ;  -> allocate memory for file
-    ;mov     [fptr], eax 	   ;  -> eax = pointer to allocated mem
+    ;   mov     [fptr], eax            ;  -> eax = pointer to allocated mem
-    ;mov     eax, 70
+ ;    mov     eax, 70
-    ;mov     ebx, file_info
+ ;    mov     ebx, file_info
-    ;mov     dword[ebx],0
-    ;int     0x40		   ; -> read file
-    ;mov     [fsize],ebx
-    ;cmp     eax,6
-    ;jnz     @f
-    ;xor     eax,eax	;;;;---
-    ;cmp     eax,6
-    ;jnz     @f
-    ;xor     eax,eax	;;;;---
+ ;    mov     dword[ebx],0
-    ;load kpacked files by Leency
+ ;    int     0x40                   ; -> read file
    ;load kpacked files by Leency
-	mov     eax,68
+       mov     eax,68
-	mov     ebx,27
+       mov     ebx,27
-	mov     ecx,I_Param
+       mov     ecx,file_name
-	int     0x40
+       int     0x40
     int      0x40
 end if
   ;  eax = 0   -> ok file loaded
 ret
-read_param:
+  ;  eax = 0   -> ok file loaded
+ret
+read_param:
     mov        esi,I_Param
     cmp        dword[esi],0
-    je	       .end
+    je         .end
     cmp        byte[esi],'/'
-    je	       .copy
+    je         .copy

Subversion Repositories Kolibri OS

(root)/programs/demos/3DS/VIEW3DS.ASM – Rev 7788 → 8014