forked from nsdown/eazy-for-ss
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathstartmyexe.ahk
117 lines (117 loc) · 2.35 KB
/
startmyexe.ahk
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
;ANSI 32-bit
#SingleInstance,ignore
Menu,tray,Tip, Start My EXE
Menu,tray,NoStandard
Menu,Tray,Add,隐藏,hide
Menu,Tray,Add,显示,showall
Menu,Tray,Add,退出,guiclose
gosub listconfig
;下面是启动文件名字可以按需修改
my_exe = kcptun.exe
log = 启动器`n`n把exe放在同文件夹下，重命名为%my_exe%，然后选择增加按钮，接着添加配置名字、填写参数选项、保存我的配置，最后启动我的程序！`n`n
Gui,Add,ListBox,x5 y5 w150 h110 vconfigname gloadconfig,%configlist%
Gui,Add,Edit,x5 y120 w150 h140 ReadOnly WantCtrlA vlogwindow,%log%
Gui,Add,Button,Default x324 y235 w32 h25 gstop,停止
Gui,Add,Button,Default x284 y235 w32 h25 ghide,隐藏
Gui,Add,Button,Default x244 y235 w32 h25 gstart,启动
Gui,Add,Button,Default x204 y235 w32 h25 gsave,保存
Gui,Add,Button,Default x164 y235 w32 h25 gadd,增加
Gui,Add,Text,x165 y5 w190,参数：
Gui,Add,Edit,x165 y25 w190 h200 vparameter
Gui,Show, W365 H270 Center,Start My EXE
return
listconfig:
configlistraw =
Loop,*.ini,0,0
{
configlistraw = %configlistraw%|%A_LoopFileName%
}
StringTrimLeft,configlist,configlistraw,1
return
start:
if configname =
{
log = 请添加或选择一份配置文件！
GuiControl,,logwindow,%log%
return
}
IfNotExist %my_exe%
{
log = %my_exe%不存在！
GuiControl,,logwindow,%log%
return
}
gosub closeallmyexe
Gui Submit,nohide
runmyexe = %my_exe% %parameter%
loop
{
if stopstart = 1
{
stopstart = 0
break
}
Process,Exist,%my_exe%
if ErrorLevel = 0
run, %runmyexe%
ControlSend,,y,%A_WorkingDir%\%my_exe%
ControlSend,,{enter},%A_WorkingDir%\%my_exe%
sleep 3000
}
return
stop:
stopstart = 1
gosub closeallmyexe
return
add:
addconfig = none
InputBox, addconfig , 请输入配置名称：,,,300,120
if ErrorLevel
return
addconfig = %addconfig%.ini
IniWrite, none, %addconfig%, Section,parameter
gosub listconfig
GuiControl,,configname,%configlistraw%
return
save:
Gui Submit,nohide
if configname =
return
IniWrite, %parameter%, %configname%, Section,parameter
gosub loadconfig
return
loadconfig:
Gui Submit,nohide
IniRead, parameter, %configname%, Section, parameter
GuiControl,,parameter,%parameter%
return
guiclose:
gosub closeallmyexe
exitapp
closeallmyexe:
loop
{
Process,Close,%my_exe%
Process,Exist,%my_exe%
if ErrorLevel = 0
break
if a_index >= 10
break
sleep,500
}
return
GuiSize:
If A_EventInfo=1
{
gosub hide
}
Return
hide:
DetectHiddenWindows,Off
WinHide,Start My EXE
WinHide,%A_WorkingDir%\%my_exe%
return
showall:
WinShow,%A_WorkingDir%\%my_exe%
WinShow,Start My EXE
return