forked from KolibriOS/kolibrios
@panel: support for Alt+Tab/Alt+Shift+Tab
git-svn-id: svn://kolibrios.org@443 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Evgeny Grechnikov (Diamond)
parent
5dc5a99124
commit
6753d88bae
@ -42,6 +42,8 @@ handle_key:
|
|||||||
jnz begin_1.ret
|
jnz begin_1.ret
|
||||||
mov ebx, exec_fileinfo
|
mov ebx, exec_fileinfo
|
||||||
shr eax, 8
|
shr eax, 8
|
||||||
|
cmp al, 15
|
||||||
|
jz alt_tab_pressed
|
||||||
cmp al, 88
|
cmp al, 88
|
||||||
jz start_end_application
|
jz start_end_application
|
||||||
cmp al, 91
|
cmp al, 91
|
||||||
@ -54,6 +56,11 @@ handle_key:
|
|||||||
jz page_list_next
|
jz page_list_next
|
||||||
cmp al, 72
|
cmp al, 72
|
||||||
jz page_list_prev
|
jz page_list_prev
|
||||||
|
cmp [current_alt_tab_app], -1
|
||||||
|
jz @f
|
||||||
|
test ah, 0x30
|
||||||
|
jz alt_tab_released
|
||||||
|
@@:
|
||||||
; this is hotkey Ctrl+Shift ;or LShift+RShift
|
; this is hotkey Ctrl+Shift ;or LShift+RShift
|
||||||
mov ebx, setup_exec
|
mov ebx, setup_exec
|
||||||
; test ah, 001100b
|
; test ah, 001100b
|
||||||
@ -116,6 +123,126 @@ page_list_prev:
|
|||||||
@@:
|
@@:
|
||||||
jmp begin_1.ret
|
jmp begin_1.ret
|
||||||
|
|
||||||
|
alt_tab_pressed:
|
||||||
|
; handle Alt+Tab and Alt+Shift+Tab
|
||||||
|
mov ebp, eax
|
||||||
|
cmp [current_alt_tab_app], -1
|
||||||
|
jnz has_alt_tab_app
|
||||||
|
; § ¯®«ï¥¬ â ¡«¨æ㠯ਫ®¦¥¨©, ¯®¤«¥¦ é¨å ¯¥à¥ª«î票î
|
||||||
|
xor edx, edx
|
||||||
|
mov ebx, 0x8000
|
||||||
|
mov ecx, 1
|
||||||
|
mov eax, 9
|
||||||
|
.fill:
|
||||||
|
inc ecx
|
||||||
|
int 0x40
|
||||||
|
call need_window_tab
|
||||||
|
jz @f
|
||||||
|
cmp edx, 256
|
||||||
|
jz @f
|
||||||
|
mov [alt_tab_list+edx*8], ecx
|
||||||
|
movzx esi, word [ebx+4]
|
||||||
|
mov [alt_tab_list+edx*8+4], esi
|
||||||
|
inc edx
|
||||||
|
@@:
|
||||||
|
cmp ecx, eax
|
||||||
|
mov eax, 9
|
||||||
|
jb .fill
|
||||||
|
mov [alt_tab_list_size], edx
|
||||||
|
cmp edx, 2
|
||||||
|
jb begin_1.ret
|
||||||
|
mcall 66,4,0,0 ; «®¢¨¬ ¬®¬¥â ®â¯ã᪠¨ï ¢á¥å ã¯à ¢«ïîé¨å ª« ¢¨è
|
||||||
|
test eax, eax
|
||||||
|
jnz begin_1.ret
|
||||||
|
xor edx, edx
|
||||||
|
mov eax, [alt_tab_list+4]
|
||||||
|
xor ecx, ecx
|
||||||
|
inc ecx
|
||||||
|
.findmax:
|
||||||
|
cmp [alt_tab_list+ecx*8+4], eax
|
||||||
|
jb @f
|
||||||
|
mov edx, ecx
|
||||||
|
mov eax, [alt_tab_list+ecx*8+4]
|
||||||
|
@@:
|
||||||
|
inc ecx
|
||||||
|
cmp ecx, [alt_tab_list_size]
|
||||||
|
jb .findmax
|
||||||
|
mov [current_alt_tab_app], edx
|
||||||
|
has_alt_tab_app:
|
||||||
|
mov eax, [current_alt_tab_app]
|
||||||
|
mov edx, [alt_tab_list+eax*8+4] ; slot
|
||||||
|
xor ecx, ecx
|
||||||
|
or eax, -1
|
||||||
|
test ebp, 300h
|
||||||
|
jz .notshift
|
||||||
|
or esi, -1
|
||||||
|
.loop1:
|
||||||
|
cmp [alt_tab_list+ecx*8+4], edx
|
||||||
|
jbe @f
|
||||||
|
cmp [alt_tab_list+ecx*8+4], esi
|
||||||
|
jae @f
|
||||||
|
mov eax, ecx
|
||||||
|
mov esi, [alt_tab_list+ecx*8+4]
|
||||||
|
@@:
|
||||||
|
inc ecx
|
||||||
|
cmp ecx, [alt_tab_list_size]
|
||||||
|
jb .loop1
|
||||||
|
cmp eax, -1
|
||||||
|
jnz .found
|
||||||
|
xor edx, edx
|
||||||
|
xor ecx, ecx
|
||||||
|
jmp .loop1
|
||||||
|
.notshift:
|
||||||
|
xor esi, esi
|
||||||
|
.loop2:
|
||||||
|
cmp [alt_tab_list+ecx*8+4], edx
|
||||||
|
jae @f
|
||||||
|
cmp [alt_tab_list+ecx*8+4], esi
|
||||||
|
jbe @f
|
||||||
|
mov eax, ecx
|
||||||
|
mov esi, [alt_tab_list+ecx*8+4]
|
||||||
|
@@:
|
||||||
|
inc ecx
|
||||||
|
cmp ecx, [alt_tab_list_size]
|
||||||
|
jb .loop2
|
||||||
|
cmp eax, -1
|
||||||
|
jnz .found
|
||||||
|
or edx, -1
|
||||||
|
xor ecx, ecx
|
||||||
|
jmp .loop2
|
||||||
|
.found:
|
||||||
|
mov [current_alt_tab_app], eax
|
||||||
|
push eax
|
||||||
|
xor edx, edx
|
||||||
|
div [max_applications]
|
||||||
|
mov [page_list], eax
|
||||||
|
mov [draw_window_1], 1
|
||||||
|
mov edi, app_list
|
||||||
|
push edi
|
||||||
|
mov ecx, 20
|
||||||
|
or eax, -1
|
||||||
|
rep stosd
|
||||||
|
pop edi
|
||||||
|
pop ecx
|
||||||
|
sub ecx, edx
|
||||||
|
@@:
|
||||||
|
cmp ecx, [alt_tab_list_size]
|
||||||
|
jae redraw_window_tabs
|
||||||
|
mov eax, [alt_tab_list+ecx*8]
|
||||||
|
stosd
|
||||||
|
inc ecx
|
||||||
|
jmp @b
|
||||||
|
|
||||||
|
alt_tab_released:
|
||||||
|
mcall 66,5,0,0 ; 㦥 ¯®©¬ «¨, å¢ â¨â :)
|
||||||
|
or eax, -1
|
||||||
|
xchg eax, [current_alt_tab_app]
|
||||||
|
mov ecx, [alt_tab_list+eax*8]
|
||||||
|
mov eax, 18
|
||||||
|
mov ebx, 3
|
||||||
|
int 0x40
|
||||||
|
jmp redraw_window_tabs
|
||||||
|
|
||||||
active_process dd 0
|
active_process dd 0
|
||||||
|
|
||||||
calendar_music:
|
calendar_music:
|
||||||
@ -168,6 +295,8 @@ START:
|
|||||||
mcall 66,,62 ; Alt+F4
|
mcall 66,,62 ; Alt+F4
|
||||||
mcall 66,,71 ; Alt+Home
|
mcall 66,,71 ; Alt+Home
|
||||||
mcall 66,,72 ; Alt+Up
|
mcall 66,,72 ; Alt+Up
|
||||||
|
mcall 66,,15 ; Alt+Tab
|
||||||
|
mcall 66,,,101h ; Alt+Shift+Tab
|
||||||
mcall 18, 8, 1
|
mcall 18, 8, 1
|
||||||
test eax, eax
|
test eax, eax
|
||||||
jne @f
|
jne @f
|
||||||
@ -406,123 +535,7 @@ draw_running_applications:
|
|||||||
|
|
||||||
mov [running_applications],edi
|
mov [running_applications],edi
|
||||||
|
|
||||||
mov edi,0
|
call redraw_window_tabs
|
||||||
mov ecx,2
|
|
||||||
mov [contrast],0
|
|
||||||
mov eax,[max_applications]
|
|
||||||
mul [page_list]
|
|
||||||
test eax,eax
|
|
||||||
je @f
|
|
||||||
inc eax
|
|
||||||
@@:
|
|
||||||
mov [draw_start_position],eax
|
|
||||||
|
|
||||||
|
|
||||||
newpr:
|
|
||||||
|
|
||||||
mov eax,9
|
|
||||||
mov ebx,0x8000
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
push eax
|
|
||||||
push ecx
|
|
||||||
|
|
||||||
cmp eax,ecx
|
|
||||||
jb norpl2
|
|
||||||
|
|
||||||
cmp byte [0x8000+10], '@'
|
|
||||||
je norpl
|
|
||||||
cmp [0x8000+10],dword 'ICON'
|
|
||||||
jne .noicon
|
|
||||||
cmp dword[0x8000+42],51
|
|
||||||
jne .noicon
|
|
||||||
cmp dword[0x8000+46],51
|
|
||||||
je norpl
|
|
||||||
.noicon:
|
|
||||||
cmp [0x8000+10],dword ' '
|
|
||||||
je norpl
|
|
||||||
dec [draw_start_position]
|
|
||||||
cmp [draw_start_position],0
|
|
||||||
jg norpl
|
|
||||||
mov eax,13
|
|
||||||
mov ebx,edi
|
|
||||||
inc ebx
|
|
||||||
shl ebx,16
|
|
||||||
imul ebx,6*10
|
|
||||||
add ebx,17 shl 16+54
|
|
||||||
mov ecx,3 shl 16+14
|
|
||||||
xor edx,edx
|
|
||||||
sub ebx,10 shl 16
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
sub ebx,1 shl 16
|
|
||||||
mov bx,1
|
|
||||||
mov ecx,4 shl 16+12
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
sub ebx,1 shl 16
|
|
||||||
mov ecx,5 shl 16+10
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
add ebx,56 shl 16
|
|
||||||
mov ecx,4 shl 16+12
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
add ebx,1 shl 16
|
|
||||||
mov ecx,5 shl 16+10
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
inc [contrast]
|
|
||||||
and [contrast],1
|
|
||||||
cmp [contrast],1
|
|
||||||
je contrast1
|
|
||||||
mov edx,0x88ff
|
|
||||||
jmp contrast2
|
|
||||||
contrast1:
|
|
||||||
mov edx,0x55ff
|
|
||||||
contrast2:
|
|
||||||
sub ebx,55 shl 16
|
|
||||||
mov bx,54
|
|
||||||
mov ecx,4 shl 16+12
|
|
||||||
; mov edx,0x66ff
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
sub ebx,1 shl 16
|
|
||||||
mov bx,1
|
|
||||||
mov ecx,5 shl 16+10
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
add ebx,55 shl 16
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
mov eax,4
|
|
||||||
mov ebx,edi
|
|
||||||
inc ebx
|
|
||||||
shl ebx,16
|
|
||||||
imul ebx,6*10 ;13
|
|
||||||
add ebx,20*65536+7
|
|
||||||
mov ecx,0xffffff ;[wcolor]
|
|
||||||
; add ecx,0x303030
|
|
||||||
mov edx,0x8000+10
|
|
||||||
mov esi,11
|
|
||||||
sub ebx,10 shl 16
|
|
||||||
int 0x40
|
|
||||||
|
|
||||||
norpl2:
|
|
||||||
|
|
||||||
inc edi
|
|
||||||
|
|
||||||
norpl:
|
|
||||||
|
|
||||||
pop ecx
|
|
||||||
pop eax
|
|
||||||
|
|
||||||
inc ecx
|
|
||||||
|
|
||||||
cmp edi,[max_applications]
|
|
||||||
jb newpr
|
|
||||||
|
|
||||||
nompr:
|
|
||||||
|
|
||||||
dr_ret:
|
dr_ret:
|
||||||
|
|
||||||
@ -530,6 +543,97 @@ contrast2:
|
|||||||
|
|
||||||
ret
|
ret
|
||||||
|
|
||||||
|
need_window_tab:
|
||||||
|
; in: ebx->process info
|
||||||
|
; out: ZF set <=> do not draw
|
||||||
|
cmp byte [ebx+10], '@'
|
||||||
|
jz .nodraw
|
||||||
|
; \begin{diamond}[29.03.2007]
|
||||||
|
; do not draw undefined (zero-sized) windows
|
||||||
|
cmp dword [ebx+42], 0
|
||||||
|
jnz @f
|
||||||
|
cmp dword [ebx+46], 0
|
||||||
|
jz .nodraw
|
||||||
|
@@:
|
||||||
|
; \end{diamond}[29.03.2007]
|
||||||
|
cmp dword [ebx+10], 'ICON'
|
||||||
|
jnz @f
|
||||||
|
cmp [ebx+42], dword 51
|
||||||
|
jnz @f
|
||||||
|
cmp [ebx+46], dword 51
|
||||||
|
jz .nodraw
|
||||||
|
@@:
|
||||||
|
cmp [ebx+10], dword ' '
|
||||||
|
.nodraw:
|
||||||
|
ret
|
||||||
|
|
||||||
|
redraw_window_tabs:
|
||||||
|
xor edi, edi
|
||||||
|
mov [contrast], 0
|
||||||
|
.loop:
|
||||||
|
mov ecx, [app_list+edi*4]
|
||||||
|
cmp ecx, -1
|
||||||
|
jz .done
|
||||||
|
|
||||||
|
push ecx
|
||||||
|
mov eax, 9
|
||||||
|
mov ebx, 0x8000
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
mov eax, 13
|
||||||
|
imul ebx, edi, 6*10*10000h
|
||||||
|
add ebx, 6*10*10000h + 7*10000h + 54
|
||||||
|
mov ecx, 3*10000h + 14
|
||||||
|
xor edx, edx
|
||||||
|
int 0x40
|
||||||
|
sub ebx, 10000h + 53
|
||||||
|
mov ecx, 4*10000h + 12
|
||||||
|
int 0x40
|
||||||
|
sub ebx, 10000h
|
||||||
|
mov ecx, 5*10000h + 10
|
||||||
|
int 0x40
|
||||||
|
add ebx, 56*10000h
|
||||||
|
mov ecx, 4*10000h + 12
|
||||||
|
int 0x40
|
||||||
|
add ebx, 10000h
|
||||||
|
mov ecx, 5*10000h + 10
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
mov edx, 0x88FF
|
||||||
|
xor [contrast], 1
|
||||||
|
jz @f
|
||||||
|
mov dh, 0x55
|
||||||
|
@@:
|
||||||
|
pop ecx
|
||||||
|
mov esi, [current_alt_tab_app]
|
||||||
|
cmp esi, -1
|
||||||
|
jz @f
|
||||||
|
cmp ecx, [alt_tab_list+esi*8]
|
||||||
|
jnz @f
|
||||||
|
; xor edx, 0xFFFFFF
|
||||||
|
mov edx, 0xFF8000
|
||||||
|
@@:
|
||||||
|
sub ebx, 55*10000h - 53
|
||||||
|
mov ecx, 4*10000h + 12
|
||||||
|
int 0x40
|
||||||
|
sub ebx, 10000h + 53
|
||||||
|
mov ecx, 5*10000h + 10
|
||||||
|
int 0x40
|
||||||
|
add ebx, 55*10000h
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
mov eax, 4
|
||||||
|
sub ebx, 51*10000h - 6
|
||||||
|
mov ecx, 0xffffff ;[wcolor]
|
||||||
|
mov edx, 0x8000+10
|
||||||
|
mov esi, 11
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
inc edi
|
||||||
|
cmp edi, [max_applications]
|
||||||
|
jb .loop
|
||||||
|
.done:
|
||||||
|
ret
|
||||||
|
|
||||||
calculate_applications:
|
calculate_applications:
|
||||||
|
|
||||||
@ -543,7 +647,7 @@ calculate_applications:
|
|||||||
|
|
||||||
mov edi,app_list
|
mov edi,app_list
|
||||||
mov ecx,20
|
mov ecx,20
|
||||||
mov eax,0xff
|
mov eax,-1
|
||||||
cld
|
cld
|
||||||
rep stosd
|
rep stosd
|
||||||
|
|
||||||
@ -556,33 +660,9 @@ calculate_applications:
|
|||||||
mov ebx,0x8000
|
mov ebx,0x8000
|
||||||
int 0x40
|
int 0x40
|
||||||
|
|
||||||
cmp byte [0x8000+10], '@'
|
call need_window_tab
|
||||||
je cnorpl
|
|
||||||
; \begin{diamond}[29.03.2007]
|
|
||||||
; do not draw undefined (zero-sized) windows
|
|
||||||
cmp dword [0x8000+42], 0
|
|
||||||
jnz @f
|
|
||||||
cmp dword [0x8000+46], 0
|
|
||||||
jz cnorpl
|
jz cnorpl
|
||||||
@@:
|
sub [draw_start_position], 1
|
||||||
; \end{diamond}[29.03.2007]
|
|
||||||
cmp [0x8000+10],dword 'ICON'
|
|
||||||
jne .noicon
|
|
||||||
cmp dword[0x8000+42],51
|
|
||||||
jne .noicon
|
|
||||||
cmp dword[0x8000+46],51
|
|
||||||
je cnorpl
|
|
||||||
.noicon:
|
|
||||||
cmp [0x8000+11],dword 'CON '
|
|
||||||
je cnorpl
|
|
||||||
; cmp [0x8000+11],dword 'ENU '
|
|
||||||
; je cnorpl
|
|
||||||
; cmp [0x8000+12],dword 'NEL '
|
|
||||||
; je cnorpl
|
|
||||||
cmp [0x8000+10],dword ' '
|
|
||||||
je cnorpl
|
|
||||||
dec [draw_start_position]
|
|
||||||
cmp [draw_start_position],0
|
|
||||||
jg cnorpl
|
jg cnorpl
|
||||||
|
|
||||||
mov [app_list+edi*4],ecx
|
mov [app_list+edi*4],ecx
|
||||||
@ -1920,6 +2000,8 @@ contrast db 0
|
|||||||
running_applications dd 0x100
|
running_applications dd 0x100
|
||||||
max_applications dd 11
|
max_applications dd 11
|
||||||
|
|
||||||
|
current_alt_tab_app dd -1
|
||||||
|
|
||||||
page_list dd 0
|
page_list dd 0
|
||||||
draw_start_position dd 0
|
draw_start_position dd 0
|
||||||
draw_window_1 db 0
|
draw_window_1 db 0
|
||||||
@ -2000,6 +2082,8 @@ screen_size:
|
|||||||
area9 rb 100
|
area9 rb 100
|
||||||
system_colours rd 10
|
system_colours rd 10
|
||||||
app_list rd 50
|
app_list rd 50
|
||||||
|
alt_tab_list rd 256*2
|
||||||
|
alt_tab_list_size dd ?
|
||||||
tictable:
|
tictable:
|
||||||
rd 256
|
rd 256
|
||||||
image:
|
image:
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user