local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UIS = game:GetService("UserInputService")
local VirtualUser = game:GetService("VirtualUser")
local Workspace = game:GetService("Workspace")

local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local playerGui = player:WaitForChild("PlayerGui")

if playerGui:FindFirstChild("HackingToolGUI") then
	playerGui:FindFirstChild("HackingToolGUI"):Destroy()
end

Players.LocalPlayer.CharacterAdded:Connect(function(char)
	character = char
end)

-- Anti-AFK
player.Idled:Connect(function()
	VirtualUser:Button2Down(Vector2.new(0,0), workspace.CurrentCamera.CFrame)
	task.wait(1)
	VirtualUser:Button2Up(Vector2.new(0,0), workspace.CurrentCamera.CFrame)
end)

-- Main GUI Holder
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "HackingToolGUI"
screenGui.ResetOnSpawn = false
screenGui.Parent = playerGui

-- Themes
local themes = {
	["Dark Red"] = {bg = Color3.fromRGB(20, 0, 0), btn = Color3.fromRGB(60, 0, 0), text = Color3.fromRGB(255, 80, 80)},
	["Neon Blue"] = {bg = Color3.fromRGB(0, 0, 30), btn = Color3.fromRGB(0, 80, 150), text = Color3.fromRGB(100, 200, 255)},
	["Toxic Green"] = {bg = Color3.fromRGB(0, 30, 0), btn = Color3.fromRGB(0, 200, 0), text = Color3.fromRGB(0, 255, 100)},
	["Void"] = {bg = Color3.fromRGB(5, 0, 10), btn = Color3.fromRGB(40, 0, 60), text = Color3.fromRGB(170, 0, 255)},
	["Midnight"] = {bg = Color3.fromRGB(10, 10, 25), btn = Color3.fromRGB(40, 40, 80), text = Color3.fromRGB(200, 200, 255)}
}

-- UI Frame
local main = Instance.new("Frame")
main.Size = UDim2.new(0, 500, 0, 300)
main.Position = UDim2.new(0.5, -250, 0.5, -150)
main.BackgroundColor3 = Color3.fromRGB(20, 0, 0)
main.Active = true
main.Draggable = true
main.Parent = screenGui

-- Logo Image
local logo = Instance.new("ImageLabel")
logo.Size = UDim2.new(0, 180, 0, 120)
logo.Position = UDim2.new(0, 10, 0, 10)
logo.BackgroundTransparency = 1
logo.Image = "rbxassetid://139478747999611"
logo.ScaleType = Enum.ScaleType.Stretch
logo.Parent = main

-- Target Input Box
local targetBox = Instance.new("TextBox")
targetBox.Size = UDim2.new(0, 180, 0, 20)
targetBox.Position = UDim2.new(0, 10, 0, 135)
targetBox.PlaceholderText = "Enter target name..."
targetBox.TextColor3 = Color3.fromRGB(255, 255, 255)
targetBox.BackgroundColor3 = Color3.fromRGB(40, 0, 0)
targetBox.ClearTextOnFocus = false
targetBox.Text = ""
targetBox.Parent = main

-- Title
local title = Instance.new("TextLabel")
title.Text = "KARROS XPLOIT1"
title.Font = Enum.Font.SourceSansBold
title.TextSize = 12
title.TextColor3 = Color3.fromRGB(255, 80, 80)
title.Size = UDim2.new(0, 180, 0, 15)
title.Position = UDim2.new(0, 10, 0, 160)
title.BackgroundTransparency = 1
title.TextXAlignment = Enum.TextXAlignment.Center
title.Parent = main

-- Buttons Container
local buttonFrame = Instance.new("Frame")
buttonFrame.Size = UDim2.new(0, 280, 0, 230)
buttonFrame.Position = UDim2.new(0, 200, 0, 10)
buttonFrame.BackgroundTransparency = 1
buttonFrame.Parent = main

local buttonY = 0
local function createButton(text, callback)
	local btn = Instance.new("TextButton")
	btn.Size = UDim2.new(0, 270, 0, 25)
	btn.Position = UDim2.new(0, 5, 0, buttonY)
	btn.BackgroundColor3 = Color3.fromRGB(60, 0, 0)
	btn.TextColor3 = Color3.fromRGB(255, 80, 80)
	btn.Font = Enum.Font.SourceSansBold
	btn.TextSize = 14
	btn.Text = text
	btn.Parent = buttonFrame
	btn.MouseButton1Click:Connect(callback)
	buttonY = buttonY + 30
end

-- Buttons with their functionalities
createButton("Kill Player", function()
	local name = targetBox.Text
	local target = Players:FindFirstChild(name)
	if target and target.Character then
		target.Character:BreakJoints()
	end
end)

createButton("Teleport to Player", function()
	local name = targetBox.Text
	local target = Players:FindFirstChild(name)
	if target and target.Character and character then
		character:PivotTo(target.Character:GetPivot())
	end
end)

createButton("Speed Hack", function()
	character:WaitForChild("Humanoid").WalkSpeed = 100
end)

createButton("ESP", function()
	-- Remove any previous ESP
	for _, plr in pairs(Players:GetPlayers()) do
		if plr.Character and plr.Character:FindFirstChild("ESP") then
			plr.Character.ESP:Destroy()
		end
	end

	-- Apply ESP to all players, including the local player
	for _, plr in pairs(Players:GetPlayers()) do
		if plr.Character then
			local highlight = Instance.new("Highlight")
			highlight.FillColor = Color3.new(1, 0, 0)
			highlight.OutlineColor = Color3.new(1, 1, 1)
			highlight.DepthMode = Enum.HighlightDepthMode.AlwaysOnTop
			highlight.Name = "ESP"
			highlight.Parent = plr.Character
		end
	end
end)

createButton("Fly", function()
	local hrp = character:FindFirstChild("HumanoidRootPart")
	if not hrp then return end
	flying = not flying
	if flying then
		bodyGyro = Instance.new("BodyGyro", hrp)
		bodyGyro.P = 9e4
		bodyGyro.MaxTorque = Vector3.new(9e9, 9e9, 9e9)
		bodyGyro.CFrame = hrp.CFrame
		bodyVel = Instance.new("BodyVelocity", hrp)
		bodyVel.Velocity = Vector3.zero
		bodyVel.MaxForce = Vector3.new(9e9, 9e9, 9e9)
		UIS.InputBegan:Connect(function(input, gp)
			if gp then return end
			if input.KeyCode == Enum.KeyCode.W then
				while flying do
					bodyVel.Velocity = workspace.CurrentCamera.CFrame.lookVector * 50
					bodyGyro.CFrame = workspace.CurrentCamera.CFrame
					task.wait()
				end
			end
		end)
	else
		if bodyGyro then bodyGyro:Destroy() end
		if bodyVel then bodyVel:Destroy() end
	end
end)

createButton("Decal Spam", function()
	-- Continuously spam decals on all parts in the game
	local function addDecalToParts()
		for _, part in pairs(Workspace:GetDescendants()) do
			if part:IsA("BasePart") and not part:FindFirstChild("DecalSpam") then
				local decal = Instance.new("Decal")
				decal.Texture = "rbxassetid://139478747999611"
				decal.Name = "DecalSpam"  -- Naming decal to avoid duplicates
				decal.Parent = part
			end
		end
	end

	-- Run every 0.1 seconds to ensure new parts get decals
	while true do
		addDecalToParts()
		wait(0.1)
	end
end)

createButton("Theme Switch", function()
	local currentTheme = title.TextColor3
	local nextTheme = nil
	for themeName, t in pairs(themes) do
		if t.text == currentTheme then
			-- Cycle to the next theme
			local themeList = {"Dark Red", "Neon Blue", "Toxic Green", "Void", "Midnight"}
			local index = table.find(themeList, themeName)
			nextTheme = themeList[(index % #themeList) + 1]
			break
		end
	end

	if nextTheme then
		local theme = themes[nextTheme]
		main.BackgroundColor3 = theme.bg
		title.TextColor3 = theme.text
		targetBox.BackgroundColor3 = theme.btn
		targetBox.TextColor3 = Color3.new(1,1,1)
		for _, b in ipairs(buttonFrame:GetChildren()) do
			if b:IsA("TextButton") then
				b.BackgroundColor3 = theme.btn
				b.TextColor3 = theme.text
			end
		end
	end
end)

-- Freeze Player button
createButton("Freeze Player", function()
	local name = targetBox.Text
	local target = Players:FindFirstChild(name)
	if target and target.Character then
		local humanoid = target.Character:FindFirstChild("Humanoid")
		if humanoid then
			humanoid.PlatformStand = true
		end
	end
end)

-- Fling Player button
createButton("Fling Player", function()
	local name = targetBox.Text
	local target = Players:FindFirstChild(name)
	if target and target.Character then
		local humanoidRootPart = target.Character:FindFirstChild("HumanoidRootPart")
		if humanoidRootPart then
			local fling = Instance.new("BodyVelocity")
			fling.Velocity = Vector3.new(math.random(-100, 100), 100, math.random(-100, 100))
			fling.MaxForce = Vector3.new(100000, 100000, 100000)
			fling.Parent = humanoidRootPart
			wait(0.1)
			fling:Destroy()
		end
	end
end)

-- Explode All (Including Me) button
createButton("Explode All (Including Me)", function()
	-- Explode all players, including the local player
	for _, plr in pairs(Players:GetPlayers()) do
		if plr.Character and plr.Character:FindFirstChild("HumanoidRootPart") then
			local boom = Instance.new("Explosion")
			boom.BlastRadius = 10
			boom.BlastPressure = 5000000000
			boom.Position = plr.Character.HumanoidRootPart.Position
			boom.Parent = Workspace
		end
	end
end)