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 335... Line 334...
335 
angle_y dd 0.0
 334 
angle_y dd 0.0
336 
delt_size dd 3.0
 335 
delt_size dd 3.0
Line 337... Line 336...
337 
 
 336 
 
338 
;--------------------------------------------------
 337 
;--------------------------------------------------
339 
align 4
 338 
align 4
Line 340... Line 339...
340 
import_lib_tinygl:
 339 
import_tinygl:
341 
 
 340 
 
342 
macro E_LIB n
 341 
macro E_LIB n
343 
{
 342 
{
Line 459... Line 458...
459 
lib_name_0 db 'tinygl.obj',0
 458 
lib_name_0 db 'tinygl.obj',0
460 
system_dir_1 db '/sys/lib/'
 459 
system_dir_1 db '/sys/lib/'
461 
lib_name_1 db 'buf2d.obj',0
 460 
lib_name_1 db 'buf2d.obj',0
462 
system_dir_2 db '/sys/lib/'
 461 
system_dir_2 db '/sys/lib/'
463 
lib_name_2 db 'libimg.obj',0
 462 
lib_name_2 db 'libimg.obj',0
464 
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0
 - 
 
465 
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0
 - 
 
466 
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0
 - 
 
467 
head_f_i:
 - 
 
468 
head_f_l db '"System error',0
 - 
 
469 
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0
 - 
 
470 
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0
 - 
 
471 
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0
 - 
 
472 
;--------------------------------------------------
 463 
;--------------------------------------------------
Line 473... Line 464...
473 
 
 464 
 
474 
txt_scale:
 465 
txt_scale:
475 
db 'Scale: '
 466 
db 'Scale: '
Line 510... Line 501...
510 
.w: dd 0
 501 
.w: dd 0
511 
.h: dd 0,0,24 ;+16 color,bit in pixel
 502 
.h: dd 0,0,24 ;+16 color,bit in pixel
Line 512... Line 503...
512 
 
 503 
 
513 
align 4
 504 
align 4
514 
l_libs_start:
 505 
l_libs_start:
515 
	lib_0 l_libs lib_name_0, cur_dir_path, file_name,  system_dir_0,\
 - 
 
516 
		err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i
 506 
	lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl
517 
	lib_1 l_libs lib_name_1, cur_dir_path, file_name,  system_dir_1,\
 - 
 
518 
		err_msg_found_lib_1, head_f_l, import_buf2d,  err_msg_import_1,head_f_i
 507 
	lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d
519 
	lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\
 - 
 
520 
		err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i
 508 
	lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg
Line 521... Line 509...
521 
l_libs_end:
 509 
l_libs_end:
522 
 
 510 
 
523 
align 4
 511 
align 4
- 
 
 512 
i_end:
524 
i_end:
 513 
	ctx1 rb 28 ;sizeof.TinyGLContext = 28
525 
	ctx1 rb 28 ;sizeof.TinyGLContext = 28
 514 
	image_data_toolbar dd 0
526 
	dr_figure dd 0
 515 
	dr_figure dd 0
527 
	qObj dd 0
 516 
	qObj dd 0
528 
	TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.)
 517 
	TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.)
529 
	texture dd 0 ;указатель на память с текстурой
 518 
	texture dd 0 ;указатель на память с текстурой
530 
	text_w dd 0
 519 
	text_w dd 0
531 
	text_h dd 0
 520 
	text_h dd 0
532 
	run_file_70 FileInfoBlock
 521 
	run_file_70 FileInfoBlock
533 
	sc system_colors
 - 
 
534 
align 16
 - 
 
535 
	rb 4096
 522 
	sc system_colors
536 
stacktop:
 523 
align 16
- 
 
 524 
	cur_dir_path rb 4096
- 
 
 525 
	file_name rb 4096
537 
	cur_dir_path rb 4096
 526 
	rb 4096