
Keyless

local Pl = game:GetService("Players")
local RS = game:GetService("ReplicatedStorage")
local UI = game:GetService("UserInputService")
local Ru = game:GetService("RunService")
local LP = Pl.LocalPlayer
local PG = LP:WaitForChild("PlayerGui")
local Mo = LP:GetMouse()
local SG = Instance.new("ScreenGui")
SG.Name = "TargetGUI"
SG.ResetOnSpawn = false
SG.Parent = PG
local MF = Instance.new("Frame")
MF.Name = "MainFrame"
MF.Size = UDim2.new(0, 280, 0, 190)
MF.Position = UDim2.new(0.5, -140, 0.1, 0)
MF.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
MF.BorderSizePixel = 0
MF.Active = true
MF.Draggable = true
MF.Parent = SG
local CO = Instance.new("UICorner")
CO.CornerRadius = UDim.new(0, 12)
CO.Parent = MF
local TB = Instance.new("Frame")
TB.Size = UDim2.new(1, 0, 0, 40)
TB.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
TB.Parent = MF
local TC = Instance.new("UICorner")
TC.CornerRadius = UDim.new(0, 12)
TC.Parent = TB
local TL = Instance.new("TextLabel")
TL.Size = UDim2.new(1, -80, 0, 40)
TL.Position = UDim2.new(0, 10, 0, 0)
TL.BackgroundTransparency = 1
TL.Text = "click kill"
TL.TextColor3 = Color3.fromRGB(255, 255, 255)
TL.TextSize = 16
TL.Font = Enum.Font.GothamBold
TL.TextXAlignment = Enum.TextXAlignment.Left
TL.Parent = TB
local MB = Instance.new("TextButton")
MB.Size = UDim2.new(0, 35, 0, 30)
MB.Position = UDim2.new(1, -40, 0, 5)
MB.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
MB.Text = "━"
MB.TextColor3 = Color3.fromRGB(255, 255, 255)
MB.TextSize = 18
MB.Font = Enum.Font.GothamBold
MB.Parent = TB
local MC = Instance.new("UICorner")
MC.CornerRadius = UDim.new(0, 6)
MC.Parent = MB
local CF = Instance.new("Frame")
CF.Name = "ContentFrame"
CF.Size = UDim2.new(1, 0, 1, -40)
CF.Position = UDim2.new(0, 0, 0, 40)
CF.BackgroundTransparency = 1
CF.Parent = MF
local TA = Instance.new("TextLabel")
TA.Size = UDim2.new(1, -20, 0, 30)
TA.Position = UDim2.new(0, 10, 0, 5)
TA.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
TA.Text = "Click on a player"
TA.TextColor3 = Color3.fromRGB(200, 200, 200)
TA.TextSize = 12
TA.Font = Enum.Font.Gotham
TA.Parent = CF
local TC2 = Instance.new("UICorner")
TC2.CornerRadius = UDim.new(0, 8)
TC2.Parent = TA
local LB = Instance.new("TextButton")
LB.Size = UDim2.new(1, -20, 0, 30)
LB.Position = UDim2.new(0, 10, 0, 40)
LB.BackgroundColor3 = Color3.fromRGB(60, 60, 180)
LB.Text = "Unlocked (Can Change)"
LB.TextColor3 = Color3.fromRGB(255, 255, 255)
LB.TextSize = 12
LB.Font = Enum.Font.GothamBold
LB.Parent = CF
local LC = Instance.new("UICorner")
LC.CornerRadius = UDim.new(0, 6)
LC.Parent = LB
local AB = Instance.new("TextButton")
AB.Size = UDim2.new(0.48, 0, 0, 32)
AB.Position = UDim2.new(0, 10, 0, 75)
AB.BackgroundColor3 = Color3.fromRGB(220, 50, 50)
AB.Text = "Start"
AB.TextColor3 = Color3.fromRGB(255, 255, 255)
AB.TextSize = 13
AB.Font = Enum.Font.GothamBold
AB.Parent = CF
local AC = Instance.new("UICorner")
AC.CornerRadius = UDim.new(0, 8)
AC.Parent = AB
local CL = Instance.new("TextButton")
CL.Size = UDim2.new(0.48, 0, 0, 32)
CL.Position = UDim2.new(0.52, 0, 0, 75)
CL.BackgroundColor3 = Color3.fromRGB(80, 80, 80)
CL.Text = "Clear"
CL.TextColor3 = Color3.fromRGB(255, 255, 255)
CL.TextSize = 13
CL.Font = Enum.Font.GothamBold
CL.Parent = CF
local CC = Instance.new("UICorner")
CC.CornerRadius = UDim.new(0, 8)
CC.Parent = CL
local CB = Instance.new("TextButton")
CB.Size = UDim2.new(1, -20, 0, 30)
CB.Position = UDim2.new(0, 10, 0, 112)
CB.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
CB.Text = "Close GUI"
CB.TextColor3 = Color3.fromRGB(255, 255, 255)
CB.TextSize = 12
CB.Font = Enum.Font.Gotham
CB.Parent = CF
local CH = Instance.new("UICorner")
CH.CornerRadius = UDim.new(0, 8)
CH.Parent = CB
local SP = nil
local IA = false
local AL = nil
local IM = false
local IL = false
local function CR()
if SP and SP.Character then
local HI = SP.Character:FindFirstChild("T_HI")
if HI then
HI:Destroy()
end
end
end
local function SE(PL)
CR()
SP = PL
if SP then
local CHR = SP.Character
if CHR then
local HI = Instance.new("Highlight")
HI.Name = "T_HI"
HI.FillColor = Color3.fromRGB(255, 255, 0)
HI.OutlineColor = Color3.fromRGB(255, 200, 0)
HI.Adornee = CHR
HI.Parent = CHR
end
end
end
local function AT()
if SP and SP.Parent and SP.Character then
local ar = {SP}
pcall(function()
RS:WaitForChild("meleeEvent"):FireServer(unpack(ar))
end)
else
if IA then
AB.MouseButton1Click:Fire()
end
end
end
MB.MouseButton1Click:Connect(function()
IM = not IM
if IM then
MF:TweenSize(
UDim2.new(0, 280, 0, 40),
Enum.EasingDirection.Out,
Enum.EasingStyle.Quad,
0.3,
true
)
MB.Text = "□"
CF.Visible = false
else
MF:TweenSize(
UDim2.new(0, 280, 0, 190),
Enum.EasingDirection.Out,
Enum.EasingStyle.Quad,
0.3,
true
)
MB.Text = "━"
CF.Visible = true
end
end)
local function FP(MD)
MD = MD or 30
local NP = nil
local SD = MD
local CA = workspace.CurrentCamera
local MP = UI:GetMouseLocation()
for _, pl in pairs(Pl:GetPlayers()) do
if pl ~= LP and pl.Character then
local CH = pl.Character
local HR = CH:FindFirstChild("HumanoidRootPart")
local HU = CH:FindFirstChild("Humanoid")
if HR and HU and HU.Health > 0 then
local SP, OS = CA:WorldToViewportPoint(HR.Position)
if OS then
local DI = (Vector2.new(SP.X, SP.Y) - MP).Magnitude
if DI < SD then
SD = DI
NP = pl
end
end
end
end
end
return NP
end
Mo.Button1Down:Connect(function()
if IL then
return
end
local TA = Mo.Target
local TP = nil
if TA and TA.Parent then
local CH = TA.Parent
local HU = CH:FindFirstChild("Humanoid")
if HU then
TP = Pl:GetPlayerFromCharacter(CH)
end
if not TP and TA.Parent.Parent then
local PC = TA.Parent.Parent
local PH = PC:FindFirstChild("Humanoid")
if PH then
TP = Pl:GetPlayerFromCharacter(PC)
end
end
end
if not TP then
TP = FP(35)
end
if TP and TP ~= LP then
SE(TP)
TA.Text = "Target: " .. TP.Name
TA.TextColor3 = Color3.fromRGB(100, 255, 100)
TA.BackgroundColor3 = Color3.fromRGB(50, 100, 50)
task.delay(0.1, function()
TA.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
end)
end
end)
LB.MouseButton1Click:Connect(function()
IL = not IL
if IL then
LB.Text = "Locked (Fixed)"
LB.BackgroundColor3 = Color3.fromRGB(180, 60, 60)
else
LB.Text = "Unlocked (Can Change)"
LB.BackgroundColor3 = Color3.fromRGB(60, 60, 180)
end
end)
AB.MouseButton1Click:Connect(function()
if not SP then
TA.Text = "Select a player first!"
TA.TextColor3 = Color3.fromRGB(255, 100, 100)
task.delay(1, function()
TA.Text = "Click on a player"
TA.TextColor3 = Color3.fromRGB(200, 200, 200)
end)
return
end
IA = not IA
if IA then
AB.Text = "Stop"
AB.BackgroundColor3 = Color3.fromRGB(50, 220, 50)
AL = Ru.Heartbeat:Connect(function()
AT()
end)
else
AB.Text = "Start"
AB.BackgroundColor3 = Color3.fromRGB(220, 50, 50)
if AL then
AL:Disconnect()
AL = nil
end
end
end)
CL.MouseButton1Click:Connect(function()
if IA then
AB.Text = "Start"
AB.BackgroundColor3 = Color3.fromRGB(220, 50, 50)
IA = false
if AL then
AL:Disconnect()
AL = nil
end
end
if IL then
IL = false
LB.Text = "Unlocked (Can Change)"
LB.BackgroundColor3 = Color3.fromRGB(60, 60, 180)
end
CR()
SP = nil
TA.Text = "Click on a player"
TA.TextColor3 = Color3.fromRGB(200, 200, 200)
TA.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
end)
CB.MouseButton1Click:Connect(function()
if AL then
AL:Disconnect()
end
CR()
SG:Destroy()
end)
Pl.PlayerRemoving:Connect(function(PLR)
if SP == PLR then
CL.MouseButton1Click:Fire()
end
end)
Not working
honeypot🐀🐀🥷🏿🥷🏿