Setvirtualresolution(640,480)
ResetTimer()
text$="Example Text"
For i=1 to Len(text$)
Print(text$)
//Create a text object for each character of the string
Character$=Mid(text$,i,1)
//Find ASCII code for each character
Code=Asc(Character$)
CreateText(i,Character$+"="+Str(code))
SetTextSize(i,25)
//increment the text position so all text objects print down the screen.
SetTextPosition(i,10,10+i*25)
Sync()
Next i
Repeat
Until Timer()>20
End
Help make AGK better by submitting an example for this command! (All examples are subject to approval)
Setvirtualresolution(640,480) ResetTimer() text$="Example Text" For i=1 to Len(text$) Print(text$) //Create a text object for each character of the string Character$=Mid(text$,i,1) //Find ASCII code for each character Code=Asc(Character$) CreateText(i,Character$+"="+Str(code)) SetTextSize(i,25) //increment the text position so all text objects print down the screen. SetTextPosition(i,10,10+i*25) Sync() Next i Repeat Until Timer()>20 End