Subversion Repositories Kolibri OS

Rev

Rev 5830 | Rev 5939 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5830 Rev 5911
Line 49... Line 49...
49 
			local .path_str
 49 
			local .path_str
50 
			.path_str db path ;ä®à¬¨à㥬 «®ª «ì­ãî ¯¥à¥¬¥­­ãî
 50 
			.path_str db path ;ä®à¬¨à㥬 «®ª «ì­ãî ¯¥à¥¬¥­­ãî
51 
			db 0
 51 
			db 0
52 
		@@:
 52 
		@@:
53 
		;32 - áâ ­¤ àâ­ë©  ¤à¥á ¯® ª®â®à®¬ã ¤®«¦¥­ ¡ëâì ¡ãä¥à á á¨á⥬­ë¬ ¯ã⥬
 53 
		;32 - áâ ­¤ àâ­ë©  ¤à¥á ¯® ª®â®à®¬ã ¤®«¦¥­ ¡ëâì ¡ãä¥à á á¨á⥬­ë¬ ¯ã⥬
54 
		copy_path .path_str,[32],file_name,0x0
 54 
		copy_path .path_str,[32],file_name,0
55 
	else
 55 
	else
56 
		copy_path path,[32],file_name,0x0 ;ä®à¬¨à㥬 ¯®«­ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥­¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ®­ ¢ ®¤­®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
 56 
		copy_path path,[32],file_name,0 ;ä®à¬¨à㥬 ¯®«­ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥­¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ®­ ¢ ®¤­®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
57 
	end if
 57 
	end if
Line 58... Line 58...
58 
 
 58 
 
59 
	stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥­¨ï
 59 
	stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥­¨ï
Line 60... Line -...
60 
	mov [buf],eax
 - 
 
61 
 
 60 
	mov [buf],eax
62 
	mov eax,70 ;70-ï äã­ªæ¨ï à ¡®â  á ä ©« ¬¨
 61 
 
63 
	mov [run_file_70.Function], 0
 62 
	mov [run_file_70.Function], 0
64 
	mov [run_file_70.Position], 0
 63 
	mov [run_file_70.Position], 0
65 
	mov [run_file_70.Flags], 0
 64 
	mov [run_file_70.Flags], 0
66 
	mov [run_file_70.Count], dword size
 65 
	mov [run_file_70.Count], dword size
67 
	m2m [run_file_70.Buffer], [buf]
 66 
	m2m [run_file_70.Buffer], eax
68 
	mov byte[run_file_70+20], 0
 - 
 
69 
	mov [run_file_70.FileName], file_name
 67 
	mov byte[run_file_70+20], 0
70 
	mov ebx,run_file_70
 68 
	mov [run_file_70.FileName], file_name
71 
	int 0x40 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
 69 
	mcall 70,run_file_70 ;§ £à㦠¥¬ ä ©« ¨§®¡à ¦¥­¨ï
72 
	cmp ebx,0xffffffff
 70 
	cmp ebx,0xffffffff
73 
	je @f
 71 
	je @f
74 
		;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥­¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥­­ë© ¡ãä¥à image_data
 72 
		;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥­¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥­­ë© ¡ãä¥à image_data
Line 208... Line 206...
208 
; ç¨â ¥¬ ä ©« á ¨ª®­ª ¬¨ 㧫®¢
 206 
; ç¨â ¥¬ ä ©« á ¨ª®­ª ¬¨ 㧫®¢
209 
	load_image_file 'tl_nod_16.png', icon_tl_sys,54+3*256*2
 207 
	load_image_file 'tl_nod_16.png', icon_tl_sys,54+3*256*2
210 
	mov eax,dword[icon_tl_sys]
 208 
	mov eax,dword[icon_tl_sys]
211 
	mov dword[tree1.data_img],eax
 209 
	mov dword[tree1.data_img],eax
212 
;------------------------------------------------------------------------------
 210 
;------------------------------------------------------------------------------
213 
  copy_path fn_syntax_dir,sys_path,file_name,0x0 ;¡¥à¥¬ ¯ãâì ª ¯ ¯ª¥ á ä ©« ¬¨ ᨭ⠪á¨á 
 211 
	copy_path fn_syntax_dir,sys_path,file_name,0 ;¡¥à¥¬ ¯ãâì ª ¯ ¯ª¥ á ä ©« ¬¨ ᨭ⠪á¨á 
214 
  mov eax,70
 - 
 
215 
  mov ebx,tree_file_struct
 212 
	mcall 70,tree_file_struct
216 
  int 0x40
 - 
 
Line 217... Line 213...
217 
 
 213 
 
218 
cmp ebx,-1
 214 
	cmp ebx,-1
219 
je .end_dir_init
 - 
 
220 
 
 215 
	je .end_dir_init
221 
  mov eax,dir_mem
 216 
		mov eax,dir_mem
222 
  add eax,32+4+1+3+4*6+8
 217 
		add eax,32+4+1+3+4*6+8
223 
mov ecx,ebx
 218 
		mov ecx,ebx
224 
@@:
 219 
		@@:
225 
  cmp byte[eax],'.' ;䨫ìâà㥬 ä ©«ë á ¨¬¥­ ¬¨ '.' ¨ '..'
 220 
			cmp byte[eax],'.' ;䨫ìâà㥬 ä ©«ë á ¨¬¥­ ¬¨ '.' ¨ '..'
226 
  je .filter
 221 
			je .filter
227 
    ;0x10000 ;1*2^16 - £¤¥ 1 ­®¬¥à ¨ª®­ª¨ á ª­¨£®©
 222 
			;0x10000 ;1*2^16 - £¤¥ 1 ­®¬¥à ¨ª®­ª¨ á ª­¨£®©
228 
    stdcall dword[tl_node_add], eax,0x10000, tree1
 - 
 
229 
 
 223 
			stdcall dword[tl_node_add], tree1,0x10000,eax
230 
    stdcall dword[tl_cur_next], tree1
 224 
			stdcall dword[tl_cur_next], tree1
231 
  .filter:
 225 
			.filter:
232 
  add eax,304
 226 
			add eax,304
233 
  loop @b
 227 
			loop @b
Line 324... Line 318...
324 
 
 318 
 
325 
	mcall 9,procinfo,-1
 319 
	mcall 9,procinfo,-1
326 
	mov edi,tedit0 ;§­ ç¥­¨¥ edi ­ã¦­® ¤«ï EvSize ¨ ted_wnd_t
 320 
	mov edi,tedit0 ;§­ ç¥­¨¥ edi ­ã¦­® ¤«ï EvSize ¨ ted_wnd_t
Line 327... Line -...
327 
	call EvSize
 - 
 
328 
 
 - 
 
329 
	mov eax,13 ;¢¥àå­¨© ¯àאַ㣮«ì­¨ª, ¤«ï ®ç¨á⪨ ¢¥àå­¥© ¯ ­¥«¨
 - 
 
330 
	xor ebx,ebx
 321 
	call EvSize
331 
	mov ecx,ted_wnd_t
 322 
 
332 
	mov bx,word[procinfo.client_box.width]
 - 
 
- 
 
 323 
	movzx ebx,word[procinfo.client_box.width]
Line 333... Line 324...
333 
	inc bx
 324 
	inc bx
Line 334... Line 325...
334 
	int 0x40
 325 
	mcall 13,,ted_wnd_t ;¢¥àå­¨© ¯àאַ㣮«ì­¨ª, ¤«ï ®ç¨á⪨ ¢¥àå­¥© ¯ ­¥«¨
Line 359... Line 350...
359 
;---------------------------------------------------------------------
 350 
;---------------------------------------------------------------------
Line 360... Line 351...
360 
 
 351 
 
361 
;output:
 352 
;output:
362 
; ah = symbol
 353 
; ah = symbol
363 
align 4
 354 
align 4
364 
proc KeyConvertToASCII, table:dword
 - 
 
365 
  push ebx
 355 
proc KeyConvertToASCII uses ebx, table:dword
366 
  mov ebx,dword[table] ;convert scan to ascii
 356 
	mov ebx,dword[table] ;convert scan to ascii
367 
  ror ax,8
 357 
	ror ax,8
368 
  xor ah,ah
 358 
	xor ah,ah
369 
  add bx,ax
 359 
	add bx,ax
370 
  mov ah,byte[ebx]
 - 
 
371 
  pop ebx
 360 
	mov ah,byte[ebx]
372 
  ret
 361 
	ret
Line 373... Line 362...
373 
endp
 362 
endp
374 
 
 363 
 
Line 539... Line 528...
539 
	je @f
 528 
	je @f
540 
		stdcall mem.Free,[unpac_mem]
 529 
		stdcall mem.Free,[unpac_mem]
541 
	@@:
 530 
	@@:
Line 542... Line 531...
542
531
543 
	stdcall [ted_delete], tedit0
 532 
	stdcall [ted_delete], tedit0
544 
	stdcall dword[tl_data_clear], tree1
 533 
	stdcall [tl_data_clear], tree1
Line 545... Line 534...
545 
	mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
 534 
	mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
Line 546... Line 535...
546 
 
 535