Subversion Repositories Kolibri OS

Rev

Rev 5175 | Rev 5208 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5175 Rev 5187
Line 41... Line 41...
41
	fmul st0,st1
41
	fmul st0,st1
42
	fmul dword[eax+offs_cont_viewport+offs_vpor_scale+offs_Z]
42
	fmul dword[eax+offs_cont_viewport+offs_vpor_scale+offs_Z]
43
	fadd dword[eax+offs_cont_viewport+offs_vpor_trans+offs_Z]
43
	fadd dword[eax+offs_cont_viewport+offs_vpor_trans+offs_Z]
44
	fistp dword[ebx+offs_vert_zp+offs_zbup_z] ;v.zp.z = st0, st0 = st1
44
	fistp dword[ebx+offs_vert_zp+offs_zbup_z] ;v.zp.z = st0, st0 = st1
Line -... Line 45...
-
 
45
 
-
 
46
	ffree st0
-
 
47
	fincstp
45
 
48
 
46
	; color
49
	; color
47
	bt dword[eax+offs_cont_lighting_enabled],0
50
	bt dword[eax+offs_cont_lighting_enabled],0
48
	jnc @f
51
	jnc @f
49
		mov ecx,ebx
52
		mov ecx,ebx
Line 693... Line 696...
693
		fild dword[norm]
696
		fild dword[norm]
694
		mov edi,dword[edx+offs_vert_zp+offs_zbup_y]
697
		mov edi,dword[edx+offs_vert_zp+offs_zbup_y]
695
		mov edi,dword[ebx+offs_vert_zp+offs_zbup_y]
698
		mov edi,dword[ebx+offs_vert_zp+offs_zbup_y]
696
		mov dword[norm],edi
699
		mov dword[norm],edi
697
		fimul dword[norm]
700
		fimul dword[norm]
698
		fsub st0,st1
701
		fsubp
Line 699... Line 702...
699
 
702
 
Line 700... Line 703...
700
		;st0 = (p1.zp.x-p0.zp.x)*(p2.zp.y-p0.zp.y) - (p2.zp.x-p0.zp.x)*(p1.zp.y-p0.zp.y)
703
		;st0 = (p1.zp.x-p0.zp.x)*(p2.zp.y-p0.zp.y) - (p2.zp.x-p0.zp.x)*(p1.zp.y-p0.zp.y)
701
 
704
 
702
		mov dword[front],0
705
		mov dword[front],0
703
		fldz
706
		fldz
704
		fcom st1
707
		fcompp
705
		fstsw ax
708
		fstsw ax
706
		sahf
709
		sahf
707
		je .end_f
710
		je .end_f
Line 739... Line 742...
739
		jmp .end_f
742
		jmp .end_f
740
	.els_0:
743
	.els_0:
741
		and eax,[cc]
744
		and eax,[cc]
742
		and eax,[cc+4]
745
		and eax,[cc+4]
743
		cmp eax,0
746
		cmp eax,0
744
		jne @f
747
		jne .end_f
745
			stdcall gl_draw_triangle_clip, [context],ebx,ecx,edx,0
748
			stdcall gl_draw_triangle_clip, [context],ebx,ecx,edx,0
746
	.end_f:
749
	.end_f:
747
	finit
-
 
748
	@@:
-
 
749
popad
750
popad
750
	ret
751
	ret
751
endp
752
endp
Line 752... Line 753...
752
 
753
 
Line 984... Line 985...
984
	je @f
985
	je @f
985
		mov ebx,eax
986
		mov ebx,eax
986
		add ebx,offs_vert_zp
987
		add ebx,offs_vert_zp
987
		stdcall ZB_plot,dword[edx+offs_cont_zb],ebx
988
		stdcall ZB_plot,dword[edx+offs_cont_zb],ebx
988
	@@:
989
	@@:
989
	add eax,[p1]
990
	mov eax,[p1]
990
	cmp dword[eax+offs_vert_edge_flag],0
991
	cmp dword[eax+offs_vert_edge_flag],0
991
	je @f
992
	je @f
992
		mov ebx,eax
993
		mov ebx,eax
993
		add ebx,offs_vert_zp
994
		add ebx,offs_vert_zp
994
		stdcall ZB_plot,dword[edx+offs_cont_zb],ebx
995
		stdcall ZB_plot,dword[edx+offs_cont_zb],ebx
995
	@@:
996
	@@:
996
	add eax,[p2]
997
	mov eax,[p2]
997
	cmp dword[eax+offs_vert_edge_flag],0
998
	cmp dword[eax+offs_vert_edge_flag],0
998
	je @f
999
	je @f
999
		mov ebx,eax
1000
		mov ebx,eax
1000
		add ebx,offs_vert_zp
1001
		add ebx,offs_vert_zp
1001
		stdcall ZB_plot,dword[edx+offs_cont_zb],ebx
1002
		stdcall ZB_plot,dword[edx+offs_cont_zb],ebx