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 |