Subversion Repositories Kolibri OS

Rev

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

Rev 1199 Rev 1597
Line 436... Line 436...
436
	 
436
	 
437
	mcall 37,1
437
	mcall 37,1
438
	ret
438
	ret
439
;---------------------------------------------------------------------
439
;---------------------------------------------------------------------
440
.allocate_menu_area:
-
 
441
	cmp	m_buf_adress,dword 0
-
 
442
	je	@f
440
.allocate_menu_area:
443
	call	.free_menu_area
-
 
444
@@:
441
	call	.free_menu_area
445
	movzx	ecx,word m_size_x1
442
	movzx	ecx,word m_size_x1
446
	movzx	eax,word m_size_y1
443
	movzx	eax,word m_size_y1
447
	imul	ecx,eax
444
	imul	ecx,eax
448
	lea	ecx,[ecx*3]
445
	lea	ecx,[ecx*3]
449
	mcall	68, 12
446
	mcall	68, 12
450
	mov	m_buf_adress,eax
447
	mov	m_buf_adress,eax
451
	ret
448
	ret
452
;---------------------------------------------------------------------
449
;---------------------------------------------------------------------
-
 
450
.free_menu_area:
-
 
451
	cmp	m_buf_adress,dword 0
453
.free_menu_area:
452
	je	@f
454
	mcall	68,13,m_buf_adress
453
	mcall	68,13,m_buf_adress
455
	xor	eax,eax
454
	xor	eax,eax
-
 
455
	mov	m_buf_adress,eax
456
	mov	m_buf_adress,eax
456
@@:
457
	ret
457
	ret
458
;---------------------------------------------------------------------
458
;---------------------------------------------------------------------
459
.get_menu_area:
459
.get_menu_area:
Line 483... Line 483...
483
	mov	dx,m_start_x1
483
	mov	dx,m_start_x1
484
	shl	edx,16
484
	shl	edx,16
485
	mov	dx,m_start_y1
485
	mov	dx,m_start_y1
Line 486... Line 486...
486
	 
486
	 
-
 
487
	mcall	7, m_buf_adress
487
	mcall	7, m_buf_adress
488
	call	.free_menu_area
488
	ret
489
	ret
489
;---------------------------------------------------------------------
490
;---------------------------------------------------------------------
490
.mouse_menu:
491
.mouse_menu: