How do I make normal GUI dialog?

So, I have variant of dialog:

function OnClick()
    script.Parent.Text = "You talking to me?"
    script.Parent.Parent.Parent.Cont.Text = "Wait 4 sec to next msg!"
    wait(4)
    script.Parent.Text = "Oh, im suprised!"
    wait(4)
    script.Parent.Text = "No one has spoken to me for a long time!"
    wait(4)
    script.Parent.Text = "I appreciate it, so..."
    wait(4)
    script.Parent.Text = "To get to the next dimension you need to enter Lava Portal behind me."
    wait(4)
    script.Parent.Text = "Good Luck! Gonna see you in next dimension."
    wait(4)
    script.Parent.Parent.Parent.Visible = false
    end

 script.Parent.MouseButton1Click:Connect(OnClick)

But its pretty bad. I want to make so, next message will be on click, so you don't have to wait 4 seconds, but how do I do that?