home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1997 March / PCO3_97.ISO / filesbbs / os2 / injoy10a.arj / INSTALL.CMD < prev    next >
Encoding:
Text File  |  1996-12-29  |  1.7 KB  |  29 lines
  1. /*
  2.  
  3.   REXX Script to install InJoy - and create a desktop folder
  4.  
  5. */
  6.  
  7. if RxFuncQuery('SysLoadFuncs') then do
  8.    call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  9.    call SysLoadFuncs
  10. end
  11.  
  12. say "Installing..."
  13.  
  14. dir = directory() || '\'
  15.  
  16. say "Creating folder"
  17. call SysCreateObject "WPFolder", "InJoy PPP/SLIP Dialer" || d2c(10) || "Dialer Apparatus Extraordinaire", "<WP_DESKTOP>", "OBJECTID=<INJOYFOLDER>", "replace"
  18.  
  19. say "Creating program objects"
  20. call SysCreateObject "WPProgram", "KillJoy", "<INJOYFOLDER>", "EXENAME=" || dir || "KILLJOY.EXE;STARTUPDIR=" || dir || ";ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=YES;"
  21. call SysCreateObject "WPProgram", "License"  || d2c(10) || "Agreement", "<INJOYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "LICENSE.TXT", "replace"
  22. call SysCreateObject "WPProgram", "Users Guide", "<INJOYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "USERGUID.DOC", "replace"
  23. call SysCreateObject "WPProgram", "Readme", "<INJOYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "README.DOC", "replace"
  24. call SysCreateObject "WPProgram", "Readme First", "<INJOYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "README.1ST", "replace"
  25. call SysCreateObject "WPProgram", "BMT Registration" || d2c(10) || "Applet", "<INJOYFOLDER>", "EXENAME=" || dir || "PURCHASE.EXE;STARTUPDIR=" || dir || ";ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=YES;"
  26. call SysCreateObject "WPProgram", "Get legal and" || d2c(10) || "Register", "<INJOYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "REGISTER.TXT", "replace"
  27. call SysCreateObject "WPProgram", "InJoy version 1.0", "<INJOYFOLDER>", "EXENAME=" || dir || "IN-JOY.EXE;STARTUPDIR=" || dir || ";ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=YES;"
  28. say "Installation completed - InJoy"
  29.