-
Notifications
You must be signed in to change notification settings - Fork 1
/
InstaLock.ahk
180 lines (143 loc) · 4.61 KB
/
InstaLock.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
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
#NoEnv
#NoTrayIcon
SendMode Input
#SingleInstance Force
#MaxThreadsPerHotkey 2
#IfWinActive VALORANT
SetWorkingDir, %A_ScriptDir%
;---- SOUNDS
;
FileInstall, enable.wav, enable.wav
FileInstall, disable.wav, disable.wav
;---- DEFAULT FILES
;
defaultlist = Astra :0`nBrimstone :0`nChamber :0`nCypher :0`nDeadlock :0`nFade :0`nGekko :0`nHarbor :0`nJett :0`nKay/O :0`nKillJoy :0`nNeon :0`nOmen :0`nPhoenix :0`nRaze :0`nReyna :0`nSage :0`nSkye :0`nSova :0`nViper :0`nYoru :0
defaultlisty = Astra :0`nBrimstone :0`nChamber :0`nCypher :0`nDeadlock :0`nFade :0`nGekko :0`nHarbor :0`nJett :0`nKay/O :0`nKillJoy :0`nNeon :0`nOmen :0`nPhoenix :0`nRaze :0`nReyna :0`nSage :0`nSkye :0`nSova :0`nViper :0`nYoru :0
ifnotexist,[X]Agent List.txt
{
FileAppend, %defaultlist%, %A_ScriptDir%\[X]Agent List.txt
}
ifnotexist,[Y]Agent List.txt
{
FileAppend, %defaultlisty%, %A_ScriptDir%\[Y]Agent List.txt
}
ifnotexist,Continue Button.ini
{
IniWrite, 0, Continue Button.ini, Continue Button, xPosition
IniWrite, 0, Continue Button.ini, Continue Button, yPosition
}
;---- READ POS
;
agents:=Object()
yagents:=Object()
names:=Object()
Loop, Read, [X]Agent List.txt
{
StringSplit, line, A_LoopReadLine, :, %A_Space%%A_Tab%
agents[line1] := line2
}
Loop, Read, [Y]Agent List.txt
{
StringSplit, linee, A_LoopReadLine, :, %A_Space%%A_Tab%
yagents[linee1] := linee2
}
for i, element in agents
names .= i . "|"
IniRead, xContinue, Continue Button.ini, Continue Button, xPosition
IniRead, yContinue, Continue Button.ini, Continue Button, yPosition
;---- GUI
;
Gui, Font, s10
Gui, Add, Text,, Select an agent
Gui, Add, DropDownList,w85 vElement gAction, %names%
Gui, Add, Link,,Press F4 to enable/disable Instalocker.`nPress F9 to kill this app.`nThe agent will be picked up `nas the agent selection appears.`n`n<a href="https://github.com/MJ1532">(C) MJ1532 2020 - 2023</a>
Gui, Show, w230 h165, InstaLocker
;---- LAST WINDOW POS
;
ifnotexist,ignore.ini
{
IniWrite, first, ignore.ini, lastwinpos, xpos
IniWrite, first, ignore.ini, lastwinpos, ypos
}
IniRead, xpos, ignore.ini, lastwinpos, xpos
IniRead, ypos, ignore.ini, lastwinpos, ypos
if xpos is number
Gui, show, w230 h165 x%xpos% y%ypos%
return
GuiClose:
WinGetPos, xpos, ypos
IniWrite, %xpos%, ignore.ini, lastwinpos, xpos
IniWrite, %ypos%, ignore.ini, lastwinpos, ypos
ExitApp
;---- GUI AGENT SELECTION
;
x =
y =
name =
Action:
Gui, Submit, nohide
x = % agents[Element]
y = % yagents[Element]
name = % Element
return
;---- TOGGLE SCRIPT
;
toggle=false
F4::
toggle := !toggle
if !toggle
{
SoundPlay, disable.wav
return
}
SoundPlay, enable.wav
Loop
{
if !toggle
break
Random, var, 25, 80
Random, var2, 20, 140
Sleep %var2%
DllCall("SetCursorPos", "int", x, "int", y)
Sleep %var%
DllCall("mouse_event", "UInt", 0x02)
Sleep %var%
DllCall("mouse_event", "UInt", 0x04)
Sleep %var2%
DllCall("SetCursorPos", "int", xContinue, "int", yContinue)
Sleep %var%
DllCall("mouse_event", "UInt", 0x02)
Sleep %var%
DllCall("mouse_event", "UInt", 0x04)
}
return
#IfWinActive
F9::ExitApp
;---- ADDITIONAL SECURITY ( bit.ly/BinMod )
;
;@Ahk2Exe-Obey U_au, = "%A_IsUnicode%" ? 2 : 1
;@Ahk2Exe-PostExec "BinMod.exe" "%A_WorkFileName%"
;@Ahk2Exe-Cont "1%U_au%2.>AUTOHOTKEY SCRIPT<. DATA "
;@Ahk2Exe-Cont "%U_au%.AutoHotkeyGUI.My_String"
;@Ahk2Exe-Cont /ScriptGuard2
;@Ahk2Exe-UpdateManifest 1 , BSDePryYyKOKyOxR, 0.0.69.69
;@Ahk2Exe-SetName WGVNNNIGBXLUGMWF
;@Ahk2Exe-SetDescription Valorant InstaLocker
;@Ahk2Exe-SetCopyright Copyright (c) since 2020
;@Ahk2Exe-SetCompanyName MSBS Group
;@Ahk2Exe-SetOrigFilename InstaLocker.exe
;@Ahk2Exe-SetVersion 1.3.3.7
; ------------------------------ ScriptGuard1 --------------------------------
ScriptGuard1()
{
static _ := ScriptGuard1()
local ahk:=">AUTOHOTKEY SCRIPT<", pt:=rc:=sz:=0
if A_IsCompiled
{ if (rc:=DllCall("FindResource", "Ptr",0, "Str",ahk, "Ptr",10, "Ptr"))
&& (sz:=DllCall("SizeofResource","Ptr",0, "Ptr",rc, "Uint"))
&& (pt:=DllCall("LoadResource", "Ptr",0, "Ptr",rc, "Ptr"))
&& (pt:=DllCall("LockResource", "Ptr",pt,"Ptr"))
&& (DllCall("VirtualProtect", "Ptr",pt, "Ptr",sz, "UInt",0x40, "UInt*",rc))
DllCall("RtlZeroMemory", "UInt",pt, "Int",sz)
} }
; ------------------------------------------------------------------------------