用AutoHotkey的热字串功能启动常用电脑程序软件 Version 2 Build 20191214

; 用AutoHotkey的热字串功能启动常用电脑程序软件 Version 2 Build 20191214

; 电脑上的快捷键太多了，记都记不住，容易冲突和搞混，所以做了个热字串启动
; 用法：运行此脚本后在键盘上输入字符串 /np
; 此脚本的写作和调试完成日期：2019年12月12日
; 此脚本的作者：徐晓亮 （aahk）
; 此脚本作者的腾讯QQ电子邮箱地址：595076941@QQ.com

#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
#SingleInstance,force ;当此脚本已经运行时自动替换旧实例再次运行。
#Persistent ;让脚本持久运行（即直到用户关闭或遇到 ExitApp）。
DetectHiddenWindows,On ;设置脚本可以“看见”隐藏的窗口。
SetTitleMatchMode,2 ;窗口标题匹配模式改成某个位置必须包含WinTitle。
;~ global exename
;~ exename=Notepad2
:*:/np::
Hotstrings("Notepad2")
return

:*:/qq::
Hotstrings2("qq")
return

:*:/tc::
;~ 利用USB Safe Remove 立即强制弹出(停止并移除U盘盘符)随身U盘
;~ 弹出随身U盘_办公专用盘()
ToolTip,正在弹出随身U盘_请稍后...
SetTimer, RemoveToolTip, 3000
return

:*:/wk::
打开随身U盘_办公专用盘()
ToolTip,正在启动EverEdit_请稍后...
SetTimer, RemoveToolTip, 3000
return

:*:/ee::
IfExist,C:\Users\Administrator\AppData\Local\EverEdit\EverEdit.exe
{
Run,C:\Users\Administrator\AppData\Local\EverEdit\EverEdit.exe
}
else
{
MsgBox,没有找到可执行文件C:\Users\Administrator\AppData\Local\EverEdit\EverEdit.exe
}
ToolTip,正在启动EverEdit_请稍后...
SetTimer, RemoveToolTip, 3000
return

Hotstrings(ExeName)
{

IfExist,D:\Program\%ExeName%\%ExeName%.exe
{
Run,D:\Program\%ExeName%\%ExeName%.exe
}
else
{
MsgBox,没有找到可执行文件D:\Program\%ExeName%\%ExeName%.exe
}
ToolTip,正在启动%ExeName%_请稍后...
SetTimer, RemoveToolTip, 3000
}
Hotstrings2(ExeName2)
{

IfExist,D:\Program\%ExeName2%\Bin\%ExeName2%.exe
{
Run,D:\Program\%ExeName2%\Bin\%ExeName2%.exe
}
else
{
MsgBox,没有找到可执行文件D:\Program\%ExeName2%\Bin\%ExeName2%.exe
}
ToolTip,正在启动%ExeName2%_请稍后...
SetTimer, RemoveToolTip, 3000
}

:*:/sg::
IfExist,D:\Program\SogouExplorer\SogouExplorer.exe
Run,D:\Program\SogouExplorer\SogouExplorer.exe
ToolTip,正在启动搜狗高速浏览器_请稍后...
SetTimer, RemoveToolTip, 3000
return

; ===== 函数定义段 =====

打开随身U盘_办公专用盘()
{ 随身U盘的盘符:=搜索随身U盘并设置盘符()
if (随身U盘的盘符<>0)
{ ToolTip
FileCreateDir, %随身U盘的盘符%:\01_办公文件
DetectHiddenWindows,On
SetTitleMatchMode,2
;~ 需要手动或用脚本语句设置一下系统,工具->文件夹选项->查看->在标题栏显示完整路径
IfWinExist,01_办公文件
{
WinShow,01_办公文件
WinActivate,01_办公文件
}
else
{
Run,%随身U盘的盘符%:\01_办公文件
}
loop,5
{
WinMove,01_办公文件 ahk_class CabinetWClass,,A_ScreenWidth/2,0,A_ScreenWidth/2,A_ScreenHeight-35
Sleep,100
} }
else
ToolTip,没有找到随身U盘
}
;
; 根据磁盘卷标搜索到盘符后，可以再使用 IfExist 命令检查文件或文件夹是否存在。先检测，后执行。
搜索随身U盘并设置盘符()
{ 找到U盘:=false
DriveGet,盘符清单,List
loop,Parse,盘符清单
{ DriveGet,卷标,Label,%A_LoopField%:
IfInString,卷标, 随身U盘
{ 找到U盘:=true
return,%A_LoopField%
} }
if (not 找到U盘)
{ return,0
} }
;
;

RemoveToolTip:
SetTimer, RemoveToolTip, Off
ToolTip
return
; ===== 源代码备份网址 =====
; https://www.cnblogs.com/delphixx/p/12033306.html
; http://autohotkey.bokee.com/507502269.html
; ===== 脚本结束 =====