Transparency, CanCollide and Teleport LocalScript not working?

Hello! I'm making a Musical Statues game, and my LocalScript will not work, which is very much required for the game. I've had a go at it myself using all the knowledge I know so far..

local message = game.Players.LocalPlayer["PlayerGui"].Message.TextLabel local floor = game.Workspace.Area["Floor"]

while true do if message.Text == "FREEZE! (0)" then floor.Transparency = 0.1 floor.CanCollide = false end if message.Text == "DANCE!" then floor.Transparency = 0 floor.CanCollide = true end

if message.Text == "Congratulations! You won!" then
	floor.Touched:connect(function(hit)
		if hit.Parent:FindFirstChild('Humanoid') then
			hit.Parent.Torso.CFrame = CFrame.new(213, 30.5, -23)
			wait()
			script.Parent["Win Script(W/ Sound)"].Disabled = false
			wait(3)
			script.Parent["Win Script(W/ Sound)"].Disabled = true
		end
	end)
end

end

but when the TextLabel.Text = FREEZE! (0) the floor won't go Transparent and the CanCollide won't turn off, same with the DANCE! except the floor just stays the same (Because the above didn't work) and the CanCollide is on.

The script location is: game.StarterPlayer.StarterPlayerScripts.GameScript(local script)