Subversion Repositories Kolibri OS

Rev

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

Rev 8062 Rev 8069
Line 32... Line 32...
32 
red_win:
 32 
red_win:
33 
	call draw_window
 33 
	call draw_window
Line 34... Line 34...
34 
 
 34 
 
35 
align 16
 35 
align 16
36 
still:
 36 
still:
37 
	mcall SF_CHECK_EVENT
 37 
	mcall SF_WAIT_EVENT
38 
	cmp al,1
 38 
	cmp al,1
39 
	jz red_win
 39 
	jz red_win
40 
	cmp al,2
 40 
	cmp al,2
41 
	jz key
 41 
	jz key
Line 70... Line 70...
70 
		fld dword[angle_z]
 70 
		fld dword[angle_z]
71 
		fadd dword[delt_size]
 71 
		fadd dword[delt_size]
72 
		fstp dword[angle_z]
 72 
		fstp dword[angle_z]
73 
		call draw_3d
 73 
		call draw_3d
74 
		call [kosglSwapBuffers]
 74 
		call [kosglSwapBuffers]
- 
 
 75 
		jmp still
75 
	@@:
 76 
	@@:
76 
	cmp ah,179 ;Right
 77 
	cmp ah,179 ;Right
77 
	jne @f
 78 
	jne @f
78 
		fld dword[angle_z]
 79 
		fld dword[angle_z]
79 
		fsub dword[delt_size]
 80 
		fsub dword[delt_size]
80 
		fstp dword[angle_z]
 81 
		fstp dword[angle_z]
81 
		call draw_3d
 82 
		call draw_3d
82 
		call [kosglSwapBuffers]
 83 
		call [kosglSwapBuffers]
- 
 
 84 
		;jmp still
83 
	@@:
 85 
	@@:
Line 84... Line 86...
84 
 
 86 
 
Line 85... Line 87...
85 
	jmp still
 87 
	jmp still
Line 124... Line 126...
124 
	stdcall [glColor3f],1.0, 1.0, 0.0
 126 
	stdcall [glColor3f],1.0, 1.0, 0.0
125 
	stdcall [glVertex3f], -0.823, 0.475, 0.1
 127 
	stdcall [glVertex3f], -0.823, 0.475, 0.1
126 
	stdcall [glColor3f],1.0, 1.0, 1.0
 128 
	stdcall [glColor3f],1.0, 1.0, 1.0
127 
	stdcall [glVertex3f], -0.25,  0.433, 0.1
 129 
	stdcall [glVertex3f], -0.25,  0.433, 0.1
Line 128... Line 130...
128 
 
 130 
 
Line 129... Line 131...
129 
	stdcall [glEnd]
 131 
	call [glEnd]
130 
 
 132 
 
Line 131... Line 133...
131 
stdcall [glPopMatrix]
 133 
call [glPopMatrix]
132 
ret
 134 
ret