home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 18 REXX / 18-REXX.zip / CODES.CMD < prev    next >
OS/2 REXX Batch file  |  1992-12-12  |  304b  |  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"