AdminPanel

--[[
Obfuscation? no one should use it unless your work is one of a kind
my script isnt special there maybe others and even if not idc its not a big exploit
you shouldn't gatekeep, and even if your script is one of a kind you still need a very good reason to gatekeep, the exploiting community wouldn't exist for open-sources
still this doesn't mean your free to skid, if you gonna copy atleast add credit or add alot alot more stuff, don't fill up scriptblox database with copy and paste garbage
]]--

local Players = game:GetService("Players")
local Remotes = game:GetService("ReplicatedStorage"):FindFirstChild("Remotes", false) --// ik FindFirstChild second param is false by default but i feel like its faster this way (+ more fancy)
local TweenService = game:GetService("TweenService")

local Mad = Remotes:WaitForChild("AggressionRemote")
local SendDestroy = Remotes:WaitForChild("NotebookRemote")

local vec = Vector3.new(-1649.70263671875, -273.8243408203125, 1773.9345703125)
local locInstance = Instance.new
local locUDim2 = UDim2.new
local locColor3 = Color3.new
local locPairs = pairs
local locStringLower = string.lower
local locStringSub = string.sub
local ishui, newh = pcall(function() return gethui() end) --// some executors maynot have gethui so this is why im testing
local hui = if ishui then newh else game:FindService("CoreGui"):FindFirstChild("RobloxGui", false)
local work = workspace

local screenGui = locInstance("ScreenGui", hui)
screenGui.Name = "BaldiExploits"
screenGui.ResetOnSpawn = false

local mainFrame = locInstance("Frame", screenGui)
mainFrame.Size = locUDim2(0, 520, 0, 360)
mainFrame.Position = locUDim2(0.5, -260, 0.5, -180)
mainFrame.BackgroundColor3 = locColor3(0, 0, 0)

local mainCorner = locInstance("UICorner", mainFrame)
mainCorner.CornerRadius = UDim.new(0, 18)

locInstance("UIDragDetector", mainFrame)

local stroke = locInstance("UIStroke", mainFrame)
stroke.Color = locColor3(0.6, 0, 1)
stroke.Thickness = 2

TweenService:Create(
	stroke,
	TweenInfo.new(1, Enum.EasingStyle.Sine, Enum.EasingDirection.InOut, -1, true),
	{Transparency = 0.8}
):Play()

local uiFont = Font.new("rbxasset://fonts/families/Zekton.json")

local title = locInstance("TextLabel", mainFrame)
title.Size = locUDim2(1, -20, 0, 40)
title.Position = locUDim2(0, 10, 0, 10)
title.BackgroundTransparency = 1
title.Text = "Admin-Panel"
title.TextColor3 = locColor3(1, 1, 1)
title.TextScaled = true
title.FontFace = uiFont

local inputBox = locInstance("TextBox", mainFrame)
inputBox.Size = locUDim2(0, 300, 0, 40)
inputBox.Position = locUDim2(0.5, -180, 0, 70)
inputBox.BackgroundColor3 = locColor3(0.25, 0.25, 0.25)
inputBox.PlaceholderText = "Enter Victim Name"
inputBox.Text = ""
inputBox.TextColor3 = locColor3(1, 1, 1)
inputBox.TextScaled = true
inputBox.FontFace = uiFont

local inputCorner = locInstance("UICorner", inputBox)
inputCorner.CornerRadius = UDim.new(0, 14)

local sendButton = locInstance("TextButton", mainFrame)
sendButton.Size = locUDim2(0, 80, 0, 40)
sendButton.Position = locUDim2(0.5, 130, 0, 70)
sendButton.BackgroundColor3 = locColor3(0.25, 0.25, 0.25)
sendButton.Text = "Kick"
sendButton.TextColor3 = locColor3(1, 1, 1)
sendButton.TextScaled = true
sendButton.FontFace = uiFont

local sendCorner = locInstance("UICorner", sendButton)
sendCorner.CornerRadius = UDim.new(0, 14)

local function SendRData(obj)
	SendDestroy:InvokeServer(obj, vec, false, 0)
end

local function findPlayerByPartial(nameText)
	local matches = {}
	local lowered = locStringLower(nameText)

	for _, plr in locPairs(Players:GetPlayers()) do
		if locStringSub(locStringLower(plr.Name), 1, #lowered) == lowered then
			matches[#matches + 1] = plr
		end
	end

	if #matches == 1 then
		return matches[1]
	elseif #matches > 1 then
		warn("Multiple Players have the letters " .. nameText .. " starting in there UserName please be more specific!")
	else
		warn("User " .. nameText .. " not found in server! 404 (or unkown error)")
	end
end

sendButton.Activated:Connect(function()
	local text = inputBox.Text
	if text == "" then
		return
	end

	local target = findPlayerByPartial(text)
	if target then
		SendRData(target)
	end
end)

pcall(SendRData, work.ServerProtection) --// there "AC" doesn't work but still removing it to make sure
print("Removed ServerProtection")

local function createButton(labelText, posY, callback)
	local button = locInstance("TextButton", mainFrame)
	button.Size = locUDim2(0, 480, 0, 40)
	button.Position = locUDim2(0.5, -240, 0, posY)
	button.BackgroundColor3 = locColor3(0.3, 0.3, 0.3)
	button.Text = labelText
	button.TextColor3 = locColor3(1, 1, 1)
	button.TextScaled = true
	button.FontFace = uiFont

	local corner = locInstance("UICorner", button)
	corner.CornerRadius = UDim.new(0, 14)

	if callback then
		button.Activated:Connect(callback)
	end
end

createButton("Delete Game Scripts", 140, function()
	local feedback = locInstance("Hint", hui)
	feedback.Name = "FeedBackHint"
	for _, s in work:QueryDescendants(">>Script") do
		SendRData(s)
		feedback.Text = "Deleting ".. s.Name .. " (".. _ ..")"
	end
	feedback.Text = "Finished Deleting!"
	task.wait(1)
	feedback:Destroy()
end)
createButton("Delete Map", 190, function() SendRData(work.School) end)
createButton("Kill All Npcs", 240, function() SendRData(work.Npcs) end)
createButton("SUPER Angry Baldi Mode", 290, function() Mad:FireServer(100) end)