Subversion Repositories Kolibri OS

Rev

Rev 5911 | Rev 8262 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5911 Rev 6238
Line 1... Line 1...
1 
;Ž£à®¬­ ï ¡« £®¤ à­®áâì Maxxxx32, Diamond, Heavyiron
 1 
;Ž£à®¬­ ï ¡« £®¤ à­®áâì Maxxxx32, Diamond, Heavyiron
2 
;¨ ¤à㣨¬ ¯à®£à ¬¬¨áâ ¬,   â ª¦¥
 2 
;¨ ¤à㣨¬ ¯à®£à ¬¬¨áâ ¬,   â ª¦¥ ’¥¯«®¢ã €«¥ªá¥î
3 
;’¥¯«®¢ã €«¥ªá¥î ( www.lrz.land.ru)
 - 
 
4 
use32
 3 
use32
5 
  org 0x0
 4 
  org 0x0
6 
  db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
 5 
  db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
7 
  dd 0x1
 - 
 
8 
  dd start
 - 
 
9 
  dd i_end ; à §¬¥à ¯à¨«®¦¥­¨ï
 6 
  dd 1,start,i_end,mem,stacktop,0,sys_path
10 
  dd mem
 - 
 
11 
  dd stacktop
 - 
 
12 
  dd 0x0
 - 
 
13 
  dd sys_path
 - 
 
Line 14... Line 7...
14 
 
 7 
 
15 
include '../../proc32.inc'
 8 
include '../../proc32.inc'
16 
include '../../macros.inc'
 9 
include '../../macros.inc'
17 
include '../../dll.inc'
 - 
 
18 
 
 10 
include '../../KOSfuncs.inc'
19 
include '../../develop/libraries/box_lib/load_lib.mac'
 11 
include '../../load_img.inc'
Line 20... Line 12...
20 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
 12 
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
21 
 
 13 
 
22 
min_window_w equ 485 ;¬¨­¨¬ «ì­ ï è¨à¨­  ®ª­ 
 14 
min_window_w equ 485 ;¬¨­¨¬ «ì­ ï è¨à¨­  ®ª­ 
Line 23... Line 15...
23 
min_window_h equ 325 ;¬¨­¨¬ «ì­ ï ¢ëá®â  ®ª­ 
 15 
min_window_h equ 325 ;¬¨­¨¬ «ì­ ï ¢ëá®â  ®ª­ 
24 
otst_panel_left equ 265
 16 
otst_panel_left equ 265
Line 25... Line 17...
25 
 
 17 
 
26 
include 'tile_fun.inc'
 - 
 
27 
include 'pl_import.inc'
 - 
 
28 
 
 - 
 
29 
  @use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load
 - 
 
30 
 
 - 
 
31 
struct FileInfoBlock
 - 
 
32 
	Function dd ?
 - 
 
33 
	Position dd ?
 - 
 
34 
	Flags	 dd ?
 - 
 
35 
	Count	 dd ?
 - 
 
Line 36... Line 18...
36 
	Buffer	 dd ?
 18 
include 'tile_fun.inc'
37 
		db ?
 - 
 
38 
	FileName dd ?
 - 
 
39 
ends
 - 
 
40 
 
 19 
include 'pl_import.inc'
41 
fn_metki db 'pl_metki.lst',0
 20 
 
42 
fn_icon1 db 'tl_sys_16.png',0
 21 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load
43 
fn_icon2 db 'tl_nod_16.bmp',0
 22 
 
44 
 
 23 
fn_metki db 'pl_metki.lst',0
Line 51... Line 30...
51 
.def db 0 ;à áè¨à¥­¨¥ ¯® 㬮«ç ­¨î
 30 
.def db 0 ;à áè¨à¥­¨¥ ¯® 㬮«ç ­¨î
Line 52... Line 31...
52 
 
 31 
 
53 
 
 32 
 
54 
align 4
 33 
align 4
Line 55... Line 34...
55 
start:
 34 
start:
56 
  load_libraries l_libs_start,load_lib_end
 35 
	load_libraries l_libs_start,load_lib_end
57 
 
 36 
 
58 
;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨«¨áì ¡¨¡«¨®â¥ª¨
 37 
	;¯à®¢¥àª  ­  ᪮«ìª® 㤠筮 § £ã§¨«¨áì ¡¨¡«¨®â¥ª¨
59 
	cmp	dword [lib0+ll_struc_size-4],0
 38 
	mov	ebp,lib_0
60 
	jnz @f
 39 
	.test_lib_open:
61 
	cmp	dword [lib1+ll_struc_size-4],0
 40 
	cmp	dword [ebp+ll_struc_size-4],0
62 
	jnz @f
 41 
	jz	@f
63 
	cmp	dword [lib2+ll_struc_size-4],0
 - 
 
64 
	jnz @f
 42 
		mcall SF_TERMINATE_PROCESS ;exit not correct
65 
	cmp	dword [lib3+ll_struc_size-4],0
 - 
 
66 
	jnz @f
 43 
	@@:
67 
	jmp .lib
 - 
 
68 
	@@:
 44 
	add ebp,ll_struc_size
69 
		mcall -1 ;exit not correct
 45 
	cmp ebp,load_lib_end
70 
	.lib:
 46 
	jl .test_lib_open
71 
 
 47 
 
72 
  copy_path ini_name,sys_path,file_name,0
 48 
	copy_path ini_name,sys_path,file_name,0
73 
  stdcall dword[ini_get_str],file_name,ini_sec,ini_k_cache,dword[edit1.text],dword[edit1.max],ini_def_cache
 49 
	stdcall dword[ini_get_str],file_name,ini_sec,ini_k_cache,dword[edit1.text],dword[edit1.max],ini_def_cache
Line 74... Line 50...
74 
  stdcall [str_len],dword[edit1.text],dword[edit1.max]
 50 
	stdcall [str_len],dword[edit1.text],dword[edit1.max]
75 
  mov dword[edit1.size],eax
 51 
	mov dword[edit1.size],eax
Line 76... Line 52...
76 
  mov dword[edit1.pos],eax
 52 
	mov dword[edit1.pos],eax
77 
 
 53 
 
78 
  stdcall dword[tl_data_init], tree1
 54 
	stdcall dword[tl_data_init], tree1
79 
  stdcall dword[tl_data_init], tree2
 55 
	stdcall dword[tl_data_init], tree2
80 
 
 56 
 
81 
;áç¨â뢠¥¬ à áè¨à¥­¨ï ª àâ ¨§ *.ini ä ©« 
 57 
;áç¨â뢠¥¬ à áè¨à¥­¨ï ª àâ ¨§ *.ini ä ©« 
82 
  mov byte[ini_ext.number],'0'
 58 
	mov byte[ini_ext.number],'0'
Line 95... Line 71...
95 
    mov dword[txt_tile_type_0],'.bmp' ;¥á«¨ ¢ *.ini ä ©«¥ ­¨ç¥£® ­¥â ¤®¡ ¢«ï¥¬ à áè¨à¥­¨¥ .bmp
 71 
    mov dword[txt_tile_type_0],'.bmp' ;¥á«¨ ¢ *.ini ä ©«¥ ­¨ç¥£® ­¥â ¤®¡ ¢«ï¥¬ à áè¨à¥­¨¥ .bmp
96 
  @@:
 72 
  @@:
97 
  stdcall dword[tl_node_add], tree1, 0, txt_tile_type_0
 73 
  stdcall dword[tl_node_add], tree1, 0, txt_tile_type_0
Line 98... Line 74...
98 
 
 74 
 
99 
; init bmp file
 75 
; init bmp file
100 
  stdcall mem.Alloc, dword RGB_TILE_SIZE+300 ;300 - § ¯ á­ë¥ ¡ ©âë á ãç¥â®¬ § £®«®¢ª  bmp ä ©« 
 76 
	stdcall mem.Alloc, dword RGB_TILE_SIZE+300 ;300 - § ¯ á­ë¥ ¡ ©âë á ãç¥â®¬ § £®«®¢ª  bmp ä ©« 
101 
  mov [bmp_icon],eax
 - 
 
102 
 
 - 
 
103 
  stdcall array_tile_function, tile_00,max_tiles_count,tile_init
 - 
 
104 
  stdcall tiles_init_grid, tile_00,max_tiles_count,max_tiles_cols
 - 
 
105 
 
 - 
 
106 
  stdcall mem.Alloc, dword TREE_ICON_SYS16_BMP_SIZE
 - 
 
107 
  mov [tree_sys_icon],eax
 - 
 
108 
 
 - 
 
109 
  stdcall mem.Alloc, dword TREE_ICON_NOD16_BMP_SIZE
 - 
 
110 
  mov [tree_nod_icon],eax
 - 
 
111 
 
 - 
 
112 
  copy_path fn_icon1,sys_path,file_name,0
 - 
 
113 
  mov [run_file_70.Function], 0
 - 
 
114 
  mov [run_file_70.Position], 0
 - 
 
115 
  mov [run_file_70.Flags], 0
 - 
 
116 
  mov [run_file_70.Count], TREE_ICON_SYS16_BMP_SIZE
 - 
 
117 
  m2m [run_file_70.Buffer], [tree_sys_icon]
 - 
 
118 
  mov byte[run_file_70+20], 0
 - 
 
119 
  mov [run_file_70.FileName], file_name
 - 
 
120 
  mcall 70,run_file_70
 - 
 
121 
  cmp ebx,0xffffffff
 - 
 
122 
  je @f
 - 
 
123 
    stdcall dword[img_decode], dword[tree_sys_icon],ebx,0
 - 
 
124 
    mov dword[data_icon],eax
 - 
 
125 
    stdcall dword[img_to_rgb2], dword[data_icon],dword[tree_sys_icon]
 - 
 
126 
    stdcall dword[img_destroy], dword[data_icon]
 - 
 
127 
 
 - 
 
128 
    m2m dword[tree1.data_img_sys],dword[tree_sys_icon]
 - 
 
129 
    m2m dword[tree2.data_img_sys],dword[tree_sys_icon]
 - 
 
130 
  @@:
 - 
 
131 
 
 - 
 
132 
 
 - 
 
133 
  copy_path fn_icon2,sys_path,file_name,0
 - 
 
134 
  mov [run_file_70.Count], TREE_ICON_NOD16_BMP_SIZE
 - 
 
135 
  m2m [run_file_70.Buffer], [tree_nod_icon]
 - 
 
136 
  mcall 70,run_file_70
 - 
 
137 
  cmp ebx,0xffffffff
 - 
 
138 
  je @f
 - 
 
139 
    stdcall dword[img_decode], dword[tree_nod_icon],ebx,0
 - 
 
140 
    mov dword[data_icon],eax
 - 
 
141 
    stdcall dword[img_to_rgb2], dword[data_icon],dword[tree_nod_icon]
 - 
 
142 
    stdcall dword[img_destroy], dword[data_icon]
 - 
 
143 
 
 - 
 
144 
    m2m dword[tree1.data_img],dword[tree_nod_icon]
 - 
 
145 
    m2m dword[tree2.data_img],dword[tree_nod_icon]
 - 
 
Line 146... Line 77...
146 
  @@:
 77 
	mov [bmp_icon],eax
147 
 
 78 
 
Line -... Line 79...
- 
 
 79 
	stdcall array_tile_function, tile_00,max_tiles_count,tile_init
- 
 
 80 
	stdcall tiles_init_grid, tile_00,max_tiles_count,max_tiles_cols
- 
 
 81 
 
- 
 
 82 
	load_image_file 'tl_sys_16.png',tree_sys_icon
- 
 
 83 
	mov eax,[tree_sys_icon]
- 
 
 84 
	mov [tree1.data_img_sys],eax
- 
 
 85 
	mov [tree2.data_img_sys],eax
- 
 
 86
- 
 
 87 
	load_image_file 'tl_nod_16.bmp',tree_nod_icon
- 
 
 88 
	mov eax,[tree_nod_icon]
- 
 
 89 
	mov [tree1.data_img],eax
- 
 
 90 
	mov [tree2.data_img],eax
- 
 
 91 
 
148 
  mcall 40,0x27 ;¬ áª  á¨á⥬­ëå ᮡë⨩
 92 
	mcall SF_SET_EVENTS_MASK,0x27
149 
  init_checkboxes2 ch1,checkboxes_end
 93 
	init_checkboxes2 ch1,checkboxes_end
150 
 
 94 
 
151 
  mcall 48,3,sc,sizeof.system_colors
 95 
	mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors
Line 152... Line 96...
152 
  ;ãáâ ­®¢ª  á¨á⥬­ëå 梥⮢
 96 
	;ãáâ ­®¢ª  á¨á⥬­ëå 梥⮢
Line 153... Line 97...
153 
  edit_boxes_set_sys_color edit1,editboxes_end,sc
 97 
	edit_boxes_set_sys_color edit1,editboxes_end,sc
154 
  check_boxes_set_sys_color2 ch1,checkboxes_end,sc
 98 
	check_boxes_set_sys_color2 ch1,checkboxes_end,sc
Line 155... Line 99...
155 
 
 99 
 
156 
  mov byte[file_name],0
 100 
	mov byte[file_name],0
157 
 
 101 
 
158 
  ; OpenDialog initialisation
 102 
	; OpenDialog initialisation
159 
  stdcall [OpenDialog_Init],OpenDialog_data
 103 
	stdcall [OpenDialog_Init],OpenDialog_data
Line 160... Line 104...
160 
 
 104 
 
161 
align 4
 105 
align 4
162 
red_win:
 106 
red_win:
Line 163... Line 107...
163 
	call draw_window
 107 
	call draw_window
164 
	call but_MetLoad
 108 
	call but_MetLoad
165 
	call but_Refresh ; Auto Refresh after program start
 109 
	call but_Refresh ; Auto Refresh after program start
166 
 
 110 
 
Line 185... Line 129...
185 
	jmp still
 129 
	jmp still
Line 186... Line 130...
186 
 
 130 
 
187 
align 4
 131 
align 4
188 
key:
 132 
key:
189 
	push eax ebx
 133 
	push eax ebx
190 
	mcall 2
 134 
	mcall SF_GET_KEY
191 
	stdcall [edit_box_key], edit1
 135 
	stdcall [edit_box_key], edit1
Line 192... Line 136...
192 
	stdcall [edit_box_key], edit2
 136 
	stdcall [edit_box_key], edit2
193 
 
 137 
 
Line 248... Line 192...
248 
 
 192 
 
249 
 
 193 
 
250 
align 4
 194 
align 4
251 
draw_window:
 - 
 
252 
pushad
 - 
 
253 
  mcall 12,1
 - 
 
254 
 
 - 
 
255 
  xor eax,eax
 - 
 
256 
  mov edx,[sc.work]
 - 
 
257 
  or  edx,0x33000000
 - 
 
258 
  mov edi,hed
 - 
 
259 
  mcall ,20*65536+min_window_w,20*65536+min_window_h
 195 
draw_window:
260 
 
 - 
 
261 
  mcall 9,procinfo,-1
 - 
 
262 
 
 - 
 
263 
  cmp dword[procinfo.box.width],min_window_w ; ¯à®¢¥à塞 è¨à¨­ã ®ª­ 
 - 
 
264 
  jge @f
 - 
 
Line 265... Line -...
265 
    mov dword[procinfo.box.width],min_window_w ; ¥á«¨ ®ª­® ®ç¥­ì 㧪®¥, 㢥«¨ç¨¢ ¥¬ è¨à¨­ã ¤«ï ¨§¡¥¦ ­¨ï £«îª®¢
 - 
 
266 
  @@:
 - 
 
267 
 
 - 
 
268 
  mov edi,dword[procinfo.box.width]
 - 
 
269 
  sub edi,min_window_w-otst_panel_left
 - 
 
270 
  mov dword[tree1.box_left],edi
 - 
 
271 
  mov dword[tree2.box_left],edi
 - 
 
272 
 
 196 
pushad
273 
  mov eax,dword[tree2.box_left] ;¤¢¨£ ¥¬ áªà®««¨­£
 197 
	mcall SF_REDRAW,SSF_BEGIN_DRAW
274 
  add eax,dword[tree2.box_width]
 - 
 
275 
  mov ebx,dword[tree2.p_scroll]
 - 
 
276 
  mov word[ebx+2],ax
 - 
 
277 
 
 - 
 
278 
  mov dword[edit2.left],edi
 - 
 
279 
  add dword[edit2.left],370-otst_panel_left
 - 
 
280 
 
 - 
 
281 
  stdcall dword[tl_draw],dword tree1
 - 
 
282 
  stdcall dword[tl_draw],dword tree2
 - 
 
283 
  mov dword[wScrMetki.all_redraw],1
 - 
 
284 
  stdcall [scrollbar_ver_draw], dword wScrMetki
 198 
 
285 
 
 - 
 
286 
  mov esi,[sc.work_button]
 - 
 
287 
  mcall 8,145*65536+20,5*65536+25,6 ;ª­®¯ª 
 - 
 
288 
 
 - 
 
289 
  mcall ,100*65536+20,5*65536+25,5
 - 
 
290 
 
 - 
 
291 
  mov ebx,170*65536+40 ;ª­®¯ª  ¢ë§®¢  ¤¨ «®£  OpenDial
 - 
 
Line 292... Line -...
292 
  ;mov ecx,5*65536+25
 - 
 
293 
  mov edx,13
 - 
 
294 
  int 0x40
 - 
 
295 
 
 - 
 
296 
  mov bx,di
 - 
 
297 
  shl ebx,16
 - 
 
298 
  mov bx,100
 - 
 
299 
  mov ecx,265*65536+25
 - 
 
300 
  mov edx,9
 - 
 
301 
  int 0x40
 - 
 
302 
 
 - 
 
303 
  ;ebx ...
 - 
 
304 
  mov ecx,235*65536+25
 - 
 
305 
  mov edx,8
 199 
	mov edx,[sc.work]
306 
  int 0x40
 - 
 
307 
 
 - 
 
308 
  mov bx,di
 - 
 
309 
  add bx,410-otst_panel_left
 - 
 
310 
  shl ebx,16
 - 
 
311 
  mov bx,55
 - 
 
Line 312... Line -...
312 
  ;mov ebx,410*65536+55
 - 
 
313 
  mov ecx,5*65536+25
 200 
	or  edx,0x33000000
314 
  mov edx,7
 - 
 
315 
  int 0x40
 - 
 
316 
 
 - 
 
317 
  mov bx,di
 - 
 
318 
  add bx,440-otst_panel_left
 - 
 
319 
  shl ebx,16
 - 
 
320 
  mov bx,30
 - 
 
321 
  ;mov ebx,440*65536+30
 - 
 
322 
  mov ecx,265*65536+25
 - 
 
323 
  mov edx,12
 - 
 
324 
  int 0x40
 - 
 
325 
 
 - 
 
326 
  mov bx,di
 - 
 
327 
  add bx,405-otst_panel_left
 - 
 
328 
  shl ebx,16
 - 
 
329 
  mov bx,30
 - 
 
330 
  ;mov ebx,405*65536+30
 - 
 
331 
  ;mov ecx,265*65536+25
 - 
 
332 
  mov edx,11
 - 
 
333 
  int 0x40
 - 
 
334 
 
 - 
 
335 
  mov bx,di
 - 
 
336 
  add bx,370-otst_panel_left
 - 
 
337 
  shl ebx,16
 201 
	mcall SF_CREATE_WINDOW,20*65536+min_window_w,20*65536+min_window_h,,,hed
338 
  mov bx,30
 - 
 
339 
  ;mov ebx,370*65536+30
 202 
 
340 
  ;mov ecx,265*65536+25
 - 
 
341 
  mov edx,10
 - 
 
342 
  int 0x40
 - 
 
343 
 
 - 
 
344 
  mov eax,4 ;à¨á®¢ ­¨¥ ⥪áâ 
 203 
	mcall SF_THREAD_INFO,procinfo,-1
Line -... Line 204...
- 
 
 204 
 
- 
 
 205 
	cmp dword[procinfo.box.width],min_window_w ; ¯à®¢¥à塞 è¨à¨­ã ®ª­ 
- 
 
 206 
	jge @f
- 
 
 207 
		mov dword[procinfo.box.width],min_window_w ; ¥á«¨ ®ª­® ®ç¥­ì 㧪®¥, 㢥«¨ç¨¢ ¥¬ è¨à¨­ã ¤«ï ¨§¡¥¦ ­¨ï £«îª®¢
- 
 
 208 
	@@:
- 
 
 209 
 
- 
 
 210 
	mov edi,dword[procinfo.box.width]
- 
 
 211 
	sub edi,min_window_w-otst_panel_left
- 
 
 212 
	mov dword[tree1.box_left],edi
- 
 
 213 
	mov dword[tree2.box_left],edi
- 
 
 214 
 
- 
 
 215 
	mov eax,dword[tree2.box_left] ;¤¢¨£ ¥¬ áªà®««¨­£
- 
 
 216 
	add eax,dword[tree2.box_width]
- 
 
 217 
	mov ebx,dword[tree2.p_scroll]
- 
 
 218 
	mov word[ebx+2],ax
- 
 
 219 
 
- 
 
 220 
	mov dword[edit2.left],edi
- 
 
 221 
	add dword[edit2.left],370-otst_panel_left
- 
 
 222 
 
- 
 
 223 
	stdcall dword[tl_draw],dword tree1
- 
 
 224 
	stdcall dword[tl_draw],dword tree2
- 
 
 225 
	mov dword[wScrMetki.all_redraw],1
- 
 
 226 
	stdcall [scrollbar_ver_draw], dword wScrMetki
- 
 
 227 
 
- 
 
 228 
	mov esi,[sc.work_button]
- 
 
 229 
	mcall SF_DEFINE_BUTTON,145*65536+20,5*65536+25,6
- 
 
 230 
 
- 
 
 231 
	mcall ,100*65536+20,5*65536+25,5
- 
 
 232 
 
- 
 
 233 
	mov ebx,170*65536+40 ;ª­®¯ª  ¢ë§®¢  ¤¨ «®£  OpenDial
- 
 
 234 
	mov edx,13
- 
 
 235 
	int 0x40
- 
 
 236 
 
- 
 
 237 
	mov bx,di
- 
 
 238 
	shl ebx,16
- 
 
 239 
	mov bx,100
- 
 
 240 
	mov ecx,265*65536+25
- 
 
 241 
	mov edx,9
- 
 
 242 
	int 0x40
- 
 
 243 
 
- 
 
 244 
	;ebx ...
- 
 
 245 
	mov ecx,235*65536+25
- 
 
 246 
	mov edx,8
- 
 
 247 
	int 0x40
- 
 
 248 
 
- 
 
 249 
	mov bx,di
- 
 
 250 
	add bx,410-otst_panel_left
- 
 
 251 
	shl ebx,16
- 
 
 252 
	mov bx,55
- 
 
 253 
	mov ecx,5*65536+25
- 
 
 254 
	mov edx,7
- 
 
 255 
	int 0x40
- 
 
 256 
 
- 
 
 257 
	mov bx,di
- 
 
 258 
	add bx,440-otst_panel_left
- 
 
 259 
	shl ebx,16
- 
 
 260 
	mov bx,30
- 
 
 261 
	mov ecx,265*65536+25
- 
 
 262 
	mov edx,12
- 
 
 263 
	int 0x40
- 
 
 264 
 
- 
 
 265 
	mov bx,di
- 
 
 266 
	add bx,405-otst_panel_left
- 
 
 267 
	shl ebx,16
- 
 
 268 
	mov bx,30
- 
 
 269 
	mov edx,11
- 
 
 270 
	int 0x40
- 
 
 271 
 
- 
 
 272 
	mov bx,di
- 
 
 273 
	add bx,370-otst_panel_left
- 
 
 274 
	shl ebx,16
- 
 
 275 
	mov bx,30
- 
 
 276 
	mov edx,10
345 
  mov ebx,152*65536+13
 277 
	int 0x40
346 
  mov ecx,[sc.work_button_text]
 278 
 
347 
  or  ecx,0x80000000
 279 
	mov ecx,[sc.work_button_text]
Line 348... Line 280...
348 
  mov edx,txt_zoom_p
 280 
	or  ecx,0x80000000
349 
  mcall
 281 
	mcall SF_DRAW_TEXT,152*65536+13,,txt_zoom_p
350 
 
 282 
 
351 
  mov ebx,107*65536+13
 283 
	mov ebx,107*65536+13
Line 414... Line 346...
414 
  mov bx,35
 346 
  mov bx,35
415 
  ;mov ebx,265*65536+35
 347 
  ;mov ebx,265*65536+35
416 
  mov edx,txt141
 348 
  mov edx,txt141
417 
  int 0x40
 349 
  int 0x40
Line 418... Line 350...
418 
 
 350 
 
419 
  mov bx,135
 - 
 
420 
  ;mov ebx,265*65536+135
 351 
	mov bx,135
421 
  mov edx,txt142
 352 
	mov edx,txt142
422 
  int 0x40
 353 
	int 0x40
423 
 
 354 
 
424 
  call draw_tiles
 355 
	call draw_tiles
425 
 
 356 
 
426 
  stdcall [check_box_draw], dword ch1
 357 
	stdcall [check_box_draw], ch1
427 
  stdcall [check_box_draw], dword ch2
 358 
	stdcall [check_box_draw], ch2
428 
  stdcall [edit_box_draw], edit1
 359 
	stdcall [edit_box_draw], edit1
Line 429... Line 360...
429 
  stdcall [edit_box_draw], edit2
 360 
	stdcall [edit_box_draw], edit2
430 
 
 361 
 
431 
  mcall 12,2
 362 
	mcall SF_REDRAW,SSF_END_DRAW
Line 432... Line 363...
432 
popad
 363 
popad
433 
  ret
 364 
	ret
434 
 
 365 
 
435 
  head_f_i:
 366 
  head_f_i:
Line 460... Line 391...
460 
system_dir4 db '/sys/lib/'
 391 
system_dir4 db '/sys/lib/'
461 
lib4_name db 'proc_lib.obj',0
 392 
lib4_name db 'proc_lib.obj',0
Line 462... Line 393...
462 
 
 393 
 
463 
;library structures
 394 
;library structures
- 
 
 395 
l_libs_start:
464 
l_libs_start:
 396 
	lib_0 l_libs lib0_name, sys_path, file_name, system_dir0,\
- 
 
 397 
		err_message_found_lib0, head_f_l, boxlib_import, err_message_import0, head_f_i
465 
	lib0 l_libs lib0_name, sys_path, file_name, system_dir0, err_message_found_lib0, head_f_l, boxlib_import,err_message_import0, head_f_i
 398 
	lib_1 l_libs lib1_name, sys_path, file_name, system_dir1,\
- 
 
 399 
		err_message_found_lib1, head_f_l, libimg_import, err_message_import1, head_f_i
466 
	lib1 l_libs lib1_name, sys_path, file_name, system_dir1, err_message_found_lib1, head_f_l, libimg_import, err_message_import1, head_f_i
 400 
	lib_2 l_libs lib2_name, sys_path, file_name, system_dir2,\
- 
 
 401 
		err_message_found_lib2, head_f_l, strlib_import, err_message_import2, head_f_i
467 
	lib2 l_libs lib2_name, sys_path, file_name, system_dir2, err_message_found_lib2, head_f_l, strlib_import, err_message_import2, head_f_i
 402 
	lib_3 l_libs lib3_name, sys_path, file_name, system_dir3,\
- 
 
 403 
		err_message_found_lib3, head_f_l, libini_import, err_message_import3, head_f_i
468 
	lib3 l_libs lib3_name, sys_path, file_name, system_dir3, err_message_found_lib3, head_f_l, libini_import, err_message_import3, head_f_i
 404 
	lib_4 l_libs lib4_name, sys_path, file_name, system_dir4,\
469 
	lib4 l_libs lib4_name, sys_path, file_name, system_dir4, err_message_found_lib4, head_f_l, proclib_import, err_message_import4, head_f_i
 405 
		err_message_found_lib4, head_f_l, proclib_import, err_message_import4, head_f_i
Line 470... Line 406...
470 
load_lib_end:
 406 
load_lib_end:
471 
 
 407 
 
472 
align 4
 408 
align 4
473 
button:
 409 
button:
474 
	mcall 17 ;¯®«ãç¨âì ª®¤ ­ ¦ â®© ª­®¯ª¨
 410 
	mcall SF_GET_BUTTON
475 
	cmp ah,5
 411 
	cmp ah,5
476 
	jne @f
 412 
	jne @f
477 
		call but_ZoomM
 413 
		call but_ZoomM
Line 527... Line 463...
527 
		;¯®¢â®à­ë© ¢ë§®¢ tl_data_clear ¡¥§ ç¨á⪨ 㪠§ â¥«ï ¢ë§¢¥â ®è¨¡ªã
 463 
		;¯®¢â®à­ë© ¢ë§®¢ tl_data_clear ¡¥§ ç¨á⪨ 㪠§ â¥«ï ¢ë§¢¥â ®è¨¡ªã
528 
	mov dword[tree2.data_img],0 ;ç¨á⨬ 㪠§ â¥«ì ­  ¨ª®­ª¨ 㧫®¢
 464 
	mov dword[tree2.data_img],0 ;ç¨á⨬ 㪠§ â¥«ì ­  ¨ª®­ª¨ 㧫®¢
529 
	stdcall dword[tl_data_clear], tree2
 465 
	stdcall dword[tl_data_clear], tree2
Line 530... Line 466...
530 
 
 466 
 
531 
;  stdcall dword[img_destroy], dword[data_icon]
 467 
;  stdcall dword[img_destroy], dword[data_icon]
Line 532... Line 468...
532 
	mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
 468 
	mcall SF_TERMINATE_PROCESS
533 
 
 469 
 
534 
 
 470 
 
Line 830... Line 766...
830 
		stdcall [edit_box_draw], edit1
 766 
		stdcall [edit_box_draw], edit1
831 
	@@:
 767 
	@@:
832 
	popad
 768 
	popad
833 
	ret
 769 
	ret
Line 834... Line 770...
834 
 
 770 
 
835 
  txt_met_up db 24,0
 771 
txt_met_up db 24,0
836 
  txt_met_dn db 25,0
 772 
txt_met_dn db 25,0
837 
  txt_met_sh db '*',0
 773 
txt_met_sh db '*',0
838 
  txt_zoom_m db '-',0
 774 
txt_zoom_m db '-',0
839 
  txt_zoom_p db '+',0
 775 
txt_zoom_p db '+',0
840 
  txt151 db '„®¡ ¢¨âì ¬¥âªã',0
 776 
txt151 db '„®¡ ¢¨âì ¬¥âªã',0
841 
  txt152 db '‘®åà ­¨âì ¬¥âª¨',0
 777 
txt152 db '‘®åà ­¨âì ¬¥âª¨',0
842 
  txt_but_refresh db 'Ž¡­®¢¨âì',0
 778 
txt_but_refresh db 'Ž¡­®¢¨âì',0
843 
  txt_cache db 'Cache:',0
 779 
txt_cache db 'Cache:',0
844 
  txt141 db '‚¨¤ ª àâë',0
 780 
txt141 db '‚¨¤ ª àâë',0
Line 845... Line 781...
845 
  txt142 db '‚ë¡®à ¬¥âª¨',0
 781 
txt142 db '‚ë¡®à ¬¥âª¨',0
846 
 
 782 
 
847 
; check_boxes
 783 
; check_boxes
848 
ch1 check_box2 (5 shl 16)+12,  (5 shl 16)+12, 6, 0xffffd0, 0x800000, 0, ch_text1, ch_flag_en
 784 
ch1 check_box2 (5 shl 16)+12,  (5 shl 16)+12, 6, 0xffffd0, 0x800000, 0, ch_text1, ch_flag_en
Line 865... Line 801...
865 
 
 801 
 
866 
align 4
 802 
align 4
Line 867... Line 803...
867 
wScrMetki scrollbar 16,0, 100,0, 15, 100, 30,0, 0xeeeeee, 0xbbddff, 0, 1
 803 
wScrMetki scrollbar 16,0, 100,0, 15, 100, 30,0, 0xeeeeee, 0xbbddff, 0, 1
868 
 
 804 
 
Line 869... Line 805...
869 
ed_buffer: ;òåêñò äëÿ edit
 805 
ed_buffer: ;òåêñò äëÿ edit
Line 870... Line 806...
870 
  .2: rb 32
 806 
.2: rb 32
871 
 
 807 
 
Line 879... Line 815...
879 
 
 815 
 
Line 880... Line 816...
880 
run_file_70 FileInfoBlock
 816 
run_file_70 FileInfoBlock
881 
 
 817 
 
882 
 
 818 
 
883 
txt_tile_path db 'tile path',0
 819 
txt_tile_path db 'tile path',0
884 
  rb 300
 820 
	rb 300
Line 885... Line 821...
885 
txt_tile_type dd txt_tile_type_0 ;㪠§ â¥«ì ­  ¢ë¡à ­­ë© ⨯ ä ©«®¢
 821 
txt_tile_type dd txt_tile_type_0 ;㪠§ â¥«ì ­  ¢ë¡à ­­ë© ⨯ ä ©«®¢
886 
txt_tile_type_0 db 0
 822 
txt_tile_type_0 db 0
887 
  rb 10
 823 
	rb 10
888 
 
 824 
 
Line 956... Line 892...
956 
	cmp eax,ecx ;áà ¢­¨âì ¥á«¨ ¢ eax ¬¥­ìè¥ ç¥¬ ¢ ecx â® ¯¥à¥©â¨ ­  @@-1 â.¥. ­  pop eax
 892 
	cmp eax,ecx ;áà ¢­¨âì ¥á«¨ ¢ eax ¬¥­ìè¥ ç¥¬ ¢ ecx â® ¯¥à¥©â¨ ­  @@-1 â.¥. ­  pop eax
957 
	jb @f
 893 
	jb @f
958 
		xor edx,edx ;®ç¨áâ¨âì edx
 894 
		xor edx,edx ;®ç¨áâ¨âì edx
959 
		div ecx   ;à §¤¥«¨âì - ®áâ â®ª ¢ edx
 895 
		div ecx   ;à §¤¥«¨âì - ®áâ â®ª ¢ edx
960 
		push edx  ;¯®«®¦¨âì ¢ á⥪
 896 
		push edx  ;¯®«®¦¨âì ¢ á⥪
961 
		;dec edi  ;ᬥ饭¨¥ ­¥®¡å®¤¨¬®¥ ¤«ï § ¯¨á¨ á ª®­æ  áâப¨
 - 
 
962 
		call .str ;¯¥à¥©â¨ ­  á ¬ã ᥡï â.¥. ¢ë§¢ âì á ¬ã á¥¡ï ¨ â ª ¤® ⮣® ¬®¬¥­â  ¯®ª  ¢ eax ­¥ áâ ­¥â ¬¥­ìè¥ ç¥¬ ¢ ecx
 897 
		call .str ;¯¥à¥©â¨ ­  á ¬ã ᥡï â.¥. ¢ë§¢ âì á ¬ã á¥¡ï ¨ â ª ¤® ⮣® ¬®¬¥­â  ¯®ª  ¢ eax ­¥ áâ ­¥â ¬¥­ìè¥ ç¥¬ ¢ ecx
963 
		pop eax
 898 
		pop eax
964 
	@@: ;cmp al,10 ;¯à®¢¥à¨âì ­¥ ¬¥­ìè¥ «¨ §­ ç¥­¨¥ ¢ al 祬 10 (¤«ï á¨á⥬ë áç¨á«¥­ï 10 ¤ ­­ ï ª®¬ ­¤  - «¨è­ ï))
 899 
	@@: ;cmp al,10 ;¯à®¢¥à¨âì ­¥ ¬¥­ìè¥ «¨ §­ ç¥­¨¥ ¢ al 祬 10 (¤«ï á¨á⥬ë áç¨á«¥­ï 10 ¤ ­­ ï ª®¬ ­¤  - «¨è­ ï))
965 
	cmp edi,esi
 900 
	cmp edi,esi
966 
	jge @f
 901 
	jge @f
Line 968... Line 903...
968 
		stosb	   ;§ ¯¨á âì í«¥¬¥­â ¨§ ॣ¨áâà  al ¢ ï祪㠯 ¬ï⨠es:edi
 903 
		stosb	   ;§ ¯¨á âì í«¥¬¥­â ¨§ ॣ¨áâà  al ¢ ï祪㠯 ¬ï⨠es:edi
969 
		mov byte[edi],0 ;¢ ª®­¥æ áâப¨ áâ ¢¨¬ 0, çâ®-¡ë ­¥ ¢ë« §¨« ¬ãá®à
 904 
		mov byte[edi],0 ;¢ ª®­¥æ áâப¨ áâ ¢¨¬ 0, çâ®-¡ë ­¥ ¢ë« §¨« ¬ãá®à
970 
	@@:
 905 
	@@:
971 
	ret	   ;¯®ª  ¢ á⥪¥ åà ­¨âìáï ª®«-¢® ¢ë§®¢®¢ â® á⮫쪮 à § ¬ë ¨ ¡ã¤¥¬ ¢ë§ë¢ âìáï
 906 
	ret	   ;¯®ª  ¢ á⥪¥ åà ­¨âìáï ª®«-¢® ¢ë§®¢®¢ â® á⮫쪮 à § ¬ë ¨ ¡ã¤¥¬ ¢ë§ë¢ âìáï
Line 972... Line -...
972 
 
 - 
 
973 
 
 907 
 
974 
hed db 'Planet viewer 09.11.15',0 ;¯®¤¯¨áì ®ª­ 
 - 
 
975 
 
 - 
 
976 
sc system_colors  ;á¨á⥬­ë¥ 梥â 
 908 
hed db 'Planet viewer 16.02.16',0 ;¯®¤¯¨áì ®ª­ 
- 
 
 909 
mouse_dd dd 0 ;­ã¦­® ¤«ï Shift-  ¢ editbox
977 
mouse_dd dd 0 ;­ã¦­® ¤«ï Shift-  ¢ editbox
 910 
 
978 
align 16
 911 
align 16
979 
i_end:
 912 
i_end:
- 
 
 913 
	procinfo process_information
980 
	procinfo process_information
 914 
	sc system_colors  ;á¨á⥬­ë¥ 梥â 
- 
 
 915 
	rb 1024
981 
	rb 1024
 916 
align 16
982 
stacktop:
 917 
stacktop:
983 
	sys_path rb 4096
 918 
sys_path rb 4096
984 
	file_name:
 - 
 
985 
		rb 4096
 919 
file_name rb 4096
986 
	plugin_path:
 - 
 
987 
		rb 4096
 920 
plugin_path rb 4096
988 
	openfile_path:
 - 
 
989 
		rb 4096
 921 
openfile_path rb 4096
990 
	filename_area:
 - 
 
991 
		rb 256
 922 
filename_area rb 256