KeylessUniversal
Anti grab
owlguy17 10 months ago 2.2K views 1Run it
Copy the script and paste it into your executor.
Anti grab.lua · 440 lines
Players = :()
UIS = :()
ReplicatedStorage = :()
StarterGui = :()
localPlayer = Players.LocalPlayer
EventsFolder = ReplicatedStorage:()
GrabEvent = EventsFolder:()
ActivateEvent = EventsFolder:()
AUTO =
PROF =
SelectedTrap =
currentTarget =
autoLoopRunning =
proLoopRunning =
(text)
(()
StarterGui:(, {Title = , Text = text, Duration = })
)
(remote, ...)
remote remote:()
remote:(...)
()
()
ch = localPlayer.Character
ch
hrp = ch:()
hrp
closest, bestDist = ,
_, pl (Players:())
pl ~= localPlayer pl.Character
phrp = pl.Character:()
phrp
d = (hrp.Position - phrp.Position).Magnitude
d < bestDist
bestDist = d
closest = pl
closest closest.Character
targetHead = closest.Character:()
targetHead
(GrabEvent, targetHead, )
(btn)
AUTO = AUTO
btn.Text = AUTO
(AUTO )
AUTO autoLoopRunning
autoLoopRunning =
.(()
AUTO
ch = localPlayer.Character
hrp = ch ch:()
hrp
closest, bestDist = ,
_, pl (Players:())
pl ~= localPlayer pl.Character
phrp = pl.Character:()
phrp
d = (hrp.Position - phrp.Position).Magnitude
d < bestDist
bestDist = d
closest = pl
closest closest.Character
targetTorso = closest.Character:() closest.Character:()
targetTorso
(GrabEvent, targetTorso, , .(), .(targetTorso.Position))
.(/)
autoLoopRunning =
)
()
proLoopRunning =
PROF
ch = localPlayer.Character
hrp = ch ch:()
hrp
currentTarget
candidate, bestDist = ,
_, pl (Players:())
pl ~= localPlayer pl.Character
phrp = pl.Character:()
phrp
d = (hrp.Position - phrp.Position).Magnitude
d <= d < bestDist
bestDist = d
candidate = pl
candidate candidate.Character
targetTorso = candidate.Character:() candidate.Character:()
targetTorso
(GrabEvent, targetTorso, , .(), .(targetTorso.Position))
currentTarget = candidate
targetTorso =
currentTarget.Character
targetTorso = currentTarget.Character:() currentTarget.Character:()
targetTorso
d = (hrp.Position - targetTorso.Position).Magnitude
d >
currentTarget =
bestCandidate = currentTarget
bestCandDist = d
_, pl (Players:())
pl ~= localPlayer pl ~= currentTarget pl.Character
phrp2 = pl.Character:()
phrp2
d2 = (hrp.Position - phrp2.Position).Magnitude
d2 <= . d2 > bestCandDist
bestCandDist = d2
bestCandidate = pl
bestCandidate ~= currentTarget
newTargetTorso = bestCandidate.Character:() bestCandidate.Character:()
newTargetTorso
(GrabEvent, newTargetTorso, , .(), .(newTargetTorso.Position))
currentTarget = bestCandidate
currentTarget =
.(/)
proLoopRunning =
()
ch = localPlayer.Character
hrp = ch ch:()
hrp
candidate, bestDist = ,
_, pl (Players:())
pl ~= localPlayer pl.Character
phrp = pl.Character:()
phrp
d = (hrp.Position - phrp.Position).Magnitude
d <= d < bestDist
bestDist = d
candidate = pl
candidate candidate.Character
targetTorso = candidate.Character:() candidate.Character:()
targetTorso
(GrabEvent, targetTorso, , .(), .(targetTorso.Position))
currentTarget = candidate
(input)
PROF
input.UserInputType == .UserInputType.MouseButton1
currentTarget
currentTarget =
()
UIS.InputBegan:(detectDropInput)
(toggleBtn)
PROF = PROF
toggleBtn
toggleBtn.Text = PROF
toggleBtn.BackgroundColor3 = PROF .(,,) .(,,)
(PROF )
PROF
currentTarget =
proLoopRunning
.(professionalModeLoop)
currentTarget =
(pl)
(pl pl.Character)
targetTorso = pl.Character:() pl.Character:()
ch = localPlayer.Character
hrp = ch ch:()
targetTorso hrp
home = hrp.CFrame
hrp.CFrame = targetTorso.CFrame
t0 = ()
() - t0 <=
(GrabEvent, targetTorso, , .(), .(targetTorso.Position))
.()
t1 = ()
() - t1 <
hrp.CFrame = home
(hrp.Position - home.Position).Magnitude <
.()
hrp.CFrame = home
()
ScreenGui = .()
ScreenGui.Name =
ScreenGui.Parent = localPlayer:()
mainFrame = .(, ScreenGui)
mainFrame.Size = .(,)
mainFrame.Position = .(,-,,-)
mainFrame.BackgroundColor3 = .(,,)
mainFrame.Draggable =
mainFrame.BackgroundTransparency =
mCorner = .(, mainFrame)
mCorner.CornerRadius = .(,)
TextBox = .()
TextBox.Name =
TextBox.Parent = mainFrame
TextBox.Size = .(, , , )
TextBox.Position = .(, , , )
TextBox.BackgroundColor3 = .(, , )
TextBox.TextColor3 = .(, , )
TextBox.PlaceholderText =
TextBox.PlaceholderColor3 = .(, , )
TextBox.TextSize =
TextBox.ClearTextOnFocus =
TextBox.Text =
killBtn = .()
killBtn.Parent = mainFrame
killBtn.Size = .(,-,,)
killBtn.Position = .(,,,)
killBtn.Text =
killBtn.TextScaled =
killBtn.BackgroundColor3 = .(,,)
killBtn.MouseButton1Click:(()
value = (TextBox.Text)
grabfc = , value
.(u)
.(u)
.(()
(ActivateEvent, SelectedTrap)
)
)
trapBtn = killBtn:()
trapBtn.Parent = mainFrame
trapBtn.Position = .(,,,)
trapBtn.Text = .. ((SelectedTrap==) SelectedTrap)
trapBtn.TextScaled =
trapBtn.BackgroundColor3 = .(,,)
trapFrame = .(, mainFrame)
trapFrame.Size = .(,-,,)
trapFrame.Position = .(,,,)
trapFrame.BackgroundColor3 = .(,,)
trapFrame.ScrollBarThickness =
trapFrame.Visible =
trapFrame.CanvasSize = .(,,,)
i, name ({,,,,,,,,,,,})
tBtn = .(, trapFrame)
tBtn.Size = .(,,,)
tBtn.Position = .(,,,(i-)*)
tBtn.Font = .Font.GothamBold
tBtn.TextSize =
tBtn.TextScaled =
tBtn.BackgroundColor3 = .(,,)
tCorner = .(, tBtn)
tCorner.CornerRadius = .(,)
tBtn.Text = name
tBtn.MouseButton1Click:(()
SelectedTrap = (name==) name
trapBtn.Text = .. name
trapFrame.Visible =
)
trapBtn.MouseButton1Click:(() trapFrame.Visible = trapFrame.Visible )
toggleBtn = .(, ScreenGui)
toggleBtn.Size = .(,)
toggleBtn.Position = .(,,,)
toggleBtn.Text =
toggleBtn.TextScaled =
toggleBtn.BackgroundColor3 = .(,,)
toggleBtn.Draggable =
togCorner = .(, toggleBtn)
togCorner.CornerRadius = .(,)
toggleBtn.MouseButton1Click:(() mainFrame.Visible = mainFrame.Visible )
dragging =
ds, sp
mainFrame.InputBegan:((input)
input.UserInputType == .UserInputType.MouseButton1
dragging =
ds = input.Position
sp = mainFrame.Position
)
UIS.InputChanged:((input)
dragging input.UserInputType == .UserInputType.MouseMovement
delta = input.Position - ds
mainFrame.Position = .(sp.X.Scale, sp.X.Offset + delta.X, sp.Y.Scale, sp.Y.Offset + delta.Y)
)
UIS.InputEnded:((input)
input.UserInputType == .UserInputType.MouseButton1
dragging =
)
ScreenGui, mainFrame, proButton, autoButton
screenGui, mainFrame, proButton, autoButton = ()
UIS.InputBegan:((input, processed)
processed
UIS.TouchEnabled input.KeyCode == .KeyCode.LeftAlt
screenGui screenGui.Enabled = screenGui.Enabled
input.KeyCode == .KeyCode.X
(proButton)
proButton
proButton.BackgroundColor3 = PROF .(,,) .(,,)
input.KeyCode == .KeyCode.M
(autoButton)
)
localPlayer.CharacterAdded:(()
.()
screenGui screenGui:()
newGui, newFrame, newProBtn, newAutoBtn = ()
proButton = newProBtn
autoButton = newAutoBtn
AUTO
autoButton.Text =
autoLoopRunning .(() (autoButton) )
PROF
currentTarget =
proLoopRunning .(professionalModeLoop)
)
About this script
press the kill button to send them to the trap you selected, the other button is to select the trap Carry people simulator 3
