11 lines
265 B
Text
11 lines
265 B
Text
If OpenConsole()
|
|
;Results are the same when compiled for Ascii or Unicode
|
|
charCode.c = 97
|
|
Char.s = "a"
|
|
PrintN(Chr(charCode)) ;prints a
|
|
PrintN(Str(Asc(Char))) ;prints 97
|
|
|
|
Print(#CRLF$ + #CRLF$ + "Press ENTER to exit")
|
|
Input()
|
|
CloseConsole()
|
|
EndIf
|