AutoHotKey 例程(自用-高手勿喷)

;^ ctrl

;# win

;! alt

;+ shift

;space 空格

;{enter} 回车



;;;快速打开程序;;;

#c::run cmd
^!c::run calc
^!e::run "C:\Program Files\Microsoft Office\Office15\EXCEL.EXE"
^!w::run "C:\Program Files\Microsoft Office\Office15\WINWORD.EXE"
^!p::run "C:\Program Files\Microsoft Office\Office15\POWERPNT.EXE"
^!v::run "C:\Program Files\Microsoft Office\Office15\VISIO.EXE"
^!y::run "D:\Dict\YodaoDict.exe"

!space::
Send Sincerely,{Enter}John Smith
Return

;字符串替换
::1112::192.168.1.221
::p1112::ping 192.168.1.137 {enter}
::163::（邮箱）
::185::（手机号）
 
;;;快速命令;;;

:://gfs::
run http://gufenso.huizhanzhang.com/
return

;打开设备管理器

:://dm::
run devmgmt.msc
return

::ts::
MsgBox, 4, , Would you like to open baidu?
IfMsgBox, No
Return
Run http://www.baidu.com/
MsgBox You pressed YES.
return

;$F3::
while(getkeystate("F3","p"))
{
 send Just For Test .{enter}
 click
}

return

;$F2::
loop
{
 send Just For Test .{enter}
 getkeystate("F2","p")
  break
 click
}
return

:://var::
MyVar1 = 123
MyVar2 = my string

If MyVar2 = my string
{
MsgBox MyVar2 contains the string “my string”.
}
If MyVar1 >= 100
{
MsgBox MyVar1 contains %MyVar1%, which is a number greater than or equal to 100.
}
return

#n::
IfWinExist Untitled – Notepad
{
WinActivate
}
else
{
Run Notepad
WinWait Untitled – Notepad
WinActivate
}
return

:://tst::
RunWait Notepad
MsgBox The user has finished (Notepad has been closed).
return

:://bd::
Run http://www.baidu.com
return

:://csdn::
Run http://www.csdn.net/
return

:://n::
Run notepad
return

:://c::
run cmd
return

:://360sd::
run C:\Program Files (x86)\360\360sd\Calc.exe
return

:://wsk::
Run D:\Wireshark\Wireshark.exe
return

:://nm::
run D:\CloudMusic\cloudmusic.exe
return

;输入当前日期

:://date::
d = %A_YYYY%-%A_MM%-%A_DD%
clipboard = %d%
Send ^v
return

;输入当前日期+时间
:://time::
d = %A_YYYY%-%A_MM%-%A_DD% %A_Hour%:%A_Min%:%A_Sec%
clipboard = %d%
Send ^v
return

:://ie::
Run C:\Program Files\Internet Explorer\iexplore.exe
return

;打开任务管理器
:://tm::
if WinExist Windows 任务管理器
WinActivate
else
Run taskmgr.exe
return

;打开系统属性
:://sys::
;Run control sysdm.cpl
Run msinfo32
return

;打开autohotkey 配置文件
:://ahk::
Run D:\AutoHotKey\AutoHotkey_cn.chm
return
 
;;;快速网站;;;

;用百度搜索
!b::
Send ^c
Run http://www.baidu.com/s?wd=%clipboard%
return

;淘宝搜索

!t:: 

Send ^c
Run http://s.taobao.com/search?q=%clipboard%
return

!j::
Send ^c
Run http://search.jd.com/Search?keyword=%clipboard%