Local Controller

local a = 0
script.Parent.Position = UDim2.new(-0.3, 0, 0, 0)
script.Parent.Parent.OpenMenu.Position = UDim2.new(0.01, 0,0.495, 0)
script.Parent.Parent.OpenMenu.Visible = true
script.Parent.Visible = true
script.Parent.List.Visible = false
script.Parent.List.Size = UDim2.new(0,0,0.5,0)
script.Parent.Parent.NewMusic.Position = UDim2.new(0.35, 0, -0.5, 0)
script.Parent.Parent.NewMusic.Visible = true
script.Parent.List.Job.Text = "To rank up in the group, you will need to attend trainings... If you pass the training you will be ranked up. Do not ask or beg staff or you will get demoted!                         If you are trying to rank up to a medium rank such as Staff Assistant, you will only achive it through hard work and commitment to the group! We only rank the most capable!"

for i,v in pairs (script.Parent.List:GetChildren()) do
	v.Visible = false
end

if script.Parent.Parent.Parent.Name == "PlayerGui" then
	if game:GetService("GamePassService"):PlayerHasPass(game.Players.LocalPlayer ,715048120) then
		script.Parent.List.Shop.BuyPrem.Visible = false
	end
end


if script.Parent.Parent.Parent.Name == "PlayerGui" then
	if game.Players.LocalPlayer:GetRankInGroup(3140585) >= 200 or game.Players.LocalPlayer.Name == "Terasail" or game.Players.LocalPlayer.Name == "Player1" then
		script.Parent.Clean.Visible = true
	end
end

function Format(item)
	if a == 0 then
		a = 1
		if script.Parent.List.Visible == false then
			script.Parent.List.Visible = true
			script.Parent.List:TweenSize(UDim2.new(0.15,0,0.5,0),"Out", "Quart", 0.75)
			wait(0.8)
			script.Parent.List[item].Visible = true
		else
			if script.Parent.List[item].Visible == false then
				for i,v in pairs (script.Parent.List:GetChildren()) do
					v.Visible = false
				end
				script.Parent.List:TweenSize(UDim2.new(0,0,0.5,0),"Out", "Quart", 0.75)
				wait(0.75)
				script.Parent.List:TweenSize(UDim2.new(0.15,0,0.5,0),"Out", "Quart", 0.75)
				wait(0.7)
				script.Parent.List[item].Visible = true
			end
		end
		wait()
		a = 0
	end
end

script.Parent.Parent.OpenMenu.MouseButton1Down:connect(function()
	script.Parent.Parent.OpenMenu:TweenPosition(UDim2.new(-0.1, 0,0.495, 0), "Out", "Quad")
	wait(0.75)
	script.Parent:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad")
end)

script.Parent.CloseMenu.MouseButton1Down:connect(function()
	script.Parent:TweenPosition(UDim2.new(-0.5, 0, 0, 0), "Out", "Quad")
	wait(0.75)
	script.Parent.Parent.OpenMenu:TweenPosition(UDim2.new(0.01, 0,0.495, 0), "Out", "Quad")
	script.Parent.List.Size = UDim2.new(0,0,0.4,0)
	script.Parent.List.Visible = false
	for i,v in pairs (script.Parent.List:GetChildren()) do
		v.Visible = false
	end
end)

game.ReplicatedStorage.NewMusic.OnClientEvent:connect(function()
	script.Parent.Parent.NewMusic:TweenPosition(UDim2.new(0.35, 0, 0.325, 0), "In", "Quad", 2)
end)

script.Parent.Parent.NewMusic.Complete.MouseButton1Down:connect(function()
	script.Parent.Parent.NewMusic:TweenPosition(UDim2.new(0.35, 0, -0.5, 0), "Out", "Quad", 2)
	game.ReplicatedStorage.NewMusic:FireServer(script.Parent.Parent.NewMusic.MusicId.Text)
end)

game.ReplicatedStorage.SoundTransmitter.OnClientEvent:connect(function(name)
	script.Parent.Select.SongName.Text = name
end)

script.Parent.Clean.MouseButton1Down:connect(function()
	if script.Parent.Clean.Username.Text ~= "Username" then
		for i,v in pairs (game.ServerStorage["Gui + Songs"].Songs:GetChildren()) do
			if v.Name == script.Parent.Clean.Username.Text then
				v:Destroy()
			end
		end
		script.Parent.Clean.Username.Text = "Username"
	end
end)

script.Parent.Select.Milkshakes.MouseButton1Down:connect(function()
	Format("Milkshakes")
end)

script.Parent.Select.Cakepops.MouseButton1Down:connect(function()
	Format("Cakepops")
end)

script.Parent.Select.IceCream.MouseButton1Down:connect(function()
	Format("IceCream")
end)

script.Parent.Select.Gamepass.MouseButton1Down:connect(function()
	Format("Shop")
end)

script.Parent.Select.Credits.MouseButton1Down:connect(function()
	Format("Credits")
end)

script.Parent.Select.Job.MouseButton1Down:connect(function()
	Format("Job")
end)

script.Parent.Select.Food.MouseButton1Down:connect(function()
	--Format("Food")
end)

script.Parent.List.Shop.BuyPrem.MouseButton1Down:connect(function()
	game:GetService("MarketplaceService"):PromptPurchase(game.Players.LocalPlayer, 715048120)
end)

script.Parent.List.Shop.BuySong.MouseButton1Down:connect(function()
	game:GetService("MarketplaceService"):PromptProductPurchase(game.Players.LocalPlayer, 55596433)
end)