home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 8 Other / 08-Other.zip / pmcmd.zip / instpmcm.cmd < prev    next >
OS/2 REXX Batch file  |  1994-09-28  |  1KB  |  56 lines
  1. /* 
  2.     Lignum PMCMD v1.1 installation program. 
  3.     Copyright Lignum Oy/Ltd 1994.
  4.     All right reserved.
  5. */
  6.  
  7. call RxFuncAdd "SysLoadFuncs", "RexxUtil", "SysLoadFuncs"
  8. call SysLoadFuncs
  9.  
  10. SAY 'This is a command line program for the installation of '
  11. SAY '        Lignum PMCMD v1.1 '
  12. SAY
  13. SAY 'Checking the drive...'
  14.  
  15. dirikka=directory() /* Current directory... */
  16. drive=LEFT(dirikka,1)
  17. if drive < "C" then do
  18.     call usage
  19.     exit
  20. end
  21. SAY 'Drive OK.'
  22.  
  23. SAY 'Creating the Lignum PMCMD v1.1 program object...'
  24. /* create the program object */
  25. PMCMDOK=SysCreateObject("WPProgram", "Lignum PMCMD v1.1", "<WP_DESKTOP>", ,
  26.      "EXENAME="dirikka"\ligpmcmd.exe;PARAMETERS=-d"dirikka" -F17 -C-1 -G5;WORKINGDIRECTORY="dirikka";"||,
  27.      "ICONFILE="dirikka"\ligpmcmd.ico;OBJECTID=<HWB_LIGPMCMD>", "update")
  28. if PMCMDOk then
  29.   say "Program object for Lignum PMCMD v1.1 created successfully."
  30. else do
  31.   say "*** Could not create program object for Lignum PMCMD v1.1."
  32.   exit
  33.   end
  34.  
  35. exit
  36.  
  37.  
  38.  
  39.  
  40. /* ---------------------------------------------------------------------- */
  41. Usage: procedure
  42.  
  43. say "Run this script from hard disk and from the directory in which you"
  44. say "want to install Lignum PMCMD 1.1 program with its files. You must "
  45. say "unpacked the files to that directory first."
  46. say
  47. exit
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.