If OpenConsole() ;UTF-8 encoding compiled for Unicode (UCS-2) charCode.c = 960 Char.s = "π" PrintN(Chr(charCode)) ;prints π PrintN(Str(Asc(Char))) ;prints 960 Print(#CRLF$ + #CRLF$ + "Press ENTER to exit") Input() CloseConsole() EndIf