12 lines
265 B
Text
12 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
|