forked from brookhong/KeyCastOW
-
Notifications
You must be signed in to change notification settings - Fork 0
/
ShareX.ahk
478 lines (415 loc) · 20.3 KB
/
ShareX.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
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
#Requires AutoHotkey v2.0
Persistent
; ShareX程序路径
ShareXPath:="C:\Program Files\ShareX\ShareX.exe"
; KeyCastOW.exe程序路径
KeyCastOWPath:="C:\Tools\Other_Tools\keystroke_visualizer_Tools\KeyCastOW\keycastow.exe"
; SetDpi工具
SetDPIPath:="C:\Tools\Other_Tools\SetDpi.exe"
;链接来源于:https://www.autohotkey.com/boards/viewtopic.php?f=27&t=130098&p=573646#p573646
;原作者:
#Warn All, Off
OnError((*) => -1)
; ported to AHK v2.0-beta by @krasnovpro
; https://www.autohotkey.com/boards/viewtopic.php?f=6&t=1229
; ----------------------------------------------------------------------------------------------------------------------
; Name ..........: TrayIcon library
; Description ...: Provide some useful functions to deal with Tray icons.
; AHK Version ...: AHK_L 1.1.22.02 x32/64 Unicode
; Code from .....: Sean (http://www.autohotkey.com/forum/viewtopic.php?t=17314)
; Author ........: Cyruz (http://ciroprincipe.info) (http://ahkscript.org/boards/viewtopic.php?f=6&t=1229)
; Mod from ......: Fanatic Guru - Cyruz
; License .......: WTFPL - http://www.wtfpl.net/txt/copying/
; Version Date ..: 2019.03.12
; Upd.20160120 ..: Fanatic Guru - Went through all the data types in the DLL and NumGet and matched them up to MSDN
; ...............: which fixed idCmd.
; Upd.20160308 ..: Fanatic Guru - Fix for Windows 10 NotifyIconOverflowWindow.
; Upd.20180313 ..: Fanatic Guru - Fix problem with "VirtualFreeEx" pointed out by nnnik.
; Upd.20180313 ..: Fanatic Guru - Additional fix for previous Windows 10 NotifyIconOverflowWindow fix breaking non
; ...............: hidden icons.
; Upd.20190312 ..: Cyruz - Added TrayIcon_Set, code merged and refactored.
; ----------------------------------------------------------------------------------------------------------------------
; ----------------------------------------------------------------------------------------------------------------------
; Function ......: TrayIcon_GetInfo
; Description ...: Get a series of useful information about tray icons.
; Parameters ....: sExeName - The exe for which we are searching the tray icon data. Leave it empty to receive data for
; ...............: all tray icons.
; Return ........: oTrayInfo - An array of objects containing tray icons data. Any entry is structured like this:
; ...............: oTrayInfo[A_Index].idx - 0 based tray icon index.
; ...............: oTrayInfo[A_Index].idcmd - Command identifier associated with the button.
; ...............: oTrayInfo[A_Index].pid - Process ID.
; ...............: oTrayInfo[A_Index].uid - Application defined identifier for the icon.
; ...............: oTrayInfo[A_Index].msgid - Application defined callback message.
; ...............: oTrayInfo[A_Index].hicon - Handle to the tray icon.
; ...............: oTrayInfo[A_Index].hwnd - Window handle.
; ...............: oTrayInfo[A_Index].class - Window class.
; ...............: oTrayInfo[A_Index].process - Process executable.
; ...............: oTrayInfo[A_Index].tray - Tray Type (Shell_TrayWnd or NotifyIconOverflowWindow).
; ...............: oTrayInfo[A_Index].tooltip - Tray icon tooltip.
; Info ..........: TB_BUTTONCOUNT message - http://goo.gl/DVxpsg
; ...............: TB_GETBUTTON message - http://goo.gl/2oiOsl
; ...............: TBBUTTON structure - http://goo.gl/EIE21Z
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_GetInfo(sExeName := "") {
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
oTrayInfo := []
for sTray in ["Shell_TrayWnd", "NotifyIconOverflowWindow"] {
idxTB := TrayIcon_GetTrayBar(sTray)
pidTaskbar := WinGetPID("ahk_class " sTray)
hProc := DllCall("OpenProcess", "UInt",0x38, "Int",0, "UInt",pidTaskbar)
pRB := DllCall("VirtualAllocEx", "Ptr",hProc, "Ptr",0, "UPtr",20, "UInt",0x1000, "UInt",0x04)
btn := Buffer(A_Is64bitOS ? 32 : 20, 0)
nfo := Buffer(A_Is64bitOS ? 32 : 24, 0)
tip := Buffer(128 * 2, 0)
res := SendMessage(TB_BUTTONCOUNT := 0x0418, 0, 0, "ToolbarWindow32" idxTB, "ahk_class " sTray)
Loop res {
SendMessage(TB_GETBUTTON := 0x0417, A_Index - 1, pRB, "ToolbarWindow32" idxTB, "ahk_class " sTray)
DllCall("ReadProcessMemory", "Ptr",hProc, "Ptr",pRB, "Ptr",btn.Ptr, "UPtr",btn.Size, "UPtr",0)
iBitmap := NumGet(btn, 0, "Int")
idCmd := NumGet(btn, 4, "Int")
fsState := NumGet(btn, 8, "UChar")
fsStyle := NumGet(btn, 9, "UChar")
dwData := NumGet(btn, A_Is64bitOS ? 16 : 12, "UPtr")
iString := NumGet(btn, A_Is64bitOS ? 24 : 16, "Ptr")
DllCall("ReadProcessMemory", "Ptr",hProc, "Ptr",dwData, "Ptr",nfo.Ptr, "UPtr",nfo.Size, "UPtr",0)
hWnd := NumGet(nfo, 0, "Ptr")
uId := NumGet(nfo, A_Is64bitOS ? 8 : 4, "UInt")
msgId := NumGet(nfo, A_Is64bitOS ? 12 : 8, "UPtr")
hIcon := NumGet(nfo, A_Is64bitOS ? 24 : 20, "Ptr")
nPid := WinGetPID("ahk_id " hWnd)
sProcess := WinGetProcessName("ahk_id " hWnd)
sClass := WinGetClass("ahk_id " hWnd)
If ( (sExeName = "-" && !sProcess) || (sExeName == "--" && !nPid) || (!sExeName) || (sExeName = sProcess) || (sExeName == nPid))
{
DllCall("ReadProcessMemory" , "Ptr",hProc, "Ptr",iString, "Ptr",tip.Ptr, "UPtr",tip.Size, "UPtr",0)
oTrayInfo.Push(Map( "idx" , A_Index - 1
, "idcmd" , idCmd
, "pid" , nPid
, "uid" , uId
, "msgid" , msgId
, "hicon" , hIcon
, "hwnd" , hWnd
, "class" , sClass
, "process" , sProcess
, "tooltip" , StrGet(tip.Ptr, "UTF-16")
, "tray" , sTray))
}
}
DllCall("VirtualFreeEx", "Ptr",hProc, "Ptr",pRB, "UPtr",0, "UInt",0x8000)
DllCall("CloseHandle", "Ptr",hProc)
}
DetectHiddenWindows(dhw)
return oTrayInfo
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Hide
; Description ..: Hide or unhide a tray icon.
; Parameters ...: idCmd - Command identifier associated with the button.
; ..............: sTray - Place where to find the icon ("Shell_TrayWnd" or "NotifyIconOverflowWindow").
; ..............: bHide - True for hide, False for unhide.
; Info .........: TB_HIDEBUTTON message - http://goo.gl/oelsAa
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Hide(idCmd, sTray := "Shell_TrayWnd", bHide := true) {
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
idxTB := TrayIcon_GetTrayBar()
SendMessage(TB_HIDEBUTTON := 0x0404, idCmd, bHide, "ToolbarWindow32" idxTB, "ahk_class " sTray)
SendMessage(0x001A, 0, 0,, "ahk_class " sTray)
DetectHiddenWindows(dhw)
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Delete
; Description ..: Delete a tray icon.
; Parameters ...: idx - 0 based tray icon index.
; ..............: sTray - Place where to find the icon ("Shell_TrayWnd" or "NotifyIconOverflowWindow").
; Info .........: TB_DELETEBUTTON message - http://goo.gl/L0pY4R
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Delete(idx, sTray := "Shell_TrayWnd") {
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
idxTB := TrayIcon_GetTrayBar()
SendMessage(TB_DELETEBUTTON := 0x0416, idx, 0, "ToolbarWindow32" idxTB, "ahk_class " sTray)
SendMessage(0x001A, 0, 0,, "ahk_class " sTray)
DetectHiddenWindows(dhw)
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Remove
; Description ..: Remove a Tray icon. It should be more reliable than TrayIcon_Delete.
; Parameters ...: hWnd - Window handle.
; ..............: uId - Application defined identifier for the icon.
; Info .........: NOTIFYICONDATA structure - https://goo.gl/1Xuw5r
; ..............: Shell_NotifyIcon function - https://goo.gl/tTSSBM
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Remove(hWnd, uId) {
NID := Buffer(2 * 384 + A_PtrSize * 5 + 40, 0)
NumPut("UPtr", NID.Size, NID, 0)
NumPut("UPtr", hWnd, NID, A_PtrSize)
NumPut("UPtr", uId, NID, A_PtrSize * 2)
return DllCall("Shell32.dll\Shell_NotifyIcon", "UInt",0x2, "UInt",NID.Ptr)
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Move
; Description ..: Move a tray icon.
; Parameters ...: idxOld - 0 based index of the tray icon to move.
; ..............: idxNew - 0 based index where to move the tray icon.
; ..............: sTray - Place where to find the icon ("Shell_TrayWnd" or "NotifyIconOverflowWindow").
; Info .........: TB_MOVEBUTTON message - http://goo.gl/1F6wPw
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Move(idxOld, idxNew, sTray := "Shell_TrayWnd") {
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
idxTB := TrayIcon_GetTrayBar()
SendMessage 0x452, idxOld, idxNew, "ToolbarWindow32" idxTB, "ahk_class " sTray ; TB_MOVEBUTTON := 0x452
DetectHiddenWindows(dhw)
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Set
; Description ..: Modify icon with the given index for the given window.
; Parameters ...: hWnd - Window handle.
; ..............: uId - Application defined identifier for the icon.
; ..............: hIcon - Handle to the tray icon.
; ..............: hIconSmall - Handle to the small icon, for window menubar. Optional.
; ..............: hIconBig - Handle to the big icon, for taskbar. Optional.
; Return .......: True on success, false on failure.
; Info .........: NOTIFYICONDATA structure - https://goo.gl/1Xuw5r
; ..............: Shell_NotifyIcon function - https://goo.gl/tTSSBM
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Set(hWnd, uId, hIcon, hIconSmall := 0, hIconBig := 0) {
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
if hIconSmall
SendMessage(WM_SETICON := 0x0080, 0, hIconSmall,, "ahk_id " hWnd)
if hIconBig
SendMessage(WM_SETICON := 0x0080, 1, hIconBig,, "ahk_id " hWnd)
DetectHiddenWindows(dhw)
NID := Buffer(2 * 384 + A_PtrSize * 5 + 40, 0)
NumPut("UPtr", NID.Size, NID, 0)
NumPut("UPtr", hWnd, NID, (A_PtrSize == 4)? 4 : 8)
NumPut("UPtr", uId, NID, (A_PtrSize == 4)? 8 : 16)
NumPut("UPtr", 2, NID, (A_PtrSize == 4)? 12 : 20)
NumPut("UPtr", hIcon, NID, (A_PtrSize == 4)? 20 : 32)
return DllCall("Shell32.dll\Shell_NotifyIcon", "UInt",NIM_MODIFY := 0x1, "Ptr",NID.Ptr)
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_GetTrayBar
; Description ..: Get the tray icon handle.
; Parameters ...: sTray - Traybar to retrieve.
; Return .......: Tray icon handle.
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_GetTrayBar(sTray := "Shell_TrayWnd") {
idxTB := "", nTB := ""
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
for k in WinGetControls("ahk_class " sTray)
if RegExMatch(k, "(?<=ToolbarWindow32)\d+(?!.*ToolbarWindow32)", &nTB)
loop nTB[] {
hWnd := ControlGetHwnd("ToolbarWindow32" A_Index, "ahk_class " sTray)
hParent := DllCall("GetParent", "Ptr",hWnd)
sClass := WinGetClass("ahk_id " hParent)
if not (sClass == "SysPager" or sClass == "NotifyIconOverflowWindow")
continue
idxTB := A_Index
break
}
DetectHiddenWindows(dhw)
return idxTB
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_GetHotItem
; Description ..: Get the index of tray's hot item.
; Return .......: Index of tray's hot item.
; Info .........: TB_GETHOTITEM message - http://goo.gl/g70qO2
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_GetHotItem() {
idxTB := TrayIcon_GetTrayBar()
return SendMessage(TB_GETHOTITEM := 0x0447, 0, 0, "ToolbarWindow32" idxTB, "ahk_class Shell_TrayWnd") << 32 >> 32
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Button
; Description ..: Simulate mouse button click on a tray icon.
; Parameters ...: sExeName - Executable Process Name of tray icon (case sensitive).
; ..............: sButton - Mouse button to simulate (L, M, R).
; ..............: bDouble - True to double click, false to single click.
; ..............: nIdx - Index of tray icon to click if more than one match.
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Button(sExeName, sButton := "L", bDouble := false, nIdx := 1) {
dhw := A_DetectHiddenWindows
DetectHiddenWindows(1)
sButton := "WM_" sButton "BUTTON"
oIcons := TrayIcon_GetInfo(sExeName)
if bDouble
action("DBLCLK")
else
action("DOWN"), action("UP")
DetectHiddenWindows(dhw)
action(arg) {
static actions := Map( "WM_MOUSEMOVE" ,0x0200, "WM_LBUTTONDOWN",0x0201, "WM_LBUTTONUP",0x0202
, "WM_LBUTTONDBLCLK",0x0203, "WM_RBUTTONDOWN",0x0204, "WM_RBUTTONUP",0x0205
, "WM_RBUTTONDBLCLK",0x0206, "WM_MBUTTONDOWN",0x0207, "WM_MBUTTONUP",0x0208
, "WM_MBUTTONDBLCLK",0x0209)
PostMessage(oIcons[nIdx]["msgid"], oIcons[nIdx]["uid"], actions[sButton arg],, "ahk_id " oIcons[nIdx]["hwnd"])
}
}
; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Clean 清理托盘图标
; Description ..: Removes stale icons (no matching processid).
; 删除过时的图标(没有匹配处理)。
; Parameters ...: bVerbose - True to display output, false (default for no output).
; bVerbose -显示输出为True, false(默认为无输出)。
; Notes ........: Uses modified TrayIcon_GetInfo that accepts sExeName - for no process, and -- for no processid
; 使用修改后的TrayIcon_GetInfo,接受sExeName -(无进程)和——(无进程)----------------------------------------------------------------------------------------------------------------------
TrayIcon_Clean(bVerbose := false)
{
otray:=TrayIcon_GetInfo("")
for i, oIcon in otray
{
if(otray[A_index]["process"]=="")
{
TrayIcon_Remove( otray[A_index]["hwnd"] , otray[A_index]["uid"])
}
}
}
; bool变量,用于再次按键时停止运行
stop_bool:=False
if not FileExist(KeyCastOWPath)
{
MsgBox "KeyCastOW.exe执行路径不存在!请编辑ahk文件修改KeyCastOWPath为目标ex执行路径!"
ExitApp
}
if not FileExist(ShareXPath)
{
; 当目标程序不存在,报告错误
MsgBox "ShareX.exe执行路径不存在!请编辑ahk文件修改ShareXPath为目标exe执行径!"
ExitApp
}
if not FileExist(SetDPIPath)
{
; 当目标程序不存在,报告错误
MsgBox "SetDpi.exe执行路径不存在!请编辑ahk文件修改SetDPIPath为目标exe执行径!"
ExitApp
}
; 监视鼠标,坐标相对于整个屏幕
CoordMode "Mouse", "Screen"
ProcessCloseAll(PIDOrName)
{
; 结束所有进程名的运行
While ProcessExist(PIDOrName)
ProcessClose PIDOrName
}
; 获取执行命令的输出
GetCMDOutput(command){
Shell := ComObject("WScript.Shell")
exec := Shell.Exec(A_ComSpec " /C " command)
return exec.StdOut.ReadAll()
}
; 执行ShareX和KeyCastOW程序
RunVisualizationKeys(command)
{
; 先结束键盘的程序,否则无法加载配置文件
ProcessCloseAll "keycastow.exe"
; 执行 SetDPI.exe get 命令并获取输出
output := GetCMDOutput(SetDPIPath " get")
; 获取字符串中的DPI缩放倍率
DPI_ZOOM:=StrReplace(output,"Current Resolution: ","")
DPI_ZOOM:=Integer(DPI_ZOOM) / 100
; 执行ShareX程序
RunWait ShareXPath command
; 等待再次按下同个快捷键
Global stop_bool:=True
; 等到鼠标按住再松开,获取最后松开时所在的坐标轴
KeyWait "LButton", "D"
KeyWait "LButton"
MouseGetPos &mouseX, &mouseY
mouseX:=mouseX / DPI_ZOOM
mouseX:=Integer(mouseX)-1
; ExitApp
mouseY:=mouseY / DPI_ZOOM
mouseY:=Integer(mouseY)-1
; INI文件为keycastow.exe工作路径下的ini文件
iniFile_Path:=StrReplace(KeyCastOWPath,"keycastow.exe","keycastow.ini")
if FileExist(iniFile_Path)
{
; 把键盘位置移到截图的矩阵中
; 替换INI文件中的offsetX和offsetY值
IniWrite mouseX,iniFile_Path,"KeyCastOW","offsetX"
IniWrite mouseY,iniFile_Path,"KeyCastOW","offsetY"
}else{
; 若目标ini文件不存在,则创建ini文件写入配置
FileAppend "[KeyCastOW]`n", iniFile_Path, "UTF-8"
IniWrite mouseX, iniFile_Path, "KeyCastOW", "offsetX"
IniWrite mouseY, iniFile_Path, "KeyCastOW", "offsetY"
IniWrite "500", iniFile_Path, "KeyCastOW", "keyStrokeDelay"
IniWrite "1500", iniFile_Path, "KeyCastOW", "lingerTime"
IniWrite "500", iniFile_Path, "KeyCastOW", "fadeDuration"
IniWrite "4934475", iniFile_Path, "KeyCastOW", "bgColor"
IniWrite "16777215", iniFile_Path, "KeyCastOW", "textColor"
IniWrite "DBFFFFFF00000000000000000000000084030000000000010000040041007200690061006C00200042006C00610063006B000000FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFA", iniFile_Path, "KeyCastOW", "labelFont"
IniWrite "200", iniFile_Path, "KeyCastOW", "bgOpacity"
IniWrite "230", iniFile_Path, "KeyCastOW", "textOpacity"
IniWrite "200", iniFile_Path, "KeyCastOW", "borderOpacity"
IniWrite "16744448", iniFile_Path, "KeyCastOW", "borderColor"
IniWrite "4", iniFile_Path, "KeyCastOW", "borderSize"
IniWrite "16", iniFile_Path, "KeyCastOW", "cornerSize"
IniWrite "4", iniFile_Path, "KeyCastOW", "labelSpacing"
IniWrite "3", iniFile_Path, "KeyCastOW", "maximumLines"
IniWrite "1", iniFile_Path, "KeyCastOW", "visibleShift"
IniWrite "1", iniFile_Path, "KeyCastOW", "visibleModifier"
IniWrite "1", iniFile_Path, "KeyCastOW", "mouseCapturing"
IniWrite "0", iniFile_Path, "KeyCastOW", "mouseCapturingMod"
IniWrite "1", iniFile_Path, "KeyCastOW", "keyAutoRepeat"
IniWrite "1", iniFile_Path, "KeyCastOW", "mergeMouseActions"
IniWrite "1", iniFile_Path, "KeyCastOW", "alignment"
IniWrite "0", iniFile_Path, "KeyCastOW", "onlyCommandKeys"
IniWrite "1", iniFile_Path, "KeyCastOW", "draggableLabel"
IniWrite "1", iniFile_Path, "KeyCastOW", "tcModifiers"
IniWrite "66", iniFile_Path, "KeyCastOW", "tcKey"
IniWrite "", iniFile_Path, "KeyCastOW", "branding"
IniWrite "<+>", iniFile_Path, "KeyCastOW", "comboChars"
}
; 执行键盘显示程序
Run KeyCastOWPath
; 等待至截屏程序所需的ffmpeg开始运行
while not ProcessExist("ffmpeg.exe")
{
Sleep 100
}
; 当检测到截图所需的ffmpeg结束运行时关闭键盘显示
ffmpeg_PID:=ProcessWaitClose("ffmpeg.exe")
if not ffmpeg_PID
{
ProcessCloseAll "keycastow.exe"
Global stop_bool:=False
TrayIcon_Clean()
}
return
}
; 触发快捷键shift+alt+PrtSc键
^+PrintScreen::
{
RunVisualizationKeys " -ScreenRecorderGIF"
return
}
; 触发快捷键shift+PrtSc键
+PrintScreen::
{
RunVisualizationKeys " -ScreenRecorder"
return
}
; 如果再次按下同一个快捷键,则停止运行
#HotIf stop_bool
^+PrintScreen::
{
RunWait ShareXPath " -StopScreenRecording"
Global stop_bool:=False
return
}
#HotIf
#HotIf stop_bool
+PrintScreen::
{
RunWait ShareXPath " -StopScreenRecording"
Global stop_bool:=False
return
}
#HotIf