Efeito de digitação com AS3

[lenerafa 0]

Eu estou criando um efeito de digitação a partir de dados importados de um TXT.

Só escreve a primeira letra.

Eu gostaria que cada letra fosse digitada como uma máquina de escrever.

Se alguém puder consertar esse código eu fico muito grato

Veja:

 

frame 1 layer 1

 

System.useCodePage=true

var q:uint= 1

var url:URLRequest = new URLRequest("tarefas.txt")

var inf:URLLoader = new URLLoader()

inf.dataFormat=URLLoaderDataFormat.TEXT

inf.load(url)

inf.addEventListener(Event.COMPLETE, leiaArquivoTxt)

function leiaArquivoTxt(evento:Event):void{

var ler:String =inf.data

}

 

frame 2 layer 1

 

function leiaArquivoTxt(evento:Event):void{

if(q<inf.data.length){

lene.text=inf.data.substring(0,q)

q++

}else{

lene.text=inf.data

gotoAndPlay(7)

}

}

 

 

frame 3

 

gotoAndPlay(2)

 

layer 2

 

Dynamic Text

 

label: lene

[lenerafa 0]

ACABEI DE CONSEGUIR CONSERTAR O CÓDIGO

 

SEGUE ABAIXO

 

LAYER ACTIONS

FRAME 1

 

System.useCodePage= true

var q:Number =1

 

FRAME 2

 

var url:URLRequest= new URLRequest("SEU TEXTO.txt")

var loader:URLLoader= new URLLoader

loader.load(url)

loader.addEventListener(Event.COMPLETE, leia)

function leia (evento:Event):void {

var texto:String =loader.data

}

 

FRAME 3

 

var texto:String =loader.data

if(q<texto.length){

ler.text=texto.substring(0,q)

q++

}else{

ler.text=texto

gotoAndPlay(7)

}

 

FRAME 4

gotoAndPlay(3)

 

LAYER TEXTBOX

 

DYNAMIC TEXTBOX

LABEL : LER