Subversion Repositories Kolibri OS

Rev

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

Rev 7570 Rev 7571
Line 192... Line 192...
192
	.end_0:
192
	.end_0:
193
popad
193
popad
194
	ret
194
	ret
195
endp
195
endp
Line -... Line 196...
-
 
196
 
-
 
197
;input:
196
 
198
; eax ¥á«¨ à ¢¥­: 0 - á®åà ­¥­¨¥ ¡¥§ ¤¨ «®£ , 1 - á®åà ­¥­¨¥ á ¤¨ «®£®¬
197
;description:
199
;description:
198
; äã­ªæ¨ï á®åà ­¥­¨ï ä ©« 
200
; äã­ªæ¨ï á®åà ­¥­¨ï ä ©« 
199
align 4
201
align 4
-
 
202
proc ted_but_save_file
-
 
203
	or eax,eax
200
proc ted_but_save_file
204
	jnz .init_dlg
-
 
205
		; á®å࠭塞 ¡¥§ ¢ë§®¢  ¤¨ «®£®¢®£® ®ª­ 
-
 
206
		cmp byte[openfile_path],0
201
	;*** ¢ë§®¢ ¤¨ «®£®¢®£® ®ª­  ¤«ï á®åà ­¥­¨ï ä ©« 
207
		jne @f
-
 
208
	.init_dlg:
202
	.init_dlg:
209
		; ¢ë§®¢ ¤¨ «®£®¢®£® ®ª­  ¤«ï á®åà ­¥­¨ï ä ©« 
203
	copy_path open_dialog_name,communication_area_default_path,file_name,0
210
		copy_path open_dialog_name,communication_area_default_path,file_name,0
204
	mov [OpenDialog_data.type],1
211
		mov [OpenDialog_data.type],1
205
	stdcall [OpenDialog_Start],OpenDialog_data
212
		stdcall [OpenDialog_Start],OpenDialog_data
206
	cmp [OpenDialog_data.status],1 ;if status==1 then save
213
		cmp [OpenDialog_data.status],1 ;if status==1 then save
207
	jne .end_save
-
 
208
	jmp @f
-
 
209
	.no_dlg: ; á®å࠭塞 ¡¥§ ¢ë§®¢  ¤¨ «®£®¢®£® ®ª­ 
-
 
210
		cmp byte[openfile_path],0
-
 
211
		je .init_dlg ; ­® ¥á«¨ ¯ãâì ¯ãá⮩ â® ¢á¥-¦¥ ¢ë§ë¢ ¥¬
214
		jne .end_save
212
	@@:
215
	@@:
213
		stdcall [ted_save_file],tedit0,run_file_70,openfile_path
216
		stdcall [ted_save_file],tedit0,run_file_70,openfile_path
214
	.end_save:
217
	.end_save:
215
	ret
218
	ret
Line 218... Line 221...
218
;description:
221
;description:
219
; ª®¯¨à®¢ ­¨¥ ¯ ¬ïâ¨
222
; ª®¯¨à®¢ ­¨¥ ¯ ¬ïâ¨
220
align 4
223
align 4
221
proc mem_cpy uses ecx esi edi, destination:dword, source:dword, len:dword
224
proc mem_cpy uses ecx esi edi, destination:dword, source:dword, len:dword
222
	cld
225
	cld
223
	mov esi, dword[source]
226
	mov esi,[source]
224
	mov edi, dword[destination]
227
	mov edi,[destination]
225
	mov ecx, dword[len]
228
	mov ecx,[len]
226
	rep movsb
229
	rep movsb
227
	ret
230
	ret
228
endp
231
endp
Line 229... Line 232...
229
 
232
 
230
;description:
233
;description:
231
; § ¯®«­¥­¨¥ ¯ ¬ï⨠¯à®¡¥« ¬¨
234
; § ¯®«­¥­¨¥ ¯ ¬ï⨠¯à®¡¥« ¬¨
232
align 4
235
align 4
233
proc mem_spac uses eax ecx edi, mem:dword, len:dword
236
proc mem_spac uses eax ecx edi, mem:dword, len:dword
234
	cld
237
	cld
235
	mov al,' '
238
	mov al,' '
236
	mov edi, dword[mem]
239
	mov edi,[mem]
237
	mov ecx, dword[len]
240
	mov ecx,[len]
238
	repne stosb
241
	repne stosb
239
	ret
242
	ret
Line 240... Line 243...
240
endp
243
endp