home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / injoy2_0.zip / install.cmd < prev    next >
OS/2 REXX Batch file  |  1998-09-01  |  4KB  |  43 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 Internet Dialer", "<WP_DESKTOP>", "OBJECTID=<INJOYFOLDER>;ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=NO;ICONFONT=10.Helv;BACKGROUND=" || dir || "back.bmp,T;ICONFILE=" || dir || "FOLDER.ICO", "replace"
  18. call SysCreateObject "WPFolder", "Information", "<INJOYFOLDER>", "OBJECTID=<INJOYINFOFOLDER>;ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=NO;ICONFONT=8.Helv;BACKGROUND=" || dir || "back.bmp,T", "replace"
  19. call SysCreateObject "WPFolder", "Different methods"|| d2c(10) || "of payment", "<INJOYFOLDER>", "OBJECTID=<INJOYPAYFOLDER>;ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=NO;ICONFONT=8.Helv;BACKGROUND=" || dir || "back.bmp,T", "replace"
  20. say "Creating program objects"
  21.  
  22. call SysCreateObject "WPProgram", "BMT resellers", "<INJOYPAYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "ORDER.BMT", "replace"
  23. call SysCreateObject "WPProgram", "Compuserve's" || d2c(10) ||  "SWREG feature", "<INJOYPAYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "ORDER.COM", "replace"
  24. call SysCreateObject "WPProgram", "Deutsche Bank" || d2c(10) || "money transfer", "<INJOYPAYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "ORDER.DE", "replace"
  25. call SysCreateObject "WPProgram", "Scandinavian" || d2c(10) || "registration site", "<INJOYPAYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "ORDER.SK", "replace"
  26. call SysCreateObject "WPProgram", "Payment via" || d2c(10) || "Phone/FAX (USA)", "<INJOYPAYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "ORDER.USA", "replace"
  27.  
  28.  
  29. call SysCreateObject "WPProgram", "License"  || d2c(10) || "Agreement", "<INJOYINFOFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "LICENSE.TXT", "replace"
  30. call SysCreateObject "WPProgram", "FAQ", "<INJOYINFOFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "FAQ.TXT", "replace"
  31. call SysCreateObject "WPProgram", "File_ID.DIZ", "<INJOYINFOFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "FILE_ID.DIZ", "replace"
  32. call SysCreateObject "WPProgram", "Users Guide", "<INJOYINFOFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "USERGUID.TXT", "replace"
  33. call SysCreateObject "WPProgram", "Readme", "<INJOYINFOFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "README.TXT", "replace"
  34. call SysCreateObject "WPProgram", "Readme First", "<INJOYINFOFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\"  || "README.1ST", "replace"
  35.  
  36. call SysCreateObject "WPProgram", "F/X Communications" || d2c(10) || "(www.fx.dk)", "<INJOYINFOFOLDER>", "EXENAME=NETSCAPE.EXE;PARAMETERS=" || "http://www.fx.dk", "replace"
  37.  
  38. call SysCreateObject "WPProgram", "BMT Registration" || d2c(10) || "Applet", "<INJOYFOLDER>", "EXENAME=" || dir || "PURCHASE\" || "PURCHASE.EXE;STARTUPDIR=" || dir || "purchase\" || ";ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=YES;"
  39. call SysCreateObject "WPProgram", "Get legal and" || d2c(10) || "Register", "<INJOYFOLDER>", "EXENAME=E.EXE;PARAMETERS=" || dir || "DOCS\" || "REGISTER.TXT", "replace"
  40. call SysCreateObject "WPProgram", "KillJoy", "<INJOYFOLDER>", "EXENAME=" || dir || "KILLJOY.EXE;STARTUPDIR=" || dir || ";ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=YES;"
  41. call SysCreateObject "WPProgram", "InJoy", "<INJOYFOLDER>", "EXENAME=" || dir || "IN-JOY.EXE;STARTUPDIR=" || dir || ";ICONVIEW=FLOWED,NORMAL;ALWAYSSORT=YES;"
  42. say "Installation completed - InJoy"
  43.