From 1f460f7ebc10c2f8bb66ae684498f49187eab9bc Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Fri, 23 Oct 2020 01:44:02 +0200
Subject: first commit

---
 tt.programs.ahk | 100 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 100 insertions(+)
 create mode 100644 tt.programs.ahk

(limited to 'tt.programs.ahk')

diff --git a/tt.programs.ahk b/tt.programs.ahk
new file mode 100644
index 0000000..e0e7c8e
--- /dev/null
+++ b/tt.programs.ahk
@@ -0,0 +1,100 @@
+;; Program shortcuts ----------------------------------------------------------
+
+;; -> body
+
+#IfWinActive ahk_class Emacs
+
+; RAlt::Alt
+
+#IfWinActive ahk_class ConsoleWindowClass
+
+!F4::WinClose, A
+
+#IfWinActive ahk_exe WINWORD.EXE
+
+XButton1::SendInput, +{F5} ; cycle cursor position backwards
+
+#IfWinActive ahk_class Audition v1.5
+
++WheelUp::
+Loop, 30
+  SendInput, ^+{Left}
+return
+
++WheelDown::
+Loop, 30
+  SendInput, ^+{Right}
+return
+
+#IfWinActive ahk_class EVERYTHING
+
+WheelUp::Up
+WheelDown::Down
+
+#IfWinActive ahk_class SciTEWindow
+
+F2::Gosub, TrayRebuild ; rebuild scripts.ahk
+
+#IfWinActive ahk_class MozillaWindowClass
+
++^!+::SendInput, ^!{WheelUp}
++^!-::SendInput, ^!{WheelDown}
+!s::SendInput, ^k
+F3::SendInput, !{Left}
+F4::SendInput, !{Right}
+!F1::SendInput, {WheelUp}
+!F2::SendInput, {WheelDown}
+F1::
+Loop, 5
+  SendInput, {WheelUp}
+return
+F2::
+Loop, 5
+  SendInput, {WheelDown}
+return
+
+#IfWinActive ahk_class KMeleon Browser Window
+
+F3::SendInput, !{Left}
+F4::SendInput, !{Right}
+!F1::SendInput, {LAlt Up}{Up}
+!F2::SendInput, {LAlt Up}{Down}
+F1::
+Loop, 5
+  SendInput, {WheelUp}
+return
+F2::
+Loop, 5
+  SendInput, {WheelDown}
+return
+
+#IfWinActive ahk_class MediaPlayerClassicW
+
+Esc::
+WinGetPos, x, y, w, h
+if (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
+  SendInput, {F11}
+return
+
+~RShift::
+WinGetPos, x, y, w, h, A
+if not (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
+  return
+MouseGetPos, mx, my
+MouseMove, % A_ScreenWidth, % A_ScreenHeight, 0
+KeyWait, RShift
+MouseMove, % mx, % my, 0
+return
+
+~LShift::
+WinGetPos, x, y, w, h, A
+MouseGetPos, mx, my
+SendInput, {LCtrl Down}7{LCtrl Up}
+if (x = 0 and y = 0 and w = A_ScreenWidth and h = A_ScreenHeight)
+  MouseMove, % A_ScreenWidth, 0, 0
+KeyWait, LShift
+MouseMove, % mx, % my, 0
+SendInput, {LCtrl Down}7{LCtrl Up}
+return
+
+#IfWinActive
-- 
cgit v1.2.3