If you mean like a letter at a time I know a easier way. TXT$="Hello G. @TXT LOCATE 0,0PRINT LEFT$(TXT$,NUM) NUM=NUM+1 WAIT 20 GOTO @TXT