Subversion Repositories Kolibri OS

Rev

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

Rev 1713 Rev 2058
Line 1... Line 1...
1
; kpack = Kolibri Packer
1
; kpack = Kolibri Packer
2
;---------------------------------------------------------------------
2
;---------------------------------------------------------------------
3
; version:	0.20
3
; version:	0.20
-
 
4
; last update:  08/18/2011
-
 
5
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
-
 
6
; changes:      Checking for "rolled up" window
-
 
7
;---------------------------------------------------------------------
-
 
8
; version:	0.20
4
; last update:  07/12/2010
9
; last update:  07/12/2010
5
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
10
; changed by:   Marat Zakiyanov aka Mario79, aka Mario
6
; changes:      Added code for packing the kernel.mnt
11
; changes:      Added code for packing the kernel.mnt
7
;---------------------------------------------------------------------
12
;---------------------------------------------------------------------
8
; version:	0.15
13
; version:	0.15
Line 426... Line 431...
426
	add	edx,34000000h
431
	add	edx,34000000h
427
	xor	esi,esi
432
	xor	esi,esi
428
	xor	edi,edi
433
	xor	edi,edi
429
	mcall	,<100,436>,,,,caption_str
434
	mcall	,<100,436>,,,,caption_str
430
	mcall	9,procinfo,-1
435
	mcall	9,procinfo,-1
-
 
436
	
-
 
437
	mov	eax,[procinfo+70] ;status of window
-
 
438
	test	eax,100b
-
 
439
	jne	.end	
431
;--------------------------------------
440
;--------------------------------------
432
; draw lines and frame
441
; draw lines and frame
433
	call	draw_lines
442
	call	draw_lines
434
; draw buttons
443
; draw buttons
435
	call	draw_bittons
444
	call	draw_bittons
Line 442... Line 451...
442
	mov	[edit2.width],eax
451
	mov	[edit2.width],eax
443
	mov	[edit3.width],eax
452
	mov	[edit3.width],eax
Line 444... Line 453...
444
 
453
 
445
	call	draw_editbox
454
	call	draw_editbox
-
 
455
; end redraw
446
; end redraw
456
.end:
447
	mcall	12,2
457
	mcall	12,2
448
	ret
458
	ret
449
;*********************************************************************
459
;*********************************************************************
450
draw_editbox:
460
draw_editbox: