Rev 6737 | Rev 7423 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 6737 | Rev 7421 | ||
---|---|---|---|
Line 147... | Line 147... | ||
147 | mcall SF_GET_KEY |
147 | mcall SF_GET_KEY |
Line 148... | Line 148... | ||
148 | 148 | ||
149 | cmp ah,27 ;Esc |
149 | cmp ah,27 ;Esc |
Line -... | Line 150... | ||
- | 150 | je button.exit |
|
- | 151 | ||
- | 152 | cmp ah,43 ;+ |
|
- | 153 | jne @f |
|
- | 154 | fld dword[scale] |
|
- | 155 | fdiv dword[delt_sc] |
|
- | 156 | fstp dword[scale] |
|
150 | je button.exit |
157 | call draw_3d |
151 | 158 | @@: |
|
152 | cmp ah,61 ;+ |
159 | cmp ah,61 ;= |
153 | jne @f |
160 | jne @f |
154 | fld dword[scale] |
161 | fld dword[scale] |
155 | fdiv dword[delt_sc] |
162 | fdiv dword[delt_sc] |
Line 206... | Line 213... | ||
206 | align 4 |
213 | align 4 |
207 | title1: db 'TinyGL in KolibriOS' |
214 | title1: db 'TinyGL in KolibriOS' |
208 | .end: db 0 |
215 | .end: db 0 |
209 | title2: db 'F full screen' |
216 | title2: db 'F full screen' |
210 | .end: db 0 |
217 | .end: db 0 |
211 | title3: db 'ESC - exit' |
218 | title3: db 'ESC - exit Arrow keys - rotate +/- zoom' |
212 | .end: db 0 |
219 | .end: db 0 |
213 | fps: db 'FPS:' |
220 | fps: db 'FPS:' |
214 | .end: db 0 |
221 | .end: db 0 |
Line 215... | Line 222... | ||
215 | 222 | ||
Line 220... | Line 227... | ||
220 | align 16 |
227 | align 16 |
221 | draw_3d: |
228 | draw_3d: |
222 | stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT |
229 | stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT |
Line 223... | Line 230... | ||
223 | 230 | ||
224 | stdcall [glPushMatrix] |
231 | stdcall [glPushMatrix] |
225 | ;stdcall [glScalef], [scale], [scale], [scale] |
232 | stdcall [glScalef], [scale], [scale], [scale] |
226 | stdcall [glRotatef], [view_rotx], 1.0, 0.0, 0.0 |
233 | stdcall [glRotatef], [view_rotx], 1.0, 0.0, 0.0 |
227 | stdcall [glRotatef], [view_roty], 0.0, 1.0, 0.0 |
234 | stdcall [glRotatef], [view_roty], 0.0, 1.0, 0.0 |
Line 228... | Line 235... | ||
228 | stdcall [glRotatef], [view_rotz], 0.0, 0.0, 1.0 |
235 | stdcall [glRotatef], [view_rotz], 0.0, 0.0, 1.0 |
Line 281... | Line 288... | ||
281 | ret |
288 | ret |
Line 282... | Line 289... | ||
282 | 289 | ||
283 | align 4 |
290 | align 4 |
284 | an_9 dd 9.0 |
291 | an_9 dd 9.0 |
285 | an_25 dd 25.0 |
292 | an_25 dd 25.0 |
286 | scale dd 0.14 ;??? |
293 | scale dd 1.0 ;??? |
287 | delt_sc dd 0.85 ;??? |
294 | delt_sc dd 0.85 ;??? |
Line 288... | Line 295... | ||
288 | delt_size dd 5.0 |
295 | delt_size dd 5.0 |
289 | 296 |