aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Ankarström <john@ankarstrom.se>2021-05-23 14:59:40 +0200
committerJohn Ankarström <john@ankarstrom.se>2021-05-23 14:59:40 +0200
commit700493518268f65e95ad08e230ecfe2b9df8949a (patch)
tree2489cb9b054b08509e80e126f6fa11690701f0dc
parentd9ac182dcac7638fb1e7c857929c2c27d4786690 (diff)
downloadahk-700493518268f65e95ad08e230ecfe2b9df8949a.tar.gz
kompozer: Improve mouse handling
-rw-r--r--tt.programs.kompozer.ahk12
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