Rev 8069 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8069 | Rev 8408 | ||
---|---|---|---|
Line 4... | Line 4... | ||
4 | dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
4 | dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
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 '../../../../../develop/libraries/box_lib/load_lib.mac' |
9 | include '../../../../../load_lib.mac' |
10 | include '../../../../../dll.inc' |
10 | include '../../../../../dll.inc' |
Line 11... | Line 11... | ||
11 | include '../opengl_const.inc' |
11 | include '../opengl_const.inc' |
Line 12... | Line 12... | ||
12 | 12 | ||
13 | @use_library |
13 | @use_library |
14 | 14 | ||
15 | align 4 |
- | |
16 | start: |
15 | align 4 |
17 | load_library name_tgl, cur_dir_path, library_path, system_path, \ |
16 | start: |
Line 18... | Line 17... | ||
18 | err_message_found_lib, head_f_l, import_lib_tinygl, err_message_import, head_f_i |
17 | load_library name_tgl, library_path, system_path, import_tinygl |
Line 19... | Line 18... | ||
19 | cmp eax,SF_TERMINATE_PROCESS |
18 | cmp eax,SF_TERMINATE_PROCESS |
20 | jz button.exit |
19 | jz button.exit |
21 | 20 | ||
22 | mcall SF_SET_EVENTS_MASK,0x27 |
21 | mcall SF_SET_EVENTS_MASK,0x27 |
Line 23... | Line 22... | ||
23 | 22 | ||
Line 24... | Line 23... | ||
24 | stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
23 | stdcall [kosglMakeCurrent], 10,10,300,225,ctx1 |
Line 168... | Line 167... | ||
168 | angle_y dd 0.0 |
167 | angle_y dd 0.0 |
169 | delt_size dd 3.0 |
168 | delt_size dd 3.0 |
Line 170... | Line 169... | ||
170 | 169 | ||
171 | ;-------------------------------------------------- |
170 | ;-------------------------------------------------- |
172 | align 4 |
171 | align 4 |
Line 173... | Line 172... | ||
173 | import_lib_tinygl: |
172 | import_tinygl: |
174 | 173 | ||
175 | macro E_LIB n |
174 | macro E_LIB n |
176 | { |
175 | { |
Line 185... | Line 184... | ||
185 | include '../export.inc' |
184 | include '../export.inc' |
Line 186... | Line 185... | ||
186 | 185 | ||
187 | ;-------------------------------------------------- |
186 | ;-------------------------------------------------- |
188 | system_path db '/sys/lib/' |
187 | system_path db '/sys/lib/' |
189 | name_tgl db 'tinygl.obj',0 |
- | |
190 | - | ||
191 | head_f_i: |
- | |
192 | head_f_l db '"System error',0 |
- | |
193 | err_message_import db 'Error on load import library ',39,'tinygl.obj',39,'" -tE',0 |
- | |
194 | err_message_found_lib db 'Sorry I cannot load library ',39,'tinygl.obj',39,'" -tE',0 |
188 | name_tgl db 'tinygl.obj',0 |
Line 195... | Line 189... | ||
195 | ;-------------------------------------------------- |
189 | ;-------------------------------------------------- |
196 | 190 | ||
197 | align 16 |
191 | align 16 |
- | 192 | i_end: |
|
198 | i_end: |
193 | ctx1 rb 28 ;sizeof.TinyGLContext = 28 |
199 | ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext |
194 | cur_dir_path rb 4096 |
200 | ;sizeof.TinyGLContext = 28 |
195 | library_path rb 4096 |
201 | rb 2048 |
- | |
202 | stacktop: |
- | |
203 | cur_dir_path: |
- | |
204 | rb 4096 |
- | |
205 | library_path: |
196 | rb 2048 |