Subversion Repositories Kolibri OS

Rev

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

Rev 2707 Rev 2708
Line 18... Line 18...
18
maxChars equ 100002 ;(...+2)
18
maxChars equ 100002 ;(...+2)
19
BUF_SIZE equ 1000 ;buffer for copy|paste
19
BUF_SIZE equ 1000 ;buffer for copy|paste
20
maxSyntaxFileSize equ 410000
20
maxSyntaxFileSize equ 410000
Line 21... Line 21...
21
 
21
 
-
 
22
include '../../proc32.inc'
22
include '../../proc32.inc'
23
;include '../../config.inc'
23
include '../../macros.inc'
24
include '../../macros.inc'
24
include 'mem.inc'
25
include 'mem.inc'
25
include 'dll.inc'
26
include 'dll.inc'
26
include '../../develop/libraries/box_lib/load_lib.mac'
27
include '../../develop/libraries/box_lib/load_lib.mac'
-
 
28
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
-
 
29
include '../../system/desktop/trunk/kglobals.inc'
27
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
30
include '../../system/desktop/trunk/unpacker.inc'
Line 28... Line 31...
28
include 'lang.inc'
31
include 'lang.inc'
29
 
32
 
30
include 't_data.inc'
33
include 't_data.inc'
Line 89... Line 92...
89
  mcall 68,11
92
  mcall 68,11
90
  or eax,eax
93
  or eax,eax
91
  jz button.exit
94
  jz button.exit
Line 92... Line 95...
92
 
95
 
93
  mcall 66,1,1 ;scan code
-
 
94
  ;mcall 26,2,1,conv_tabl
96
  mcall 66,1,1 ;scan code
Line 95... Line 97...
95
  mcall 40,0x27
97
  mcall 40,0x27
96
 
98
 
97
  mov esi,file_name
99
  mov esi,file_name
Line 167... Line 169...
167
 
169
 
168
;--- load color option file ---
170
;--- load color option file ---
169
	mov ebx,dword[fn_col_option]
171
	mov ebx,dword[fn_col_option]
170
	copy_path ebx,fn_syntax_dir,file_name_rez,0x0
172
	copy_path ebx,fn_syntax_dir,file_name_rez,0x0
171
	copy_path file_name_rez,sys_path,file_name,0x0
-
 
172
	mov edi, tedit0
-
 
173
	mov ebx,run_file_70
-
 
174
	mov dword[ebx], 0
-
 
175
	mov dword[ebx+4], 0
-
 
176
	mov dword[ebx+8], 0
-
 
177
	mov ecx, ted_syntax_file_size
-
 
178
	mov dword[ebx+12], ecx
-
 
179
	m2m dword[ebx+16], ted_syntax_file
-
 
180
	mov  byte[ebx+20], 0
-
 
181
	m2m dword[ebx+21], file_name
-
 
182
	mcall 70
-
 
183
	cmp eax,0
-
 
184
	jne .end_0
173
	copy_path file_name_rez,sys_path,file_name,0x0
185
		call ted_on_init_synt_err
-
 
186
		jmp @f
-
 
187
	.end_0:
-
 
Line 188... Line 174...
188
	stdcall [ted_init_syntax_file], edi
174
	call open_unpac_synt_file
189
 
175
 
190
;--- get cmd line ---
176
;--- get cmd line ---
191
  cmp byte[openfile_path+3],0 ;openfile_path
177
	cmp byte[openfile_path+3],0 ;openfile_path
Line 481... Line 467...
481
  jne @f
467
	jne @f
482
    stdcall [mb_create],msgbox_8,thread ;message: save changes in file?
468
		stdcall [mb_create],msgbox_8,thread ;message: save changes in file?
483
    jmp still
469
		jmp still
484
  @@:
470
	@@:
485
  stdcall mem.Free,[bmp_icon]
471
	stdcall mem.Free,[bmp_icon]
-
 
472
	cmp dword[unpac_mem],0
-
 
473
	je @f
-
 
474
		stdcall mem.Free,[unpac_mem]
-
 
475
	@@:
Line 486... Line 476...
486
 
476
 
487
  stdcall [ted_delete], tedit0
477
	stdcall [ted_delete], tedit0
488
  stdcall dword[tl_data_clear], tree1
478
	stdcall dword[tl_data_clear], tree1
Line 489... Line 479...
489
  mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
479
	mcall -1 ;¢ë室 ¨§ ¯à®£à ¬¬ë
490
 
480
 
Line -... Line 481...
-
 
481
 
491
 
482
edit1 edit_box 250, 220, 5, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 4090, openfile_path, mouse_dd, 0
Line 492... Line 483...
492
edit1 edit_box 250, 220, 5, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 4090, openfile_path, mouse_dd, 0
483
edit2 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_find, mouse_dd, 0
493
edit2 edit_box TED_PANEL_WIDTH-1, 0, 20, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 300, buf_find, mouse_dd, 0
484
 
494
 
485
unpac_mem dd 0
Line 528... Line 519...
528
		err_message_found_lib2, head_f_l, import_proclib, err_message_import2, head_f_i
519
		err_message_found_lib2, head_f_l, import_proclib, err_message_import2, head_f_i
529
	lib3 l_libs lib_name_3, sys_path, file_name, system_dir_3,\
520
	lib3 l_libs lib_name_3, sys_path, file_name, system_dir_3,\
530
		err_message_found_lib_3, head_f_l, import_libimg, err_message_import_3, head_f_i
521
		err_message_found_lib_3, head_f_l, import_libimg, err_message_import_3, head_f_i
531
load_lib_end:
522
load_lib_end:
Line 532... Line 523...
532
 
523
 
533
 
524
IncludeIGlobals
-
 
525
i_end:
534
i_end:
526
IncludeUGlobals
535
	rb 1024
527
	rb 1024
536
	align 16
528
	align 16
537
	procinfo process_information
529
	procinfo process_information
538
		rb 1024
530
		rb 1024