Chill

image = "http://www.roblox.com/asset/?id=2794489492"
local ScreenGui = Instance.new("ScreenGui",owner.PlayerGui)
ScreenGui.Name = "Chill"
local asd = Instance.new("TextButton",ScreenGui)
asd.BackgroundColor3 = Color3.new(0,0,0)
asd.BorderColor3 = Color3.new(0,0,0)
asd.Name = "Chill"
asd.Position = UDim2.new(1,-150,1,-90)
asd.Size = UDim2.new(0,150,0,45)
asd.Font = "SourceSansBold"
asd.FontSize = "Size32"
asd.Text = "Chill"
asd.TextColor3 = Color3.new(255,255,255)
asd.MouseButton1Down:connect(function()
    local Chill = Instance.new("Sound",workspace)
    Chill.Looped = true
    Chill.Volume = 10
    Chill.SoundId = "http://www.roblox.com/asset/?id=2834969263"
    Chill:Play()
    while true do
        local Sky = Instance.new("Sky",game.Lighting)
        Sky.SkyboxBk = image
        Sky.SkyboxDn = image
        Sky.SkyboxFt = image
        Sky.SkyboxLf = image
        Sky.SkyboxRt = image
        Sky.SkyboxUp = image
        local Point1 = Vector3.new(-2500,-10,-2500)
        local Point2 = Vector3.new(2500,2500,2000)
        local Region = Region3.new(Point1,Point2)
        for _,Part in pairs(game.Workspace:FindPartsInRegion3(Region,nil,math.huge)) do
            Part.CFrame = CFrame.new(0,0,0)
            if Part.Transparency <= 0.5 then
                Part.Transparency = 0.5
            end
            game:GetService("Chat"):Chat(Part,"Still Chill","Red")
        end
        wait(0.1)
    end
end)