Penis Music Roblox (Server Sided Script)

local soundEffectsEnabled = true -- toggles whether or not distortion, equalizer, and chorus sound effects can be applied
local chorusEffectsEnabled = true -- toggles the chorus sound effects, soundEffectsEnabled must be true
local sunMoonEffectsEnabled = true -- toggles whether or not the sun and moon will have a seizure
local seizureEffectsEnabled = true -- toggles whether or not you will have a seizure

local useSmoothChanges = true -- toggles if the sun and moon will warp to random places, if true then uses smoooth movement
local smoothSpeed = 0.05 -- the speed of smooth movement

-----------------------------------

if workspace:FindFirstChild("Random") then
    workspace.Random:Destroy()
end
if workspace:FindFirstChild("Speed") then
    workspace.Speed:Destroy()
end
if workspace:FindFirstChild("PP music loop") then
    workspace["PP music loop"]:Destroy()
end

local model = Instance.new("Model", workspace)
model.Name = "PP music loop"

local rd = Instance.new("BoolValue", workspace)
rd.Name = "Random"
rd.Value = not useSmoothChanges
local sp = Instance.new("NumberValue", workspace)
sp.Name = "Speed"
sp.Value = smoothSpeed

local soundGroup = Instance.new("SoundGroup", model)
soundGroup.Name = "PP"
soundGroup.Volume = 2

if soundEffectsEnabled then
    Instance.new("DistortionSoundEffect", soundGroup).Level = 0.5
    local equ = Instance.new("EqualizerSoundEffect", soundGroup)
    equ.LowGain = 10
    equ.MidGain = 0
end
if chorusEffectsEnabled then
    Instance.new("ChorusSoundEffect", soundGroup)
    Instance.new("ChorusSoundEffect", soundGroup)
end
--loop
local music = Instance.new("Sound", model)
music.Name = "pp music"
music.SoundGroup = soundEffectsEnabled and soundGroup or nil
music.SoundId = "rbxassetid://4708555401"
music.Looped = true
local intro = Instance.new("Sound", model)
intro.Name = "PP Music"
intro.SoundGroup = soundEffectsEnabled and soundGroup or nil
intro.SoundId = "rbxassetid://4981521805"
intro.Playing = true
wait(2.75)
intro.Playing = false
intro.TimePosition = 0
music:Play()
if sunMoonEffectsEnabled then
    spawn(function()
        --lighting
        local min, max = 6, 18
        local iter = true
        local t = 0
        local latseed = math.random()
        local closeed = math.random()

        game["Run Service"].Heartbeat:Connect(function()
            if workspace.Random.Value then
                game.Lighting.GeographicLatitude = math.random(-90, 90)
                game.Lighting.ClockTime = math.random(min, max)
            else
                game.Lighting.GeographicLatitude = math.noise(t, t, latseed) * 180
                game.Lighting.ClockTime = (iter and 12 or 24) + math.noise(t, t, closeed) * 12
            end
            t += workspace.Speed.Value
        end)

        while true do
            if workspace.Random.Value then
                if iter then
                    min, max = 6, 18
                    iter = false
                else
                    min, max = 18, 30
                    iter = true
                end
            else
                iter = not iter
            end
            wait(2.746)
        end
    end)
end

if seizureEffectsEnabled then
    game.Lighting.Ambient = Color3.fromRGB(138, 138, 138)
    game.Lighting.Brightness = 2
    game.Lighting.EnvironmentDiffuseScale = 0
    game.Lighting.EnvironmentSpecularScale = 0
    game.Lighting.GlobalShadows = true
    game.Lighting.OutdoorAmbient = Color3.fromRGB(128, 128, 128)
    game.Lighting.ClockTime = 14
    game.Lighting.GeographicLatitude = 999999
    game.Lighting.ExposureCompensation = 0
    game.Lighting:ClearAllChildren()

    local atm = Instance.new("Atmosphere", game.Lighting)
    atm.Density = 0.395
    atm.Offset = 0
    atm.Color = Color3.fromRGB(199, 170, 107)
    atm.Decay = Color3.fromRGB(92, 60, 13)
    atm.Glare = 0
    atm.Haze = 0

    local sky = Instance.new("Sky", game.Lighting)
    sky.MoonAngularSize = 60
    sky.SunAngularSize = 60
    sky.StarCount = 5000

    local blo = Instance.new("BloomEffect", game.Lighting)
    blo.Intensity = 1
    blo.Threshold = 2

    Instance.new("BlurEffect", game.Lighting).Size = 1

    Instance.new("ColorCorrectionEffect", game.Lighting)

    local sun = Instance.new("SunRaysEffect", game.Lighting)
    sun.Intensity = math.huge
    sun.Spread = math.huge

    game.Players.PlayerAdded:Connect(function(v)
        game.InsertService:LoadAsset(6212712834):WaitForChild("LocalScript").Parent = workspace:WaitForChild(v.Name)
    end)

    for i,v in pairs(game.Players:GetPlayers()) do
        game.InsertService:LoadAsset(6212712834):WaitForChild("LocalScript").Parent = workspace:WaitForChild(v.Name)
    end
end

if soundEffectsEnabled then
    game.Players.PlayerAdded:Connect(function(v)
        game.InsertService:LoadAsset(6212755603):WaitForChild("ScreenGui").Parent = v:WaitForChild("PlayerGui")
    end)
    for i,v in pairs(game.Players:GetPlayers()) do
        game.InsertService:LoadAsset(6212755603):WaitForChild("ScreenGui").Parent = v:WaitForChild("PlayerGui")
    end
end