-- Optimized Delta-Style Admin Panel (LocalScript)
-- Access: proplayer253639 ONLY
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local Workspace = game:GetService("Workspace")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer
if LocalPlayer.Name ~= "proplayer253639" then return end
------------------------------------------------
-- UI ROOT
------------------------------------------------
local gui = Instance.new("ScreenGui", LocalPlayer.PlayerGui)
gui.Name = "OptimizedAdminPanel"
gui.ResetOnSpawn = false
------------------------------------------------
-- TOGGLE BUTTON (LEFT MIDDLE)
------------------------------------------------
local toggleBtn = Instance.new("TextButton", gui)
toggleBtn.Size = UDim2.fromScale(0.08, 0.08)
toggleBtn.Position = UDim2.fromScale(0.02, 0.46)
toggleBtn.Text = "ADMIN"
toggleBtn.Font = Enum.Font.GothamBold
toggleBtn.TextScaled = true
toggleBtn.TextColor3 = Color3.new(1,1,1)
toggleBtn.BackgroundColor3 = Color3.fromRGB(35,35,35)
Instance.new("UICorner", toggleBtn).CornerRadius = UDim.new(0,20)
------------------------------------------------
-- MAIN PANEL
------------------------------------------------
local main = Instance.new("Frame", gui)
main.Size = UDim2.fromScale(0.55, 0.65)
main.Position = UDim2.fromScale(0.22, 0.17)
main.BackgroundColor3 = Color3.fromRGB(20,20,20)
main.Visible = false
main.Active = true
main.Draggable = true
Instance.new("UICorner", main).CornerRadius = UDim.new(0,28)
toggleBtn.MouseButton1Click:Connect(function()
main.Visible = not main.Visible
end)
------------------------------------------------
-- GRID LAYOUT
------------------------------------------------
local padding = Instance.new("UIPadding", main)
padding.PaddingTop = UDim.new(0,10)
local grid = Instance.new("UIGridLayout", main)
grid.CellSize = UDim2.fromScale(0.44, 0.075)
grid.CellPadding = UDim2.fromScale(0.04, 0.02)
grid.HorizontalAlignment = Enum.HorizontalAlignment.Center
------------------------------------------------
-- UI HELPERS
------------------------------------------------
local function button(text)
local b = Instance.new("TextButton")
b.Text = text
b.Font = Enum.Font.GothamBold
b.TextScaled = true
b.TextColor3 = Color3.new(1,1,1)
b.BackgroundColor3 = Color3.fromRGB(45,45,45)
Instance.new("UICorner", b).CornerRadius = UDim.new(0,18)
b.Parent = main
return b
end
local function textbox(ph)
local t = Instance.new("TextBox")
t.PlaceholderText = ph
t.Text = ""
t.TextScaled = true
t.Font = Enum.Font.Gotham
t.TextColor3 = Color3.new(1,1,1)
t.BackgroundColor3 = Color3.fromRGB(35,35,35)
Instance.new("UICorner", t).CornerRadius = UDim.new(0,18)
t.Parent = main
return t
end
------------------------------------------------
-- GOD MODE (LOCAL)
------------------------------------------------
local god = false
button("God Mode").MouseButton1Click:Connect(function()
god = not god
end)
RunService.RenderStepped:Connect(function()
if god and LocalPlayer.Character then
local hum = LocalPlayer.Character:FindFirstChildOfClass("Humanoid")
if hum then hum.Health = hum.MaxHealth end
end
end)
------------------------------------------------
-- RESPAWN
------------------------------------------------
button("Respawn").MouseButton1Click:Connect(function()
if LocalPlayer.Character then
LocalPlayer.Character:BreakJoints()
end
end)
------------------------------------------------
-- HIGHLIGHT / ESP
------------------------------------------------
local esp = false
button("Highlight Players").MouseButton1Click:Connect(function()
esp = not esp
for _,p in pairs(Players:GetPlayers()) do
if p ~= LocalPlayer and p.Character then
if esp then
if not p.Character:FindFirstChild("ESP") then
local h = Instance.new("Highlight")
h.Name = "ESP"
h.FillColor = Color3.fromRGB(255,0,0)
h.OutlineColor = Color3.fromRGB(255,255,255)
h.Parent = p.Character
end
else
local h = p.Character:FindFirstChild("ESP")
if h then h:Destroy() end
end
end
end
end)
------------------------------------------------
-- WEAPON TOGGLES (STATEFUL)
------------------------------------------------
local weaponState = {
RapidFire = false,
NoRecoil = false,
InfiniteAmmo = false
}
local function weaponToggle(label, key)
local b = button(label .. " : OFF")
b.MouseButton1Click:Connect(function()
weaponState[key] = not weaponState[key]
b.Text = label .. " : " .. (weaponState[key] and "ON" or "OFF")
end)
end
weaponToggle("Rapid Fire", "RapidFire")
weaponToggle("No Recoil", "NoRecoil")
weaponToggle("Infinite Ammo", "InfiniteAmmo")
------------------------------------------------
-- SAFE PICKUP SYSTEM
------------------------------------------------
local function createPlatform(cf)
local p = Instance.new("Part")
p.Anchored = true
p.CanCollide = true
p.Transparency = 1
p.Size = Vector3.new(8,1,8)
p.CFrame = cf * CFrame.new(0,-3,0)
p.Parent = Workspace
task.delay(1.5, function() p:Destroy() end)
end
local function findTool(keyword)
for _,v in pairs(Workspace:GetDescendants()) do
if v:IsA("Tool") and v.Name:lower():find(keyword) then
return v
end
end
end
local function pickup(tool)
if not tool or not LocalPlayer.Character then return end
local handle = tool:FindFirstChild("Handle")
local hrp = LocalPlayer.Character:FindFirstChild("HumanoidRootPart")
if not handle or not hrp then return end
local cf = CFrame.new(handle.Position + Vector3.new(0,6,0), handle.Position)
createPlatform(cf)
hrp.CFrame = cf
for _,v in pairs(tool:GetDescendants()) do
if v:IsA("ProximityPrompt") then
pcall(function() fireproximityprompt(v) end)
end
end
pcall(function()
firetouchinterest(hrp, handle, 0)
firetouchinterest(hrp, handle, 1)
end)
end
------------------------------------------------
-- WEAPON / ITEM BUTTONS
------------------------------------------------
button("Get AK47").MouseButton1Click:Connect(function()
pickup(findTool("ak"))
end)
button("Get Green Gummy").MouseButton1Click:Connect(function()
pickup(findTool("green"))
end)
button("Get Red Gummy").MouseButton1Click:Connect(function()
pickup(findTool("red"))
end)
button("Get Glock Drum").MouseButton1Click:Connect(function()
pickup(findTool("glock"))
end)
------------------------------------------------
-- CASH (SMART DETECTION)
------------------------------------------------
local cashBox = textbox("Cash Amount (e.g. 10000)")
button("Give Cash").MouseButton1Click:Connect(function()
local amount = tonumber(cashBox.Text)
if not amount then return end
for _,v in pairs(ReplicatedStorage:GetDescendants()) do
if v:IsA("RemoteEvent") then
local n = v.Name:lower()
if n:find("cash") or n:find("money") then
pcall(function()
v:FireServer(amount)
end)
return
end
end
end
local stats = LocalPlayer:FindFirstChild("leaderstats")
if stats then
local cash = stats:FindFirstChild("Cash") or stats:FindFirstChild("Money")
if cash then cash.Value = amount end
end
end)
Comments
No comments yet
Be the first to share your thoughts!