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

; 用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:UsersAdministratorAppDataLocalEverEditEverEdit.exe
 {
 Run,C:UsersAdministratorAppDataLocalEverEditEverEdit.exe
 }
 else
 {
 MsgBox,没有找到可执行文件C:UsersAdministratorAppDataLocalEverEditEverEdit.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:ProgramSogouExplorerSogouExplorer.exe
 Run,D:ProgramSogouExplorerSogouExplorer.exe
 ToolTip,正在启动搜狗高速浏览器_请稍后...
 SetTimer, RemoveToolTip, 3000
return

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

打开随身U盘_办公专用盘()
{ 随身U盘的盘符:=搜索随身U盘并设置盘符()
 if (随身U盘的盘符<>0)
 { ToolTip
 FileCreateDir, %随身U盘的盘符%:1_办公文件
 DetectHiddenWindows,On
 SetTitleMatchMode,2
 ;~ 需要手动或用脚本语句设置一下系统,工具->文件夹选项->查看->在标题栏显示完整路径
 IfWinExist,01_办公文件
 {
 WinShow,01_办公文件
 WinActivate,01_办公文件
 }
 else
 {
 Run,%随身U盘的盘符%:1_办公文件
 }
 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
; ===== 脚本结束 =====