Rev 3105 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3105 | Rev 8271 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | use32 |
1 | use32 |
2 | org 0x0 |
2 | org 0 |
3 | db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
3 | db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©« ¢á¥£¤ 8 ¡ ©â |
4 | dd 0x1 |
- | |
5 | dd start |
- | |
6 | dd i_end ;à §¬¥à ¯à¨«®¦¥¨ï |
- | |
7 | dd mem,stacktop |
- | |
8 | dd 0,cur_dir_path |
4 | dd 1,start,i_end,mem,stacktop,0,cur_dir_path |
Line 9... | Line 5... | ||
9 | 5 | ||
10 | include '../../../../../macros.inc' |
6 | include '../../../../../macros.inc' |
- | 7 | include '../../../../../proc32.inc' |
|
11 | include '../../../../../proc32.inc' |
8 | include '../../../../../KOSfuncs.inc' |
12 | include '../../../../../develop/libraries/box_lib/load_lib.mac' |
9 | include '../../../../../load_lib.mac' |
Line 13... | Line 10... | ||
13 | include '../../../../../dll.inc' |
10 | include '../../../../../dll.inc' |
Line 14... | Line 11... | ||
14 | 11 | ||
15 | @use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
12 | @use_library mem.Alloc,mem.Free,mem.ReAlloc, 0 ;dll.Load |
16 | 13 | ||
17 | struct FileInfoBlock |
14 | struct FileInfoBlock |
Line 59... | Line 56... | ||
59 | 56 | ||
60 | 57 | ||
61 | 58 | ||
62 | align 4 |
- | |
63 | start: |
59 | align 4 |
64 | load_library vectors_name, cur_dir_path, library_path, system_path, \ |
60 | start: |
Line 65... | Line 61... | ||
65 | err_message_found_lib, head_f_l, import_buf2d_lib, err_message_import, head_f_i |
61 | load_library name_buf2d, library_path, system_path, import_buf2d_lib |
66 | cmp eax,-1 |
62 | cmp eax,-1 |
67 | jz button.exit |
63 | jz button.exit |
68 | 64 | ||
Line 69... | Line 65... | ||
69 | mcall 40,0x27 |
65 | mcall SF_SET_EVENTS_MASK,0x27 |
70 | stdcall [buf2d_create], buf_0 ;ᮧ¤ ¥¬ ¡ãä¥à |
66 | stdcall [buf2d_create], buf_0 ;ᮧ¤ ¥¬ ¡ãä¥à |
Line 71... | Line 67... | ||
71 | stdcall [buf2d_create], buf_z |
67 | stdcall [buf2d_create], buf_z |
Line 72... | Line 68... | ||
72 | stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z ;ᮧ¤ ¥¬ ¢®ªá¥«ìãî ª¨áâì |
68 | stdcall [buf2d_vox_brush_create], buf_vox, vox_6_7_z ;ᮧ¤ ¥¬ ¢®ªá¥«ìãî ª¨áâì |
73 | 69 | ||
74 | stdcall mem.Alloc,max_open_file_size |
70 | stdcall mem.Alloc,max_open_file_size |
75 | mov dword[open_file_vox],eax |
71 | mov dword[open_file_vox],eax |
Line 103... | Line 99... | ||
103 | red_win: |
99 | red_win: |
104 | call draw_window |
100 | call draw_window |
Line 105... | Line 101... | ||
105 | 101 | ||
106 | align 4 |
102 | align 4 |
107 | still: |
103 | still: |
108 | mcall 10 |
104 | mcall SF_WAIT_EVENT |
109 | cmp al,1 ;¨§¬¥¨«®áì ¯®«®¦¥¨¥ ®ª |
105 | cmp al,1 ;¨§¬¥¨«®áì ¯®«®¦¥¨¥ ®ª |
110 | jz red_win |
106 | jz red_win |
111 | cmp al,2 |
107 | cmp al,2 |
112 | jz key |
108 | jz key |
Line 115... | Line 111... | ||
115 | jmp still |
111 | jmp still |
Line 116... | Line 112... | ||
116 | 112 | ||
117 | align 4 |
113 | align 4 |
118 | draw_window: |
114 | draw_window: |
119 | pushad |
115 | pushad |
Line 120... | Line 116... | ||
120 | mcall 12,1 |
116 | mcall SF_REDRAW,SSF_BEGIN_DRAW |
121 | 117 | ||
Line 122... | Line 118... | ||
122 | mov edx,0x33000000 |
118 | mov edx,0x33000000 |
Line 123... | Line 119... | ||
123 | mcall 0,(50 shl 16)+410,(30 shl 16)+480,,,caption |
119 | mcall SF_CREATE_WINDOW,(50 shl 16)+410,(30 shl 16)+480,,,caption |
124 | 120 | ||
125 | stdcall [buf2d_draw], buf_0 |
121 | stdcall [buf2d_draw], buf_0 |
Line 126... | Line 122... | ||
126 | 122 | ||
127 | mcall 12,2 |
123 | mcall SF_REDRAW,SSF_END_DRAW |
128 | popad |
124 | popad |
Line 129... | Line 125... | ||
129 | ret |
125 | ret |
130 | 126 | ||
Line 131... | Line 127... | ||
131 | align 4 |
127 | align 4 |
Line 132... | Line 128... | ||
132 | key: |
128 | key: |
133 | mcall 2 |
129 | mcall SF_GET_KEY |
134 | 130 | ||
135 | cmp ah,27 ;Esc |
131 | cmp ah,27 ;Esc |
136 | je button.exit |
132 | je button.exit |
137 | 133 | ||
138 | jmp still |
134 | jmp still |
139 | 135 | ||
140 | align 4 |
136 | align 4 |
141 | button: |
137 | button: |
142 | mcall 17 ;¯®«ãç¨âì ª®¤ ¦ ⮩ ª®¯ª¨ |
138 | mcall SF_GET_BUTTON |
Line 143... | Line 139... | ||
143 | cmp ah,1 |
139 | cmp ah,1 |
Line 144... | Line 140... | ||
144 | jne still |
140 | jne still |
145 | .exit: |
141 | .exit: |
Line 227... | Line 223... | ||
227 | db 6,7,4,3 ;w,h,h_osn,n |
223 | db 6,7,4,3 ;w,h,h_osn,n |
228 | rb BUF_STRUCT_SIZE*(2+1) |
224 | rb BUF_STRUCT_SIZE*(2+1) |
Line 229... | Line 225... | ||
229 | 225 | ||
230 | ;-------------------------------------------------- |
226 | ;-------------------------------------------------- |
231 | system_path db '/sys/lib/' |
227 | system_path db '/sys/lib/' |
232 | vectors_name db 'buf2d.obj',0 |
- | |
233 | err_message_found_lib db 'Sorry I cannot load library buf2d.obj',0 |
- | |
234 | head_f_i: |
- | |
235 | head_f_l db 'System error',0 |
- | |
236 | err_message_import db 'Error on load import library buf2d.obj',0 |
228 | name_buf2d db 'buf2d.obj',0 |
Line -... | Line 229... | ||
- | 229 | ;-------------------------------------------------- |
|
237 | ;-------------------------------------------------- |
230 | |
238 | - | ||
239 | i_end: ;ª®¥æ ª®¤ |
- | |
240 | rb 1024 |
231 | align 16 |
241 | stacktop: |
232 | i_end: ;ª®¥æ ª®¤ |
242 | file_name: |
233 | file_name: |
243 | rb 4096 |
234 | rb 4096 |
244 | cur_dir_path: |
235 | cur_dir_path: |
245 | rb 4096 |
236 | rb 4096 |
- | 237 | library_path: |
|
- | 238 | rb 4096 |
|
246 | library_path: |
239 | rb 1024 |