Subversion Repositories Kolibri OS

Rev

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

Rev 8408 Rev 8442
Line 19... Line 19...
19 
include 'texture.asm'
 19 
include 'texture.asm'
20 
include 'misc.asm'
 20 
include 'misc.asm'
21 
include 'clear.asm'
 21 
include 'clear.asm'
22 
include 'light.asm'
 22 
include 'light.asm'
23 
include 'select.asm'
 23 
include 'select.asm'
24 
;include 'get.asm'
 24 
include 'get.asm'
25 
;include 'error.asm'
 25 
;include 'error.asm'
26 
include 'zbuffer.asm'
 26 
include 'zbuffer.asm'
27 
include 'zline.asm'
 27 
include 'zline.asm'
28 
;include 'zdither.asm'
 28 
;include 'zdither.asm'
29 
include 'ztriangle.asm'
 29 
include 'ztriangle.asm'
Line 50... Line 50...
50 
m_5 db '(5)',13,10,0
 50 
m_5 db '(5)',13,10,0
51 
m_6 db '(6)',13,10,0
 51 
m_6 db '(6)',13,10,0
52 
m_7 db '(7)',13,10,0
 52 
m_7 db '(7)',13,10,0
53 
m_8 db '(8)',13,10,0
 53 
m_8 db '(8)',13,10,0
54 
m_9 db '(9)',13,10,0
 54 
m_9 db '(9)',13,10,0
- 
 
 55 
f_fill_tr_nl db ' lines',0
- 
 
 56 
f_zbz db ' ZB_line_z',0
- 
 
 57 
f_zb db ' ZB_line',0
Line 55... Line 58...
55 
 
 58 
 
Line 56... Line 59...
56 
buf_param rb 80
 59 
buf_param rb 80
57 
 
 60 
 
58 
align 4
 61 
align 4
59 
proc str_n_cat uses eax ecx edi esi, str1:dword, str2:dword, n_len:dword
 62 
proc str_n_cat uses eax ecx edi esi, str1:dword, str2:dword, n_len:dword
60 
	mov esi,dword[str2]
 63 
	mov esi,[str2]
61 
	mov ecx,dword[n_len]
 64 
	mov ecx,[n_len]
62 
	mov edi,dword[str1]
 65 
	mov edi,[str1]
63 
	stdcall str_len,edi
 66 
	stdcall str_len,edi
64 
	add edi,eax
 67 
	add edi,eax
65 
	cld
 68 
	cld
Line 103... Line 106...
103 
	@@:
 106 
	@@:
104 
	ret
 107 
	ret
105 
end if
 108 
end if
Line 106... Line 109...
106 
 
 109 
 
107 
; ***
 - 
 
108 
glColor3d: ;(double ,double ,double)
 - 
 
109 
glColor3dv: ;(double *)
 - 
 
110 
glColor4d: ;(double ,double ,double, double )
 - 
 
111 
glColor4dv: ;(double *)
 - 
 
112 
glNormal3d: ;(double ,double ,double)
 - 
 
113 
glNormal3dv: ;(double *)
 - 
 
114 
glTexCoord1f: ;(float)
 - 
 
115 
glTexCoord1d: ;(double)
 - 
 
116 
glTexCoord1fv: ;(float *)
 - 
 
117 
glTexCoord1dv: ;(double *)
 - 
 
118 
glTexCoord2d: ;(double ,double)
 - 
 
119 
glTexCoord2dv: ;(double *)
 - 
 
120 
glTexCoord3f: ;(float ,float ,float)
 - 
 
121 
glTexCoord3d: ;(double ,double ,double)
 - 
 
122 
glTexCoord3fv: ;(float *)
 - 
 
123 
glTexCoord3dv: ;(double *)
 - 
 
124 
glTexCoord4d: ;(double ,double ,double, double )
 - 
 
125 
glTexCoord4fv: ;(float *)
 - 
 
126 
glTexCoord4dv: ;(double *)
 - 
 
127 
glGetIntegerv: ;(int pname,int *params)
 110 
; ***
Line 128... Line 111...
128 
glGetFloatv: ;(int pname, float *v)
 111 
glGetFloatv: ;(int pname, float *v)
129 
 
 112 
 
130 
align 4
 113 
align 4
Line 137... Line 120...
137 
err_5 db 'size too small',13,10,0
 120 
err_5 db 'size too small',13,10,0
138 
err_6 db 'unsupported option',13,10,0
 121 
err_6 db 'unsupported option',13,10,0
139 
err_7 db 'assert(target == GL_TEXTURE_2D && texture >= 0)',13,10,0
 122 
err_7 db 'assert(target == GL_TEXTURE_2D && texture >= 0)',13,10,0
140 
err_8 db 'combinaison of parameters not handled',13,10,0
 123 
err_8 db 'combinaison of parameters not handled',13,10,0
141 
err_9 db 'GL_INVALID_ENUM',13,10,0
 124 
err_9 db 'GL_INVALID_ENUM',13,10,0
142 
f_zbz db ' ZB_line_z',0
 - 
 
143 
f_zb db ' ZB_line',0
 - 
 
144 
f_find_l db 'find_list',0
 - 
 
145 
f_alloc_l db 'alloc_list',0
 - 
 
146 
f_fill_tr db 'ZB_fillTriangle...',0
 125 
err_glGet db 'glGet: option not implemented',0
147 
f_fill_tr_nl db ' lines',0
 - 
 
148 
f_fill_tr_nll db ' len',0
 - 
 
Line 149... Line 126...
149 
 
 126 
 
150 
align 4
 127 
align 4
151 
proc dbg_print, fun:dword, mes:dword
 128 
proc dbg_print, fun:dword, mes:dword
152 
pushad
 129 
pushad