' ASCII
c$ = "$"
PRINT c$, ": ", ASC(c$)

' UTF-8
uc$ = "€"
PRINT uc$, ": ", UCS(uc$), ", ", UCS(c$)