kolibrios/programs/system/panel/trunk/detect.asm
Rus e0479cff91 bag-fix of commit 601
git-svn-id: svn://kolibrios.org@602 a494cfbc-eb01-0410-851d-a64ba20cac60
2007-08-02 20:16:05 +00:00

97 lines
1.4 KiB
NASM

; Detecting mouse right-clicks.
detect_start:
mov eax, 40
mov ebx, 00100000b
int 0x40
detect_still:
;mov eax, 10 ; Ðàáîòàåò íå ñîâñåì êîððåêòíî, ïî÷åìó õç.
mov eax, 23
mov ebx, 4
int 0x40
;cmp eax, 6
;jne detect_still
mov eax, 37
mov ebx, 2 ; Îïðàøèâàåì êíîïêè ìûøè
int 0x40
test eax, ebx ; test eax, 00000010b Èíòåðåñóåò òîëüêî ïðàâàÿ êíîïêà
jz detect_still ; Íåò - ? Âîçâðàùàåìñÿ â ãëàâíûé öèêë ïîòîêà
mouse_btn_up:
mov eax, 37
mov ebx, 2
int 0x40
test eax, ebx
jnz mouse_btn_up
mov eax, 37
xor ebx, ebx ; mov ebx, 0
int 0x40
mov ecx, [panel_y_pos]
shr ecx, 16
inc ecx
cmp ax, cx
jb detect_still
add ecx, 15
cmp ax, cx
ja detect_still
shr eax, 16
xor edx, edx ; mov edx, 1
inc edx
detect_button:
mov ebx, edx
imul ebx, 6 * 10
add ebx, 4
cmp eax, ebx
jb detect_still
add ebx, 60 - 1
cmp eax, ebx
ja @f
shl edx, 2
mov ecx, [app_list + edx - 4]
cmp ecx, -1
jz detect_still
mov [x_coord], ax
mov eax, 37
xor ebx, ebx ; mov ebx, 0
int 0x40
mov [y_coord], ax
mov [n_slot], ecx
mov eax, 51
mov ebx, 1
mov ecx, context_menu_start
mov edx, ctx_menu_stack
int 0x40
mov [ctx_menu_PID], eax
jmp detect_still
@@:
cmp edx, [max_applications]
jae detect_still
inc edx
jmp detect_button