local gui = script.Parent:WaitForChild("Gui")
local explorerGui = script.Parent:WaitForChild("ExplorerGui")
local explorer = gui:WaitForChild("Explorer")
local diver = gui:WaitForChild("Diver")
local astronaut = gui:WaitForChild("Astronaut")
local chooseAdventure = gui:WaitForChild("ChooseAdventure")
local explorerLabel = gui:WaitForChild("ExplorerLabel")
local diverLabel = gui:WaitForChild("DiverLabel")
local astronautLabel = gui:WaitForChild("AstronautLabel")
local areYouSureLabel = gui:WaitForChild("AreYouSureLabel")
local yesButton = gui:WaitForChild("YesButton")
local noButton = gui:WaitForChild("NoButton")
local storyLabel = explorerGui:WaitForChild("StoryLabel")

explorer.MouseButton1Click:Connect(function()
    explorer.Visible = false
    diver.Visible= false
    astronaut.Visible = false
    chooseAdventure.Visible = false
    explorerLabel.Visible = false
    diverLabel.Visible = false
    astronautLabel.Visible = false
    areYouSureLabel.Visible = true
    yesButton.Visible = true
    noButton.Visible = true
end)

diver.MouseButton1Click:Connect(function()
    explorer.Visible = false
    diver.Visible= false
    astronaut.Visible = false
    chooseAdventure.Visible = false
    explorerLabel.Visible = false
    diverLabel.Visible = false
    astronautLabel.Visible = false
    areYouSureLabel.Visible = true
    yesButton.Visible = true
    noButton.Visible = true
end)

astronaut.MouseButton1Click:Connect(function()
    explorer.Visible = false
    diver.Visible= false
    astronaut.Visible = false
    chooseAdventure.Visible = false
    explorerLabel.Visible = false
    diverLabel.Visible = false
    astronautLabel.Visible = false
    areYouSureLabel.Visible = true
    yesButton.Visible = true
    noButton.Visible = true
end)

yesButton.MouseButton1Click:Connect(function()
    areYouSureLabel.Visible = false
    yesButton.Visible = false
    noButton.Visible = false
    storyLabel.Visible = true
    wait(3)
    while storyLabel.TextTransparency > 0 do
        storyLabel.TextTransparency = storyLabel.TextTransparency - 0.1
        wait(0.1)
    end
    wait(10)
    while storyLabel.TextTransparency < 1 do
        storyLabel.TextTransparency = storyLabel.TextTransparency + 0.1
        wait(0.1)
    end
    storyLabel.Visible = false
end)

noButton.MouseButton1Click:Connect(function()
    areYouSureLabel.Visible = false
    yesButton.Visible = false
    noButton.Visible = false
    explorer.Visible = true
    diver.Visible = true
    astronaut.Visible = true
    explorerLabel.Visible = true
    diverLabel.Visible = true
    astronautLabel.Visible = true
    chooseAdventure.Visible = true
end)