Subversion Repositories Kolibri OS

Rev

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

Rev 3014 Rev 3265
Line 63... Line 63...
63
 
63
 
64
;-----------------------------------------------------------------------------
64
;-----------------------------------------------------------------------------
65
section @CODE ;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
65
section @CODE ;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
Line -... Line 66...
-
 
66
;-----------------------------------------------------------------------------
-
 
67
 
-
 
68
	mcall	9,p_info,-1
-
 
69
	mov	ecx,[ebx+30]	; PID
-
 
70
	mcall	18,21
66
;-----------------------------------------------------------------------------
71
	mov	[active_process],eax	; WINDOW SLOT
67
 
72
 
68
	cld
73
	cld
69
	mov	edi,@UDATA
74
	mov	edi,@UDATA
70
	mov	ecx,@PARAMS-@UDATA
75
	mov	ecx,@PARAMS-@UDATA
Line 212... Line 217...
212
 
217
 
213
  .skip_write:
218
  .skip_write:
214
	cmp	[open_dialog],1
219
	cmp	[open_dialog],1
215
	je	.open_dialog
220
	je	.open_dialog
-
 
221
	mcall	10	; wait here until event
-
 
222
	
-
 
223
	call	check_active_process_for_clear_all_flags
216
	mcall	10	; wait here until event
224
 
217
	cmp	[main_closed],0
225
	cmp	[main_closed],0
218
	jne	key.alt_x
226
	jne	key.alt_x
219
	dec	eax	; redraw ?
227
	dec	eax	; redraw ?
220
	jz	red
228
	jz	red
Line 271... Line 279...
271
draw_window_for_OD:
279
draw_window_for_OD:
272
	call	drawwindow
280
	call	drawwindow
273
	call	draw_statusbar
281
	call	draw_statusbar
274
	ret
282
	ret
275
;-----------------------------------------------------------------------------
283
;-----------------------------------------------------------------------------
-
 
284
check_active_process_for_clear_all_flags:
-
 
285
	push	eax
-
 
286
	mcall	18,7
-
 
287
	cmp	[active_process],eax
-
 
288
	je	.exit
-
 
289
	
-
 
290
	xor	eax,eax
-
 
291
	mov	[win_key_flag],al
-
 
292
;--------------------------------------    
-
 
293
.exit:
-
 
294
	pop	eax
-
 
295
	ret
-
 
296
;-----------------------------------------------------------------------------
276
copy_str_2:
297
copy_str_2:
277
	cld
298
	cld
278
	push	esi ecx
299
	push	esi ecx
279
	rep	movsb	; edi  openfile_pach
300
	rep	movsb	; edi  openfile_pach
280
	xor	eax,eax
301
	xor	eax,eax