/programs/develop/libraries/TinyGL/asm_fork/api.asm |
---|
563,31 → 563,6 |
ret |
endp |
align 4 |
proc glOrtho uses eax, left:qword, right:qword, bottom:qword, top:qword,\ |
near:qword, farv:qword |
locals |
p rd 7 |
endl |
mov dword[p],OP_Ortho |
fld qword[left] |
fstp dword[p+4] |
fld qword[right] |
fstp dword[p+8] |
fld qword[bottom] |
fstp dword[p+12] |
fld qword[top] |
fstp dword[p+16] |
fld qword[near] |
fstp dword[p+20] |
fld qword[farv] |
fstp dword[p+24] |
lea eax,[ebp-28] ;=sizeof(dd)*7 |
stdcall gl_add_op,eax |
ret |
endp |
; lightening |
align 4 |
/programs/develop/libraries/TinyGL/asm_fork/examples/test3.asm |
---|
1,13 → 1,16 |
use32 |
org 0 |
org 0x0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
dd 0x1 |
dd start |
dd i_end |
dd mem,stacktop |
dd 0,cur_dir_path |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../dll.inc' |
include '../../../../../../programs/proc32.inc' |
include '../../../../../../programs/macros.inc' |
include '../../../../../../programs/develop/libraries/box_lib/load_lib.mac' |
include '../../../../../../programs/dll.inc' |
include '../opengl_const.inc' |
@use_library |
16,10 → 19,10 |
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 |
cmp eax,SF_TERMINATE_PROCESS |
cmp eax,-1 |
jz button.exit |
mcall SF_SET_EVENTS_MASK,0x27 |
mcall 40,0x27 |
stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
;stdcall [glEnable], GL_DEPTH_TEST |
32,9 → 35,9 |
red_win: |
call draw_window |
align 16 |
align 4 |
still: |
mcall SF_CHECK_EVENT |
mcall 10 |
cmp al,1 |
jz red_win |
cmp al,2 |
46,19 → 49,19 |
align 4 |
draw_window: |
pushad |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mcall 12,1 |
mov edx,0x33ffffff ;0x73ffffff |
mcall SF_CREATE_WINDOW,(50 shl 16)+330,(30 shl 16)+275,,,caption |
call [kosglSwapBuffers] |
mcall 0,(50 shl 16)+330,(30 shl 16)+275,,,caption |
stdcall [kosglSwapBuffers] |
mcall SF_REDRAW,SSF_END_DRAW |
mcall 12,2 |
popad |
ret |
align 4 |
key: |
mcall SF_GET_KEY |
mcall 2 |
cmp ah,27 ;Esc |
je button.exit |
71,7 → 74,7 |
fadd dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
cmp ah,179 ;Right |
jne @f |
79,7 → 82,7 |
fsub dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
jmp still |
86,21 → 89,24 |
align 4 |
button: |
mcall SF_GET_BUTTON |
mcall 17 |
cmp ah,1 |
jne still |
.exit: |
mcall SF_TERMINATE_PROCESS |
mcall -1 |
align 4 |
caption db 'Test tinygl library, [Esc] - exit, [<-] and [->] - 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 ;очистим буфер цвета и глубины |
call [glPushMatrix] |
stdcall [glPushMatrix] |
stdcall [glRotatef], [angle_z],0.0,0.0,1.0 |
stdcall [glBegin],GL_TRIANGLES |
153,17 → 159,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 ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library tinygl.obj',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
rb 1024 |
stacktop: |
cur_dir_path: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test2.asm |
---|
1,13 → 1,16 |
use32 |
org 0 |
org 0x0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
dd 0x1 |
dd start |
dd i_end |
dd mem,stacktop |
dd 0,cur_dir_path |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../dll.inc' |
include '../../../../../../programs/proc32.inc' |
include '../../../../../../programs/macros.inc' |
include '../../../../../../programs/develop/libraries/box_lib/load_lib.mac' |
include '../../../../../../programs/dll.inc' |
include '../opengl_const.inc' |
@use_library |
16,10 → 19,10 |
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 |
cmp eax,SF_TERMINATE_PROCESS |
cmp eax,-1 |
jz button.exit |
mcall SF_SET_EVENTS_MASK,0x27 |
mcall 40,0x27 |
stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
stdcall [glEnable], GL_DEPTH_TEST |
60,9 → 63,9 |
red_win: |
call draw_window |
align 16 |
align 4 |
still: |
mcall SF_CHECK_EVENT |
mcall 10 |
cmp al,1 |
jz red_win |
cmp al,2 |
74,19 → 77,19 |
align 4 |
draw_window: |
pushad |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mcall 12,1 |
mov edx,0x33ffffff ;0x73ffffff |
mcall SF_CREATE_WINDOW,(50 shl 16)+330,(30 shl 16)+275,,,caption |
call [kosglSwapBuffers] |
mcall 0,(50 shl 16)+330,(30 shl 16)+275,,,caption |
stdcall [kosglSwapBuffers] |
mcall SF_REDRAW,SSF_END_DRAW |
mcall 12,2 |
popad |
ret |
align 4 |
key: |
mcall SF_GET_KEY |
mcall 2 |
cmp ah,27 ;Esc |
je button.exit |
99,7 → 102,7 |
fadd dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
cmp ah,179 ;Right |
jne @f |
107,7 → 110,7 |
fsub dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
jmp still |
114,21 → 117,24 |
align 4 |
button: |
mcall SF_GET_BUTTON |
mcall 17 |
cmp ah,1 |
jne still |
.exit: |
mcall SF_TERMINATE_PROCESS |
mcall -1 |
align 4 |
caption db 'Test tinygl library, [Esc] - exit, [<-] and [->] - 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 ;очистим буфер цвета и глубины |
call [glPushMatrix] |
stdcall [glPushMatrix] |
stdcall [glRotatef], [angle_z],0.0,0.0,1.0 |
stdcall [glScalef], 0.3,0.3,0.3 |
161,17 → 167,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 ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library tinygl.obj',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
rb 1024 |
stacktop: |
cur_dir_path: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test0.asm |
---|
1,13 → 1,16 |
use32 |
org 0 |
org 0x0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
dd 0x1 |
dd start |
dd i_end |
dd mem,stacktop |
dd 0,cur_dir_path |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../dll.inc' |
include '../../../../../../programs/proc32.inc' |
include '../../../../../../programs/macros.inc' |
include '../../../../../../programs/develop/libraries/box_lib/load_lib.mac' |
include '../../../../../../programs/dll.inc' |
include '../opengl_const.inc' |
@use_library |
16,10 → 19,10 |
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 |
cmp eax,SF_TERMINATE_PROCESS |
cmp eax,-1 |
jz button.exit |
mcall SF_SET_EVENTS_MASK,0x27 |
mcall 40,0x27 |
stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
stdcall [glEnable], GL_DEPTH_TEST |
31,9 → 34,9 |
red_win: |
call draw_window |
align 16 |
align 4 |
still: |
mcall SF_CHECK_EVENT |
mcall 10 |
cmp al,1 |
jz red_win |
cmp al,2 |
45,19 → 48,19 |
align 4 |
draw_window: |
pushad |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mcall 12,1 |
mov edx,0x33ffffff ;0x73ffffff |
mcall SF_CREATE_WINDOW,(50 shl 16)+330,(30 shl 16)+275,,,caption |
call [kosglSwapBuffers] |
mcall 0,(50 shl 16)+330,(30 shl 16)+275,,,caption |
stdcall [kosglSwapBuffers] |
mcall SF_REDRAW,SSF_END_DRAW |
mcall 12,2 |
popad |
ret |
align 4 |
key: |
mcall SF_GET_KEY |
mcall 2 |
cmp ah,27 ;Esc |
je button.exit |
70,7 → 73,7 |
fadd dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
cmp ah,179 ;Right |
jne @f |
78,7 → 81,7 |
fsub dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
jmp still |
85,21 → 88,24 |
align 4 |
button: |
mcall SF_GET_BUTTON |
mcall 17 |
cmp ah,1 |
jne still |
.exit: |
mcall SF_TERMINATE_PROCESS |
mcall -1 |
align 4 |
caption db 'Test tinygl library, [Esc] - exit, [<-] and [->] - 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 ;очистим буфер цвета и глубины |
call [glPushMatrix] |
stdcall [glPushMatrix] |
stdcall [glRotatef], [angle_z],0.0,0.0,1.0 |
stdcall [glColor3f],1.0, 0.0, 0.0 |
112,7 → 118,7 |
stdcall [glVertex3f], -0.354,-0.354, 0.1 |
stdcall [glVertex3f], -0.5, 0.0, 0.1 |
stdcall [glVertex3f], -0.354, 0.354, 0.1 |
call [glEnd] |
stdcall [glEnd] |
stdcall [glBegin],GL_LINES |
stdcall [glVertex3f], 0, 0.7, 0.3 |
125,9 → 131,9 |
stdcall [glVertex3f], -0.7, 0.0, 0.3 |
stdcall [glColor3f],1.0, 0.0, 0.0 |
stdcall [glVertex3f], -0.495, 0.495, 0.7 |
call [glEnd] |
stdcall [glEnd] |
call [glPopMatrix] |
stdcall [glPopMatrix] |
ret |
angle_z dd 0.0 |
152,17 → 158,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 ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library tinygl.obj',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
rb 1024 |
stacktop: |
cur_dir_path: |
/programs/develop/libraries/TinyGL/asm_fork/examples/test1.asm |
---|
1,13 → 1,16 |
use32 |
org 0 |
org 0x0 |
db 'MENUET01' |
dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
dd 0x1 |
dd start |
dd i_end |
dd mem,stacktop |
dd 0,cur_dir_path |
include '../../../../../proc32.inc' |
include '../../../../../macros.inc' |
include '../../../../../KOSfuncs.inc' |
include '../../../../../develop/libraries/box_lib/load_lib.mac' |
include '../../../../../dll.inc' |
include '../../../../../../programs/proc32.inc' |
include '../../../../../../programs/macros.inc' |
include '../../../../../../programs/develop/libraries/box_lib/load_lib.mac' |
include '../../../../../../programs/dll.inc' |
include '../opengl_const.inc' |
@use_library |
16,10 → 19,10 |
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 |
cmp eax,SF_TERMINATE_PROCESS |
cmp eax,-1 |
jz button.exit |
mcall SF_SET_EVENTS_MASK,0x27 |
mcall 40,0x27 |
stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
stdcall [glEnable], GL_DEPTH_TEST |
30,9 → 33,9 |
red_win: |
call draw_window |
align 16 |
align 4 |
still: |
mcall SF_CHECK_EVENT |
mcall 10 |
cmp al,1 |
jz red_win |
cmp al,2 |
44,19 → 47,19 |
align 4 |
draw_window: |
pushad |
mcall SF_REDRAW,SSF_BEGIN_DRAW |
mcall 12,1 |
mov edx,0x33ffffff ;0x73ffffff |
mcall SF_CREATE_WINDOW,(50 shl 16)+330,(30 shl 16)+275,,,caption |
call [kosglSwapBuffers] |
mcall 0,(50 shl 16)+330,(30 shl 16)+275,,,caption |
stdcall [kosglSwapBuffers] |
mcall SF_REDRAW,SSF_END_DRAW |
mcall 12,2 |
popad |
ret |
align 4 |
key: |
mcall SF_GET_KEY |
mcall 2 |
cmp ah,27 ;Esc |
je button.exit |
69,7 → 72,7 |
fadd dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
cmp ah,179 ;Right |
jne @f |
77,7 → 80,7 |
fsub dword[delt_size] |
fstp dword[angle_z] |
call draw_3d |
call [kosglSwapBuffers] |
stdcall [kosglSwapBuffers] |
@@: |
jmp still |
84,21 → 87,24 |
align 4 |
button: |
mcall SF_GET_BUTTON |
mcall 17 |
cmp ah,1 |
jne still |
.exit: |
mcall SF_TERMINATE_PROCESS |
mcall -1 |
align 4 |
caption db 'Test tinygl library, [Esc] - exit, [<-] and [->] - 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 ;очистим буфер цвета и глубины |
call [glPushMatrix] |
stdcall [glPushMatrix] |
stdcall [glRotatef], [angle_z],0.0,0.0,1.0 |
stdcall [glScalef], 0.3,0.3,0.3 |
127,7 → 133,7 |
stdcall [glVertex3f], -0.778, 0.778, 0.1 |
stdcall [glEnd] |
call [glPopMatrix] |
stdcall [glPopMatrix] |
ret |
angle_z dd 0.0 |
152,17 → 158,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 ',39,'tinygl.obj',39,'" -tE',0 |
err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
head_f_l db 'System error',0 |
err_message_import db 'Error on load import library tinygl.obj',0 |
;-------------------------------------------------- |
align 16 |
i_end: |
ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
;sizeof.TinyGLContext = 28 |
rb 1024 |
stacktop: |
cur_dir_path: |
/programs/develop/libraries/TinyGL/asm_fork/export.inc |
---|
141,7 → 141,7 |
;E_LIB glDepthFunc(int) |
;E_LIB glBlendFunc(int, int) |
;E_LIB glTexEnvf(int, int, int) |
E_LIB glOrtho ;(float, float, float, float, float, float) |
;E_LIB glOrtho(float, float, float, float, float, float) |
;E_LIB glVertex2i(int, int) |
;E_LIB glDepthMask(int) |
;E_LIB glFogi(int, int) |
/programs/develop/libraries/TinyGL/asm_fork/matrix.asm |
---|
96,7 → 96,8 |
proc glopLoadMatrix uses eax edi esi, context:dword, p:dword |
mov eax,[context] |
mov edi,[eax+GLContext.matrix_mode] |
lea edi,[eax+4*edi] |
shl edi,2 |
add edi,eax |
mov edi,dword[edi+GLContext.matrix_stack_ptr] |
mov esi,[p] |
111,7 → 112,8 |
proc glopLoadIdentity uses eax ebx, context:dword, p:dword |
mov eax,[context] |
mov ebx,[eax+GLContext.matrix_mode] |
lea ebx,[eax+4*ebx] |
shl ebx,2 |
add ebx,eax |
stdcall gl_M4_Id,[ebx+GLContext.matrix_stack_ptr] |
gl_matrix_update eax,ebx |
125,12 → 127,14 |
endl |
mov esi,[p] |
add esi,4 |
lea edi,[ebp-sizeof.M4] |
mov edi,ebp |
sub edi,sizeof.M4 |
stdcall gl_M4_Transpose,edi,esi ;транспонируем входную матрицу в локальную матрицу m |
mov eax,[context] |
mov esi,[eax+GLContext.matrix_mode] |
lea esi,[eax+4*esi] |
shl esi,2 |
add esi,eax |
stdcall gl_M4_MulLeft,dword[esi+GLContext.matrix_stack_ptr],edi |
gl_matrix_update eax,edi |
145,7 → 149,9 |
; assert( (c->matrix_stack_ptr[ebx] - c->matrix_stack[ebx] + 1 ) |
; < c->matrix_stack_depth_max[ebx] ); |
lea ebx,[eax+4*ebx+GLContext.matrix_stack_ptr] |
shl ebx,2 |
add ebx,eax |
add ebx,GLContext.matrix_stack_ptr |
add dword[ebx],sizeof.M4 |
mov ebx,[ebx] ;ebx = ++context.matrix_stack_ptr[context.matrix_mode] |
165,7 → 171,8 |
; assert( c->matrix_stack_ptr[n] > c->matrix_stack[n] ); |
lea ebx,[eax+4*ebx] |
shl ebx,2 |
add ebx,eax |
sub dword[ebx+GLContext.matrix_stack_ptr],sizeof.M4 |
gl_matrix_update eax,ebx |
186,7 → 193,8 |
mov eax,[context] |
mov ebx,[p] |
lea ecx,[ebp-sizeof.M4] ;ecx=&m |
mov ecx,ebp |
sub ecx,sizeof.M4 ;ecx=&m |
finit |
fldpi |
fmul dword[ebx+4] |
417,7 → 425,8 |
mov eax,[context] |
mov ebx,[eax+GLContext.matrix_mode] |
lea ebx,[eax+4*ebx] |
shl ebx,2 |
add ebx,eax |
stdcall gl_M4_MulLeft,dword[ebx+GLContext.matrix_stack_ptr],ecx |
gl_matrix_update eax,ebx |
jmp .end_f |
436,7 → 445,8 |
mov eax,[context] |
mov ebx,[eax+GLContext.matrix_mode] |
lea ebx,[eax+4*ebx] |
shl ebx,2 |
add ebx,eax |
mov ebx,[ebx+GLContext.matrix_stack_ptr] ;ebx = &m[0] |
fld dword[ecx+ 4] ;x |
472,7 → 482,8 |
mov eax,[context] |
mov ebx,[eax+GLContext.matrix_mode] |
lea ebx,[eax+4*ebx] |
shl ebx,2 |
add ebx,eax |
mov ebx,[ebx+GLContext.matrix_stack_ptr] ;ebx = &m[0] |
fld dword[ecx+ 4] ;x |
596,94 → 607,4 |
ret |
endp |
align 4 |
proc glopOrtho uses eax ebx ecx, context:dword, p:dword |
locals |
x dd ? |
y dd ? |
A dd ? |
B dd ? |
C dd ? |
D dd ? |
m M4 |
endl |
mov eax,[context] |
mov ebx,[p] |
fld dword[ebx+8] |
fsub dword[ebx+4] ;st0 = (right-left) |
fld1 |
fadd st0,st0 ;st0 = 2.0 |
fdiv st0,st1 |
fstp dword[x] ;x = 2.0 / (right-left) |
fld dword[ebx+16] |
fsub dword[ebx+12] ;st0 = (top-bottom) |
fld1 |
fadd st0,st0 ;st0 = 2.0 |
fdiv st0,st1 |
fstp dword[y] ;y = 2.0 / (top-bottom) |
fld dword[ebx+8] |
fadd dword[ebx+4] |
fchs ;st0 = -(right+left) |
fdiv st0,st2 ;st2 = (right-left) |
fstp dword[A] ;A = -(right+left) / (right-left) |
fld dword[ebx+16] |
fadd dword[ebx+12] |
fchs ;st0 = -(top+bottom) |
fdiv st0,st1 ;st1 = (top-bottom) |
fstp dword[B] ;B = -(top+bottom) / (top-bottom) |
fld dword[ebx+24] |
fsub dword[ebx+20] ;st0 = (farp-near) |
fld1 |
fadd st0,st0 |
fchs ;st0 = -2.0 |
fdiv st0,st1 |
fstp dword[C] ;C = -2.0 / (farp-near) |
fld dword[ebx+24] |
fadd dword[ebx+20] ;st0 = farp+near |
fchs ;st0 = -(farp+near) |
fdiv st0,st1 |
fstp dword[D] ;D = -(farp*near) / (farp-near) |
ffree st0 |
fincstp |
ffree st0 |
fincstp |
ffree st0 |
fincstp |
lea ecx,[ebp-sizeof.M4] |
mov ebx,[x] |
mov dword[ecx],ebx |
mov dword[ecx+4],0.0 |
mov dword[ecx+8],0.0 |
mov ebx,[A] |
mov dword[ecx+12],ebx |
mov dword[ecx+16],0.0 |
mov ebx,[y] |
mov dword[ecx+20],ebx |
mov dword[ecx+24],0.0 |
mov ebx,[B] |
mov dword[ecx+28],ebx |
mov dword[ecx+32],0.0 |
mov dword[ecx+36],0.0 |
mov ebx,[C] |
mov dword[ecx+40],ebx |
mov ebx,[D] |
mov dword[ecx+44],ebx |
mov dword[ecx+48],0.0 |
mov dword[ecx+52],0.0 |
mov dword[ecx+56],0.0 |
mov dword[ecx+60],1.0 |
mov ebx,[eax+GLContext.matrix_mode] |
lea ebx,[eax+4*ebx] |
stdcall gl_M4_MulLeft,dword[ebx+GLContext.matrix_stack_ptr],ecx |
if DEBUG ;glopOrtho |
stdcall gl_print_matrix,ecx,4 |
stdcall gl_print_matrix,dword[ebx+GLContext.matrix_stack_ptr],4 |
end if |
gl_matrix_update eax,ebx |
ret |
endp |
/programs/develop/libraries/TinyGL/asm_fork/vertex.asm |
---|
58,7 → 58,8 |
mov dword[q+8],ecx |
mov esi,[p] |
add esi,4 |
lea edi,[ebp-16] ;edi = &q[3] |
mov edi,ebp |
sub edi,16 ;edi = &q[3] |
mov ecx,4 |
rep movsd |
;mov edi,ebp |
143,7 → 144,8 |
stdcall gl_print_matrix,dword[edx+GLContext.matrix_stack_ptr],4 |
end if |
; precompute inverse modelview |
lea ebx,[ebp-sizeof.M4] |
mov ebx,ebp |
sub ebx,sizeof.M4 |
stdcall gl_M4_Inv, ebx,dword[edx+GLContext.matrix_stack_ptr] |
if DEBUG ;tmp |
stdcall dbg_print,txt_sp,txt_nl |
150,7 → 152,8 |
stdcall gl_print_matrix,ebx,4 |
end if |
push ebx |
lea ebx,[edx+GLContext.matrix_model_view_inv] |
mov ebx,edx |
add ebx,GLContext.matrix_model_view_inv |
stdcall gl_M4_Transpose, ebx |
if DEBUG ;context.matrix_model_view_inv |
stdcall dbg_print,txt_sp,txt_nl |
159,7 → 162,8 |
jmp .end_if_0 |
align 4 |
@@: |
lea ecx,[edx+GLContext.matrix_model_projection] |
mov ecx,edx |
add ecx,GLContext.matrix_model_projection |
; precompute projection matrix |
stdcall gl_M4_Mul, ecx,dword[edx+GLContext.matrix_stack_ptr+4],dword[edx+GLContext.matrix_stack_ptr] |
188,7 → 192,8 |
.end_if_0: |
; test if the texture matrix is not Identity |
lea eax,[edx+GLContext.matrix_stack_ptr+8] |
mov eax,edx |
add eax,GLContext.matrix_stack_ptr+8 |
stdcall gl_M4_IsId,eax |
xor eax,1 |
mov dword[edx+GLContext.apply_texture_matrix],eax |
260,9 → 265,9 |
; eye coordinates needed for lighting |
mov ebx,dword[eax+GLContext.matrix_stack_ptr] |
finit |
fld dword[edx+GLVertex.coord+offs_X] |
fld dword[edx+GLVertex.coord+offs_Y] |
fld dword[edx+GLVertex.coord+offs_Z] |
fld dword[edx+offs_vert_coord+offs_X] |
fld dword[edx+offs_vert_coord+offs_Y] |
fld dword[edx+offs_vert_coord+offs_Z] |
mov ecx,4 |
.cycle_0: |
275,7 → 280,7 |
fmul st0,st2 ;st0 *= v.coord.Z |
fadd dword[ebx+12] ;st0 += m[3] |
faddp ;st0 = v.ec.X |
fstp dword[edx+GLVertex.ec] ;v.ec.X = v.coord.X * m[0] + v.coord.Y * m[1] + v.coord.Z * m[2] + m[3] |
fstp dword[edx+offs_vert_ec] ;v.ec.X = v.coord.X * m[0] + v.coord.Y * m[1] + v.coord.Z * m[2] + m[3] |
add ebx,16 ;следущая строка матрицы |
add edx,4 ;следущая координата вектора |
loop .cycle_0 |
290,10 → 295,10 |
mov ebx,dword[eax+GLContext.matrix_stack_ptr+4] |
mov edx,[v] |
fld dword[edx+GLVertex.ec+offs_X] |
fld dword[edx+GLVertex.ec+offs_Y] |
fld dword[edx+GLVertex.ec+offs_Z] |
fld dword[edx+GLVertex.ec+offs_W] |
fld dword[edx+offs_vert_ec+offs_X] |
fld dword[edx+offs_vert_ec+offs_Y] |
fld dword[edx+offs_vert_ec+offs_Z] |
fld dword[edx+offs_vert_ec+offs_W] |
mov ecx,4 |
.cycle_1: |
308,7 → 313,7 |
fld dword[ebx+12] ;st0 = m[3] |
fmul st0,st2 ;st0 *= v.ec.W |
faddp ;st0 = v.pc.X |
fstp dword[edx+GLVertex.pc] ;v.pc.X = v.ec.X * m[0] + v.ec.Y * m[1] + v.ec.Z * m[2] + v.ec.W * m[3] |
fstp dword[edx+offs_vert_pc] ;v.pc.X = v.ec.X * m[0] + v.ec.Y * m[1] + v.ec.Z * m[2] + v.ec.W * m[3] |
add ebx,16 ;следущая строка матрицы |
add edx,4 ;следущая координата вектора |
loop .cycle_1 |
321,8 → 326,10 |
ffree st0 |
fincstp |
lea ebx,[eax+GLContext.matrix_model_view_inv] |
lea edi,[eax+GLContext.current_normal] |
mov ebx,eax |
add ebx,GLContext.matrix_model_view_inv |
mov edi,eax |
add edi,GLContext.current_normal |
mov edx,[v] |
fld dword[edi] ;edi = &n |
329,7 → 336,7 |
fld dword[edi+offs_Y] |
fld dword[edi+offs_Z] |
add edx,GLVertex.normal |
add edx,offs_vert_normal |
fld dword[ebx] ;st0 = m[0] |
fmul st0,st3 ;st0 *= n.X |
369,14 → 376,16 |
.els_0: |
; no eye coordinates needed, no normal |
; NOTE: W = 1 is assumed |
lea ebx,[eax+GLContext.matrix_model_projection] |
mov ebx,eax |
add ebx,GLContext.matrix_model_projection |
finit |
fld dword[edx+GLVertex.coord+offs_X] |
fld dword[edx+GLVertex.coord+offs_Y] |
fld dword[edx+GLVertex.coord+offs_Z] |
fld dword[edx+offs_vert_coord+offs_X] |
fld dword[edx+offs_vert_coord+offs_Y] |
fld dword[edx+offs_vert_coord+offs_Z] |
lea esi,[edx+GLVertex.pc] |
mov esi,edx |
add esi,offs_vert_pc |
fld dword[ebx] ;st0 = m[0] |
fmul st0,st3 ;st0 *= v.coord.X |
440,13 → 449,13 |
if DEBUG ;gl_vertex_transform |
stdcall dbg_print,f_vt,txt_nl |
mov edx,[v] |
add edx,GLVertex.pc |
add edx,offs_vert_pc |
stdcall gl_print_matrix,edx,1 |
end if |
mov edx,[v] |
stdcall gl_clipcode, dword[edx+GLVertex.pc+offs_X], dword[edx+GLVertex.pc+offs_Y],\ |
dword[edx+GLVertex.pc+offs_Z], dword[edx+GLVertex.pc+offs_W] |
mov dword[edx+GLVertex.clip_code],eax |
stdcall gl_clipcode, dword[edx+offs_vert_pc+offs_X], dword[edx+offs_vert_pc+offs_Y],\ |
dword[edx+offs_vert_pc+offs_Z], dword[edx+offs_vert_pc+offs_W] |
mov dword[edx+offs_vert_clip_code],eax |
popad |
ret |
endp |
494,7 → 503,8 |
mov esi,[p] |
add esi,4 |
lea edi,[ebx+GLVertex.coord] ;edi = &v.coord |
mov edi,ebx |
add edi,offs_vert_coord ;edi = &v.coord |
mov ecx,4 |
rep movsd |
507,8 → 517,10 |
jmp @f |
align 4 |
.els_0: |
lea esi,[edx+GLContext.current_color] |
lea edi,[ebx+GLVertex.color] ;edi = &v.color |
mov esi,edx |
add esi,GLContext.current_color |
mov edi,ebx |
add edi,offs_vert_color ;edi = &v.color |
mov ecx,4 |
rep movsd |
@@: |
518,21 → 530,25 |
je @f |
cmp dword[edx+GLContext.apply_texture_matrix],0 |
je .els_1 |
lea eax,[edx+GLContext.current_tex_coord] |
mov eax,edx |
add eax,GLContext.current_tex_coord |
push eax ;&context.current_tex_coord |
lea eax,[ebx+GLVertex.tex_coord] |
mov eax,ebx |
add eax,offs_vert_tex_coord |
stdcall gl_M4_MulV4, eax, dword[edx+GLContext.matrix_stack_ptr+8] |
jmp @f |
align 4 |
.els_1: |
lea esi,[edx+GLContext.current_tex_coord] |
lea edi,[ebx+GLVertex.tex_coord] |
mov esi,edx |
add esi,GLContext.current_tex_coord |
mov edi,ebx |
add edi,offs_vert_tex_coord |
mov ecx,4 |
rep movsd |
@@: |
; precompute the mapping to the viewport |
cmp dword[ebx+GLVertex.clip_code],0 |
cmp dword[ebx+offs_vert_clip_code],0 |
jne @f |
stdcall gl_transform_to_viewport, edx,ebx |
@@: |
539,7 → 555,7 |
; edge flag |
mov eax,[edx+GLContext.current_edge_flag] |
mov dword[ebx+GLVertex.edge_flag],eax ;v.edge_flag = context.current_edge_flag |
mov dword[ebx+offs_vert_edge_flag],eax ;v.edge_flag = context.current_edge_flag |
cmp dword[edx+GLContext.begin_type],GL_POINTS |
jne @f |
569,7 → 585,8 |
cmp dword[n],1 |
jne .els_2 |
mov esi,[edx+GLContext.vertex] |
lea edi,[esi+2*sizeof.GLVertex] |
mov edi,esi |
add edi,2*sizeof.GLVertex |
mov ecx,(sizeof.GLVertex)/4 ;((...)/4) что-бы использовать movsd вместо movsb |
rep movsd ;context.vertex[2] = context.vertex[0] |
jmp .end_f |
577,9 → 594,12 |
.els_2: |
cmp dword[n],2 |
jne .end_f ;else if (n == 2) |
mov edi,[edx+GLContext.vertex] |
lea esi,[edi+sizeof.GLVertex] |
stdcall gl_draw_line, edx, esi, edi |
mov eax,[edx+GLContext.vertex] |
push eax |
mov edi,eax |
add eax,sizeof.GLVertex |
mov esi,eax |
stdcall gl_draw_line, edx, eax |
mov ecx,(sizeof.GLVertex)/4 ;((...)/4) что-бы использовать movsd вместо movsb |
rep movsd ;context.vertex[0] = context.vertex[1] |
mov dword[n],1 |
642,10 → 662,12 |
jne .end_f |
mov eax,[edx+GLContext.vertex] |
mov [esp-12],eax |
lea edi,[eax+sizeof.GLVertex] |
mov [esp-8],edi |
lea esi,[edi+sizeof.GLVertex] |
mov [esp-4],esi |
add eax,sizeof.GLVertex |
mov [esp-8],eax |
mov edi,eax |
add eax,sizeof.GLVertex |
mov [esp-4],eax |
mov esi,eax |
sub esp,12 |
stdcall gl_draw_triangle, edx ;v0,v1,v2 |
mov ecx,(sizeof.GLVertex)/4 ;((...)/4) что-бы использовать movsd вместо movsb |
660,15 → 682,15 |
jne .end_f |
mov eax,[edx+GLContext.vertex] |
add eax,2*sizeof.GLVertex |
mov dword[eax+GLVertex.edge_flag],0 ;context.vertex[2].edge_flag = 0 |
mov dword[eax+offs_vert_edge_flag],0 ;context.vertex[2].edge_flag = 0 |
push eax |
sub eax,sizeof.GLVertex |
push eax |
sub eax,sizeof.GLVertex |
stdcall gl_draw_triangle, edx,eax ;v0,v1,v2 |
mov dword[eax+GLVertex.edge_flag],0 ;context.vertex[0].edge_flag = 0 |
mov dword[eax+offs_vert_edge_flag],0 ;context.vertex[0].edge_flag = 0 |
add eax,2*sizeof.GLVertex |
mov dword[eax+GLVertex.edge_flag],1 ;context.vertex[2].edge_flag = 1 |
mov dword[eax+offs_vert_edge_flag],1 ;context.vertex[2].edge_flag = 1 |
add eax,sizeof.GLVertex |
push eax |
sub eax,sizeof.GLVertex |
/programs/develop/libraries/TinyGL/asm_fork/opinfo.inc |
---|
22,7 → 22,6 |
ADD_OP Viewport,4,'%d %d %d %d' |
ADD_OP Frustum,6,'%f %f %f %f %f %f' |
ADD_OP Ortho,6,'%f %f %f %f %f %f' |
ADD_OP Material,6,'%C %C %f %f %f %f' |
ADD_OP ColorMaterial,2,'%C %C' |