(AGK version: 108.14)

Submitted: 2013-06-25 02:32:34

Setvirtualresolution(640,480)
ResetTimer()

CreateText(1,"Example Text")
SetTextSize(1,25)
SetTextPosition(1,0,100)

Repeat
    For n=0 to GetTextLength(1)
        For y=0 to 100
            SetTextCharY(1,n,y)
            Sync()
        Next y
    Next n
Until Timer()>12
End

Help make AGK better by submitting an example for this command!
(All examples are subject to approval)