typer for WP8

gistfile1.txt

---------------------------------
-- Typer
local function typer(options)
    local audio      = require"gamkin.audio"
    local text       = options.text or options.target and options.target.text
    if u.empty(text) then
        text = "."
    end
    local position   = 1
    local textSpecs  = u.extend({}, options)
    textSpecs.text   = ""
    local textHolder = options.target or display.newText(textSpecs)

    local time       = options.time or 1000
    local dt         = options.dt or (time/#text)
    dt = math.max(20, dt)  -- Actual time due to fps limits
    time = dt *#text
    local ch = audio:playTyper({volume=0.5, loops=-1})
    local function cleanUp()
        textHolder.text = text
        -- if ch then
        --     audio:stop(ch)
        --     ch = nil
        -- end
        if options.onComplete then
            options.onComplete()
        end
    end
    local typeTimer = timer.performWithDelay(dt, function( ... )
        -- textHolder.text = text:sub(1, position)..(" "):rep(#text -position)
        -- if position == #text then
            cleanUp()
        -- else
        --     position = position+1
        -- end
    end, 1)

    function textHolder:complete()
        timer.cancel(typeTimer)
        cleanUp()
    end
    return textHolder
end