script.Parent.Text = "Game"
wait(10)
script.Parent.Text = "Pilot"
wait(125)

local players = game.Players:GetChildren() --135 ("Oh no!!! Look!!!!") & Plane crashes
local Players = game:GetService("Players")
local function dialog()

	randomPlayer()
	wait(20)
	randomPlayer() --155  ("Hey, look, there's a cabin over there!")
	wait(25)
	randomPlayer() --180

	workspace.Cabin.Cabin.Door.ClickDetector.MouseClick:Connect(function(Player)
		randomPlayer() --0 ("Oh no, the door's locked!")
		wait(5)
		randomPlayer() --5 ("Maybe there's a way to break in?")
		wait(5)
		randomPlayer() --10 ("No, the door seems to be fully closed and we don't have a tool we can break the door with.")
		wait(5)
		randomPlayer() --15 ("Oh well, I guess we'll take shelter elsewhere.")
		wait(5)
		randomPlayer() --20 ("Maybe we can build a hut?")
		wait(5)
		randomPlayer() --25 ("Sounds good to me!")
		while workspace.Values.Logs.Value < 5 do
			wait()
		end
		wait(15)
		script.Parent.Text = ""
		wait(20)
		randomPlayer() --35 ("Good morning everyone!")
		wait(10)
		randomPlayer() --45 ("Let's look for food!")
		wait(10)
		randomPlayer()

		workspace.Cabin.Lever.ClickDetector.MouseClick:Connect(function()

			wait(20)
			script.Parent.Text = "Monster" --220 ("Or... Are you?")
			script.Parent.Parent.ImageLabel.Image = "http://www.roblox.com/asset/?id=3145408962" --220 (Monster)

			workspace.Cabin.Cabin.HAMMER.ClickDetector.MouseClick:Connect(function()
				wait(95)
				script.Parent.Text = "Bacon"
				script.Parent.Parent.ImageLabel.Image = "http://www.roblox.com/asset/?id=3605198507" --Bacon hair
				wait(15)
				randomPlayer()
				wait(5)
				script.Parent.Text = "Bacon" --115
				script.Parent.Parent.ImageLabel.Image = "http://www.roblox.com/asset/?id=3605198507" --Bacon hair
				wait(20)
				randomPlayer()
				wait(5)
				script.Parent.Text = "Bacon"
				script.Parent.Parent.ImageLabel.Image = "http://www.roblox.com/asset/?id=3605198507" --Bacon hair
				wait(35)
				script.Parent.Text = "Helicopter Co - Pilot" --175
				script.Parent.Parent.ImageLabel.Visible = false
				wait(5)
				randomPlayer()
				wait(5)
				script.Parent.Text = "Helicopter Pilot" --185
				wait(5)
			end)
		end)
	end)
end
dialog()
function randomPlayer()
	if #players >= 1 then
		local player1 = players[math.random(1,#Players:GetPlayers())]
		script.Parent.Text = player1.Name
		local userId = player1.UserId
		local thumbType = Enum.ThumbnailType.HeadShot
		local thumbSize = Enum.ThumbnailSize.Size420x420
		local content, isReady = Players:GetUserThumbnailAsync(userId, thumbType, thumbSize)
		local imageLabel = script.Parent.Parent.ImageLabel
		imageLabel.Image = content
		imageLabel.Size = UDim2.new(0, 78, 0, 69)
	end
end