起因是因为买了一块扩展屏幕,经常用来播放教学视频,而主屏幕用于实战操作,但是每次对视频进行控制时都要把鼠标移动过去,点击,再回来,很难受。所以用AutoHotKey
写了一个快捷键脚本。
CoordMode "Mouse", "Screen" ; 将鼠标坐标模式设置为整个屏幕
SendMode "Event" ; 设置发送模式为事件模式
ExtendBilibili(key)
{
xpos := 0
ypos := 0
MouseGetPos &xpos, &ypos
; MsgBox Format("1- {1} {2}", xpos, ypos)
MouseMove 2300, 1050, 1 ; 移动到视频范围
MouseClick "left", , , , 0 ; 点击一处无关紧要的地方,使视频应用聚焦
Send key ; 发送键盘键,暂停 or 快进 or 回退
; MsgBox Format("2- {1} {2}", xpos, ypos)
MouseMove xpos, ypos, 0 ; 鼠标移回原处
}
#Space:: ; Win + Space 暂停
{
ExtendBilibili("{Space}")
}
#Left:: ; Win + Left 快进
{
ExtendBilibili("{Left}")
}
#Right:: ; Win + Right 回退
{
ExtendBilibili("{Right}")
}
#Up:: ; Win + Up 停留2s
{
xpos := 0
ypos := 0
MouseGetPos &xpos, &ypos
MouseMove 2300, 1050, 1
MouseClick "left", , , , 0
Sleep 2000
MouseMove xpos, ypos, 0
}