-- Objects

local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local Speed = Instance.new("TextBox")
local Rotation = Instance.new("TextBox")
local MaxFireRate = Instance.new("TextBox")
local Cooldown = Instance.new("TextButton")
local Spread = Instance.new("TextBox")
local ReloadSpeed = Instance.new("TextBox")
local AllowedInSpawn = Instance.new("TextButton")
local InfiniteAmmo = Instance.new("TextButton")

-- Properties

ScreenGui.Parent = game.CoreGui

Frame.Parent = ScreenGui
Frame.Active = true
Frame.BackgroundColor3 = Color3.new(0.15, 0.15, 0.15)
Frame.BackgroundTransparency = 0.1
Frame.BorderColor3 = Color3.new(1, 1, 1)
Frame.Draggable = true
Frame.Position = UDim2.new(0.7, 0, 0.7, 0)
Frame.Selectable = true
Frame.Size = UDim2.new(0, 215, 0, 145)

Speed.Name = "Speed"
Speed.Parent = Frame
Speed.AnchorPoint = Vector2.new(0.5, 0)
Speed.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
Speed.BorderColor3 = Color3.new(1, 1, 1)
Speed.Position = UDim2.new(0.257, 0, 0.03, 0)
Speed.Size = UDim2.new(0, 100, 0, 30)
Speed.Font = Enum.Font.SourceSansBold
Speed.Text = "Set Speed"
Speed.TextColor3 = Color3.new(1, 1, 1)
Speed.TextSize = 14

Rotation.Name = "Rotation"
Rotation.Parent = Frame
Rotation.AnchorPoint = Vector2.new(0.5, 0)
Rotation.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
Rotation.BorderColor3 = Color3.new(1, 1, 1)
Rotation.Position = UDim2.new(0.743, 0, 0.03, 0)
Rotation.Size = UDim2.new(0, 100, 0, 30)
Rotation.Font = Enum.Font.SourceSansBold
Rotation.Text = "Set Rotation Speed"
Rotation.TextColor3 = Color3.new(1, 1, 1)
Rotation.TextSize = 13

MaxFireRate.Name = "MaxFireRate"
MaxFireRate.Parent = Frame
MaxFireRate.AnchorPoint = Vector2.new(0.5, 0)
MaxFireRate.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
MaxFireRate.BorderColor3 = Color3.new(1, 1, 1)
MaxFireRate.Position = UDim2.new(0.257, 0, 0.275, 0)
MaxFireRate.Size = UDim2.new(0, 100, 0, 30)
MaxFireRate.Font = Enum.Font.SourceSansBold
MaxFireRate.Text = "Set Max Fire Rate"
MaxFireRate.TextColor3 = Color3.new(1, 1, 1)
MaxFireRate.TextSize = 14

ReloadSpeed.Name = "ReloadSpeed"
ReloadSpeed.Parent = Frame
ReloadSpeed.AnchorPoint = Vector2.new(0.5, 0)
ReloadSpeed.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
ReloadSpeed.BorderColor3 = Color3.new(1, 1, 1)
ReloadSpeed.Position = UDim2.new(0.743, 0, 0.275, 0)
ReloadSpeed.Size = UDim2.new(0, 100, 0, 30)
ReloadSpeed.Font = Enum.Font.SourceSansBold
ReloadSpeed.Text = "Set Reload Speed"
ReloadSpeed.TextColor3 = Color3.new(1, 1, 1)
ReloadSpeed.TextSize = 14

Spread.Name = "Spread"
Spread.Parent = Frame
Spread.AnchorPoint = Vector2.new(0.5, 0)
Spread.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
Spread.BorderColor3 = Color3.new(1, 1, 1)
Spread.Position = UDim2.new(0.257, 0, 0.515, 0)
Spread.Size = UDim2.new(0, 100, 0, 30)
Spread.Font = Enum.Font.SourceSansBold
Spread.Text = "Set Weapon Spread"
Spread.TextColor3 = Color3.new(1, 1, 1)
Spread.TextSize = 13

Cooldown.Name = "Cooldown"
Cooldown.Parent = Frame
Cooldown.AnchorPoint = Vector2.new(0.5, 0)
Cooldown.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
Cooldown.BorderColor3 = Color3.new(1, 1, 1)
Cooldown.Position = UDim2.new(0.743, 0, 0.515, 0)
Cooldown.Size = UDim2.new(0, 100, 0, 30)
Cooldown.AutoButtonColor = false
Cooldown.Font = Enum.Font.SourceSansBold
Cooldown.Text = "No Ability Cooldown:\nOff"
Cooldown.TextColor3 = Color3.new(1, 1, 1)
Cooldown.TextSize = 13

AllowedInSpawn.Name = "AllowedInSpawn"
AllowedInSpawn.Parent = Frame
AllowedInSpawn.AnchorPoint = Vector2.new(0.5, 0)
AllowedInSpawn.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
AllowedInSpawn.BorderColor3 = Color3.new(1, 1, 1)
AllowedInSpawn.Position = UDim2.new(0.257, 0, 0.755, 0)
AllowedInSpawn.Size = UDim2.new(0, 100, 0, 30)
AllowedInSpawn.AutoButtonColor = false
AllowedInSpawn.Font = Enum.Font.SourceSansBold
AllowedInSpawn.Text = "Allowed In Spawn:\nOff"
AllowedInSpawn.TextColor3 = Color3.new(1, 1, 1)
AllowedInSpawn.TextSize = 14

InfiniteAmmo.Name = "InfiniteAmmo"
InfiniteAmmo.Parent = Frame
InfiniteAmmo.AnchorPoint = Vector2.new(0.5, 0)
InfiniteAmmo.BackgroundColor3 = Color3.new(0.165, 0.165, 0.165)
InfiniteAmmo.BorderColor3 = Color3.new(1, 1, 1)
InfiniteAmmo.Position = UDim2.new(0.743, 0, 0.755, 0)
InfiniteAmmo.Size = UDim2.new(0, 100, 0, 30)
InfiniteAmmo.AutoButtonColor = false
InfiniteAmmo.Font = Enum.Font.SourceSansBold
InfiniteAmmo.Text = "Infinite Ammo:\nOff"
InfiniteAmmo.TextColor3 = Color3.new(1, 1, 1)
InfiniteAmmo.TextSize = 14

game.Workspace.Tanks:WaitForChild("Tank-"..game.Players.LocalPlayer.Name)
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
InfAmmo = false
Allowed = false
AbilityCooldown = false

for i,v in pairs(Tank.AvailableAmmo:GetChildren()) do
if v.Name ~= Base then
DefaultAmmo = v.Value
end
end

Speed2 = Default
Rotation2 = Default
MaxFireRate2 = Default
Spread2 = Default
ReloadSpeed2 = Default

Speed.FocusLost:connect(function()
warn("New Tank Speed: "..Speed.Text.." studs every 1s")
Speed2 = Speed.Text
Speed.Text = "Set Speed"
end)

Rotation.FocusLost:connect(function()
warn("New Tank Rotation Speed: "..Rotation.Text.."° every 1s")
Rotation2 = Rotation.Text
Rotation.Text = "Set Rotation Speed"
end)

MaxFireRate.FocusLost:connect(function()
warn("New Max Fire Rate: 1 shot every "..MaxFireRate.Text.."s")
MaxFireRate2 = MaxFireRate.Text
MaxFireRate.Text = "Set Max Fire Rate"
end)

ReloadSpeed.FocusLost:connect(function()
warn("New Weapon Reload Speed: 1 shot every "..ReloadSpeed.Text.."s")
ReloadSpeed2 = ReloadSpeed.Text
ReloadSpeed.Text = "Set Reload Speed"
end)

Spread.FocusLost:connect(function()
warn("New Weapon Spread: "..Spread.Text.."°")
Spread2 = Spread.Text
Spread.Text = "Set Weapon Spread"
end)

Cooldown.MouseButton1Down:connect(function()
if AbilityCooldown == true then
AbilityCooldown = false
warn("No Ability Cooldown Turned Off")
Cooldown.Text = "No Ability Cooldown:\nOff"
wait(0.1)
else
AbilityCooldown = true
warn("No Ability Cooldown Turned On")
Cooldown.Text = "No Ability Cooldown:\nOn"
end
end)

AllowedInSpawn.MouseButton1Down:connect(function()
if Allowed == true then
Allowed = false
warn("Always Allowed in Spawn Area Turned Off")
AllowedInSpawn.Text = "Allowed In Spawn:\nOff"
else
Allowed = true
warn("Always Allowed in Spawn Area Turned On")
AllowedInSpawn.Text = "Allowed In Spawn:\nOn"
end
end)

InfiniteAmmo.MouseButton1Down:connect(function()
if InfAmmo == true then
InfAmmo = false
warn("Infinite Ammo Turned Off")
InfiniteAmmo.Text = "Infinite Ammo:\nOff"
wait(0.1)
Tank.Settings.LoadedShots.Value = 0
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
for i,v in pairs(Tank.AvailableAmmo:GetChildren()) do
if v.Name ~= Base then
v.Value = DefaultAmmo
end
end
for i,v in pairs(Tank.AvailableAmmo:GetChildren()) do
if v.Name ~= Base then
DefaultAmmo = v.Value
end
end
if game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main:FindFirstChild("ControllerHUD_0") then
for i,v in pairs(game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main.ControllerHUD_0:GetChildren()) do
if v.Name ~= "Base" then
game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main.ControllerHUD_0[v.Name].Image.AmmoCount.Text = "x"..DefaultAmmo
game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main.ControllerHUD_0[v.Name].Image.AmmoCount.AmmoCount.Text = "x"..DefaultAmmo
end
end
end
else
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
for i,v in pairs(Tank.AvailableAmmo:GetChildren()) do
if v.Name ~= Base then
DefaultAmmo = v.Value
end
end
InfAmmo = true
warn("Infinite Ammo Turned On")
InfiniteAmmo.Text = "Infinite Ammo:\nOn"
end
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") and Speed2 ~= Default then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.MoveSpeed.Value = Speed2
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") and Rotation2 ~= Default then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.RotationSpeed.Value = Rotation2
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") and MaxFireRate2 ~= Default then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.MaxFireRate.Value = MaxFireRate2
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") and ReloadSpeed2 ~= Default then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.ReloadTime.Value = ReloadSpeed2
Tank.Settings.ConsecutiveReloadTime.Value = ReloadSpeed2
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") and Spread2 ~= Default then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.Spread.Value = Spread2
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.AbilityCooldownProgress.Value = 1
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") then
if Allowed == true then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.AllowedInSpawn.Value = true
end
end
wait(0.1)
end)

game:GetService('RunService').Stepped:connect(function()
if game.Workspace.Tanks:FindFirstChild("Tank-"..game.Players.LocalPlayer.Name) and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("Settings") and game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]:FindFirstChild("AvailableAmmo") then
if InfAmmo == true then
Tank = game.Workspace.Tanks["Tank-"..game.Players.LocalPlayer.Name]
Tank.Settings.LoadedShots.Value = 1e+18
for i,v in pairs(Tank.AvailableAmmo:GetChildren()) do
if v.Name ~= Base then
v.Value = 1e+18
end
end
for i,v in pairs(game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main.ControllerHUD_0:GetChildren()) do
if v.Name == "Piercing" or v.Name == "Explosive" or v.Name == "Rocket" or v.Name == "Bouncy" then
game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main.ControllerHUD_0[v.Name].Image.AmmoCount.Text = "Infinite"
game.Players.LocalPlayer.PlayerGui.MainScreen.Main.AmmoHUD.Main.ControllerHUD_0[v.Name].Image.AmmoCount.AmmoCount.Text = "Infinite"
end
end
end
end
wait(0.1)
end)