home *** CD-ROM | disk | FTP | other *** search
/ High Voltage Shareware / high1.zip / high1 / DIR10 / CSEDB2.ZIP / INSTALL.CMD < prev    next >
OS/2 REXX Batch file  |  1993-07-31  |  1KB  |  34 lines
  1. /* Install for CS-Edit/2 */
  2. Arg Drive
  3.  
  4. If Drive = '' Then Do
  5.     Say 'The install program needs a drive to install onto.'
  6.     Say 'Please enter the drive you would like CS-Edit/2 installed on,'
  7.     Say '<Default C:>'
  8.     valid = 0
  9.     Parse Pull Drive
  10.     If Drive = '' The Drive = 'C:'
  11.     Drive = STRIP(Drive)
  12.     If RIGHT(Drive, 1) <> ':' Then Drive = Drive || ':'
  13. End
  14. Else Drive = STRIP(Drive)
  15. Directory = '\CSEDIT2'
  16.  
  17. Say 'Making the CS-Edit/2 Directory...'
  18. Say
  19. 'MD 'Drive||Directory
  20. Say
  21. Say "PKUNZIP2'ing the CSEDIT.ZIP file. If this step fails, edit this .CMD file"
  22. Say 'and Change all occurrences of PKUNZIP2 to your unzip program.'
  23. Say
  24. 'PKUNZIP2 CSEDIT.ZIP 'Drive||Directory
  25. Say 
  26. Say 'Creating a program object for CS-Edit/2 on your desktop...'
  27. Call RxFuncAdd 'SysCreateObject', 'REXXUTIL', 'SysCreateObject'
  28. Call SysCreateObject 'WPProgram', 'CS-Edit/2', '<WP_DESKTOP>', 'EXENAME='Drive||Directory||'\CSEDIT.EXE; STARTUPDIR='Drive||Directory, 'R'
  29. If result = 1 Then 
  30.   Say 'CS-Edit/2 installed!'
  31. Else
  32.   Say 'Problem in CS-Edit/2 installation...'
  33.  
  34. Exit