Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- :D
- local plr = game.Players.LocalPlayer
- local char = plr.Character
- local plrgui = plr.PlayerGui
- local cam = game.Workspace.CurrentCamera
- local gui = Instance.new("ScreenGui")
- gui.Parent = plrgui
- local frame = Instance.new('Frame',gui)
- frame.Size = UDim2.new(0,242,0,100)
- local textbox = Instance.new('TextBox',frame)
- textbox.TextScaled = true
- textbox.Size = UDim2.new(1,0,1,0)
- textbox.Font = ("SourceSans")
- textbox.Text = ("Music ID Here")
- local button = Instance.new('TextButton',frame)
- button.TextScaled = true
- button.Size = UDim2.new(1,0,1,0)
- button.Font = ("SourceSans")
- button.Text = ("Play")
- button.Position = UDim2.new(0,0,1,0)
- local textbox2 = Instance.new('TextBox',frame)
- textbox2.Text = ("1")
- textbox2.Size = UDim2.new(1,0,1,0)
- textbox2.TextScaled = true
- textbox2.Font = ("SourceSans")
- textbox2.Position = UDim2.new(1,0,1,0)
- local label = Instance.new('TextLabel',frame)
- label.Text = ("Control Pitch")
- label.Size = UDim2.new(1,0,1,0)
- label.TextScaled = true
- label.Font = ("SourceSans")
- label.Position = UDim2.new(1,0,0,0)
- local textbox3 = Instance.new('TextBox',frame)
- textbox3.Text = ("5")
- textbox3.Size = UDim2.new(1,0,1,0)
- textbox3.TextScaled = true
- textbox3.Font = ("SourceSans")
- textbox3.Position = UDim2.new(2,0,1,0)
- local label2 = Instance.new('TextLabel',frame)
- label2.Text = ("Control Volume")
- label2.Size = UDim2.new(1,0,1,0)
- label2.TextScaled = true
- label2.Font = ("SourceSans")
- label2.Position = UDim2.new(2,0,0,0)
- local music = Instance.new('Sound',gui)
- music.Looped = true
- music.Volume = 5
- music.MaxDistance = 10000
- button.MouseButton1Click:connect(function()
- music.SoundId = ("rbxassetid://"..textbox.Text)
- music:Play()
- end)
- while true do
- music.PlaybackSpeed = textbox2.Text
- music.Volume = textbox3.Text
- game:GetService('RunService').RenderStepped:wait()
- local sizer = music.PlaybackLoudness/15 + 70
- cam.FieldOfView = sizer,1,sizer
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement