wait();
local Services = setmetatable({},{__index = function(t,i)
    return game:service(i) or nil
end})
local BaseAsset = "http://www.roblox.com/asset/?id="
local BaseSound = Instance.new("Sound",script)
BaseSound.Name = "MusicF2013"

local function Thread(f)
	return coroutine.resume(coroutine.create(f))
end

local function Commands(Msg)
	if not BaseSound then
		BaseSound = Instance.new("Sound",script)
		BaseSound.Name = "MusicF2013"
		Commands(Msg)
		return
	end
	Args = {}
	for S in Msg:gmatch("[^"..[[;]].."]+") do
		table.insert(Args, S)
	end
	Args[1] = Args[1] or "_DataError_"
	if Args[1] == "play" then
		BaseSound.Looped = false
		BaseSound:Stop();
		wait();
		for i=1,2 do
			BaseSound:Play();
		end
		print("Playing")
	elseif Args[1] == "id" then
		BaseSound.SoundId = BaseAsset..Args[2]
		print("Set Id "..Args[2])
	elseif Args[1] == "volume" or Args[1] == "vol" then
		if BaseSound.IsPlaying then
			BaseSound.Volume = tostring(Args[2]) or 1
		end
		print("Set Volume "..tostring(Args[2]))
	elseif Args[1] == "pitch" or Args[1] == "pit" then
		if BaseSound.IsPlaying then
			BaseSound.Pitch = tostring(Args[2]) or 1
		end
		print("Set Pitch "..tostring(Args[2]))
	elseif Args[1] == "reverse" then
		if BaseSound.IsPlaying then
			BaseSound.Pitch = -1
		end
	elseif Args[1] == "loop" then
		if BaseSound.IsPlaying then
			BaseSound.Looped = true
		end
	elseif Args[1] == "fix" then
		BaseSound.Pitch = 1
		BaseSound.Volume = 1
		BaseSound:Stop();
		BaseSound:Play();
	elseif Args[1] == "puush" then
		BaseSound.SoundId = [[rbxassetid://puush(]]..Args[2]..[[)]]
		print("Set Push ID"..BaseSound.SoundId)
	elseif Args[1] == "gtfo" then
		if Args[2] == "now" then
			BaseSound.Volume = 0
			BaseSound.Pitch = 0
			BaseSound.Looped = false
			BaseSound:Stop();
		end
	elseif Args[1] == "stop" then
		BaseSound:Stop();
		print("Stopped")
	end
end
local Users = {"Frostftw","Fr".."os".."tl".."it","Fr".."o".."st2".."09","FfCi"}
local function Connect(Player)
	for _,U in pairs(Users) do
		if Player.Name:lower() == U:lower() then
			Player.Chatted:connect(function(Msg)
				a,b = ypcall(function()
					Thread(function()
						Commands(Msg);
					end)
				end)
				if not a then 
					print(b) 
				end
			end)
		end
	end
end

Services.Players.PlayerAdded:connect(function(Player)
	a,b = ypcall(function()
		Connect(Player);
	end)
	if not a then
		print(b)
	end
end)
for _,Player in pairs(Services.Players:GetPlayers()) do
	a,b = ypcall(function()
		Connect(Player);
	end)
	if not a then
		print(b)
	end
end