PROC main:
  PRINT "a  ->",ASC("a")
  PRINT "97 ->",CHR$(97)
  GET
ENDP