-
Notifications
You must be signed in to change notification settings - Fork 2
/
#global_hotkeys.ahk
185 lines (162 loc) · 5.58 KB
/
#global_hotkeys.ahk
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
;#################################################################
;##### CfK -- Global hotkeys
;# = Super, ^ = Ctrl, ! = Alt, + = Shift, ^>! = AltGr
;----- WORKAROUND: Super -> Disable windows menu opening on shortcut
;~LWin Up::
;return
;~RWin Up::
;return
;----- Super+. -> Insert Date Format without -
#.::
FormatTime, sDate,, yyyy-MM-dd
SendInput, %sDate%
return
;----- Strg+Super+. -> Insert Date with -
^#.::
FormatTime, sDate,, yyyyMMdd
SendInput, %sDate%
return
;----- Strg+Alt+Super+. -> Insert Date with -
^!#.::
FormatTime, sDate,, yyyy-MM-dd
WeekOfYear = %A_YDay%
WeekOfYear /= 7
WeekOfYear++ ; Convert from 0-base to 1-base
SendInput, [DAF] Status Report %sDate% for KW%WeekOfYear%
return
;----- Super+, -> Insert Time (without :)
#,::
FormatTime, sTime,, HHmm
SendInput, %sTime%
return
;----- Super+- -> Insert Date_Time (date without -)
#-::
FormatTime, sDateTime,, yyyyMMdd--HHmm
SendInput, %sDateTime%
return
;----- Strg+Super+, -> Insert Time
^#,::
FormatTime, sTime,, HH:mm
SendInput, %sTime%
return
;----- Strg+Super+- -> Insert Date_Time (date with -)
^#-::
FormatTime, sDateTime,, yyyy-MM-dd--HHmm
SendInput, %sDateTime%
return
;----- Alt+Strg+Super+Shift+h --> Hide current window
!^+#h::
WinGetTitle, Title, A
WinHide, %Title%
return
; ;----- Alt+Strg+Super+Shift+c --> Clear cashes
; !^+#c::
; ; clementine
; EnvGet, USERPROFILE, USERPROFILE
; Run, rm -R "%USERPROFILE%\.config\Clementine\spotify-cache\Storage"
; Run, rm -R "%USERPROFILE%\.config\Clementine\networkcache"
; ; pyinstaller
; Run, rm -R "%USERPROFILE%\AppData\Roaming\pyinstaller"
; ; .mediathek3
; Run, rm -R "%USERPROFILE%\.mediathek3"
; ; jupyther
; Run, rm -R "%USERPROFILE%\AppData\Roaming\jupyter"
; ; Downloads
; Run, rm -R "%USERPROFILE%\Downloads\*.*"
; return
; ;----- Alt+Strg+Super+Shift+l --> Link caches in Local/Roaming Folder to C:\
; !^+#l::
; cache_local := ["Microsoft\Outlook", "fontconfig"]
; cache_roaming := ["Spotify", "texstudio", "Adobe"]
; ; Local
; EnvGet, USERPROFILE, USERPROFILE
; for index, app_name in cache_local {
; RunWait, junction -d "%USERPROFILE%\AppData\Local\%app_name%"
; RunWait, rm -Rf "%USERPROFILE%\AppData\Local\%app_name%"
; RunWait, junction "%USERPROFILE%\AppData\Local\%app_name%" "C:\Benutzerdaten\kuestner\cache_Local\%app_name%"
; }
; ; Roaming
; EnvGet, USERPROFILE, USERPROFILE
; for index, app_name in cache_roaming {
; RunWait, junction -d "%USERPROFILE%\AppData\Roaming\%app_name%"
; RunWait, rm -Rf "%USERPROFILE%\AppData\Roaming\%app_name%"
; RunWait, junction "%USERPROFILE%\AppData\Roaming\%app_name%" "C:\Benutzerdaten\kuestner\cache_Roaming\%app_name%"
; }
; return
;----- Super+q -> hide outlook envelope
;#q::
; try {
; ; Workaround: Get top item in sent folder and mark it unread and read to hide the outlook envelope
; oFolderSentMail := ComObjActive("Outlook.Application").Session.GetDefaultFolder(5) ; 5 = Outlook.OlDefaultFolders.olFolderSentMail
; oLastItem := oFolderSentMail.Items(oFolderSentMail.Items.Count)
; oLastItem.UnRead := 1 ; True (mark unread)
; oLastItem.UnRead := 0 ; False (mark read)
; }
;return
;----- Super+L -> Mute, Lock screen and turn off monitor
#l::
; Send {Volume_Mute} ; unmuted bei gemuted ;(
; Send {Volume_Down 50}
Send, {Media_Stop 2}
Sleep 500
Run, %A_WinDir%\System32\rundll32.exe user32.dll`, LockWorkStation
Sleep 1500
SendMessage 0x112, 0xF170, 2, , Program Manager
return
;----- Strg+Super+Shift+S -> Toggle Screensaver activation
!^+#s::
; Check Screensaver Status
DllCall("SystemParametersInfo", Int,16, UInt,NULL, "UInt *",bIsScreensaverActive, Int,0)
If (bIsScreensaverActive)
{
DllCall("SystemParametersInfo", Int,17, Int,0, UInt,NULL, Int,2)
MsgBox Screensaver disabled!
}
Else
{
DllCall("SystemParametersInfo", Int,17, Int,1, UInt,NULL, Int,2)
MsgBox Screensaver enabled!
}
return
;------ Super + H --> detect other autohotkeyscripts
#h::
DetectHiddenWindows, On
WinGet, wList, List, ahk_class AutoHotkey
MsgBox % "AutoHoteky scripts running: " wList
return
;------ Strg+Super+Y --> Show pid of current window
^#y::
MouseGetPos, mouseX, mouseY, mouseid, mousecontrol
WinGet, processid, PID, ahk_id %mouseid%
WinGetClass, winclass, ahk_id %mouseid%
WinGetTitle, wintitle, ahk_id %mouseid%
WinGetPos, window_x, window_y, window_width, window_height, ahk_id %mouseid%
out = procces_id: %processid%`nahk_id: %mouseid%`nahk_class (Class): %winclass%`ncontrol (ClassNN): %mousecontrol%`ntitle: %wintitle%`nmouse coord (x, y): %mouseX%, %mouseY%`nwindow dimensions (x, y, w, h): %window_x%, %window_y%, %window_width%, %window_height%
WinClip.SetText(out)
ShowToolTip(out, 7000)
return
;------ Strg+Shift+Super+F5 --> Trigger Web Proxy Authentication
^+#F5::
ShowToolTip("Triggering Web Proxy...", 4500)
trigger_ok := TriggerWebProxyAuthentication()
if (trigger_ok == 1) {
ShowToolTip("Triggered Web Proxy: OK", 3000)
} else {
ShowToolTip("Triggered Web Proxy: !!!FAILED!!!", 3000)
}
return
; ;----- Super+Pause -> Suspend Windows
; #Pause::
; ;Run rundll32.exe user32.dll`,LockWorkStation
; ;Sleep 1000
; DllCall("PowrProf\SetSuspendState", "int", 0, "int", 0, "int", 0)
; return
; ;----- Fast Scrolling
; #WheelDown::
; Send {WheelDown 3}
; ; Sleep, 75
; return
; #WheelUp::
; Send {WheelUp 3}
; ; Sleep, 75
; return