diff options
| author | John Ankarström <john@ankarstrom.se> | 2021-05-23 14:59:40 +0200 |
|---|---|---|
| committer | John Ankarström <john@ankarstrom.se> | 2021-05-23 14:59:40 +0200 |
| commit | 700493518268f65e95ad08e230ecfe2b9df8949a (patch) | |
| tree | 2489cb9b054b08509e80e126f6fa11690701f0dc | |
| parent | d9ac182dcac7638fb1e7c857929c2c27d4786690 (diff) | |
| download | ahk-700493518268f65e95ad08e230ecfe2b9df8949a.tar.gz | |
kompozer: Improve mouse handling
| -rw-r--r-- | tt.programs.kompozer.ahk | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tt.programs.kompozer.ahk b/tt.programs.kompozer.ahk index fb72c68..2188e81 100644 --- a/tt.programs.kompozer.ahk +++ b/tt.programs.kompozer.ahk @@ -39,27 +39,35 @@ return +AppsKey:: ; open tag menu MouseGetPos, mx, my WinGetPos,,, w, h +BlockInput, MouseMove MouseMove, % w - 40, % h - 20, 0 SendInput, {RButton} MouseMove, % mx, % my, 0 +BlockInput, MouseMoveOff return F1:: ; open advanced properties for tag MouseGetPos, mx, my WinGetPos,,, w, h +BlockInput, MouseMove MouseMove, % w - 40, % h - 20, 0 SendInput, {RButton} MouseMove, % mx, % my, 0 +Sleep, 10 SendInput, {Up}{Enter} +BlockInput, MouseMoveOff return F2:: ; open inline styles for tag MouseGetPos, mx, my WinGetPos,,, w, h +BlockInput, MouseMove MouseMove, % w - 40, % h - 20, 0 SendInput, {RButton} MouseMove, % mx, % my, 0 +Sleep, 10 SendInput, {Up}{Up}{Enter} +BlockInput, MouseMoveOff return #IfWinActive Rubber dome keyboard buyer's guide ahk_group KompoZer @@ -78,23 +86,27 @@ CounterRD() F8:: ; class=left MouseGetPos, mx, my WinGetPos,,, w, h +BlockInput, MouseMove if (CounterRD() & 1) ; odd MouseMove, % w - 40, % h - 25, 0 else MouseMove, % w - 40, % h - 15, 0 SendInput, {RButton}{Up}{Up}{Up}{Right}l MouseMove, % mx, % my, 0 +BlockInput, MouseMoveOff return F9:: ; class=clear MouseGetPos, mx, my WinGetPos,,, w, h +BlockInput, MouseMove if (CounterRD() & 1) ; odd MouseMove, % w - 40, % h - 25, 0 else MouseMove, % w - 40, % h - 15, 0 SendInput, {RButton}{Up}{Up}{Up}{Right}c MouseMove, % mx, % my, 0 +BlockInput, MouseMoveOff return #IfWinActive ahk_group KompoZer |