How come the text of a textlabel isn't updating with the type writer effect?

Here's my script;

local Clicker = game.Workspace:WaitForChild("ClickGiver").ClickDetector
local TextString = Clicker.Parent:WaitForChild("TextString1").Value
local AddedString = Clicker.Parent:WaitForChild("AddedString").Value
local ErrorString = Clicker.Parent:WaitForChild("ErrorString").Value
local YesNoGui = game.ReplicatedStorage:WaitForChild("YesNoGui")
local YesButton = YesNoGui.YesButton
local NoButton = YesNoGui.NoButton
local TextStringLength = string.len(TextString)
local AddedStringLength = string.len(AddedString)
local ErrorStringLength = string.len(ErrorString)
local TalkGui = game.ReplicatedStorage:WaitForChild("TalkGui")
local TextDisplayer = TalkGui:WaitForChild("ChatBubble")
local YesNoGuiCloned = false
local TalkGuiCloned = false

Clicker.MouseClick:connect(function(Clicked)
    wait()
    if not TalkGuiCloned then
        local CloneTalkGui = TalkGui:Clone()
        CloneTalkGui.Parent = Clicked.PlayerGui
        print("TalkGui been cloned!")
        TalkGuiCloned = true
        for i = 1,TextStringLength do
            wait()
            TextDisplayer.Text = string.sub(TextString,1,i)
            wait()
            if not YesNoGuiCloned then
                local CloneYesNoGui = YesNoGui:Clone()
                CloneYesNoGui.Parent = Clicked.PlayerGui
                print("YesNoGui Cloned!")
            end
        end
    end
end)

No errors but the text aren't changing or working, please help!