Subversion Repositories Kolibri OS

Rev

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

Rev 1597 Rev 1666
Line 85... Line 85...
85
	imul	eax,m_interval
85
	imul	eax,m_interval
86
	mov	m_size_y1,ax
86
	mov	m_size_y1,ax
Line 87... Line 87...
87
	
87
	
88
	mov	ebx,m_size_x
88
	mov	ebx,m_size_x
89
	mov	ecx,m_size_y
89
	mov	ecx,m_size_y
90
	cmp	m_select,dword 1
90
	cmp	dword m_select,1
91
	je	.active
91
	je	.active
92
	mov	edx,m_bckg_col
92
	mov	edx,m_bckg_col
93
	jmp	@f
93
	jmp	@f
94
.active:
94
.active:
Line 97... Line 97...
97
	mcall	13
97
	mcall	13
98
	shr	ecx,16
98
	shr	ecx,16
99
	mov	bx,cx
99
	mov	bx,cx
100
	movzx	eax,word m_size_y
100
	movzx	eax,word m_size_y
101
	call	.calculate_font_offset
101
	call	.calculate_font_offset
102
	cmp	m_select,dword 1
102
	cmp	dword m_select,1
103
	je	.active_1
103
	je	.active_1
104
	mov	ecx,m_bckg_text_col
104
	mov	ecx,m_bckg_text_col
105
	add	ecx,0x80000000
105
	add	ecx,0x80000000
106
	jmp	@f
106
	jmp	@f
107
.active_1:
107
.active_1:
Line 235... Line 235...
235
     
235
     
236
	add	cx,m_size_y
236
	add	cx,m_size_y
237
	cmp	ax,cx
237
	cmp	ax,cx
Line 238... Line 238...
238
	ja	.exit_menu
238
	ja	.exit_menu
239
 
239
 
240
	test	m_mouse_keys,dword 1b
240
	test	dword m_mouse_keys,1b
241
	jnz	@f
241
	jnz	@f
242
	cmp	m_select,dword 1
242
	cmp	dword m_select,1
243
	je	.exit_menu_1
243
	je	.exit_menu_1
244
	mov	m_select,dword 1
244
	mov	dword m_select,1
245
	call	.draw_1
245
	call	.draw_1
Line 246... Line 246...
246
	jmp	.exit_menu_1
246
	jmp	.exit_menu_1
247
@@:
247
@@:
248
 
248
 
Line 249... Line 249...
249
	cmp	m_get_mouse_flag,dword 1
249
	cmp	dword m_get_mouse_flag,1
250
	mov	m_get_mouse_flag,dword 0
250
	mov	m_get_mouse_flag,dword 0
Line 276... Line 276...
276
	jmp	.still
276
	jmp	.still
Line 277... Line 277...
277
	
277
	
278
.key_menu:
278
.key_menu:
Line 279... Line 279...
279
	mcall	2
279
	mcall	2
280
 
280
 
281
	cmp	m_extended_key,dword 1
281
	cmp	dword m_extended_key,1
282
	je	.extended_key
282
	je	.extended_key
283
	test	al,al
283
	test	al,al
284
	jnz	.key_menu_end
284
	jnz	.key_menu_end
Line 374... Line 374...
374
	cmp	ah,71    ;Home
374
	cmp	ah,71    ;Home
375
	je	@f
375
	je	@f
376
	cmp	ah,73    ;PageUp
376
	cmp	ah,73    ;PageUp
377
	jne	.menu_key_79
377
	jne	.menu_key_79
378
@@:
378
@@:
379
	cmp	m_cursor,dword 0
379
	cmp	dword m_cursor,0
380
	je	.still
380
	je	.still
381
	mov	ebx,m_cursor
381
	mov	ebx,m_cursor
382
	mov	m_cursor_old,ebx
382
	mov	m_cursor_old,ebx
383
	mov	m_cursor,dword 0
383
	mov	m_cursor,dword 0
384
	jmp	.red
384
	jmp	.red
Line 446... Line 446...
446
	mcall	68, 12
446
	mcall	68, 12
447
	mov	m_buf_adress,eax
447
	mov	m_buf_adress,eax
448
	ret
448
	ret
449
;---------------------------------------------------------------------
449
;---------------------------------------------------------------------
450
.free_menu_area:
450
.free_menu_area:
451
	cmp	m_buf_adress,dword 0
451
	cmp	dword m_buf_adress,0
452
	je	@f
452
	je	@f
453
	mcall	68,13,m_buf_adress
453
	mcall	68,13,m_buf_adress
454
	xor	eax,eax
454
	xor	eax,eax
455
	mov	m_buf_adress,eax
455
	mov	m_buf_adress,eax
456
@@:
456
@@:
Line 538... Line 538...
538
	test	m_mouse_keys,dword 1b
538
	test	m_mouse_keys,dword 1b
539
	jz	.still
539
	jz	.still
540
	jmp	.exit_menu_3
540
	jmp	.exit_menu_3
Line 541... Line 541...
541
	 
541
	 
542
.exit_menu:
542
.exit_menu:
543
	cmp	m_select,dword 0
543
	cmp	dword m_select,0
544
	je	.exit_menu_1
544
	je	.exit_menu_1
Line 545... Line 545...
545
	mov	m_select,dword 0
545
	mov	m_select,dword 0