Unicode is already supported ... (came in with 1.16 or 1.18)
You just need an unicode font
You just need an unicode font
Yep. Here's an example:
' adapted from neilo's Arabic version Strict Graphics 640,480 ' Local font:TImageFont = LoadImageFont("c:\windows\fonts\cour.ttf",24) Local font:TImageFont = LoadImageFont("c:\windows\fonts\msgothic.ttf",24) SetImageFont font Local text$ = "" Local unicode:Short[8] Local nextChar:Short For Local i = 0 To 2 ' 6 To 0 Step -1 ReadData nextChar unicode[i]=nextChar Next text$=string.FromShorts(unicode,7) While Not KeyHit(KEY_ESCAPE) Cls DrawText text$,10,10 Flip Wend ' "Yamato" in katakana DefData $30e4, $30de, $30c8 ' A line of Arabic text ' DefData $0625,$0646,$0643,$0644,$064a,$0632,$064aWhich produces:
