-- Base Upgrade Spam GUI
local RS = game:GetService("ReplicatedStorage")
local UIS = game:GetService("UserInputService")
local TweenService = game:GetService("TweenService")
local Signals = RS.Signals
local toggleStates = {}
local loopCount = 50

pcall(function() game:GetService("CoreGui").BaseSpam:Destroy() end)

local gui = Instance.new("ScreenGui")
gui.Name = "BaseSpam"
gui.ResetOnSpawn = false
gui.Parent = game:GetService("CoreGui")

local mainFrame = Instance.new("Frame")
mainFrame.Size = UDim2.new(0, 210, 0, 300)
mainFrame.Position = UDim2.new(0.5, -105, 0, 20)
mainFrame.BackgroundColor3 = Color3.fromRGB(20, 20, 30)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true
mainFrame.ClipsDescendants = true
mainFrame.Parent = gui
Instance.new("UICorner", mainFrame).CornerRadius = UDim.new(0, 10)
local stroke = Instance.new("UIStroke", mainFrame)
stroke.Color = Color3.fromRGB(100, 60, 200)
stroke.Thickness = 1.5

-- Drag
local dragging, dragStart, startPos
mainFrame.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1
		or input.UserInputType == Enum.UserInputType.Touch then
		dragging = true
		dragStart = input.Position
		startPos = mainFrame.Position
		input.Changed:Connect(function()
			if input.UserInputState == Enum.UserInputState.End then dragging = false end
		end)
	end
end)
UIS.InputChanged:Connect(function(input)
	if dragging and (input.UserInputType == Enum.UserInputType.MouseMovement
		or input.UserInputType == Enum.UserInputType.Touch) then
		local delta = input.Position - dragStart
		mainFrame.Position = UDim2.new(
			startPos.X.Scale, startPos.X.Offset + delta.X,
			startPos.Y.Scale, startPos.Y.Offset + delta.Y
		)
	end
end)

-- Title bar
local titleBar = Instance.new("Frame", mainFrame)
titleBar.Size = UDim2.new(1, 0, 0, 28)
titleBar.BackgroundColor3 = Color3.fromRGB(60, 30, 120)
titleBar.BorderSizePixel = 0
Instance.new("UICorner", titleBar).CornerRadius = UDim.new(0, 10)

local title = Instance.new("TextLabel", titleBar)
title.Size = UDim2.new(1, -30, 1, 0)
title.Position = UDim2.new(0, 10, 0, 0)
title.BackgroundTransparency = 1
title.Text = "Base Upgrade"
title.TextColor3 = Color3.new(1, 1, 1)
title.Font = Enum.Font.GothamBold
title.TextSize = 13
title.TextXAlignment = Enum.TextXAlignment.Left

local closeBtn = Instance.new("TextButton", titleBar)
closeBtn.Size = UDim2.new(0, 24, 0, 24)
closeBtn.Position = UDim2.new(1, -26, 0, 2)
closeBtn.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
closeBtn.Text = "X"
closeBtn.TextColor3 = Color3.new(1, 1, 1)
closeBtn.Font = Enum.Font.GothamBold
closeBtn.TextSize = 12
closeBtn.BorderSizePixel = 0
Instance.new("UICorner", closeBtn).CornerRadius = UDim.new(0, 6)
closeBtn.MouseButton1Click:Connect(function()
	for k in pairs(toggleStates) do toggleStates[k] = false end
	gui:Destroy()
end)

-- Content
local sf = Instance.new("ScrollingFrame", mainFrame)
sf.Size = UDim2.new(1, -10, 1, -34)
sf.Position = UDim2.new(0, 5, 0, 31)
sf.BackgroundTransparency = 1
sf.ScrollBarThickness = 4
sf.ScrollBarImageColor3 = Color3.fromRGB(100, 60, 200)
sf.BorderSizePixel = 0
sf.CanvasSize = UDim2.new(0, 0, 0, 0)
sf.AutomaticCanvasSize = Enum.AutomaticSize.Y
Instance.new("UIListLayout", sf).Padding = UDim.new(0, 3)

-- Loop count
local row = Instance.new("Frame", sf)
row.Size = UDim2.new(1, 0, 0, 24)
row.BackgroundTransparency = 1
local lbl = Instance.new("TextLabel", row)
lbl.Size = UDim2.new(0.45, 0, 1, 0)
lbl.BackgroundTransparency = 1
lbl.Text = " Loop/frame:"
lbl.TextColor3 = Color3.fromRGB(200, 200, 200)
lbl.TextSize = 11
lbl.Font = Enum.Font.GothamBold
lbl.TextXAlignment = Enum.TextXAlignment.Left
local box = Instance.new("TextBox", row)
box.Size = UDim2.new(0.5, 0, 1, -4)
box.Position = UDim2.new(0.5, 0, 0, 2)
box.BackgroundColor3 = Color3.fromRGB(40, 40, 55)
box.Text = "50"
box.TextColor3 = Color3.new(1, 1, 1)
box.TextSize = 11
box.Font = Enum.Font.GothamBold
box.BorderSizePixel = 0
box.ClearTextOnFocus = false
Instance.new("UICorner", box).CornerRadius = UDim.new(0, 6)
box.FocusLost:Connect(function() loopCount = tonumber(box.Text) or 50 end)

-- Toggle helper
local function tog(key, text)
	toggleStates[key] = false
	local b = Instance.new("TextButton", sf)
	b.Size = UDim2.new(1, 0, 0, 28)
	b.BackgroundColor3 = Color3.fromRGB(40, 40, 55)
	b.Text = "  " .. text .. ": OFF"
	b.TextColor3 = Color3.fromRGB(220, 220, 220)
	b.TextSize = 11
	b.Font = Enum.Font.GothamBold
	b.BorderSizePixel = 0
	b.TextXAlignment = Enum.TextXAlignment.Left
	Instance.new("UICorner", b).CornerRadius = UDim.new(0, 6)
	b.MouseButton1Click:Connect(function()
		toggleStates[key] = not toggleStates[key]
		local on = toggleStates[key]
		b.Text = "  " .. text .. ": " .. (on and "ON" or "OFF")
		TweenService:Create(b, TweenInfo.new(0.2), {
			BackgroundColor3 = on and Color3.fromRGB(60, 30, 120) or Color3.fromRGB(40, 40, 55)
		}):Play()
	end)
end

-- Button helper
local function btn(text, color, cb)
	local b = Instance.new("TextButton", sf)
	b.Size = UDim2.new(1, 0, 0, 28)
	b.BackgroundColor3 = color or Color3.fromRGB(40, 40, 55)
	b.Text = "  " .. text
	b.TextColor3 = Color3.fromRGB(220, 220, 220)
	b.TextSize = 11
	b.Font = Enum.Font.GothamBold
	b.BorderSizePixel = 0
	b.TextXAlignment = Enum.TextXAlignment.Left
	Instance.new("UICorner", b).CornerRadius = UDim.new(0, 6)
	b.MouseButton1Click:Connect(cb)
end

-- Infinity coins button
btn("GET INFINITY COINS", Color3.fromRGB(0, 130, 0), function()
	pcall(function() Signals.Surrender:FireServer() end)
	task.wait(0.5)
	Signals.ImproveBase:FireServer("Health", -9e+305)
	Signals.ImproveBase:FireServer("Damage", -9e+305)
	Signals.ImproveBase:FireServer("Production", -9e+305)
end)

-- Spam toggles
tog("health", "Spam Health")
tog("damage", "Spam Damage")
tog("production", "Spam Production")
tog("allbase", "Spam ALL")

-- Spam loop
task.spawn(function()
	while gui.Parent do
		if toggleStates.health or toggleStates.allbase then
			for i = 1, loopCount do
				pcall(function() Signals.ImproveBase:FireServer("Health") end)
			end
		end
		if toggleStates.damage or toggleStates.allbase then
			for i = 1, loopCount do
				pcall(function() Signals.ImproveBase:FireServer("Damage") end)
			end
		end
		if toggleStates.production or toggleStates.allbase then
			for i = 1, loopCount do
				pcall(function() Signals.ImproveBase:FireServer("Production") end)
			end
		end
		task.wait()
	end
end)