wait(0.001);
script:ClearAllChildren();
script.Parent=nil;
wait()
p = game.Players.LocalPlayer
m = p:GetMouse()
current_icon = m.Icon
gui = Instance.new'ScreenGui'
fr = Instance.new'Frame'
fr.Parent = gui
fr.Draggable = true
fr.Active = true
fr.Name = "Main frame"
fr.BorderSizePixel = 0
fr.BackgroundColor3 = BrickColor.new("Bright blue").Color
fr.Size = UDim2.new(0.4,0,0.3,0)
top = Instance.new'Frame'
top.Parent = fr
top.Name = "Top frame"
top.BorderSizePixel = 0
top.Size = UDim2.new(1,0,0.1,0)
top.BackgroundColor3 = BrickColor.new("Cyan").Color
ttxt = Instance.new'TextLabel'
ttxt.Parent = top
ttxt.Name = "Top text label"
ttxt.Size=UDim2.new(1,0,1,0)
ttxt.Text = "Welcome to music player by aleksa12432"
ttxt.TextColor = BrickColor.new("Bright blue")
ttxt.TextStrokeTransparency = 0
ttxt.BackgroundTransparency = 1
tb = Instance.new'TextBox'
tb.Parent = fr
tb.Name = "Song id text box"
tb.TextScaled = true
tb.TextStrokeTransparency = 0
tb.TextColor = BrickColor.new("Cyan")
tb.Font = "Legacy"
tb.FontSize = "Size18"
tb.BackgroundTransparency = 1
tb.Draggable = false
tb.Text = "Type song id here"
tb.Active = true
tb.Size = UDim2.new(.5,0,.9,0)
tb.Position = UDim2.new(0,0,.1,0)
play = Instance.new'TextButton'
play.Parent = fr
play.Name = "Play button"
play.BackgroundColor3 = BrickColor.new("Lime green").Color
play.Text = "Play song"
play.BorderSizePixel = 0
play.Size = UDim2.new(.5,0,.4,0)
play.Position = UDim2.new(.5,0,.1,0)
stop = Instance.new'TextButton'
stop.Parent = fr
stop.Name = "Stop button"
stop.BackgroundColor3 = BrickColor.new("Bright red").Color
stop.Text = "Stop song"
stop.BorderSizePixel = 0
stop.Size = UDim2.new(.5,0,.4,0)
stop.Position = UDim2.new(.5,0,.6,0)
pitch = Instance.new'TextBox'
pitch.Parent = fr
pitch.Name = "Pitch box"
pitch.Text = "Set pitch"
pitch.BackgroundColor3 = BrickColor.new("New Yeller").Color
pitch.BorderSizePixel = 0
pitch.Size = UDim2.new(0.1,0,0.1,0)
pitch.Position = UDim2.new(0.9,0,0.5,0)
volume = Instance.new'TextBox'
volume.Parent = fr
volume.Name = "Volume box"
volume.Text = "Set volume"
volume.BackgroundColor3 = BrickColor.new("New Yeller").Color
volume.BorderSizePixel = 0
volume.Size = UDim2.new(0.1,0,0.1,0)
volume.Position = UDim2.new(0.79,0,0.5,0)
looped = Instance.new'TextButton'
looped.Parent = fr
looped.TextScaled = true
looped.Name = "Looped button"
looped.Text = "Looped: true"
looped.BackgroundColor3 = BrickColor.new("New Yeller").Color
looped.BorderSizePixel = 0
looped.Size = UDim2.new(0.1,0,0.1,0)
looped.Position = UDim2.new(0.68,0,0.5,0)
private = Instance.new'TextButton'
private.Parent = fr
private.TextScaled = true
private.Name = "Private button"
private.Text = "Private: false"
private.BackgroundColor3 = BrickColor.new("New Yeller").Color
private.BorderSizePixel = 0
private.Size = UDim2.new(0.1,0,0.1,0)
private.Position = UDim2.new(0.57,0,0.5,0)
gc = gui:Clone()
gc.Parent = p.PlayerGui
played = {}
IsLooped = true
SoundParent = workspace
sound = Instance.new("Sound", SoundParent)
sound.Looped = IsLooped
game:service'RunService'.RenderStepped:connect(function()
	if sound ~= nil and sound.Parent ~= SoundParent then
		sound.Parent = SoundParent
	end
	if sound == nil or sound.Parent ~= SoundParent then
		sound = Instance.new("Sound",SoundParent)
		sound.Looped = IsLooped
	end
	if gc == nil or gc.Parent ~= p.PlayerGui then 
		pcall(function()
			gc = gui:Clone()
			gc.Parent = p.PlayerGui
			gc["Main frame"]["Play button"].MouseButton1Down:connect(function()
				sound.Looped = IsLooped
				sound.Volume = tonumber(gc["Main frame"]["Volume box"].Text) or 0.5
				sound.Pitch = tonumber(gc["Main frame"]["Pitch box"].Text) or 1
				sound.SoundId = "http://www.roblox.com/asset/?id="..gc["Main frame"]["Song id text box"].Text
				gc["Main frame"]["Song id text box"].Text = "Type song id here"
				gc["Main frame"]["Volume box"].Text = "Set volume"
				gc["Main frame"]["Pitch box"].Text = "Set pitch"
				if played[gc["Main frame"]["Song id text box"]] then
					sound:Play()
				else
					for i = 0,10 do
						sound:Play()
						wait()
						sound:Stop()
						wait()
						sound:Play()
					end
					played[#played+1] = gc["Main frame"]["Song id text box"]
				end
			end)
			gc["Main frame"]["Stop button"].MouseButton1Down:connect(function()
				sound:Stop()
			end)
			gc["Main frame"]["Looped button"].MouseButton1Down:connect(function()
				if gc == nil or gc.Parent ~= p.PlayerGui or p.PlayerGui == nil then return end
				if gc["Main frame"]["Looped button"].Text == "Looped: true" then
					gc["Main frame"]["Looped button"].Text = "Looped: false"
					IsLooped = false
				else
					gc["Main frame"]["Looped button"].Text = "Looped: true"
					IsLooped = true
				end
			end)
			gc["Main frame"]["Private button"].MouseButton1Down:connect(function()
				if gc == nil or gc.Parent ~= p.PlayerGui or p.PlayerGui == nil then return end
				if gc["Main frame"]["Private button"].Text == "Private: true" then
					gc["Main frame"]["Private button"].Text = "Private: false"
					SoundParent = workspace
				else
					gc["Main frame"]["Private button"].Text = "Private: true"
					SoundParent = workspace.CurrentCamera
				end
			end)
		end)
	end
end)
gc["Main frame"]["Play button"].MouseButton1Down:connect(function()
	if gc == nil or gc.Parent ~= p.PlayerGui or p.PlayerGui == nil then return end
	sound.Looped = IsLooped
	sound.Volume = tonumber(gc["Main frame"]["Volume box"].Text) or 0.5
	sound.Pitch = tonumber(gc["Main frame"]["Pitch box"].Text) or 1
	sound.SoundId = "http://www.roblox.com/asset/?id="..gc["Main frame"]["Song id text box"].Text
	gc["Main frame"]["Song id text box"].Text = "Type song id here"
	if played[gc["Main frame"]["Song id text box"]] then
		sound:Play()
	else
		for i = 0,10 do
			sound:Play()
			wait()
			sound:Stop()
			wait()
			sound:Play()
		end
		played[#played+1] = gc["Main frame"]["Song id text box"]
	end
end)
gc["Main frame"]["Stop button"].MouseButton1Down:connect(function()
	if gc == nil or gc.Parent ~= p.PlayerGui or p.PlayerGui == nil then return end
	sound:Stop()
end)
gc["Main frame"]["Looped button"].MouseButton1Down:connect(function()
	if gc == nil or gc.Parent ~= p.PlayerGui or p.PlayerGui == nil then return end
	if gc["Main frame"]["Looped button"].Text == "Looped: true" then
		gc["Main frame"]["Looped button"].Text = "Looped: false"
		IsLooped = false
	else
		gc["Main frame"]["Looped button"].Text = "Looped: true"
		IsLooped = true
	end
end)
gc["Main frame"]["Private button"].MouseButton1Down:connect(function()
	if gc == nil or gc.Parent ~= p.PlayerGui or p.PlayerGui == nil then return end
	if gc["Main frame"]["Private button"].Text == "Private: true" then
		gc["Main frame"]["Private button"].Text = "Private: false"
		SoundParent = workspace
	else
		gc["Main frame"]["Private button"].Text = "Private: true"
		SoundParent = workspace.CurrentCamera
	end
end)