RosettaCodeData/Task/Character-codes/BASIC/character-codes-4.basic

8 lines
103 B
Text
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
' ASCII
c$ = "$"
PRINT c$, ": ", ASC(c$)
' UTF-8
uc$ = "€"
PRINT uc$, ": ", UCS(uc$), ", ", UCS(c$)