Subversion Repositories Kolibri OS

Rev

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

Rev 6120 Rev 6126
Line 803... Line 803...
803
	stdcall [glShadeModel], GL_SMOOTH
803
	stdcall [glShadeModel], GL_SMOOTH
Line 804... Line 804...
804
 
804
 
805
	; draw inside radius cylinder
805
	; draw inside radius cylinder
806
	stdcall [glBegin], GL_QUAD_STRIP
806
	stdcall [glBegin], GL_QUAD_STRIP
-
 
807
	mov dword[i],0
807
	mov dword[i],0
808
	finit
808
	@@:
809
	@@:
809
	cmp dword[i],ebx
810
	cmp dword[i],ebx
810
	jg @f
-
 
811
		finit
811
	jg @f
812
		fld1
812
		fld1
813
		fld1
813
		fld1
Line 814... Line 814...
814
		faddp
814
		faddp
815
 
815
 
816
		fldpi
816
		fldpi
817
		fmulp
817
		fmul st0,st1
818
		fimul dword[i]
818
		fimul dword[i]
Line 819... Line 819...
819
		fidiv dword[teeth]
819
		fidiv dword[teeth]
Line 847... Line 847...
847
		sub esp,36 ;12*3
847
		sub esp,36 ;12*3
Line 848... Line 848...
848
 
848
 
849
		call [glNormal3f];, -cos(angle), -sin(angle), 0.0
849
		call [glNormal3f];, -cos(angle), -sin(angle), 0.0
850
		call [glVertex3f];, r0*cos(angle), r0*sin(angle), -width*0.5
850
		call [glVertex3f];, r0*cos(angle), r0*sin(angle), -width*0.5
-
 
851
		call [glVertex3f];, r0*cos(angle), r0*sin(angle), width*0.5
-
 
852
		ffree st0 ;2.0
851
		call [glVertex3f];, r0*cos(angle), r0*sin(angle), width*0.5
853
		fincstp
852
		inc dword[i]
854
		inc dword[i]
853
		jmp @b
855
		jmp @b
854
	@@:
856
	@@: