Subversion Repositories Kolibri OS

Rev

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

Rev 824 Rev 2065
Line 25... Line 25...
25
	mov	ecx,[mainwnd_pos.y-2]
25
	mov	ecx,[mainwnd_pos.y-2]
26
	mov	cx,word[mainwnd_pos.h]
26
	mov	cx,word[mainwnd_pos.h]
27
	mcall	0,,,,,s_title
27
	mcall	0,,,,,s_title
Line 28... Line 28...
28
 
28
 
-
 
29
	mcall	9,p_info,-1
-
 
30
	
-
 
31
	mov	eax,[p_info+70] ;status of window
-
 
32
	test	eax,100b
-
 
33
	jne	.exit.2	
29
	mcall	9,p_info,-1
34
	
30
	mov	esi,p_info.box.left
35
	mov	esi,p_info.box.left
31
	mov	edi,mainwnd_pos
36
	mov	edi,mainwnd_pos
32
	mov	ecx,4
37
	mov	ecx,4
33
	cld
38
	cld
Line 232... Line 237...
232
;-----------------------------------------------------------------------------
237
;-----------------------------------------------------------------------------
233
	cmp	[do_not_draw],1  ; return if drawing is not permitted
238
	cmp	[do_not_draw],1  ; return if drawing is not permitted
234
	jae	.exit
239
	jae	.exit
235
	pusha
240
	pusha
Line -... Line 241...
-
 
241
 
-
 
242
       mcall   9,p_info,-1
-
 
243
 
-
 
244
	mov	eax,[p_info+70] ;status of window
-
 
245
	test	eax,100b
-
 
246
	jne	.exit_1	
236
 
247
	
237
	mov	ecx,[p_info.client_box.height-2]
248
	mov	ecx,[p_info.client_box.height-2]
238
	mov	cx,word[p_info.client_box.height]
249
	mov	cx,word[p_info.client_box.height]
239
	sub	ecx,STATH*65536+STATH
250
	sub	ecx,STATH*65536+STATH
Line 295... Line 306...
295
	je	@f
306
	je	@f
296
	and	ebx,0x0000FFFF
307
	and	ebx,0x0000FFFF
297
	add	ebx,6*(s_modified.size+16)*65536
308
	add	ebx,6*(s_modified.size+16)*65536
298
	or	ecx, 80000000h
309
	or	ecx, 80000000h
299
	mcall	,,,[s_status]
310
	mcall	,,,[s_status]
300
 
311
.exit_1:
301
    @@: popa
312
    @@: popa
Line 302... Line 313...
302
 
313
 
303
  .exit:
314
  .exit:
304
	ret
315
	ret