SmashQuickPlay/Shortcut Maker.ahk at master · Car-Role/SmashQuickPlay · GitHub

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
#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

 if not A_IsAdmin
 {
  Run *RunAs "%A_ScriptFullPath%"
  ExitApp
 }

Gui, 1:Add, Button, x262 y109 w90 h30 +Center, Cancel
Gui, 1:Add, Button, x165 y109 w90 h30 , Remove
Gui, 1:Add, Text, x32 y20 w351 h78 , Would you like to add or remove SmashQuickPlay from startup on your computer (no longer needing to keep running this software)?
Gui, 1:Add, Button, x67 y109 w90 h30 , Add
; Generated using SmartGUI Creator for SciTE
Gui, 1:Show, w425 h154, SmashQuickPlay
return

1GuiClose:
KillProcess()
ExitApp
return

ButtonAdd:
FileCreateShortcut, %A_ScriptDir%\NetPlayHotkey.exe, C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp\Start_up_file_for_hotkey.lnk, %A_ScriptDir%
Gui Destroy
MsgBox,, SmashQuickPlay, Added to startup! Run this again if you ever wish to remove it.
KillProcess()
ExitApp
Return

ButtonRemove:
FileDelete, C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp\Start_up_file_for_hotkey.lnk
Gui Destroy
sleep 1000
MsgBox,, SmashQuickPlay, Remove from startup! Run this again if you ever wish to Add it.
KillProcess()
ExitApp
Return

ButtonCancel:
KillProcess()
ExitApp
Return

KillProcess() {

IfExist "Shortcut Maker.ahk"
{
 Process, Close, Shortcut Maker.ahk
  Loop {
    Process, Close, Shortcut Maker.ahk
    if !ErrorLevel
       break

    return
  MsgBox,, Done!
 }
 }
}