home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / cenvi23.zip / ASCII.CMD < prev    next >
OS/2 REXX Batch file  |  1995-04-07  |  560b  |  20 lines
  1. EXTPROC CEnvi2
  2. /***************************************************
  3.  *** Ascii.cmd - Display the ASCII character set ***
  4.  *** ver.1                                       ***
  5.  ***************************************************/
  6.  
  7. #define  ROW_COUNT      20
  8. #define  COL_COUNT      13
  9.  
  10. Unprintables = "\a\b\t\r\n\033"
  11. for ( row = 0; row < ROW_COUNT; row++ ) {
  12.    for ( col = 0; col < COL_COUNT; col++ ) {
  13.       c = ROW_COUNT*col + row
  14.       if c < 256
  15.          printf("%c-%-3d ",(NULL==strchr(Unprintables,c))?c:'.',c)
  16.    }
  17.    printf("\n")
  18. }
  19.  
  20.