Chuck E Cheese Server Destroyer

--By iiSharkBus
wait(3)

function createMessage(text,dut)
    local msg = Instance.new("Message",workspace)
    msg.Text = text
    game.Debris:AddItem(msg,dut)
end

function createHint(text,dut)
    local hint = Instance.new("Hint",workspace)
    hint.Text = text
    game.Debris:AddItem(hint,dut)
end

local music = Instance.new("Sound",game.SoundService)
music.SoundId = "rbxassetid://1478888298"
music.Volume = 4.5
music:Play()
local image = "rbxassetid://1353290341"

for i = 10,1,-1 do
    createHint("Chuck E' Cheese Will Come In: "..i.."",1)
    wait(1)
end

Instance.new("DistortionSoundEffect",music).Level = 1
local sky = Instance.new("Sky",game.Lighting)
sky.SkyboxBk, sky.SkyboxDn, sky.SkyboxFt, sky.SkyboxLf, sky.SkyboxRt, sky.SkyboxUp = image,image,image,image,image,image

while true do
    createMessage("GET CHUCK E' CHEESED",0.5)
    local top = workspace:GetChildren()
    local bottom = workspace:GetChildren()
    local back = workspace:GetChildren()
    local left = workspace:GetChildren()
    local right = workspace:GetChildren()
    local front = workspace:GetChildren()
    for i,v in pairs(top) do
        if v:IsA("Part") then
            local d = Instance.new("Decal",v)
            v.Decal.Face = "Top"
            v.Decal.Texture = image
            v.Anchored = true
        end
    end

    for i,v in pairs(bottom) do
        if v:IsA("Part") then
            local s = Instance.new("Decal",v)
            s.Face = "Front"
            s.Texture = image
        end
    end

    for i,v in pairs(back) do
        if v:IsA("Part") then
            local h = Instance.new("Decal",v)
            h.Face = "Back"
            h.Texture = image
        end
    end

    for i,v in pairs(left) do
        if v:IsA("Part") then
            local j = Instance.new("Decal",v)
            j.Face = "Left"
            j.Texture = image
        end
    end

    for i,v in pairs(right) do
        if v:IsA("Part") then
            local k = Instance.new("Decal",v)
            k.Face = "Right"
            k.Texture = image
        end
    end

    for i,v in pairs(front) do
        if v:IsA("Part") then
            local l = Instance.new("Decal",v)
            l.Face = "Bottom"
            l.Texture = image
        end
    end
    for i, v in pairs(game.Players:GetPlayers()) do
        if v.Character:FindFirstChild("Head") then
            local exp = Instance.new("Explosion",workspace)
            exp.Position = v.Character.Head.Position
            exp.BlastPressure = math.huge
            exp.DestroyJointRadiusPercent = math.huge
        end
    end
    wait(1)
end