mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-11-25 18:29:36 +03:00
c6044e1fc1
1) Drawing selection rectangle. 2) Using new kernel function: 15.9 git-svn-id: svn://kolibrios.org@2548 a494cfbc-eb01-0410-851d-a64ba20cac60
269 lines
5.3 KiB
PHP
269 lines
5.3 KiB
PHP
;------------------------------------------------------------------------------
|
|
align 4
|
|
START_mouse_thread:
|
|
mcall 40,100000b ; only Event 6 - Mouse
|
|
;------------------------------------------------------------------------------
|
|
align 4
|
|
still_mouse:
|
|
mcall 10
|
|
align 4
|
|
mouse:
|
|
mcall 37,2
|
|
cmp eax,1 ; åñëè íå ëåâàÿ, âîçâðàò
|
|
jne still_mouse
|
|
; êîîðäèíàòû êóðñîðà
|
|
xor ebx,ebx
|
|
mcall 37
|
|
|
|
mov ebx,eax ; eax = cursor_x
|
|
shr eax,16 ; ebx = cursor_y
|
|
and ebx,0xffff
|
|
mov [curx1],eax ; curx1 = cursor_x
|
|
mov [cury1],ebx ; cury1 = cursor_y
|
|
|
|
; êîìó ïðèíàäëåæèò òî÷êà?
|
|
mcall 34,[curx1],[cury1]
|
|
cmp al,1 ; 1 - ÿäðî
|
|
jne still_mouse
|
|
|
|
; check for icon by click down
|
|
call check_icons_position
|
|
mov eax,[click_pos]
|
|
test eax,eax
|
|
jz still_mouse
|
|
|
|
mov eax,[current_X_mouse_thread]
|
|
mov [curx_restore],eax
|
|
mov eax,[current_Y_mouse_thread]
|
|
mov [cury_restore],eax
|
|
|
|
call draw_select
|
|
;--------------------------------------
|
|
align 4
|
|
@@: ; ïîäîæä¸ì, ïîêà ïîëüçîâàòåëü íå îòïóñòèë ïðàâóþ êíîïêó ìûøè
|
|
mcall 37,2 ; íàæàòû ëè êíîïêè ìûøè?
|
|
test eax,1 ; åñëè îòïóñòèë
|
|
jz @f ; èä¸ì â íà÷àëî ãëàâíîãî öèêëà
|
|
|
|
mcall 68,1 ; èíà÷å ïåðåêëþ÷èìñÿ íà ñëåäóþùèé ïîòîê ñèñòåìû è êîãäà
|
|
jmp @b ; âûïîëíåíèå âåðíåòñÿ ýòîìó ïîòîêó, ïðîâåðèì ìûøü îïÿòü
|
|
;--------------------------------------
|
|
align 4
|
|
@@:
|
|
; êîîðäèíàòû êóðñîðà
|
|
xor ebx,ebx
|
|
mcall 37
|
|
|
|
mov ebx,eax ; eax = cursor_x
|
|
shr eax,16 ; ebx = cursor_y
|
|
and ebx,0xffff
|
|
mov [curx2],eax ; curx1 = cursor_x
|
|
mov [cury2],ebx ; cury1 = cursor_y
|
|
|
|
; êîìó ïðèíàäëåæèò òî÷êà?
|
|
mcall 34,[curx2],[cury2]
|
|
cmp al,1 ; 1 - ÿäðî
|
|
je @f
|
|
call restore_background
|
|
jmp still_mouse
|
|
;--------------------------------------
|
|
align 4
|
|
@@:
|
|
; check for icon by click down
|
|
call check_icons_position
|
|
mov eax,[click_pos]
|
|
test eax,eax
|
|
jz still_mouse
|
|
|
|
push eax
|
|
mov eax,[curx2]
|
|
mov [curx1],eax
|
|
mov eax,[cury2]
|
|
mov [cury1],eax
|
|
; check for icon by click up
|
|
call check_icons_position
|
|
pop eax
|
|
|
|
call restore_background
|
|
|
|
mov ebx,[click_pos]
|
|
|
|
test ebx,ebx
|
|
jz still_mouse
|
|
|
|
cmp eax,ebx
|
|
jne still_mouse
|
|
;--------------------------------------
|
|
;start_appl:
|
|
mov esi,[adress_of_icon_data_2]
|
|
mov ebx,1
|
|
mov edi,finfo.path
|
|
call fill_paths
|
|
inc ebx
|
|
mov edi,param_str
|
|
mov dword[finfo_start+8],edi
|
|
call fill_paths
|
|
cmp byte[edi],0
|
|
jne .no0
|
|
and dword[finfo_start+8],0
|
|
;--------------------------------------
|
|
align 4
|
|
.no0:
|
|
mov ebx,finfo_start
|
|
mcall 70
|
|
jmp still_mouse
|
|
;------------------------------------------------------------------------------
|
|
align 4
|
|
fill_paths:
|
|
push esi edi
|
|
movzx ecx,byte[str_lens+ebx]
|
|
add esi,[positions+ebx*4]
|
|
push esi
|
|
add esi,ecx
|
|
;--------------------------------------
|
|
align 4
|
|
.l1:
|
|
dec esi
|
|
cmp byte[esi],' '
|
|
jnz .found
|
|
loop .l1
|
|
pop esi
|
|
jmp .noms
|
|
;--------------------------------------
|
|
align 4
|
|
.found:
|
|
lea ecx,[esi+1]
|
|
pop esi
|
|
sub ecx,esi
|
|
rep movsb
|
|
;--------------------------------------
|
|
align 4
|
|
.noms:
|
|
and byte[edi],0
|
|
pop edi esi
|
|
ret
|
|
;------------------------------------------------------------------------------
|
|
align 4
|
|
check_icons_position:
|
|
mov ecx,[icons]
|
|
mov ebx,icon_data
|
|
;--------------------------------------
|
|
align 4
|
|
.loop:
|
|
push ebx ecx
|
|
mov [adress_of_icon_data_2],ebx
|
|
mov eax,[ebx]
|
|
call calc_icon_pos
|
|
|
|
mov [current_X_mouse_thread],ebx
|
|
mov [current_Y_mouse_thread],eax
|
|
mov eax,[curx1]
|
|
mov ebx,[current_X_mouse_thread]
|
|
cmp eax,ebx
|
|
jb .next
|
|
|
|
add ebx,52
|
|
cmp eax,ebx
|
|
ja .next
|
|
|
|
mov eax,[cury1]
|
|
mov ebx,[current_Y_mouse_thread]
|
|
cmp eax,ebx
|
|
jb .next
|
|
|
|
add ebx,52
|
|
cmp eax,ebx
|
|
ja .next
|
|
|
|
pop ecx ebx
|
|
mov eax,[adress_of_icon_data_2]
|
|
mov [click_pos],eax
|
|
ret
|
|
;--------------------------------------
|
|
align 4
|
|
.next:
|
|
pop ecx ebx
|
|
add ebx,REC_SIZE
|
|
dec ecx
|
|
jnz .loop
|
|
; all icons survived!
|
|
xor eax,eax
|
|
mov [click_pos],eax
|
|
ret
|
|
;------------------------------------------------------------------------------
|
|
align 4
|
|
draw_select:
|
|
mcall 68,12,52*52*4+8
|
|
mov [draw_area_2],eax
|
|
mov ebx,52
|
|
mov [eax],ebx
|
|
mov [eax+4],ebx
|
|
;--------------------------------------
|
|
; draw black square
|
|
mov eax,-1
|
|
mov edi,[draw_area_2]
|
|
add edi,8
|
|
cld
|
|
mov ecx,52*52
|
|
rep stosd
|
|
;--------------------------------------
|
|
; draw white square
|
|
mov eax,0xff000000
|
|
mov edi,[draw_area_2]
|
|
add edi,8+(4*1)+(52*4*1)
|
|
mov ebx,50
|
|
cld
|
|
;--------------------------------------
|
|
align 4
|
|
@@:
|
|
mov ecx,50
|
|
rep stosd
|
|
|
|
add edi,2*4
|
|
dec ebx
|
|
jnz @b
|
|
;--------------------------------------
|
|
; draw black square
|
|
xor eax,eax
|
|
mov edi,[draw_area_2]
|
|
add edi,8+(4*2)+(52*4*2)
|
|
mov ebx,48
|
|
cld
|
|
;--------------------------------------
|
|
align 4
|
|
@@:
|
|
mov ecx,48
|
|
rep stosd
|
|
|
|
add edi,4*4
|
|
dec ebx
|
|
jnz @b
|
|
;--------------------------------------
|
|
mov edx,[current_X_mouse_thread]
|
|
shl edx,16
|
|
add edx,[current_Y_mouse_thread]
|
|
mov ebx,[draw_area_2]
|
|
add ebx,8
|
|
mcall 25,,<52,52>
|
|
mcall 68,13,[draw_area_2]
|
|
ret
|
|
;------------------------------------------------------------------------------
|
|
align 4
|
|
restore_background:
|
|
pusha
|
|
mov eax,[curx_restore]
|
|
mov ecx,eax
|
|
shl ecx,16
|
|
add ecx,eax
|
|
add ecx,52
|
|
|
|
mov eax,[cury_restore]
|
|
mov edx,eax
|
|
shl edx,16
|
|
add edx,eax
|
|
add edx,52
|
|
|
|
mcall 15,9
|
|
popa
|
|
ret
|
|
;------------------------------------------------------------------------------ |