Subversion Repositories Kolibri OS

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;                                                              ;;

;; Copyright (C) KolibriOS team 2004-2008. All rights reserved. ;;

;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa      ;;

;; Distributed under terms of the GNU General Public License    ;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$Revision: 983 $

max_buttons=4095

dececx:

    push edx

    push ecx

    mov  edx,2

  .loop:

    cmp   byte [esp+edx],0x20

    jae   @f

    mov   [esp+edx],byte 0x20

   @@:

    sub   [esp+edx],byte 0x20

    dec  edx

    jns  .loop

    pop  ecx

    pop  edx

    ret

incecx:

    push edx

    push ecx

    mov  edx,2

  .loop:

    cmp  byte [esp+edx],0xdf

    jbe  @f

    mov  [esp+edx],byte 0xdf

   @@:

    add  [esp+edx],byte 0x20

    dec  edx

    jns  .loop

    pop  ecx

    pop  edx

    ret

incecx2:

    push edx

    push ecx

    mov  edx,2

  .loop:

    cmp  byte [esp+edx],0xeb

    jbe  @f

    mov  [esp+edx],byte 0xeb

   @@:

    add  [esp+edx],byte 0x14

    dec  edx

    jns  .loop

    pop  ecx

    pop  edx

    ret

drawbuttonframes:

	push  esi

	push  edi

	push  eax

	push  ebx

	push  ecx

	push  edx

	shr   ebx,16

	shr   ecx,16

	mov   eax,[TASK_BASE]

	add   ebx,[eax-twdw + WDATA.box.left]

	add   ecx,[eax-twdw + WDATA.box.top]

	mov     eax, ebx

	shl     eax, 16

	mov     ax, bx

	add     ax, word [esp+8]

	mov     ebx, ecx

	shl     ebx, 16

	mov     bx, cx

	push    ebx

	xor     edi, edi

	mov     ecx, esi

	call    incecx

	call    [draw_line]

	movzx edx,word [esp+4+4]

	add   ebx,edx

	shl   edx,16

	add   ebx,edx

	mov   ecx,esi

	call  dececx

	call  [draw_line]

	pop     ebx

	push  edx

	mov   edx,eax

	shr   edx,16

	mov   ax,dx

	mov   edx,ebx

	shr   edx,16

	mov   bx,dx

	mov   dx,[esp+4+4]

	add   bx,dx

	pop   edx

	mov   ecx,esi

	call  incecx

	call  [draw_line]

	mov   dx,[esp+8]

	add   ax,dx

	shl   edx,16

	add   eax,edx

	add   ebx,1*65536

	mov   ecx,esi

	call  dececx

	call  [draw_line]

	pop   edx

	pop   ecx

	pop   ebx

	pop   eax

	pop   edi

	pop   esi

	ret

button_dececx:

	cmp   [buttontype],dword 1

	jne   .finish

;        je    bdece

;        ret

;      bdece:

	push  eax

	mov   eax,0x01

	cmp   edi,20

	jg    @f

	mov   eax,0x02

      @@:

	test  ecx,0xff

	jz    @f

	sub   ecx,eax

      @@:

	shl   eax,8

	test  ecx,0xff00

	jz    @f

	sub   ecx,eax

      @@:

	shl   eax,8

	test  ecx,0xff0000

	jz    @f

	sub   ecx,eax

      @@:

	pop    eax

      .finish:

	ret

sys_button:

        mov     eax, [current_slot]

        rol     ebx, 16

        add     bx, word [eax+APPDATA.wnd_clientbox.left]

        rol     ebx, 16

        rol     ecx, 16

        add     cx, word [eax+APPDATA.wnd_clientbox.top]

        rol     ecx, 16

.forced:

        test    edx, 0x80000000

        jnz     remove_button

        or      bx, bx

        jle     noaddbutt

        or      cx, cx

        jle     noaddbutt

        test    edx, 0x40000000

        jnz     button_no_draw

        pushad			     ; button body

        movzx   edi, cx

        shr     ebx, 16

        shr     ecx, 16

        mov     eax, [TASK_BASE]

        add     ebx, [eax-twdw + WDATA.box.left]

        add     ecx, [eax-twdw + WDATA.box.top]

        mov     eax, ebx

        shl     eax, 16

        mov     ax, bx

        add     ax, word [esp+16]

        mov     ebx, ecx

        shl     ebx, 16

        mov     bx, cx

        mov     ecx, esi

        cmp     [buttontype], 0

        je      @f

        call    incecx2

@@:

        mov     edx, edi

.newline:

        call    button_dececx

        push    edi

        xor     edi, edi

        call    [draw_line]

        pop     edi

        add     ebx, 1*65536+1 ; [ y start | y end ]

        dec     edx

        jnz     .newline

        popad

        call    drawbuttonframes

button_no_draw:

        mov     edi, [BTN_ADDR]

        movzx   eax, word [edi]

        cmp     eax, max_buttons

        jge     noaddbutt

        inc     eax

        mov     [edi], ax

        shl     eax, 4

        add     edi, eax

        mov     ax, [CURRENT_TASK]

        stosw

        mov     ax, dx

        stosw               ; button id number: bits 0-15

        mov     eax, ebx

        rol     eax, 16

        stosd               ; x start | x size

        mov     eax, ecx

        rol     eax, 16

        stosd               ; y start | y size

        mov     eax, edx

        shr     eax, 16

        stosw               ; button id number: bits 16-31

noaddbutt:

        ret

remove_button:

        and     edx, 0x7fffffff

rnewba2:

        mov     edi, [BTN_ADDR]

        mov     eax, edi

        movzx   ebx, word [edi]

        inc     ebx

rnewba:

        dec     ebx

        jz      rnmba

        add     eax, 0x10

        mov     cx, [CURRENT_TASK]

        cmp     cx, [eax]

        jnz     rnewba

        cmp     dx, [eax+2]

        jnz     rnewba

        lea     ecx, [ebx+1]

        shl     ecx, 4

        mov     ebx, eax

        add     eax, 0x10

        call    memmove

        dec     dword [edi]

        jmp     rnewba2

rnmba:

        ret

find_pressed_button_frames:

	pushad

	movzx ebx,word [eax+0]

	shl   ebx,5

	add   ebx,window_data

        mov   ecx, [ebx+ WDATA.box.left]     ; window x start

	movzx edx,word [eax+4]	   ; button x start

	add   ecx,edx

	push  ecx

        mov   dx,[eax+6]                 ; button x size

	add   cx,dx

	mov   esi,ecx

	inc   esi

        mov   ecx, [ebx+WDATA.box.top]   ; window y start

        mov   dx,[eax+8]                 ; button y start

	add   ecx,edx

	mov   ebx,ecx

		mov   dx,[eax+10]		 ; button y size

	add   dx,cx

	inc   dx

	pop   eax

	; eax x beginning

	; ebx y beginning

	; esi x end

	; edx y end

	; ecx color

	mov   [pressed_button_eax],eax

	mov   [pressed_button_ebx],ebx

	mov   [pressed_button_ecx],ecx

	mov   [pressed_button_edx],edx

	mov   [pressed_button_esi],esi

	popad

	ret

uglobal

  pressed_button_eax  dd  0

  pressed_button_ebx  dd  0

  pressed_button_ecx  dd  0

  pressed_button_edx  dd  0

  pressed_button_esi  dd  0

endg

; negative button image

negativebutton:

	; If requested, do not display button

	; boarder on press.

	test  ebx,0x20000000

	jz    draw_negative_button

	ret

      draw_negative_button:

	pushad

	mov   eax,[pressed_button_eax]

	mov   ebx,[pressed_button_ebx]

	mov   ecx,[pressed_button_ecx]

	mov   edx,[pressed_button_edx]

	mov   esi,[pressed_button_esi]

	mov   ecx,0x01000000

	dec   edx

	push  edx

	inc   edx

	dec   esi

	push  esi

	inc   esi

	push  eax

	push  ebx

	push  ecx

	push  edx

	push  edi

	call  [disable_mouse]

      bdbnewline:

	mov   edi,1    ; force

	cmp   eax,[esp+16]

	jz    bneg

	cmp   eax,[esp+20]

	jz    bneg

	cmp   ebx,[esp+12]

	jz    bneg

	cmp   ebx,[esp+24]

	jnz   nbneg

;        jz    bneg

;        jmp   nbneg

      bneg:

	;;;call  [disable_mouse]

	call  [putpixel]

      nbneg:

	inc   eax

	cmp   eax,esi

	jnz   bdbnewline

	mov   eax,[esp+16]

	inc   ebx

	cmp   ebx,edx

	jnz   bdbnewline

	add   esp,28

	popad

	ret

; check buttons

; 0000 word process number

; 0002 word button id number : bits 0-15

; 0004 word x start

; 0006 word x size

; 0008 word y start

; 000A word y size

; 000C word button id number : bits 16-31

;

; button table in 0x10 increments

;

; first at 0x10

checkbuttons:

    cmp   [BTN_DOWN],byte 0    ; mouse buttons pressed

    jnz   @f

;..................................... start 1/5 : modified by vhanla .............................

    mov [bPressedMouseXY_B],0

;..................................... end 1/5 : modified by vhanla .............................

    ret

  @@:

    pushad

    xor    esi, esi

    mov    edi, [BTN_ADDR]

    movzx  edx, word [edi]

    test   edx, edx

    jne    @f

    popad

    ret

  @@:

;..................................... start 2/5 : modified by vhanla .............................

  ;here i catch the coordinates when the mouse's button is clicked

   push ax

   cmp [bPressedMouseXY_B],0;FALSE

   jnz @f

   mov [bPressedMouseXY_B],1;TRUE - it was already clicked

   mov ax,[MOUSE_X]

   mov [mx],ax

   mov ax,[MOUSE_Y]

   mov [my],ax

   @@:

   pop	ax

   ;and it is only refreshed after the mouse's button release

;..................................... end 2/5 : modified by vhanla .............................

    push  esi

    inc   edx

    push  edx

  buttonnewcheck:

    pop   edx

    pop   esi

    inc   esi

    cmp   edx,esi

    jge   bch

    popad		  ; no button pressed

    ret

  bch:

    push  esi

    push  edx

    mov   eax,esi

    shl   eax,4

    add   eax,edi

    ; check that button is at top of windowing stack

    movzx ebx,word [eax]

    movzx ecx,word [WIN_STACK + ebx * 2]

    cmp   ecx,[TASK_COUNT]

    jne   buttonnewcheck

    ; check that button start is inside window x/y end

    movzx ebx,word [eax+0]

    shl   ebx,5

	test	[ebx+window_data+WDATA.fl_wstate],WSTATE_MINIMIZED

	jnz	buttonnewcheck

;    add   ebx,window_data

;    mov   ecx,[window_data+ebx+8]          ; window end X

    movzx edx,word [eax+4]     ; button start X

    cmp   edx, [window_data+ebx+WDATA.box.width] ;ecx

    jge   buttonnewcheck

;    mov   ecx,[window_data+ebx+12]         ; window end Y

    movzx edx, word [eax+8]    ; button start Y

    cmp   edx, [window_data+ebx+WDATA.box.height] ;ecx

    jge   buttonnewcheck

    ; check coordinates

			       ; mouse x >= button x ?

    movzx ebx,word [eax+0]

    shl   ebx,5

    add   ebx,window_data

	mov   ecx, [ebx+WDATA.box.left]     ; window x start

    movzx edx,word [eax+4]     ; button x start

    add   edx,ecx

;..................................... start 3/5 : modified by vhanla .............................

    mov   cx,[mx]   ;mov cx,[MOUSE_X]

;..................................... end 3/5 : modified by vhanla .............................

    cmp   edx,ecx

    jg	  buttonnewcheck

    movzx ebx,word [eax+6]     ; button x size

    add   edx,ebx

    cmp   ecx,edx

    jg	  buttonnewcheck

			       ; mouse y >= button y ?

    movzx ebx,word [eax+0]

    shl   ebx,5

    add   ebx,window_data

	mov   ecx, [ebx+WDATA.box.top]	   ; window y start

    movzx edx,word [eax+8]     ; button y start

    add   edx,ecx

;..................................... start 4/5 : modified by vhanla .............................

    mov   cx,[my]  ;mov cx,[MOUSE_Y]

;..................................... start 4/5 : modified by vhanla .............................

    cmp   edx,ecx

    jg	  buttonnewcheck

    movzx ebx,word [eax+10]    ; button y size

    add   edx,ebx

    cmp   ecx,edx

    jg	  buttonnewcheck

    ; mouse on button

    pop   edx

    pop   esi

    mov   bx,[eax+0xc]	   ; button id : bits 16-31

    shl   ebx,16

    mov   bx,[eax+2]	   ; button id : bits 00-16

    push  ebx

    mov   [MOUSE_DOWN],byte 1  ; no mouse down checks

    call find_pressed_button_frames

    call negativebutton

    pushad

; // Alver 22.06.2008 // {

    push  eax

    mov  al, byte [BTN_DOWN]

    mov  byte [btn_down_determ], al

    pop  eax

; } \\ Alver \\

  cbwaitmouseup:

    call  checkidle

    call  [draw_pointer]

    pushad

    call  stack_handler

    popad

    cmp   [BTN_DOWN],byte 0  ; mouse buttons pressed ?

    jnz   cbwaitmouseup

    popad

    call  negativebutton

    mov   [MOUSE_BACKGROUND],byte 0  ; no mouse background

    mov   [DONT_DRAW_MOUSE],byte 0  ; draw mouse

;..................................... start 5/5 : modified by vhanla .............................

    ; check coordinates

iglobal

    mx dw 0x0 ; keeps the x mouse's position when it was clicked

    my dw 0x0 ; keeps the y mouse's position when it was clicked

    bPressedMouseXY_B db 0x0

    btn_down_determ     db 0x0        ; << // Alver 22.06.2008// <<

endg

   pusha

  ; mouse x >= button x ?

   movzx ebx,word [eax+0]

   shl	 ebx,5

   add	 ebx,window_data

   mov	 ecx, [ebx+WDATA.box.left]    ; window x start

   movzx edx,word [eax+4]    ; button x start

   add	 edx,ecx

   mov	 cx,[MOUSE_X]

   cmp	 edx,ecx

   jg	no_on_button ;if we release the pointer out of the button area

   movzx ebx,word [eax+6]    ; button x size

   add	 edx,ebx

   cmp	 ecx,edx

   jg	no_on_button

	; mouse y >= button y ?

   movzx ebx,word [eax+0]

   shl	 ebx,5

   add	 ebx,window_data

   mov	 ecx, [ebx+WDATA.box.top]    ; window y start

   movzx edx,word [eax+8]    ; button y start

   add	 edx,ecx

   mov	 cx,[MOUSE_Y]

   cmp	 edx,ecx

   jg	no_on_button

   movzx ebx,word [eax+10]   ; button y size

   add	 edx,ebx

   cmp	 ecx,edx

   jg	no_on_button

   popa

   mov	 [BTN_COUNT],byte 1 ; no of buttons in buffer

   pop	 ebx

   mov	 [BTN_BUFF],ebx   ; lets put the button id in buffer

   push  ebx

   pusha

   jmp yes_on_button

no_on_button:

   mov	 [BTN_COUNT],byte 0 ; no of buttons in buffer

yes_on_button:

   mov	 [MOUSE_DOWN],byte 0 ; mouse down -> do not draw

   popa

   pop ebx

   popa

   ret

;..................................... end 5/5 : modified by vhanla ................................