TimedTextboxEvent that let's waits for textboxes being dismissed and let's the user cancel them

gistfile1.txt

TimedTextboxEvent = {}
TimedTextboxEvent.__index = TimedTextboxEvent
function TimedTextboxEvent:Create(box, time)
    local this =
    {
        mTextbox = box,
        mCountDown = time
    }
    setmetatable(this, self)
    return this
end

function TimedTextboxEvent:Update(dt, storyboard)
    self.mCountDown = self.mCountDown - dt
    if self.mCountDown <= 0 then
        self.mTextbox:OnClick()
    end
end
function TimedTextboxEvent:Render() end

function TimedTextboxEvent:IsBlocking()
    return self.mCountDown > 0 or
           not self.mTextbox:IsDead()
end

function TimedTextboxEvent:IsFinished()
    return  self.mTextbox:IsDead() or
            not self:IsBlocking()
end