發送文字
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