satanic stuff

while wait() do
for _, v in pairs(workspace:GetChildren()) do
    if v:IsA("BasePart") then
    v.Anchored = false
    end
    end

for i,c in pairs(game:GetDescendants()) do
    c.Name = "HAHAHAHAHAHH SATAN BITCHES"
end

for i,m in pairs(workspace:GetDescendants()) do
    if m:IsA("Part") then
        local p = Instance.new("ParticleEmitter", m)
        p.Texture = "38458191"
    end
end
    game.Lighting.Ambient=Color3.new(1,0,0)
    game.Lighting.FogEnd=20;
    game.Lighting.FogColor=Color3.new(0,0,0);
    game.Lighting.TimeOfDay = 12

    local a = Instance.new('Sky')
    a.Name = 'Satnic Shit'
    a.Parent = game.Lighting
    id = 38458191
    a.SkyboxBk = "http://www.roblox.com/asset/?id="..id..""
    a.SkyboxDn = "http://www.roblox.com/asset/?id="..id..""
    a.SkyboxFt = "http://www.roblox.com/asset/?id="..id..""
    a.SkyboxLf = "http://www.roblox.com/asset/?id="..id..""
    a.SkyboxRt = "http://www.roblox.com/asset/?id="..id..""
    a.SkyboxUp = "http://www.roblox.com/asset/?id="..id..""


local MusicID = 257700196 --replace number with a sound id
local MusicPitch = 0.8


print("forcing audio")

local IN = Instance.new

local Frame_Speed = 60

local ArtificialHB = IN("BindableEvent", script)
ArtificialHB.Name = "Heartbeat"

script:WaitForChild("Heartbeat")

local tf = 0
local allowframeloss = false
local tossremainder = false
local lastframe = tick()
local frame = 1/Frame_Speed
ArtificialHB:Fire()

game:GetService("RunService").Heartbeat:connect(function(s, p)
    tf = tf + s
    if tf >= frame then
        if allowframeloss then
            script.Heartbeat:Fire()
            lastframe = tick()
        else
            for i = 1, math.floor(tf / frame) do
                ArtificialHB:Fire()
            end
            lastframe = tick()
        end
        if tossremainder then
            tf = 0
        else
            tf = tf - frame * math.floor(tf / frame)
        end
    end
end)

function swait(num)
    if num == 0 or num == nil then
        ArtificialHB.Event:wait()
    else
        for i = 0, num do
            ArtificialHB.Event:wait()
        end
    end
end

local S = setmetatable({},{__index = function(s,i) return game:service(i) end})
local Plrs = S.Players
local Plr = Plrs.LocalPlayer
local Char = Plr.Character

function Sound(parent,id,pitch,volume,looped,effect,autoPlay)
    local Sound = IN("Sound")
    Sound.SoundId = "rbxassetid://".. tostring(id or 0)
    Sound.Pitch = pitch or 1
    Sound.Volume = volume or 1
    Sound.Looped = looped or false
    if(autoPlay)then
        coroutine.wrap(function()
            repeat wait() until Sound.IsLoaded
            Sound.Playing = autoPlay or false
        end)()
    end
    if(not looped and effect)then
        Sound.Ended:connect(function()
            Sound.Volume = 0
            Sound:destroy()
        end)
    elseif(effect)then
        warn("Sound can't be looped and a sound effect!")
    end
    Sound.Parent =parent or Torso
    return Sound
end

local Music = Sound(game.Workspace,MusicID,MusicPitch,1,true,false,true)
Music.Name = 'Music'


while true do
    swait()
    if(not Music or not Music.Parent)then
    print("deleted")
        local a = Music.TimePosition
        Music = Sound(game.Workspace,MusicID,MusicPitch,2,true,false,true)
        Music.Name = 'Music'
        Music.TimePosition = a
    end
end
    end