forked from KolibriOS/kolibrios
640 lines
13 KiB
PHP
640 lines
13 KiB
PHP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; ;;
|
|
;; Copyright (C) KolibriOS team 2004-2007. All rights reserved. ;;
|
|
;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa ;;
|
|
;; Distributed under terms of the GNU General Public License ;;
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
$Revision$
|
|
|
|
|
|
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:
|
|
|
|
push edi
|
|
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
|
|
|
|
pop edi
|
|
|
|
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
|
|
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
|
|
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 ................................
|