ahk自动部署环境

ahk每次手动安装真的很麻烦

自己制作了一个自动部署全套环境的工具

附带我自己修改过的scite编辑器

具体功能如下

# 工具作用
1. 静默安装ahk
2. 写一个ahk环境变量
3. 附带一个基础库包含大部分ahk的好用的库和函数
4. 附带便携的世界第二好用的ahk编辑器scite
5. 创建几个常用示例ahk文件夹,并打开一个测试文件

# 后续增加的功能
1. 添加一些使用教程
2. 附带ahk速成宝典
3. 安装的方式进一步优化

部分源码

Loop, %0%
{
	param := %A_Index% ; Fetch the contents of the variable whose name is contained in A_Index.
	params .= A_Space . param
}
ShellExecute := A_IsUnicode ? "shell32\ShellExecute":"shell32\ShellExecuteA"
if not A_IsAdmin
{
	If A_IsCompiled
		DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_ScriptFullPath, str, params , str, A_WorkingDir, int, 1)
	Else
		DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_AhkPath, str, """" . A_ScriptFullPath . """" . A_Space . params, str, A_WorkingDir, int, 1)
	ExitApp
}


; 首先提示开始部署
MsgBox, 4, ,确定要部署吗? (Press YES or NO)
IfMsgBox No
    return

;首先命令行静默安装ahk
run AutoHotkey_1.1.34.04_setup.exe /S /D=C:\AHK

;接着写入ahk环境变量
MsgBox,即将写入ahk变量
RegRead, OutputVar, HKEY_LOCAL_MACHINE, SYSTEM\CurrentControlSet\Control\Session Manager\Environment,ahk
if (!OutputVar){
	RegWrite, REG_SZ, HKEY_LOCAL_MACHINE, SYSTEM\CurrentControlSet\Control\Session Manager\Environment,ahk,C:\AHK\
	MsgBox,变量写入成功`,即将部署编辑器scite和基础库文件
}


;随后部署编辑器和库文件以及几个常用的文件夹
EnvGet,ahk,ahk

FileCreateDir,%ahk%\test
FileCreateDir,%ahk%\Notes
FileCreateDir,%ahk%\Project
FileCopyDir,scite,%ahk%\scite
FileCopyDir,Lib,%ahk%\Lib

FileAppend,,%A_Desktop%\test.ahk

;开一个测试文件
run,%ahk%\SciTE\SciTE.exe %A_Desktop%\test.ahk

MsgBox,ahk环境部署完毕
ExitApp

下面是自解压文件分享

链接：https://pan.baidu.com/s/1V6uSGTlEzsZHRo6YT91lzA?pwd=3ezt
提取码：3ezt
–来自百度网盘超级会员V4的分享