/programs/develop/libraries/TinyGL/asm_fork/examples/gears.asm |
---|
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
include 'fps.inc' |
18,8 → 18,7 |
dia dword[esp-4*(c_param*(c_funct-funct)+(1+c_param-param))] |
} |
;Так как некоторые извращенческие функции OpenGL воспринимают только параметры |
;типа double (8 байт) то придется пихать их в стек макросом glpush |
;Макрос для параметров типа double (8 байт) |
macro glpush GLDoubleVar { |
push dword[GLDoubleVar+4] |
push dword[GLDoubleVar] |
27,8 → 26,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
903,7 → 901,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
920,11 → 918,6 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
;-------------------------------------------------- |
align 16 |
932,10 → 925,8 |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
procinfo process_information |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test0.asm |
---|
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
14,8 → 14,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_lib_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
154,21 → 153,14 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
ctx1 rb 28 ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 1024 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test1.asm |
---|
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
14,8 → 14,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_lib_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
154,21 → 153,14 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
ctx1 rb 28 ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 1024 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test2.asm |
---|
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
14,8 → 14,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_lib_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
163,21 → 162,14 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
ctx1 rb 28 ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 1024 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test3.asm |
---|
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
14,8 → 14,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_lib_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
155,21 → 154,14 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
ctx1 rb 28 ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 1024 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test_array0.asm |
---|
1,16 → 1,13 |
use32 |
org 0x0 |
org 0 |
db 'MENUET01' |
dd 0x1 |
dd start |
dd i_end |
dd mem,stacktop |
dd 0,cur_dir_path |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
include '../../../../../../programs/proc32.inc' |
include '../../../../../../programs/macros.inc' |
include '../../../../../../programs/develop/libraries/box_lib/load_lib.mac' |
include '../../../../../../programs/dll.inc' |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
@use_library |
17,12 → 14,11 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_tinygl |
cmp eax,-1 |
jz button.exit |
mcall 40,0x27 |
mcall SF_SET_EVENTS_MASK,0x27 |
stdcall [kosglMakeCurrent], 10,10,400,350,ctx1 |
stdcall [glEnable], GL_DEPTH_TEST |
37,7 → 33,7 |
align 4 |
still: |
mcall 10 |
mcall SF_WAIT_EVENT |
cmp al,1 |
jz red_win |
cmp al,2 |
49,19 → 45,18 |
align 4 |
draw_window: |
pushad |
mcall 12,1 |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mov edx,0x33ffffff ;0x73ffffff |
mcall 0,(50 shl 16)+430,(30 shl 16)+400,,,caption |
stdcall [kosglSwapBuffers] |
mcall SF_CREATE_WINDOW,(50 shl 16)+430,(30 shl 16)+400,0x33ffffff,,caption |
call [kosglSwapBuffers] |
mcall 12,2 |
mcall SF_REDRAW,SSF_END_DRAW |
popad |
ret |
align 4 |
key: |
mcall 2 |
mcall SF_GET_KEY |
cmp ah,27 ;Esc |
je button.exit |
72,7 → 67,7 |
fadd dword[delt_sc] |
fstp dword[scale] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,45 ;- |
jne @f |
80,7 → 75,7 |
fsub dword[delt_sc] |
fstp dword[scale] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,178 ;Up |
jne @f |
88,7 → 83,7 |
fadd dword[delt_size] |
fstp dword[angle_y] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,177 ;Down |
jne @f |
96,7 → 91,7 |
fsub dword[delt_size] |
fstp dword[angle_y] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,176 ;Left |
jne @f |
104,7 → 99,7 |
fadd dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,179 ;Right |
jne @f |
112,7 → 107,7 |
fsub dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
jmp still |
119,23 → 114,20 |
align 4 |
button: |
mcall 17 |
mcall SF_GET_BUTTON |
cmp ah,1 |
jne still |
.exit: |
mcall -1 |
mcall SF_TERMINATE_PROCESS |
align 4 |
caption db 'Test opengl 1.1 arrays, [Esc] - exit, [<-],[->],[Up],[Down] - rotate',0 |
align 4 |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
align 4 |
draw_3d: |
stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT ;очистим буфер цвета и глубины |
stdcall [glPushMatrix] |
call [glPushMatrix] |
;масштаб и повороты |
stdcall [glTranslatef], 0.0,0.0,0.5 |
152,7 → 144,7 |
stdcall [glDisableClientState], GL_COLOR_ARRAY ;отключаем режим рисования цветов |
stdcall [glDisableClientState], GL_VERTEX_ARRAY ;отключаем режим рисования вершин |
stdcall [glPopMatrix] |
call [glPopMatrix] |
ret |
align 4 |
168,7 → 160,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
185,17 → 177,13 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
err_message_found_lib db 'Sorry I cannot load library tinygl.obj',0 |
head_f_i: |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library tinygl.obj',0 |
;-------------------------------------------------- |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test_array1.asm |
---|
1,5 → 1,5 |
use32 |
org 0x0 |
org 0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
14,8 → 14,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
62,9 → 61,8 |
pushad |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mov edx,0x33ffffff |
mcall SF_CREATE_WINDOW,(50 shl 16)+430,(30 shl 16)+400,,,caption |
stdcall [kosglSwapBuffers] |
mcall SF_CREATE_WINDOW,(50 shl 16)+430,(30 shl 16)+400,0x33ffffff,,caption |
call [kosglSwapBuffers] |
mcall SF_REDRAW,SSF_END_DRAW |
popad |
83,7 → 81,7 |
fadd dword[delt_sc] |
fstp dword[scale] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,45 ;- |
jne @f |
91,7 → 89,7 |
fsub dword[delt_sc] |
fstp dword[scale] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,178 ;Up |
jne @f |
99,7 → 97,7 |
fadd dword[delt_size] |
fstp dword[angle_y] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,177 ;Down |
jne @f |
107,7 → 105,7 |
fsub dword[delt_size] |
fstp dword[angle_y] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,176 ;Left |
jne @f |
115,7 → 113,7 |
fadd dword[delt_size] |
fstp dword[angle_x] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
cmp ah,179 ;Right |
jne @f |
123,7 → 121,7 |
fsub dword[delt_size] |
fstp dword[angle_x] |
call draw_3d |
stdcall [kosglSwapBuffers] |
call [kosglSwapBuffers] |
@@: |
jmp still |
139,14 → 137,11 |
align 4 |
caption db 'Test opengl 1.1 arrays, [Esc] - exit, [<-],[->],[Up],[Down] - rotate',0 |
align 4 |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
align 4 |
draw_3d: |
stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT ;очистим буфер цвета и глубины |
stdcall [glPushMatrix] |
call [glPushMatrix] |
;масштаб и повороты |
stdcall [glTranslatef], 0.0,0.0,0.5 |
155,7 → 150,7 |
stdcall [glRotatef], [angle_y],0.0,1.0,0.0 |
stdcall [glRotatef], [angle_x],1.0,0.0,0.0 |
;рисование через тндексный массив |
;рисование через индексный массив |
mov eax,house_3ds ;начало внедренного файла 3ds |
add eax,0xeb ;смещение по которому идут координаты вершин (получено с использованием программы info_3ds) |
stdcall [glVertexPointer], 3, GL_FLOAT, 0, eax ;задаем массив для вершин, 3 - число координат для одной вершины |
163,7 → 158,7 |
stdcall [glDrawElements], GL_TRIANGLES, 0x1a6*3, GL_UNSIGNED_SHORT, Indices ;mode, count, type, *indices |
stdcall [glDisableClientState], GL_VERTEX_ARRAY ;отключаем режим рисования вершин |
stdcall [glPopMatrix] |
call [glPopMatrix] |
ret |
align 4 |
199,17 → 194,13 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,0 |
head_f_i: |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,0 |
;-------------------------------------------------- |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test_glu0.asm |
---|
6,7 → 6,7 |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../load_lib.mac' |
include '../../../../../dll.inc' |
include '../opengl_const.inc' |
14,8 → 14,7 |
align 4 |
start: |
load_library name_tgl, cur_dir_path, library_path, system_path, \ |
err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
load_library name_tgl, library_path, system_path, import_tinygl |
cmp eax,SF_TERMINATE_PROCESS |
jz button.exit |
23,7 → 22,7 |
stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
stdcall [glEnable], GL_DEPTH_TEST |
stdcall [gluNewQuadric] |
call [gluNewQuadric] |
mov [qObj],eax |
stdcall [glClearColor], 0.5,0.5,0.5,0.0 |
170,7 → 169,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
187,21 → 186,13 |
;-------------------------------------------------- |
system_path db '/sys/lib/' |
name_tgl db 'tinygl.obj',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
cur_dir_path rb 4096 |
library_path rb 4096 |
rb 2048 |
stacktop: |
cur_dir_path: |
rb 4096 |
library_path: |
rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test_glu1.asm |
---|
7,14 → 7,13 |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../load_img.inc' |
include '../../../../../load_lib.mac' |
include '../opengl_const.inc' |
include '../zbuffer.inc' |
include '../../../../../develop/info3ds/info_fun_float.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
align 4 |
image_data_toolbar dd 0 |
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3 |
;Макрос для параметров типа double (8 байт) |
366,7 → 365,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
490,14 → 489,6 |
lib_name_1 db 'buf2d.obj',0 |
system_dir_2 db '/sys/lib/' |
lib_name_2 db 'libimg.obj',0 |
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0 |
;-------------------------------------------------- |
txt_scale: |
535,23 → 526,21 |
align 4 |
l_libs_start: |
lib_0 l_libs lib_name_0, cur_dir_path, file_name, system_dir_0,\ |
err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i |
lib_1 l_libs lib_name_1, cur_dir_path, file_name, system_dir_1,\ |
err_msg_found_lib_1, head_f_l, import_buf2d, err_msg_import_1,head_f_i |
lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\ |
err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i |
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl |
lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d |
lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg |
l_libs_end: |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
image_data_toolbar dd 0 |
qObj dd 0 |
run_file_70 FileInfoBlock |
sc system_colors |
align 16 |
cur_dir_path rb 4096 |
file_name rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path rb 4096 |
file_name rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test_glu2.asm |
---|
7,14 → 7,13 |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../load_img.inc' |
include '../../../../../load_lib.mac' |
include '../opengl_const.inc' |
include '../zbuffer.inc' |
include '../../../../../develop/info3ds/info_fun_float.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
align 4 |
image_data_toolbar dd 0 |
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3 |
;Макрос для параметров типа double (8 байт) |
357,7 → 356,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
481,14 → 480,6 |
lib_name_1 db 'buf2d.obj',0 |
system_dir_2 db '/sys/lib/' |
lib_name_2 db 'libimg.obj',0 |
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0 |
;-------------------------------------------------- |
txt_scale: |
526,23 → 517,21 |
align 4 |
l_libs_start: |
lib_0 l_libs lib_name_0, cur_dir_path, file_name, system_dir_0,\ |
err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i |
lib_1 l_libs lib_name_1, cur_dir_path, file_name, system_dir_1,\ |
err_msg_found_lib_1, head_f_l, import_buf2d, err_msg_import_1,head_f_i |
lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\ |
err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i |
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl |
lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d |
lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg |
l_libs_end: |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
image_data_toolbar dd 0 |
qObj dd 0 |
run_file_70 FileInfoBlock |
sc system_colors |
align 16 |
cur_dir_path rb 4096 |
file_name rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path rb 4096 |
file_name rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/textures0.asm |
---|
7,11 → 7,12 |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../load_img.inc' |
include '../../../../../load_lib.mac' |
include '../opengl_const.inc' |
include '../zbuffer.inc' |
include '../../../../../develop/info3ds/info_fun_float.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
;Макрос для параметров типа double (8 байт) |
macro glpush GLDoubleVar { |
19,8 → 20,6 |
push dword[GLDoubleVar] |
} |
align 4 |
image_data_toolbar dd 0 |
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3 |
align 4 |
407,7 → 406,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
531,14 → 530,6 |
lib_name_1 db 'buf2d.obj',0 |
system_dir_2 db '/sys/lib/' |
lib_name_2 db 'libimg.obj',0 |
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0 |
;-------------------------------------------------- |
txt_scale: |
576,17 → 567,15 |
align 4 |
l_libs_start: |
lib_0 l_libs lib_name_0, cur_dir_path, file_name, system_dir_0,\ |
err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i |
lib_1 l_libs lib_name_1, cur_dir_path, file_name, system_dir_1,\ |
err_msg_found_lib_1, head_f_l, import_buf2d, err_msg_import_1,head_f_i |
lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\ |
err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i |
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl |
lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d |
lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg |
l_libs_end: |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
image_data_toolbar dd 0 |
dr_figure dd 0 |
qObj dd 0 |
TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.) |
596,8 → 585,8 |
run_file_70 FileInfoBlock |
sc system_colors |
align 16 |
cur_dir_path rb 4096 |
file_name rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path rb 4096 |
file_name rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/textures1.asm |
---|
7,11 → 7,12 |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../load_img.inc' |
include '../../../../../load_lib.mac' |
include '../opengl_const.inc' |
include '../zbuffer.inc' |
include '../../../../../develop/info3ds/info_fun_float.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
;Макрос для параметров типа double (8 байт) |
macro glpush GLDoubleVar { |
19,8 → 20,6 |
push dword[GLDoubleVar] |
} |
align 4 |
image_data_toolbar dd 0 |
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3 |
align 4 |
337,7 → 336,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
461,14 → 460,6 |
lib_name_1 db 'buf2d.obj',0 |
system_dir_2 db '/sys/lib/' |
lib_name_2 db 'libimg.obj',0 |
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0 |
;-------------------------------------------------- |
txt_scale: |
512,17 → 503,15 |
align 4 |
l_libs_start: |
lib_0 l_libs lib_name_0, cur_dir_path, file_name, system_dir_0,\ |
err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i |
lib_1 l_libs lib_name_1, cur_dir_path, file_name, system_dir_1,\ |
err_msg_found_lib_1, head_f_l, import_buf2d, err_msg_import_1,head_f_i |
lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\ |
err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i |
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl |
lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d |
lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg |
l_libs_end: |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
image_data_toolbar dd 0 |
dr_figure dd 0 |
qObj dd 0 |
TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.) |
532,8 → 521,8 |
run_file_70 FileInfoBlock |
sc system_colors |
align 16 |
cur_dir_path rb 4096 |
file_name rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path rb 4096 |
file_name rb 4096 |
mem: |
/programs/develop/libraries/TinyGL/asm_fork/examples/textures2.asm |
---|
7,11 → 7,12 |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../load_img.inc' |
include '../../../../../load_lib.mac' |
include '../opengl_const.inc' |
include '../zbuffer.inc' |
include '../../../../../develop/info3ds/info_fun_float.inc' |
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
@use_library mem.Alloc,mem.Free,mem.ReAlloc,dll.Load |
;Макрос для параметров типа double (8 байт) |
macro glpush GLDoubleVar { |
19,8 → 20,6 |
push dword[GLDoubleVar] |
} |
align 4 |
image_data_toolbar dd 0 |
IMAGE_TOOLBAR_ICON_SIZE equ 21*21*3 |
align 4 |
294,7 → 293,7 |
;-------------------------------------------------- |
align 4 |
import_lib_tinygl: |
import_tinygl: |
macro E_LIB n |
{ |
418,14 → 417,6 |
lib_name_1 db 'buf2d.obj',0 |
system_dir_2 db '/sys/lib/' |
lib_name_2 db 'libimg.obj',0 |
err_msg_found_lib_0 db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_found_lib_1 db 'Sorry I cannot load library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_found_lib_2 db 'Sorry I cannot load library ',39,'libimg.obj',39,'" -tE',0 |
head_f_i: |
head_f_l db '"System error',0 |
err_msg_import_0 db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
err_msg_import_1 db 'Error on load import library ',39,'buf2d.obj',39,'" -tE',0 |
err_msg_import_2 db 'Error on load import library ',39,'libimg.obj',39,'" -tE',0 |
;-------------------------------------------------- |
txt_scale: |
469,17 → 460,15 |
align 4 |
l_libs_start: |
lib_0 l_libs lib_name_0, cur_dir_path, file_name, system_dir_0,\ |
err_msg_found_lib_0, head_f_l, import_lib_tinygl,err_msg_import_0,head_f_i |
lib_1 l_libs lib_name_1, cur_dir_path, file_name, system_dir_1,\ |
err_msg_found_lib_1, head_f_l, import_buf2d, err_msg_import_1,head_f_i |
lib_2 l_libs lib_name_2, cur_dir_path, file_name, system_dir_2,\ |
err_msg_found_lib_2, head_f_l, import_libimg, err_msg_import_2, head_f_i |
lib_0 l_libs lib_name_0, file_name, system_dir_0, import_tinygl |
lib_1 l_libs lib_name_1, file_name, system_dir_1, import_buf2d |
lib_2 l_libs lib_name_2, file_name, system_dir_2, import_libimg |
l_libs_end: |
align 4 |
i_end: |
ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
image_data_toolbar dd 0 |
qObj dd 0 |
TexObj dd 0 ;массив указателей на текстуры (в данном случае 1 шт.) |
texture dd 0 ;указатель на память с текстурой |
488,8 → 477,8 |
run_file_70 FileInfoBlock |
sc system_colors |
align 16 |
cur_dir_path rb 4096 |
file_name rb 4096 |
rb 4096 |
stacktop: |
cur_dir_path rb 4096 |
file_name rb 4096 |
mem: |