home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / PROG / REXX / CMD / CODES.CMD < prev    next >
Encoding:
Text File  |  1992-12-17  |  304 b   |  12 lines
  1. /*  Returns numeric codes of Ascii letters */
  2. /*  written by Jack Petrilli  and released to the public domain */
  3. cls
  4. say " "
  5. say "Enter a letter to see it's numeric code in decimal and hex"
  6. parse pull entry
  7. a=c2d(entry)
  8. say " "
  9. say entry "= decimal "a 
  10. say " "
  11. b=d2x(a)
  12. say b "in hexadecimal"