Here is your typewriter function to use with the above snippet.
Function imgFont_typeWriter(str As String, x As Integer, y As Integer, spd As Float, n As Integer, v As Float)
Local l As Integer
Local spr As Integer
Local w As Integer
l = Len(str)
w = Sprite Width(imgFont(n).s)
If Int(v) < l
Inc v, spd
endIf
For i = 1 To v
spr = imgFont(n).s + (Asc( Mid$(str, i) )-32)
If Sprite Exist(spr)
Set Sprite Diffuse spr, imgFont(n).r, imgFont(n).g,imgFont(n).b
Set Sprite Alpha spr, imgFont(n).a
Paste Sprite spr, x+(i-1) * w, y
endIf
Next i
EndFunction vThere is always one more imbecile than you counted on.
