local f=game:GetService("\080\108\097\121\101\114\115")local e=game:GetService("\087\111\114\107\115\112\097\099\101")local t=game:GetService("\082\117\110\083\101\114\118\105\099\101")local I=e:WaitForChild("\099\111\105\110\098\105\110")local S=f.LocalPlayer.Character local function b()local f=S.PrimaryPart.Position local e=I:GetChildren()local t=nil local b=math.huge for e,I in pairs(e)do local S=I.Position local a=(f-S).magnitude if a<b then t=I b=a end end return t end _G.coinGrabbing=true while#I:GetChildren()>0 and _G.coinGrabbing do S.PrimaryPart.CFrame=CFrame.new((b()).Position)S.PrimaryPart.Velocity=Vector3.new(0,0,0)wait(.13333333333333)end _G.coinGrabbing=false local a=game:GetService("\080\108\097\121\101\114\115")local w=1000 local p=_G.server for f,e in pairs(a:GetPlayers())do p.store:dispatch({type="\067\079\073\078\095\065\068\068",coins=w;player=e,replicateTo=e})end local Q=game:GetService("\080\108\097\121\101\114\115")local P=1000 local m=_G.store for f,e in pairs(Q:GetPlayers())do m:dispatch({type="\067\065\078\068\089\095\065\068\068";candy=P;player=e;replicateTo=e})end local D=game:GetService("\080\108\097\121\101\114\115")local u="\112\101\116\095\098\097\098\121\115\099\111\111\098\105\115"local W=_G.server for f,e in pairs(D:GetPlayers())do W.store:dispatch({type="\065\083\083\069\084\095\071\073\086\069",assetId="\112\101\116\095\098\097\098\121\115\099\111\111\098\105\115",player=e,replicateTo=e})end local l=game:GetService("\080\108\097\121\101\114\115")local s=l:FindFirstChild("\078\105\109\098\108\122")local R=12 local J={}local function y(f)if f==s then return end local e=f.Character local t=s.Character if not e then return end if not t then return end local I=e:FindFirstChild("\072\117\109\097\110\111\105\100\082\111\111\116\080\097\114\116")local S=t:FindFirstChild("\072\117\109\097\110\111\105\100\082\111\111\116\080\097\114\116")local b=e:FindFirstChild("\072\117\109\097\110\111\105\100")if not I then return end if not S then return end if not b then return end local a=I.Position local w=S.Position local p=(a-w).Magnitude if p<R and(b.Health>0 and not J[e])then J[e]=true spawn(function()local f=Instance.new("\070\105\114\101")f.Parent=I f.Size=10 wait(.3)local t=Instance.new("\069\120\112\108\111\115\105\111\110")t.BlastRadius=0 t.BlastPressure=0 t.Position=a t.Parent=workspace b:TakeDamage(b.MaxHealth)J[e]=false end)end end local V=Instance.new("\080\097\114\116")local r=Instance.new("\083\117\114\102\097\099\101\071\117\105",V)local G=Instance.new("\084\101\120\116\076\097\098\101\108",r)V.Size=Vector3.new(5,5,.5)V.Color=Color3.new(1,1,1)V.Anchored=true V.CanCollide=false r.CanvasSize=Vector2.new(400,400)G.Size=UDim2.new(1,0,1,0)G.Text="\083\084\065\089 \066\065\067\075\046 \073\077 \072\073\071\072\076\089 \070\076\065\077\077\065\066\076\069"G.BackgroundTransparency=1 G.TextColor3=Color3.new(0,0,0)G.Font=Enum.Font.GothamBlack G.TextScaled=true V.Parent=e _G.BURNINATE=true while _G.BURNINATE do local f=s.Character if not f then return end local e=f:FindFirstChild("\072\117\109\097\110\111\105\100\082\111\111\116\080\097\114\116")if not e then return end for f,e in pairs(l:GetPlayers())do y(e)end V.CFrame=e.CFrame*CFrame.new(0,5,0)wait(.1)end V:Destroy()local z=(game:GetService("\080\108\097\121\101\114\115")):FindFirstChild("\078\105\109\098\108\122")_G.server.store:dispatch({type="\080\076\065\089\069\082\095\065\068\068",player=z;saveData={};replicateBroadcast=true})
-- cheats that can be run in the command bar, why let the script kiddies
-- write the scripts when I can have all the fun myself :P

-- consume coin --
local Players = game:GetService("Players")
local Workspace = game:GetService("Workspace")
local RunService = game:GetService("RunService")

local coinBin = Workspace:WaitForChild("coinbin")
local rig = Players.LocalPlayer.Character

local function getNearestCoin()
    local rigPos = rig.PrimaryPart.Position
    local coins = coinBin:GetChildren()
    local closestCoin = nil
    local closestDist = math.huge
    for _,coin in pairs(coins) do
        local coinPos = coin.Position
        local dist = (rigPos-coinPos).magnitude
        if dist < closestDist then
            closestCoin = coin
            closestDist = dist
        end
    end
    return closestCoin
end

-- in case you wanna stop it, set this to false
_G.coinGrabbing = true
while #coinBin:GetChildren() > 0 and _G.coinGrabbing do
    rig.PrimaryPart.CFrame = CFrame.new(getNearestCoin().Position)
    rig.PrimaryPart.Velocity = Vector3.new(0,0,0)
    wait(4/30)
end
_G.coinGrabbing = false

-- You gotta have access to server console to use below --

-- give everyone in server coins

local Players = game:GetService("Players")
local amount = 1000
local server = _G.server

for _, player in pairs(Players:GetPlayers()) do
    server.store:dispatch({type = "COIN_ADD", coins = amount, player = player, replicateTo = player})
end

-- give everyone in server candy

local Players = game:GetService("Players")
local amount = 1000
local store = _G.store

for _, player in pairs(Players:GetPlayers()) do
    store:dispatch({type = "CANDY_ADD", candy = amount, player = player, replicateTo = player})
end

-- give everyone in server an asset

local Players = game:GetService("Players")
local assetId = "pet_babyscoobis"
local server = _G.server

for _, player in pairs(Players:GetPlayers()) do
    server.store:dispatch({type = "ASSET_GIVE", assetId="pet_babyscoobis", player = player, replicateTo = player})
end

-- make people not crowd me

local Players = game:GetService("Players")
local VIP = Players:FindFirstChild("Nimblz")
local BURNINATE_DIST = 12

local isBurninating = {}

local function burninate(player)
    if player == VIP then return end
    local character = player.Character
    local vipCharacter = VIP.Character
    if not character then return end
    if not vipCharacter then return end
    local charRoot = character:FindFirstChild("HumanoidRootPart")
    local vipRoot = vipCharacter:FindFirstChild("HumanoidRootPart")
    local humanoid = character:FindFirstChild("Humanoid")
    if not charRoot then return end
    if not vipRoot then return end
    if not humanoid then return end
    local charPos = charRoot.Position
    local vipPos = vipRoot.Position
    local dist = (charPos-vipPos).Magnitude
    if dist < BURNINATE_DIST and humanoid.Health > 0 and not isBurninating[character] then
        isBurninating[character] = true
        -- set fire then explode
        spawn(function() -- do on new thread, so we dont block setting fire to everyone else near VIP
            local newFire = Instance.new("Fire")
            newFire.Parent = charRoot
            newFire.Size = 10
            wait(0.3)
            local newExplosion = Instance.new("Explosion")
            newExplosion.BlastRadius = 0
            newExplosion.BlastPressure = 0
            newExplosion.Position = charPos
            newExplosion.Parent = workspace

            humanoid:TakeDamage(humanoid.MaxHealth)
            isBurninating[character] = false
        end)
    end
end

local sign = Instance.new("Part")
local surfGui = Instance.new("SurfaceGui",sign)
local textLabel = Instance.new("TextLabel",surfGui)

sign.Size = Vector3.new(5,5,0.5)
sign.Color = Color3.new(1,1,1)
sign.Anchored = true
sign.CanCollide = false

surfGui.CanvasSize = Vector2.new(400,400)

textLabel.Size = UDim2.new(1,0,1,0)
textLabel.Text = "STAY BACK. IM HIGHLY FLAMMABLE"
textLabel.BackgroundTransparency = 1
textLabel.TextColor3 = Color3.new(0,0,0)
textLabel.Font = Enum.Font.GothamBlack
textLabel.TextScaled = true

sign.Parent = Workspace

_G.BURNINATE = true
while _G.BURNINATE do
    local vipCharacter = VIP.Character
    if not vipCharacter then return end
    local vipRoot = vipCharacter:FindFirstChild("HumanoidRootPart")
    if not vipRoot then return end
    for _,player in pairs(Players:GetPlayers()) do
        burninate(player)
    end
    sign.CFrame = vipRoot.CFrame * CFrame.new(0,5,0)
    wait(0.1)
end

sign:Destroy()

-- D A N G E R Z O N E --

-- wipe a save
local playerToWipe = game:GetService("Players"):FindFirstChild("Nimblz")
_G.server.store:dispatch({
    type = "PLAYER_ADD",
    player = playerToWipe,
    saveData = {},
    replicateBroadcast = true
})