Subversion Repositories Kolibri OS

Rev

Rev 8174 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8174 Rev 8408
Line 5... Line 5...
5 
 
 5 
 
6 
include '../../../../../proc32.inc'
 6 
include '../../../../../proc32.inc'
7 
include '../../../../../macros.inc'
 7 
include '../../../../../macros.inc'
8 
include '../../../../../KOSfuncs.inc'
 8 
include '../../../../../KOSfuncs.inc'
- 
 
 9 
include '../../../../../load_img.inc'
9 
include '../../../../../load_img.inc'
 10 
include '../../../../../load_lib.mac'
10 
include '../opengl_const.inc'
 11 
include '../opengl_const.inc'
11 
include '../zbuffer.inc'
 12 
include '../zbuffer.inc'
Line 12... Line 13...
12 
include '../../../../../develop/info3ds/info_fun_float.inc'
 13 
include '../../../../../develop/info3ds/info_fun_float.inc'
Line 13... Line 14...
13 
 
 14 
 
14 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
 15 
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
15 
 
 16 
 
16 
;Макрос для параметров типа double (8 байт)
 17 
;Макрос для параметров типа double (8 байт)
17 
macro glpush GLDoubleVar {
 18 
macro glpush GLDoubleVar {
Line 18... Line -...
18 
	push dword[GLDoubleVar+4]
 - 
 
19 
	push dword[GLDoubleVar]
 - 
 
20 
}
 19 
	push dword[GLDoubleVar+4]
Line 21... Line 20...
21 
 
 20 
	push dword[GLDoubleVar]
22 
align 4
 21 
}
23 
image_data_toolbar dd 0
 22 
 
Line 292... Line 291...
292 
angle_y dd 0.0
 291 
angle_y dd 0.0
293 
delt_size dd 3.0
 292 
delt_size dd 3.0
Line 294... Line 293...
294 
 
 293 
 
295 
;--------------------------------------------------
 294 
;--------------------------------------------------
296 
align 4
 295 
align 4
Line 297... Line 296...
297 
import_lib_tinygl:
 296 
import_tinygl:
298 
 
 297 
 
299 
macro E_LIB n
 298 
macro E_LIB n
300 
{
 299 
{
Line 416... Line 415...
416 
lib_name_0 db 'tinygl.obj',0
 415 
lib_name_0 db 'tinygl.obj',0
417 
system_dir_1 db '/sys/lib/'
 416 
system_dir_1 db '/sys/lib/'
418 
lib_name_1 db 'buf2d.obj',0
 417 
lib_name_1 db 'buf2d.obj',0
419 
system_dir_2 db '/sys/lib/'
 418 
system_dir_2 db '/sys/lib/'
420 
lib_name_2 db 'libimg.obj',0
 419 
lib_name_2 db 'libimg.obj',0
421 
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0
 - 
 
422 
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0
 - 
 
423 
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0
 - 
 
424 
head_f_i:
 - 
 
425 
head_f_l db '"System error',0
 - 
 
426 
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0
 - 
 
427 
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0
 - 
 
428 
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0
 - 
 
429 
;--------------------------------------------------
 420 
;--------------------------------------------------
Line 430... Line 421...
430 
 
 421 
 
431 
txt_scale:
 422 
txt_scale:
432 
db 'Scale: '
 423 
db 'Scale: '
Line 467... Line 458...
467 
.w: dd 0
 458 
.w: dd 0
468 
.h: dd 0,0,24 ;+16 color,bit in pixel
 459 
.h: dd 0,0,24 ;+16 color,bit in pixel
Line 469... Line 460...
469 
 
 460 
 
470 
align 4
 461 
align 4
471 
l_libs_start:
 462 
l_libs_start:
472 
	lib_0 l_libs lib_name_0, cur_dir_path, file_name,  system_dir_0,\
 - 
 
473 
		err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i
 463 
	lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl
474 
	lib_1 l_libs lib_name_1, cur_dir_path, file_name,  system_dir_1,\
 - 
 
475 
		err_msg_found_lib_1, head_f_l, import_buf2d,  err_msg_import_1,head_f_i
 464 
	lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d
476 
	lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\
 - 
 
477 
		err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i
 465 
	lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg
Line 478... Line 466...
478 
l_libs_end:
 466 
l_libs_end:
479 
 
 467 
 
480 
align 4
 468 
align 4
- 
 
 469 
i_end:
481 
i_end:
 470 
	ctx1 rb 28 ;sizeof.TinyGLContext = 28
482 
	ctx1 rb 28 ;sizeof.TinyGLContext = 28
 471 
	image_data_toolbar dd 0
483 
	qObj dd 0
 472 
	qObj dd 0
484 
	TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.)
 473 
	TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.)
485 
	texture dd 0 ;указатель на память с текстурой
 474 
	texture dd 0 ;указатель на память с текстурой
486 
	text_w dd 0
 475 
	text_w dd 0
487 
	text_h dd 0
 476 
	text_h dd 0
488 
	run_file_70 FileInfoBlock
 477 
	run_file_70 FileInfoBlock
489 
	sc system_colors
 - 
 
490 
align 16
 - 
 
491 
	rb 4096
 478 
	sc system_colors
492 
stacktop:
 479 
align 16
- 
 
 480 
	cur_dir_path rb 4096
- 
 
 481 
	file_name rb 4096
493 
	cur_dir_path rb 4096
 482 
	rb 4096