Move KompoZer hotkeys to tt.programs.kompozer.ahk

2 files changed, 81 insertions, 28 deletions

diff --git a/tt.programs.ahk b/tt.programs.ahk
index d7b5d02..78a2332 100644
--- a/tt.programs.ahk
+++ b/tt.programs.ahk
@@ -52,30 +52,6 @@ Loop, 5
 	SendInput, {WheelDown}
 return
 
-#IfWinActive ahk_exe kompozer.exe
-
-^q::SendInput, !vd ; design
-^w::SendInput, !vs ; split
-^e::SendInput, !vh ; source
-^1::SendInput, !op1 ; heading 1
-^2::SendInput, !op2
-^3::SendInput, !op3
-^4::SendInput, !op4
-^5::SendInput, !op5
-^6::SendInput, !op6
-^p::SendInput, !opp ; paragraph
-^+b::SendInput, !ost ; strong
-^+i::SendInput, !ose ; emphasis
-^+-::SendInput, !ozr ; smaller
-^++::SendInput, !ozg ; smaller
-^+c::SendInput, !oso ; code
-^+t::SendInput, !osx ; tt
-^h:: ; horizontal rule
-SendInput, !ih
-Sleep, 100
-SendInput, <hr>{Tab}{Enter}
-return
-
 #IfWinActive ahk_class KMeleon Browser Window
 
 F3::SendInput, !{Left}
@@ -99,7 +75,7 @@ if (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
 	SendInput, !{Enter}
 return
 
-~RShift::
+~RShift:: ; show controls (including time remaining)
 WinGetPos, x, y, w, h, A
 if not (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
 	return
@@ -109,7 +85,7 @@ KeyWait, RShift
 MouseMove, % mx, % my, 0
 return
 
-~LShift::
+~LShift:: ; show playlist
 WinGetPos, x, y, w, h, A
 MouseGetPos, mx, my
 SendInput, {LCtrl Down}7{LCtrl Up}
@@ -120,8 +96,7 @@ MouseMove, % mx, % my, 0
 SendInput, {LCtrl Down}7{LCtrl Up}
 return
 
-; crop to 4:3
-Numpad0::
+Numpad0:: ; crop to 4:3
 SendInput, {Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}{Numpad9}
 return
 
diff --git a/tt.programs.kompozer.ahk b/tt.programs.kompozer.ahk
new file mode 100644
index 0000000..212f29e
--- /dev/null
+++ b/tt.programs.kompozer.ahk
@@ -0,0 +1,78 @@
+;; -> body
+
+#IfWinActive ahk_exe kompozer.exe
+
+^q::SendInput, !vd ; design
+^w::SendInput, !vs ; split
+^e::SendInput, !vh ; source
+^1::SendInput, !op1 ; heading 1
+^2::SendInput, !op2 ; ...
+^3::SendInput, !op3
+^4::SendInput, !op4
+^5::SendInput, !op5
+^6::SendInput, !op6
+^p::SendInput, !opp ; paragraph
+^+p::SendInput, !opf ; preformatted
+^+b::SendInput, !ost ; strong
+^+i::SendInput, !ose ; emphasis
+^+-::SendInput, !ozr ; smaller
+^++::SendInput, !ozg ; bigger
+^+c::SendInput, !oso ; code
+^+t::SendInput, !osx ; tt
+
+^h:: ; horizontal rule
+SendInput, !ih
+Sleep, 100
+SendInput, <hr>{Tab}{Enter}
+return
+
+$^!s:: ; clean up and save
+SendInput, !tm
+Sleep, 100
+SendInput, {Enter}{Esc}^s
+return
+
+F1:: ; update table of contents (h2-h6)
+SendInput, !ibu
+goto toc1
+
++F1:: ; create table of contents (h2-h6)
+SendInput, !ibi
+goto toc1
+
+toc1:
+Sleep, 100
+SendInput, h2{Tab}{Tab}h3{Tab}{Tab}-{Tab}-{Tab}-{Tab}-{Enter}
+return
+
+F2:: ; update table of contents (h2 only)
+SendInput, !ibu
+goto toc2
+
++F2:: ; create table of contents (h2 only)
+SendInput, !ibi
+goto toc2
+
+toc2:
+Sleep, 100
+SendInput, h2
+goto toc4
+
+F3:: ; update table of contents (h3 only)
+SendInput, !ibu
+goto toc3
+
++F3:: ; create table of contents (h3 only)
+SendInput, !ibi
+goto toc3
+
+toc3:
+Sleep, 100
+SendInput, h3
+goto toc4
+
+toc4:
+SendInput, {Tab}{Tab}-{Tab}-{Tab}-{Tab}-{Tab}-{Enter}
+return
+
+#IfWinActive