Subversion Repositories Kolibri OS

Rev

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

Rev 2847 Rev 2855
Line 25... Line 25...
25 
 
 25 
 
26 
;input:
 26 
;input:
27 
; al = ª®¤ ®è¨¡ª¨
 27 
; al = ª®¤ ®è¨¡ª¨
28 
align 4
 28 
align 4
29 
ted_on_init_synt_err:
 29 
ted_on_init_synt_err:
- 
 
 30 
	mov byte[msgbox_3.err],'0'
30 
	mov byte[msgbox_3.err],al
 31 
	add byte[msgbox_3.err],al
31 
	stdcall [mb_create],msgbox_3,thread ;message: Can-t open color options file!
 32 
	stdcall [mb_create],msgbox_3,thread ;message: Can-t open color options file!
Line 32... Line 33...
32 
	ret
 33 
	ret
Line 115... Line 116...
115 
		mov esi,[OpenDialog_data.openfile_path]
 116 
		mov esi,[OpenDialog_data.openfile_path]
116 
		call strlen
 117 
		call strlen
117 
		mov [edit1.size],eax
 118 
		mov [edit1.size],eax
118 
		mov [edit1.pos],eax
 119 
		mov [edit1.pos],eax
119 
		stdcall [edit_box_draw], edit1
 120 
		stdcall [edit_box_draw], edit1
- 
 
 121 
 
- 
 
 122 
		;¨é¥¬ ¥áâì «¨ ä ©« ¯®¤á¢¥âª¨ ¤«ï ®âªà뢠¥¬®£® ⥪á⮢®£® ä ©« 
- 
 
 123 
		mov edx,[edit1.text]
- 
 
 124 
		add edx,eax
- 
 
 125 
		.f_beg:
- 
 
 126 
		cmp byte[edx],'.'
- 
 
 127 
		je .found
- 
 
 128 
			dec edx
- 
 
 129 
			cmp edx,[edit1.text]
- 
 
 130 
			jg .f_beg
- 
 
 131 
		.found:
- 
 
 132 
		inc edx ;edx - 㪠§ â¥«ì ­  à áè¨à¥­¨¥ ®âªàë⮣® ä ©« 
- 
 
 133 
 
- 
 
 134 
		mov ebx,synt_auto_open
- 
 
 135 
		.cycle_0:
- 
 
 136 
			add ebx,32
- 
 
 137 
			stdcall strcmp,ebx,edx ;áà ¢­¨¢ ¥¬ à áè¨à¥­¨¥ ®âªàë⮣® ä ©«  á® §­ ç¥­¨ï¬¨ ®âªàëâ묨 á ini ä ©« 
- 
 
 138 
			test eax,eax
- 
 
 139 
			jz .ok
- 
 
 140 
			add ebx,32
- 
 
 141 
			cmp byte[ebx],0
- 
 
 142 
			jne .cycle_0
- 
 
 143 
		jmp .end_0
- 
 
 144 
		.ok: ;®âªàë⨥ ä ©«  ¯®¤á¢¥âª¨ ¢ § ¢¨á¨¬®á⨠®â ­ ©¤¥­­®£® à áè¨à¥­¨ï
- 
 
 145 
			sub ebx,32
- 
 
 146 
			;mov ecx,ebx
- 
 
 147 
			;mcall 71,1
- 
 
 148 
			call open_unpac_synt_file
- 
 
 149 
		.end_0:
- 
 
 150 
 
120 
		stdcall [ted_open_file], tedit0,run_file_70,[edit1.text]
 151 
		stdcall [ted_open_file], tedit0,run_file_70,[edit1.text]
121 
		call ted_messages_after_open_file
 152 
		call ted_messages_after_open_file
- 
 
 153 
 
122 
	.ret_f:
 154 
	.ret_f:
123 
	popad
 155 
	popad
124 
	ret
 156 
	ret
Line 125... Line 157...
125 
 
 157 
 
Line 152... Line 184...
152 
endp
 184 
endp
Line 153... Line 185...
153 
 
 185 
 
154 
;input:
 186 
;input:
155 
; eax = ª®¤ ®è¨¡ª¨
 187 
; eax = ª®¤ ®è¨¡ª¨
156 
; ebx = ª®««¨ç¥á⢮ ¯à®ç¨â ­­ëå ¡ ©â
 - 
 
157 
; edi = pointer to tedit struct
 188 
; ebx = ª®««¨ç¥á⢮ ¯à®ç¨â ­­ëå ¡ ©â
158 
align 4
 189 
align 4
159 
ted_messages_after_open_file:
 190 
ted_messages_after_open_file:
160 
	push ecx edi
 191 
	push ecx edi
161 
	cmp eax,0
 192 
	cmp eax,0
Line 200... Line 231...
200 
	cmp ted_panel_id,TED_PANEL_SYNTAX
 231 
	cmp ted_panel_id,TED_PANEL_SYNTAX
201 
	jne @f
 232 
	jne @f
202 
		stdcall dword[tl_node_get_data], tree1
 233 
		stdcall dword[tl_node_get_data], tree1
203 
		pop dword[fn_col_option]
 234 
		pop dword[fn_col_option]
204 
		mov ebx,dword[fn_col_option]
 235 
		mov ebx,dword[fn_col_option]
205 
		copy_path ebx,fn_syntax_dir,file_name_rez,0x0
 - 
 
206 
		copy_path file_name_rez,sys_path,file_name,0x0
 - 
 
207 
 
 - 
 
208 
		call open_unpac_synt_file
 236 
		call open_unpac_synt_file
209 
		cmp ebx,-1
 237 
		cmp ebx,-1
210 
		je @f
 238 
		je @f
Line 211... Line 239...
211 
 
 239 
 
Line 214... Line 242...
214 
	@@:
 242 
	@@:
215 
	ret
 243 
	ret
216 
endp
 244 
endp
Line 217... Line 245...
217 
 
 245 
 
- 
 
 246 
;®âªàë⨥ ¨ à á¯ ª®¢ª  ä ©«  ¯®¤á¢¥âª¨ ᨭ⠪á¨á 
- 
 
 247 
;input:
218 
;®âªàë⨥ ¨ à á¯ ª®¢ª  ä ©«  ¯®¤á¢¥âª¨ ᨭ⠪á¨á 
 248 
; ebx - 㪠§ â¥«ì ­  ¨¬ï ®âªà뢠¥¬®£® ä ©«  ᨭ⠪á¨á  (¡¥§ ¯ã⨠¨ ¯ ¯ª¨ info)
219 
;output:
 249 
;output:
- 
 
 250 
; ebx - ç¨á«® ¯à®ç¨â ­­ëå ¡ ©â ¨§ ä ©« 
220 
; ebx - ç¨á«® ¯à®ç¨â ­­ëå ¡ ©â ¨§ ä ©« 
 251 
; ecx - à §àãè ¥âáï
221 
align 4
 252 
align 4
222 
open_unpac_synt_file:
 253 
open_unpac_synt_file:
- 
 
 254 
push eax edi esi
- 
 
 255 
	mov edi,last_open_synt_file
- 
 
 256 
	stdcall strcmp,ebx,edi ;áà ¢­¨¢ ¥¬ ¨¬ï ¯®¤ª«î祭­®£® ä ©«  á ¯®¤ª«î祭­ë¬ à ­¥¥ ä ©«®¬
- 
 
 257 
	test eax,eax
- 
 
 258 
	jz @f
- 
 
 259 
 
- 
 
 260 
	;ª®¯¨à㥬 ¨¬ï ¯®¤ª«î祭­®£® ä ©«  (¤«ï ¨§¡¥¦ ­¨ï ¯®¢â®à­ëå ¯®¤ª«î祭¨©)
- 
 
 261 
	mov esi,ebx
- 
 
 262 
	mov ecx,32
- 
 
 263 
	cld
- 
 
 264 
	rep movsb
- 
 
 265 
 
- 
 
 266 
	copy_path ebx,fn_syntax_dir,file_name_rez,0
223 
push eax edi esi
 267 
	copy_path file_name_rez,sys_path,file_name,0
224 
	mov edi, tedit0
 268 
	mov edi, tedit0
225 
	mov [run_file_70.Function], 0
 269 
	mov [run_file_70.Function], 0
226 
	mov [run_file_70.Position], 0
 270 
	mov [run_file_70.Position], 0
227 
	mov [run_file_70.Flags], 0
 271 
	mov [run_file_70.Flags], 0