Subversion Repositories Kolibri OS

Rev

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

Rev 4146 Rev 4336
Line 3... Line 3...
3 
MAX_USER_BUTTONS equ 30
 3 
MAX_USER_BUTTONS equ 30
4 
 
 4 
 
Line 5... Line 5...
5 
;---- thread for rbutton -----------------------------------------------------------------------
 5 
;---- thread for rbutton -----------------------------------------------------------------------
6 
RButtonWin:
 6 
RButtonWin:
7 
       if lang eq ru
 - 
 
8 
	mov	[MinRMenuW],18*6+10
 - 
 
9 
       else
 - 
 
10 
	mov	[MinRMenuW],15*6+10
 - 
 
11 
       end if
 - 
 
12 
 
 - 
 
13 
 
 - 
 
14 
 
 - 
 
15 
	mcall	40,100101b	;SetMaskMessage 100101b
 7 
	mcall	40,100101b	;SetMaskMessage 100101b
16 
	mcall	48,3,sc,40
 8 
	mcall	48,3,sc,40
Line 17... Line 9...
17 
 
 9 
 
18 
	mov	eax,[sc.work]	  ;¢ëç¨á«ï¥¬ 梥â ᢥ⫥¥ ä®­®¢®£®
 10 
	mov	eax,[sc.work]	  ;¢ëç¨á«ï¥¬ 梥â ᢥ⫥¥ ä®­®¢®£®
Line 370... Line 362...
370 
	jmp	RBWExit
 362 
	jmp	RBWExit
371 
 
 363 
 
Line 372... Line 364...
372 
RBDelete:
 364 
RBDelete:
373 
	mov	eax,[SelIcon]
 365 
	mov	eax,[SelIcon]
374 
	mov	eax,[IconsOffs+eax*4]
 366 
	lea	eax,[IconsID+eax*4]
375 
	stdcall [ini_del_section],IconIni,eax
 367 
	stdcall [ini_del_section],IconIni,eax
Line 376... Line 368...
376 
 
 368 
 
- 
 
 369 
	stdcall DelIcon,[SelIcon]
- 
 
 370 
	mov	ebx,[SelIcon]
- 
 
 371 
	lea	edi,[IconsID+ebx*4-4]
- 
 
 372 
	lea	esi,[edi+4]
- 
 
 373 
	mov	ecx,[MaxNumIcon]
- 
 
 374 
	sub	ecx,[SelIcon]
- 
 
 375 
;dph ecx
- 
 
 376 
	test	ecx,ecx
- 
 
 377 
	jz	@f
- 
 
 378 
	rep movsd
- 
 
 379 
     @@:
- 
 
 380 
;debug_newline
- 
 
 381 
;dpsP IconsID+4*0
- 
 
 382 
;dps ' '
- 
 
 383 
;dpsP IconsID+4*1
- 
 
 384 
;dps ' '
- 
 
 385 
;dpsP IconsID+4*2
- 
 
 386 
;dps ' '
- 
 
 387 
;dpsP IconsID+4*3
- 
 
 388 
;dps ' '
- 
 
 389 
;dpsP IconsID+4*4
- 
 
 390 
;dps ' '
- 
 
 391 
;dpsP IconsID+4*5
- 
 
 392 
;dps ' '
- 
 
 393 
;dpsP IconsID+4*6
- 
 
 394 
;dps ' '
- 
 
 395 
;dpsP IconsID+4*7
- 
 
 396 
;dps ' '
- 
 
 397 
;dpsP IconsID+4*8
- 
 
 398 
;dps ' '
- 
 
 399 
;dpsP IconsID+4*9
- 
 
 400 
;dps ' '
- 
 
 401 
;dpsP IconsID+4*10
- 
 
 402 
;dps ' '
- 
 
 403 
;dpsP IconsID+4*11
- 
 
 404 
;dps ' '
- 
 
 405 
;dpsP IconsID+4*12
- 
 
 406 
;dps ' '
- 
 
 407 
;dpsP IconsID+4*13
- 
 
 408 
;dps ' '
- 
 
 409 
;dpsP IconsID+4*14
- 
 
 410 
;dps ' '
- 
 
 411 
;dpsP IconsID+4*15
- 
 
 412 
;dps ' '
- 
 
 413 
;dpsP IconsID+4*16
- 
 
 414 
;dps ' '
- 
 
 415 
;dpsP IconsID+4*17
- 
 
 416 
;debug_newline
Line 377... Line 417...
377 
	stdcall DelIcon,[SelIcon]
 417 
 
378 
 
 418 
 
379 
	mov	dword[fiRunProg+8],WarningSave
 419 
	mov	dword[fiRunProg+8],WarningSave
380 
	mov	dword[fiRunProg+21],pthNotify
 420 
	mov	dword[fiRunProg+21],pthNotify
Line 499... Line 539...
499 
 
 539 
 
Line 500... Line 540...
500 
	ret
 540 
	ret
501 
endp
 541 
endp
Line 502... Line -...
502 
 
 - 
 
503 
 
 542 
 
504 
proc MouseInWin        ;Carry flag = 1, ¥á«¨ ª«¨ª ¢ ®ª­¥
 543 
proc MouseInWin        ;Carry flag = 1, ¥á«¨ ª«¨ª ¢ ®ª­¥
505 
	mcall	37,0		;GetMousePos
 544 
	mcall	37,0		;GetMousePos
506 
	xor	ebx,ebx
 545 
	xor	ebx,ebx
507 
	mov	bx,ax		;y
 546 
	mov	bx,ax		;y
Line 520... Line 559...
520 
	clc
 559 
	clc
521 
	ret
 560 
	ret
522 
endp
 561 
endp
523 
 
 562 
 
Line 524... Line -...
524 
 
 - 
 
525 
proc AlignIcons
 563 
proc AlignIcons
526 
local posX:WORD,\
 564 
local posX:WORD,\
527 
      posY:WORD,\
 565 
      posY:WORD,\
528 
      negatX:WORD,\
 566 
      negatX:WORD,\
529 
      negatY:WORD
 567 
      negatY:WORD
Line 713... Line 751...
713 
 
 751 
 
Line 714... Line 752...
714 
proc Ini_SavePos stdcall,f_name,sec_name
 752 
proc Ini_SavePos stdcall,f_name,sec_name
715 
	push	ebx edi esi
 753 
	push	ebx edi esi
Line -... Line 754...
- 
 
 754 
 
- 
 
 755 
	mov	ebx,[sec_name]
- 
 
 756 
	xor	eax,eax
- 
 
 757 
	mov	ax,[ebx]
716 
 
 758 
 
717 
	xor	ebx,ebx
 759 
	xor	ebx,ebx
718 
  .SearchSect:
 760 
  .SearchSect:
719 
	mov	edi,[IconsOffs+ebx*4]
 - 
 
720 
	mov	esi,[sec_name]
 - 
 
721 
      @@:
 - 
 
722 
	lodsb
 - 
 
723 
	scasb
 - 
 
724 
	jne	@f
 - 
 
725 
	test	al,al
 - 
 
726 
	jnz	@b
 - 
 
727 
 
 761 
	cmp	eax,[IconsID+ebx*4]
728 
	jmp	.IcoDataFound
 - 
 
Line 729... Line 762...
729 
      @@:
 762 
	je	.IcoDataFound
730 
 
 763 
 
731 
	inc	ebx
 764 
	inc	ebx
Line 732... Line 765...
732 
	cmp	ebx,[MaxNumIcon]
 765 
	cmp	ebx,[MaxNumIcon]
733 
	jb	.SearchSect
 766 
	jb	.SearchSect
734 
 
 767 
 
Line 735... Line 768...
735 
	mov	eax,1
 768 
	mov	eax,1
- 
 
 769 
	pop	esi edi ebx
- 
 
 770 
	ret
- 
 
 771 
 
736 
	pop	esi edi ebx
 772 
.IcoDataFound:
737 
	ret
 773 
	xor	al,al
738 
 
 774 
	mov	edi,[IconsOffs+ebx*4]
739 
.IcoDataFound:
 775 
 
- 
 
 776 
	or	ecx,-1
Line 740... Line -...
740 
	or	ecx,-1
 - 
 
741 
	repne	scasb
 777 
	repne	scasb
742 
	repne	scasb
 778 
	repne	scasb
743 
	repne	scasb
 779 
	repne	scasb
744 
 
 780 
	repne	scasb
745 
;int3
 781 
 
Line 746... Line 782...
746 
	movzx	eax,word[edi+2]
 782 
	movzx	eax,word[edi]
- 
 
 783 
	test	eax,8000h
- 
 
 784 
	jz	@f
Line 747... Line -...
747 
	test	eax,8000h
 - 
 
748 
	jz	@f
 785 
	or	eax,0FFFF0000h
749 
	or	eax,0FFFF0000h
 786 
     @@:
750 
     @@:
 787 
 
751 
 
 788 
	stdcall [ini_set_int],[f_name],[sec_name],keyY,eax
Line 752... Line 789...
752 
	stdcall [ini_set_int],[f_name],[sec_name],keyX,eax
 789 
 
Line 753... Line 790...
753 
 
 790 
	movzx	eax,word[edi+2]
754 
	movzx	eax,word[edi]
 791 
 
755 
	test	eax,8000h
 792 
	test	eax,8000h
756 
	jz	@f
 793 
	jz	@f