Subversion Repositories Kolibri OS

Rev

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

Rev 7616 Rev 8083
Line 229... Line 229...
229 
	stdcall [kosglMakeCurrent], 3d_wnd_l,3d_wnd_t,3d_wnd_w,3d_wnd_h,ctx1
 229 
	stdcall [kosglMakeCurrent], 3d_wnd_l,3d_wnd_t,3d_wnd_w,3d_wnd_h,ctx1
230 
	stdcall [glEnable], GL_DEPTH_TEST
 230 
	stdcall [glEnable], GL_DEPTH_TEST
231 
	stdcall [glEnable], GL_NORMALIZE ;¤¥« ¬ ­®à¬ «¨ ®¤¨­ ª®¢®© ¢¥«¨ç¨­ë ¢® ¨§¡¥¦ ­¨¥  àâ¥ä ªâ®¢
 231 
	stdcall [glEnable], GL_NORMALIZE ;¤¥« ¬ ­®à¬ «¨ ®¤¨­ ª®¢®© ¢¥«¨ç¨­ë ¢® ¨§¡¥¦ ­¨¥  àâ¥ä ªâ®¢
232 
	stdcall [glClearColor], [color_bk+8],[color_bk+4],[color_bk],0.0
 232 
	stdcall [glClearColor], [color_bk+8],[color_bk+4],[color_bk],0.0
233 
	stdcall [glShadeModel], GL_SMOOTH
 233 
	stdcall [glShadeModel], GL_SMOOTH
234 
	stdcall [gluNewQuadric]
 234 
	call [gluNewQuadric]
235 
	mov [qObj],eax
 235 
	mov [qObj],eax
Line 236... Line 236...
236 
 
 236 
 
237 
	mov eax,dword[ctx1] ;eax -> TinyGLContext.GLContext
 237 
	mov eax,dword[ctx1] ;eax -> TinyGLContext.GLContext
238 
	mov eax,[eax] ;eax -> ZBuffer
 238 
	mov eax,[eax] ;eax -> ZBuffer
239 
	mov eax,[eax+offs_zbuf_pbuf] ;eax -> ZBuffer.pbuf
 239 
	mov eax,[eax+ZBuffer.pbuf]
Line 240... Line 240...
240 
	mov dword[buf_ogl],eax
 240 
	mov dword[buf_ogl],eax
241 
 
 241 
 
242 
	;open file from cmd line
 242 
	;open file from cmd line
Line 1390... Line 1390...
1390 
 
 1390 
 
1391 
align 4
 1391 
align 4
Line 1392... Line 1392...
1392 
w_scr_t1 scrollbar 16,0, 3,0, 15, 100, 0,0, 0,0,0, 1
 1392 
w_scr_t1 scrollbar 16,0, 3,0, 15, 100, 0,0, 0,0,0, 1
1393 
 
 - 
 
1394 
align 4
 - 
 
1395 
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext
 - 
 
1396 
;sizeof.TinyGLContext = 28
 1393 
 
Line 1397... Line 1394...
1397 
 
 1394 
align 4
1398 
qObj dd 0
 1395 
qObj dd 0
1399 
 
 1396 
 
Line 1405... Line 1402...
1405 
mat_shininess dd 3.0 ;  §¬¥à ¡«¨ª  (®¡à â­ ï ¯à®¯®àæ¨ï)
 1402 
mat_shininess dd 3.0 ;  §¬¥à ¡«¨ª  (®¡à â­ ï ¯à®¯®àæ¨ï)
1406 
white_light dd 0.8, 0.8, 0.8, 1.0 ; –¢¥â ¨ ¨­â¥­á¨¢­®áâì ®á¢¥é¥­¨ï, £¥­¥à¨à㥬®£® ¨áâ®ç­¨ª®¬
 1403 
white_light dd 0.8, 0.8, 0.8, 1.0 ; –¢¥â ¨ ¨­â¥­á¨¢­®áâì ®á¢¥é¥­¨ï, £¥­¥à¨à㥬®£® ¨áâ®ç­¨ª®¬
1407 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
 1404 
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
Line 1408... Line 1405...
1408 
 
 1405 
 
1409 
if lang eq ru
 1406 
if lang eq ru
1410 
capt db 'info 3ds ¢¥àá¨ï 23.03.19',0 ;¯®¤¯¨áì ®ª­ 
 1407 
capt db 'info 3ds ¢¥àá¨ï 29.09.20',0 ;¯®¤¯¨áì ®ª­ 
1411 
else
 1408 
else
1412 
capt db 'info 3ds version 23.03.19',0 ;window caption
 1409 
capt db 'info 3ds version 29.09.20',0 ;window caption
Line 1413... Line 1410...
1413 
end if
 1410 
end if
1414 
 
 1411 
 
- 
 
 1412 
align 16
1415 
align 16
 1413 
i_end:
1416 
i_end:
 1414 
	ctx1 rb 28 ;sizeof.TinyGLContext = 28
1417 
	procinfo process_information
 1415 
	procinfo process_information
1418 
	run_file_70 FileInfoBlock
 1416 
	run_file_70 FileInfoBlock
1419 
	sc system_colors
 1417 
	sc system_colors