U need something like this?
Place the characters in the .bmp file by ascii value order
Const wtext=8 Const htext=12 Global characters=LoadAnimImage("filewithtext.bmp",wtext,htext,32) Function text2(a,b,towrite$) For c=1 To Len(towrite) DrawImage characters,a+(c-1)*wtext,b,Asc(Mid(towrite,c,1)) Next End Function
Place the characters in the .bmp file by ascii value order