home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 9 Archive / 09-Archive.zip / zipme13.zip / english.zip / install.cmd next >
OS/2 REXX Batch file  |  1996-06-14  |  3KB  |  73 lines
  1. /* REXX program to install ZiPMe */
  2.  
  3. Call rxfuncadd sysloadfuncs, rexxutil, sysloadfuncs
  4. Call sysloadfuncs
  5.  
  6. Call SysCls
  7.  
  8. say "                       Welcome to the ZiPMe installer."
  9. say ""
  10. say "This program will do the following:"
  11. say ""
  12. say "It will create a desktop folder with a program object for ZiPMe, a template"
  13. say "for ZIP files, and an object for the Readme file. The ZiPMe Object will be"
  14. say "associated to all *.ZIP files, so you can double-click on a ZIP file to"
  15. say "automatically start ZiPMe and load this ZIP file. With the a template, which"
  16. say "you can move into your Templates folder, you can create new ZIP files in a"
  17. say "document-centric way."
  18. say ""
  19.  
  20. say "Should I continue? (Y/N)"
  21. PARSE PULL reply
  22. if reply = "N" | reply = "n" then exit
  23.  
  24. curdir = Directory()
  25.  
  26. Error = 0
  27.  
  28. if SysCreateObject("WPFolder", "ZiPMe", "<WP_DESKTOP>", "OBJECTID=<ZIPME_FOLDER>") then
  29.   say "ZiPMe Folder created ..."
  30. else do
  31.   say "Could not create ZiPMe folder!"
  32.   Error = 1
  33. end
  34.  
  35. if SysCreateObject("WPProgram", "ZiPMe", "<ZIPME_FOLDER>", "EXENAME="curdir"\ZIPME.EXE;STARTUPDIR="curdir";ASSOCFILTER=*.ZIP") then
  36.   say "ZiPMe Program Object created ..."
  37. else do
  38.   say "Could not create ZiPMe Program Object!"
  39.   Error = 1
  40. end
  41.  
  42. if SysCreateObject("WPProgram", "Readme", "<ZIPME_FOLDER>", "EXENAME=e.exe;PARAMETERS="curdir"\Readme") then
  43.   say "Readme Object created ..."
  44. else do
  45.   say "Could not create Readme Object!"
  46.   Error = 1
  47. end
  48.  
  49. if SysCopyObject(""curdir"\ZIP file.ZIP", "<ZIPME_FOLDER>") then
  50.   say "ZiPMe Template created ..."
  51. else do
  52.   say "Could not create ZiPMe Template!"
  53.   Error = 1
  54. end
  55.  
  56. say ""
  57. if Error then do
  58. say "Some or all of the objects could not be automatically installed!"
  59. say "If you haven't installed the EMX runtime package yet, copy the file emx.dll,"
  60. say "which is distibuted with ZiPMe, into the directory where ZiPMe is or into a"
  61. say "directory that is specified in the LIBPATH statement in your config.sys."
  62. say "Then start ZiPMe and follow the manual install instructions in the online help."
  63. end  
  64. else do
  65. say "All objects have been installed."
  66. say "If you haven't installed the EMX runtime package yet, copy the file emx.dll,"
  67. say "which is distibuted with ZiPMe, into the directory where ZiPMe is or into a"
  68. say "directory that is specified in the LIBPATH statement in your config.sys."
  69. say "Check to be sure that zip.exe and unzip.exe are in a directory that is"
  70. say "specified in the PATH statement of your config.sys, or copy them in the"
  71. say "directory where ZiPMe is."
  72. end
  73.