home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / wps / progs / calc / katcalc / install.cmd next >
Encoding:
Text File  |  1990-05-13  |  698 b   |  30 lines
  1. /*
  2. ** INSTALL.CMD
  3. **
  4. ** REXX installation program. The default subdirectory to install into is
  5. ** c:\calc
  6. **
  7. ** If that's not suitable change all occurrances of c:\calc to what you
  8. ** would like it to be.
  9. */
  10. OS2:
  11.    address CMD "MD c:\calc"
  12.    address CMD "XCOPY *.* c:\calc"
  13.    address CMD "c:"
  14.    address CMD "cd calc"
  15.    address CMD "FOR %%n IN (k*.pgm) DO echo %%n >> kfiles.lst"
  16.  
  17. Begin:
  18.    filename = "kfiles.lst"
  19.    do until lines( filename) = 0
  20.       name = linein( filename)
  21.       fn = substr( name, 1, 8)
  22.       ea = fn
  23.       cmdstr = "EAUTIL "fn".PGM "ea".EA /J"
  24.       address CMD cmdstr
  25.    end
  26.    address CMD "del *.ea"
  27.    address CMD "del kfiles.lst"
  28. exit
  29.  
  30.