发送文字
F3::
send,1111
return
执行程序前先关闭程序
#SingleInstance force ;;执行程序前先关闭程序
最大化窗口
F9::
WinMaximize,A ;;最大化当前窗口
return
恢复原来窗口的大小
F10::
WinRestore, A ;;恢复原来的窗口大小
return
置顶当前窗口
CapsLock & p::
winset,AlwaysOnTop,, A ;;置顶当前程序的窗口
Return
打开任务管理器
^!NumpadIns:: ;;打开任务管理器
^!Numpad0::
IfWinExist, Windows 任务管理器
{
WinHide, Windows 任务管理器
}
else
{
run,taskmgr
WinActivate, Windows 任务管理器
Winshow, Windows 任务管理器
}
Return
打开记事本
#N::
Run Notepad ;;打开记事本
return
打开计算器
#J:: ;;打开计算器
Run, calc
return
用Alt来替换系统原有的复制、粘贴和剪切键
!c::
Send,^c ;;用Alt+C替换系统的复制键Ctrl+C
Return
!x::
Send,^x ;;用Alt+X替换系统的剪切键Ctrl+X
Return
!v::
Send,^v ;;用Alt+V替换系统的粘贴键Ctrl+V
Return
将字符串中的空格替换为换行符
a = 1 2 34
stringreplace, out, a, ` , `n, All
msgbox, %out%
划词一键进行百度翻译:
F9:: ;~百度一键翻译
send,^c
Loop
{
StringReplace, clipboard,clipboard, `r`n,%A_SPACE%, UseErrorLevel
if ErrorLevel = 0 ;全部替换完,退出循环
break
}
Loop
{
StringReplace, clipboard,clipboard, %A_SPACE%%A_SPACE%, %A_SPACE%, UseErrorLevel;替换两个空格为一个空格
if ErrorLevel = 0
break
}
IfWinExist, 百度翻译
{
WinActivate, 百度翻译
IfWinActive, 百度翻译
{
send,^w
}
}
str = %clipboard%
stringreplace, out, str, ` , `%20, All
baidu = https://fanyi.baidu.com/?#en/zh/
URL = %baidu%%out%
run,%URL%
return
F10:: ;~谷歌一键翻译
send,^c
Loop
{
StringReplace, clipboard,clipboard, `r`n,%A_SPACE%, UseErrorLevel
if ErrorLevel = 0 ;全部替换完,退出循环
break
}
Loop
{
StringReplace, clipboard,clipboard, %A_SPACE%%A_SPACE%, %A_SPACE%, UseErrorLevel;替换两个空格为一个空格
if ErrorLevel = 0
break
}
IfWinExist, Google 翻译
{
WinActivate, Google 翻译
IfWinActive, Google 翻译
{
send,^w
}
}
str = %clipboard%
stringreplace, out, str, ` , `%20, All
Google = https://translate.google.cn/#view=home&op=translate&sl=en&tl=zh-CN&text=
URL = %Google%%out%
run,%URL%
return
F11:: ;~搜狗一键翻译
send,^c
Loop
{
StringReplace, clipboard,clipboard, `r`n,%A_SPACE%, UseErrorLevel
if ErrorLevel = 0 ;全部替换完,退出循环
break
}
Loop
{
StringReplace, clipboard,clipboard, %A_SPACE%%A_SPACE%, %A_SPACE%, UseErrorLevel;替换两个空格为一个空格
if ErrorLevel = 0
break
}
IfWinExist, 搜狗翻译
{
WinActivate, 搜狗翻译
IfWinActive, 搜狗翻译
{
send,^w
}
}
str = %clipboard%
stringreplace, out, str, ` , `%20, All
sougou = https://fanyi.sogou.com/?keyword=
URL = %sougou%%out%
run,%URL%
return
显示当前系统时间(年月日)
!w:: ;;显示当前的系统时间(年月日)
a = %clipboard%
d = %A_YYYY%.%A_mm%.%A_dd%
clipboard = %d%
Send ^v
sleep,100
clipboard = %a%
return
显示当前的系统时间(年月日-时分秒)
!e:: ;;显示当前的系统时间(年月日-时分秒)
a = %clipboard%
sleep,100
d = %A_YYYY%.%A_mm%.%A_dd%-%A_Hour%:%A_Min%:%A_Sec%
clipboard = %d%
send,^v
sleep,100
clipboard = %a%
return
使用百度搜索关键词
!f:: ;;使用百度搜索关键词
send,^c
run,https://www.baidu.com/s?wd=%clipboard%
return
点击鼠标50次
F1:: ;;点击鼠标50次
Loop 50
{
MouseClick
}
Return
关闭当前窗口
`::
send,!{F4} ;;关闭当前窗口
return
快速设置热词
!-:: ;快速设置热词
send,::我::{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{;}{;}
send,{Enter}
send,{Enter}{R}eturn{Space}
return
快速设置热键
!0:: ;快速设置热键
send,::{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{tab}{;}{;}
send,{Enter}{Enter}{Enter}{Enter}
send,{R}eturn {Space}
send,{Home}{BackSpace}
send,{Up}{Up}{Up}
return
anki中用到的代码块
#IfWinActive ahk_class QWidget
Esc:: ;;
WinHide, 添加
send,!s
WinWait, 耗时
WinHide,耗时
WinShow, 添加
WinWait, 添加
IfWinNotActive, 添加, , WinActivate, 添加,
WinWaitActive, 添加,
Send, ^v
Return
F5::
send,^+!c ;;将F5作为Anki填空题不改变序号的快捷键
return
F6::
send,^+c ;;将F6作为Anki填空题的快捷键
return
F7:: ;;在中文输入法的情况下设置Latex行间公式环境
Send,^{Space}
Send,^t
Send,e
Send, ^{Space}
send,+
Return
F8:: ;;在粘贴文本时直接加上anki的LaTeX环境并且进行填空题挖空
send,^x
sleep,20
A := clipboard
b ={{c1::[$]
c=[/$]}}
d= %b% %A% %c%
sleep,20
clipboard = % d
send,^v
sleep,20
clipboard := A
sleep,20
Return
F9::
Send, {SHIFTDOWN}{HOME}{SHIFTUP}
send,{CTRLDOWN}x{CTRLUP}
A:= clipboard
b =[$]
c=[/$]
d= %b% %A% %c%
sleep,50
clipboard = % d
send,^v
sleep,50
clipboard := A
sleep,50
Send, {SPACE}
Send, {SHIFTDOWN}{CTRLDOWN}{END}{SHIFTUP}{CTRLUP}
Send, {CTRLDOWN}x{CTRLUP}
A := clipboard
b ={{c1::[$]
c=[/$]}}
d= %b% %A% %c%
sleep,50
clipboard = % d
send,^v
sleep,50
clipboard := A
sleep,50
return
!e:: ;;在粘贴文本时直接加上anki的LaTeX环境
A:= clipboard
b =[$]
c=[/$]
d= %b% %A% %c%
sleep,50
clipboard = % d
send,^v
sleep,50
clipboard := A
sleep,50
return
!t::
A := clipboard
b ={{c1::[$]
c=[/$]}}
d= %b% %A% %c%
sleep,50
clipboard = % d
send,^v
sleep,50
clipboard := A
sleep,50
return
#IfWinActive
限定程序只运行在Word中
#IfWinActive ahk_class OpusApp ;;这个是对应的程序的类别名
!e:: ;;显示当前的系统时间
a = %clipboard%
sleep,100
d = %A_Hour%:%A_Min%:%A_Sec%
clipboard = %d%
send,{enter}
send,{up}
send,{backspace}
send,^e
send,^v
sleep,100
clipboard = %a%
send,{down}
return
#IfWinActive
拷贝文件路径
^!c:: ;一键拷贝文件的路径
; null=
send ^c
sleep,200
clipboard=%clipboard% ;%null%
tooltip,%clipboard%
sleep,500
tooltip,
return
调节窗口透明化
#=:: ;窗口透明化增加或者减弱
WinGet, ow, id, A
WinTransplus(ow)
return
#-:: ;窗口透明化增加或者减弱
WinGet, ow, id, A
WinTransMinus(ow)
return
WinTransplus(w){
WinGet, transparent, Transparent, ahk_id %w%
if transparent < 255
transparent := transparent+10
else
a = 1
if transparent
WinSet, Transparent, %transparent%, ahk_id %w%
else
WinSet, Transparent, off, ahk_id %w%
return
}
WinTransMinus(w){
WinGet, transparent, Transparent, ahk_id %w%
if transparent > 10
transparent := transparent-10
WinSet, Transparent, %transparent%, ahk_id %w%
return
}
最大化/恢复窗口
#enter:: ;最大化/恢复窗口
WinGet,S,MinMax,A
if S=0
WinMaximize,A
else if S=1
WinRestore,A
else if S=-1
WinRestore,A
return
最小化窗口
#m:: ;窗口最小化
WinMinimize, A
return
使用谷歌搜索多参数版
!o:: ;cosea典藏级原创代码之谷歌搜索终极版
run https://www.google.com/search?q=%clipboard% ;用google搜索剪切板的内容
clipboard1=%clipboard%&tbs=qdr:1,sbd:1
run https://www.google.com/search?q=%clipboard1% ;按时间排序
run https://www.google.com/search?q=%clipboard%&tbs=qdr:m ;只显示最近一个月信息
run https://www.google.com/search?q=%clipboard%&tbs=qdr:y ;只显示最近一年信息
run https://www.google.com/search?q=%clipboard%&as_filetype=pdf ;指定PDF文件
run https://www.google.com/search?q=%clipboard%&tbs=li:1 ;精确匹配
run https://www.google.com/search?&as_epq=%clipboard% ;完全匹配
run https://www.google.com/search?q=%clipboard% inurl:gov ;url包括gov的网站信息
run https://www.google.com/search?q=intitle:%clipboard% ;文章标题中包含关键词的结果
run https://www.google.com/search?q=%clipboard%&source=lnt&lr=lang_zh-CN|lang_zh-TW ;&source=lnt&lr=lang_zh-CN|lang_zh-TW,指定中文网页
run https://www.google.com/search?q=%clipboard%&tbm=isch&tbs=imgo:1 ;&tbm=isch指定搜索谷歌图片
run https://www.google.com/search?q=%clipboard%&tbm=isch&tbs=isz:l ;将URL更改为大尺寸图片&tbs=isz:l
run https://image.baidu.com/search/index?z=3&tn=baiduimage&word=%clipboard% ;z=3是大尺寸,z=9是特大尺寸
run https://www.behance.net/search?content=projects&sort=appreciations&time=week&featured_on_behance=true&search=%clipboard%
run https://www.zcool.com.cn/search/content?&word=%clipboard%
clipboard2=%clipboard%&tbm=isch&tbs=qdr:m,isz:l,imgo:1
run https://www.google.com/search?q=%clipboard2% ;为URL添加&tbs=qdr:m,只显示新近一个月内的图片,&tbs=imgo:1,显示图片大小
tooltip, 那晚,风也美,人也美。。。
sleep 1500
tooltip,
return
如何显示提示的话
!r::
tooltip, 小伙子,你好啊~
sleep 2000
tooltip,
return
获取当前鼠标指针的位置并显示出来
#a:: ;获取当前鼠标指针的位置
MouseGetPos, xpos, ypos
clipboard = %xpos%,%ypos%
a = 鼠标位置`(X,Y`) = %xpos%,%ypos%
tooltip, %a%
sleep 1000
tooltip,
return
清除所有的标点符号,并在标点符号处换行
F2:: ;清除所有标点符号,并在标点符号处换行
run notepad,,max
Loop
{
StringReplace, clipboard, clipboard, `, , `r`n, UseErrorLevel ;清除英文逗号
StringReplace, clipboard, clipboard, , , `r`n, UseErrorLevel ;清除中文逗号
StringReplace, clipboard, clipboard, `; , `r`n, UseErrorLevel ;清除英文分号
StringReplace, clipboard, clipboard, ; , `r`n, UseErrorLevel ;清除英文分号
StringReplace, clipboard, clipboard, . , `r`n, UseErrorLevel ;清除英文句号
StringReplace, clipboard, clipboard, 。 , `r`n, UseErrorLevel ;清除中文句号
StringReplace, clipboard, clipboard, : , `r`n, UseErrorLevel ;清除英文冒号
StringReplace, clipboard, clipboard, : , `r`n, UseErrorLevel ;清除中文冒号
StringReplace, clipboard, clipboard, ‘’ , `r`n, UseErrorLevel ;清除中文双引号1
StringReplace, clipboard, clipboard, “ , `r`n, UseErrorLevel ;清除中文双引号2
StringReplace, clipboard, clipboard, ” , `r`n, UseErrorLevel ;清除中文双引号3
StringReplace, clipboard, clipboard, ' , `r`n, UseErrorLevel ;清除英文双引号
StringReplace, clipboard, clipboard, 、 , `r`n, UseErrorLevel ;清除中文顿号
StringReplace, clipboard, clipboard, / , `r`n, UseErrorLevel ;清除右斜杠
StringReplace, clipboard, clipboard, \ , `r`n, UseErrorLevel ;清除左斜杠
StringReplace, clipboard, clipboard, - , `r`n, UseErrorLevel ;清除短横线
StringReplace, clipboard, clipboard, —— , `r`n, UseErrorLevel ;清除长横线
StringReplace, clipboard, clipboard, = , `r`n, UseErrorLevel ;清除等号
StringReplace, clipboard, clipboard, + , `r`n, UseErrorLevel ;清除加号
StringReplace, clipboard, clipboard, ( , `r`n, UseErrorLevel ;清除中文左括号
StringReplace, clipboard, clipboard, ) , `r`n, UseErrorLevel ;清除中文右括号
StringReplace, clipboard, clipboard, ( , `r`n, UseErrorLevel ;清除英文左括号
StringReplace, clipboard, clipboard, ) , `r`n, UseErrorLevel ;清除英文右括号
StringReplace, clipboard, clipboard, 【 , `r`n, UseErrorLevel ;清除中文【
StringReplace, clipboard, clipboard, 】 , `r`n, UseErrorLevel ;清除中文】
StringReplace, clipboard, clipboard, [ , `r`n, UseErrorLevel ;清除[
StringReplace, clipboard, clipboard, ] , `r`n, UseErrorLevel ;清除]
StringReplace, clipboard, clipboard, ! , `r`n, UseErrorLevel ;清除英文感叹号
StringReplace, clipboard, clipboard, ! , `r`n, UseErrorLevel ;清除中文感叹号
StringReplace, clipboard, clipboard, ? , `r`n, UseErrorLevel ;清除中文问号
StringReplace, clipboard, clipboard, ? , `r`n, UseErrorLevel ;清除英文问号
StringReplace, clipboard, clipboard, < , `r`n, UseErrorLevel ;清除英文<
StringReplace, clipboard, clipboard, > , `r`n, UseErrorLevel ;清除英文>
StringReplace, clipboard, clipboard, 《 , `r`n, UseErrorLevel ;清除中文《
StringReplace, clipboard, clipboard, 》 , `r`n, UseErrorLevel ;清除英文》
StringReplace, clipboard, clipboard, @ , `r`n, UseErrorLevel ;清除@
StringReplace, clipboard, clipboard, # , `r`n, UseErrorLevel ;清除#
StringReplace, clipboard, clipboard, $ , `r`n, UseErrorLevel ;清除$
StringReplace, clipboard, clipboard, `% , `r`n, UseErrorLevel ;清除%
StringReplace, clipboard, clipboard, ^ , `r`n, UseErrorLevel ;清除^
StringReplace, clipboard, clipboard, & , `r`n, UseErrorLevel ;清除&
StringReplace, clipboard, clipboard, * , `r`n, UseErrorLevel ;清除*
StringReplace, clipboard, clipboard, `` , `r`n, UseErrorLevel ;清除`
StringReplace, clipboard, clipboard, `:: , `r`n, UseErrorLevel ;清除::
StringReplace, clipboard, clipboard, " , `r`n, UseErrorLevel ;清除"
StringReplace, clipboard, clipboard, { , `r`n, UseErrorLevel ;清除{
StringReplace, clipboard, clipboard, }, `r`n, UseErrorLevel ;清除}
StringReplace, clipboard, clipboard, |, `r`n, UseErrorLevel ;清除|
StringReplace, clipboard, clipboard, ·, `r`n, UseErrorLevel ;清除中文···
StringReplace, clipboard, clipboard, ~, `r`n, UseErrorLevel ;清除~
StringReplace, clipboard, clipboard, _ , `r`n, UseErrorLevel ;清除_
if ErrorLevel = 0 ; 不需要再进行替换.
break
}
sleep,200
send,^v
return
获取鼠标所在处的RGB值
#a:: ;获取RGB色
MouseGetPos, mouseX, mouseY
PixelGetColor, color, %mouseX%, %mouseY%, RGB
StringRight color,color,6
clipboard = %color%
msg = 当前坐标RGB颜色值的十六进制值为`#%color%.
tooltip, %msg%
sleep 1000
tooltip,
return
倒计时器
#t:: ;倒计时器
InputBox, time, 请输入一个时间(单位是秒)
time := time*1000
Sleep,%time%
msgbox 时间到!!!
return
无格式复制文本
#c:: ;复制并清除把任何复制的文件, HTML 或其他格式的文本转换为纯文本
send,^c
sleep,50
clipboard = %clipboard% ; 把任何复制的文件, HTML 或其他格式的文本转换为纯文本
return
用AutoHotkey驱动蜂鸣器发出声音
#1:: ;用AutoHotkey驱动蜂鸣器发出声音
loop,10
{
SoundBeep, 1000, 500 ;第一个参数为声音的频率,第二个参数为每次响的时间,每次响的时候中间会有一个非常小的间隔
}
return
连续复制文本内容
flag_copy := 0 ;这个模式变量不可少,一定得有
F1:: ;这个键主要是用来设定复制的模式的
flag_copy := not flag_copy
sleep,50
if flag_copy = 1
msgbox,打开连续复制功能!
clipboard =
if flag_copy = 0
msgbox,关闭连续复制功能!
clipboard =
return
!c::
if flag_copy = 0
{
Send,^c ;;用Alt+C替换系统的复制键Ctrl+C
}
if flag_copy =1
{
;~ msgbox,复制前剪切板的值为:%clipboard%
var = %clipboard% ;新的叠加赋值
send ^c
sleep,50
myvar = %var%%clipboard%
sleep,20
clipboard := myvar
sleep,20
;~ msgbox,复制后剪切板的值为:%clipboard%
}
return
一键打开jupyter
::note:: ;;
run,cmd.exe
sleep,333
IfWinExist, 管理员: C:\Windows\system32\cmd.exe
{
WinActivate, 管理员: C:\Windows\system32\cmd.exe
Sleep, 333
IfWinActive, 管理员: C:\Windows\system32\cmd.exe
{
send,activate{enter}{space}torch{enter}{enter}
sleep,333
send,jupyter{enter}{space}notebook{enter}{enter}
}
}
Return