组合键实现你想象的任何动作！_怎么组合键编辑一个动作-优快云博客

http://bbs.ghtt.net/thread-126955-1-1.html 作者 miyaonanhai
由于得到了唐诗的12个威望的激励，用了一段时间把程序完善了许多，可以说原来的程序只有我自己的电脑上面可以运行，而这次的程序适用于大多数的软件配置，更新的程序包含了原来的所有功能，（原来的功能：http://bbs.ghtt.net/thread-126620-1-1.html）锐捷、QQ等不必指定路径；在firefox和ie7下面可以实现每5分钟刷新GHTT，而我的电脑上面没有安装the world或者maxthon之类的，无法试验可行性，所以便没有写上。
这次将源代码贴上，其实脚本语言很简单很简单，希望有兴趣的童鞋可以多多交流。
花了好多时间写了foobar2000的开启、播放、最小化，真的花了好长时间……有好事者可以看看我的校内日志：http://blog.xiaonei.com/GetEntry.do?id=315580706&owner=1974288437
本来想要写出开机之后延迟启动卡巴的，不过时间问题，绝对是时间问题，只有等到下次更新的时候再放上了~

更新日志：
1、Win+A：自动运行锐捷、QQ、访问网页bbs.ghtt.net，5分钟刷新一次bbs.ghtt.net
2、Win+M：开启foobar2000、自动播放、最小化，半秒之内完成，只要同时按下两个键……
3、Win+C：一个小巧的计时器，AutoHotKey大人helfee所写（表明作者，不算抄袭）
4、Win+P：暂停该程序（可以在看网页的时候暂停，而离开挂机时继续按Win+P开启）

下次更新目标：
1、卡巴的开机后延迟运行
2、千千静听、天天动听等的运行、播放、最小化功能
3、the world、maxthon等的刷新网页问题
4、开机自动运行GHTT.exe（不知道这个是什么的童鞋可以下载之后再提问~）
5、没想到，边写边想吧~

下面是应用程序，2L是程序原代码，；后面是注释的部分，希望有兴趣的童鞋一同交流~

----------------------------------------------------------------------------------------------------

;开机加载软件 time :=300000 #a:: ifWinExist,8021x.exe { ifWinExist,8021x ahk_class #32770 { Sleep, 100 WinClose } else ifWinExist, ahk_class #32770 { Sleep,100 WinClose } } else { if FileExist("C:/Program Files/锐捷网络/Ruijie Supplicant/8021x.exe") run, C:/Program Files/锐捷网络/Ruijie Supplicant/8021x.exe else if FileExist("D:/Program Files/锐捷网络/Ruijie Supplicant/8021x.exe") run, D:/Program Files/锐捷网络/Ruijie Supplicant/8021x.exe else if FileExist("E:/Program Files/锐捷网络/Ruijie Supplicant/8021x.exe") run, E:/Program Files/锐捷网络/Ruijie Supplicant/8021x.exe ;MsgBox %A_ProgramFiles% sleep, 100 ifWinExist, 连接状态 ahk_class #32770 WinClose } if FileExist("C:/Program Files/Tencent/QQ/qq.exe") run, C:/Program Files/Tencent/QQ/qq.exe else if FileExist("D:/Program Files/Tencent/QQ/qq.exe") run, D:/Program Files/Tencent/QQ/qq.exe else if FileExist("E:/Program Files/Tencent/QQ/qq.exe") run, E:/Program Files/Tencent/QQ/qq.exe sleep, 100 ;run, http://home.xiaonei.com/Home.do ;sleep, 1000 loop { run, http://bbs.ghtt.net,,,OutputVarPID sleep time IfWinExist, ahk_pid %OutputVarPID% WinActivate ;maxthon ;the world else { IfWinExist, ahk_class MozillaUIWindowClass ;mozilla firefox { WinActivate send ^t run, http://bbs.ghtt.net sleep time } else IfWinExist, ahk_class IEFrame ;ie7 { WinActivate send ^t run, http://bbs.ghtt.net sleep time } ;the world ;maxthon ; else { run, http://bbs.ghtt.net sleep time } } send ^w } return ;暂停 #p::pause ;暂停 return ;sleep, 600000 ;IfWinExist, 卡巴斯基互联网安全套装 7.0 ahk_class AVP.MainWindow ;{} ;else run, D:/Program Files/Kaspersky Lab/Kaspersky Internet Security 7.0/avp.exe ;计时器 #c:: ;#NoTrayIcon ;time a=0 b=0 c=0 d=0 e=0 CustomColor =EEAA99 Gui, +AlwaysOnTop +LastFound +Owner Gui,Color,%CustomColor% Gui,Font,s10 Gui,Add,text,vMyText cWhite, xxxxx yyyyy WinSet,TransColor,%CustomColor% 150 Gui, -Caption SetTimer,UpdateOSD,1000 Gosub,UpdateOSD Gui,Show,x470 y600 return UpdateOSD: e++ if e=10 { e=0 d++ if d=6 { e=0 d=0 c++ if c=10 { c=0 d=0 e=0 b++ } if b=6 { b=0 c=0 d=0 e=0 a++ } } } GuiControl,, MyText, %a%:%b%%c%:%d%%e% return ;foobar播放器 ;#n:: ;MouseGetPos , OutputVarX, OutputVarY ;Run , D:/Program Files/foobar2000/foobar2000.exe,,max,OutputVarPID ;WinWait , ahk_pid %OutputVarPID% ;IfWinExist , ahk_pid %OutputVarPID% ;MouseMove , 515,110 ;sleep , 100 ;click , 515,110 ;sleep , 400 ;click , 515,110 ;sleep , 100 ;IfWinExist, foobar2000 v0.9.4.3 ahk_class {DA7CD0DE-1602-45e6-89A1-C2CA151E008E}/1 ;WinMinimize, foobar2000 v0.9.4.3 ahk_class {DA7CD0DE-1602-45e6-89A1-C2CA151E008E}/1 ;MouseMove, OutputVarX, OutputVarYdowndown ;return #m:: ;MouseGetPos, getx, gety if FileExist("C:/Program Files/foobar2000/foobar2000.exe") Run, C:/Program Files/foobar2000/foobar2000.exe,,,OutputVarPID else if FileExist("D:/Program Files/foobar2000/foobar2000.exe") Run, D:/Program Files/foobar2000/foobar2000.exe,,,OutputVarPID else if FileExist("E:/Program Files/foobar2000/foobar2000.exe") Run, E:/Program Files/foobar2000/foobar2000.exe,,,OutputVarPID ;Run , D:/Program Files/foobar2000/foobar2000.exe,,,OutputVarPID WinWait , ahk_pid %OutputVarPID% IfWinExist , ahk_pid %OutputVarPID% WinActivate ;Sleep , 400 ;Send , ! & P ;Send , down ;sleep , 100 ;Send , down send , {enter} WinMinimize , ahk_pid %OutputVarPID% Return