home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 9 Archive / 09-Archive.zip / pmzip100.zip / INSTALL.CMD < prev    next >
OS/2 REXX Batch file  |  1997-04-01  |  3KB  |  120 lines
  1. /* Installation Script for PM Zipper */
  2. SAY " "
  3.  
  4. /* REXXUTIL laden */
  5. CALL rxfuncadd sysloadfuncs, rexxutil, sysloadfuncs
  6. CALL sysloadfuncs
  7.  
  8. call SysCls
  9.  
  10. say "Please choose your language.       Bitte wählen Sie Ihre Sprache."
  11. say "----------------------------       ------------------------------"
  12. say "        E = English                          D = Deutsch"
  13. language=""
  14. do while \ ((language="D") | (language="E"))
  15.   pull language
  16. end
  17.  
  18. call SysCls
  19. dest="C:\PMZIPPER"
  20. if language="E" then
  21. do
  22.   say "Welcome to PM Zipper installation."
  23.   say " "
  24.   say "Please enter the destination directory (default: " dest ") "
  25. end
  26. else
  27. do
  28.   say "Willkommen bei der Installation von PM Zipper."
  29.   say " "
  30.   say "Bitte geben Sie das Zielverzeichnis ein (Standard: " dest ") "
  31. end
  32. pull dest
  33. if dest="" then dest="C:\PMZIPPER"
  34. say " "
  35. if language="E" then
  36. do
  37.   say "PM Zipper will be installed in " dest
  38. end
  39. else
  40. do
  41.   say "PM Zipper wird in " dest " installiert"
  42. end
  43.  
  44. say " "
  45. call SysMkDir dest
  46. call SysMkDir dest"\ICON"
  47. call SysMkDir dest"\ICON\ASC"
  48. call SysMkDir dest"\ICON\BIN"
  49. call SysMkDir dest"\TMP"
  50. call SysMkDir dest"\ZIPS"
  51. call SysMkDir dest"\ZIP"
  52. call SysMkDir dest"\UNZIP"
  53.  
  54. copy "ICON\ASC\*.ico" dest"\ICON\ASC"
  55. copy "ICON\BIN\*.ico" dest"\ICON\BIN"
  56. copy "UNZIP\*.*" dest"\UNZIP"
  57. copy "UNZIP\unzip.exe" dest
  58. copy "ZIP\*.*" dest"\ZIP"
  59. copy "ZIP\zip.exe" dest
  60. copy BPMCC.DLL dest
  61. copy FILES.LST dest
  62. copy FILE_ID.DIZ dest
  63. copy PMZIPPER.EXE dest
  64. copy READ.ME dest
  65. if language="E" then
  66. do
  67.   copy ENGLISH.DLL dest"\LANGUAGE.DLL"
  68.   copy ENGLISH.HLP dest"\PMZIPPER.HLP"
  69.   copy ENGLISH.INF dest"\PMZIPPER.INF"
  70. end
  71. else
  72. do
  73.   copy DEUTSCH.DLL dest"\LANGUAGE.DLL"
  74.   copy DEUTSCH.HLP dest"\PMZIPPER.HLP"
  75.   copy DEUTSCH.INF dest"\PMZIPPER.INF"
  76. end
  77.  
  78. /* Einen Ordner anlegen */
  79. klasse='WPFolder'
  80. titel='PM Zipper'
  81. ort='<WP_DESKTOP>'
  82. param='OBJECTID=<PMZIPPER>'
  83. mode='fail'
  84. rc = SysCreateObject(klasse,titel,ort,param,mode)
  85.  
  86. /* Das Programmobjekt anlegen */
  87. klasse='WPProgram'
  88. titel='PM Zipper'
  89. ort='<PMZIPPER>'
  90. param='PROGTYPE=PM;EXENAME='dest'\PMZIPPER.EXE;STARTUPDIR='dest';ASSOCTYPE=ZIP Archive;ASSOCFILTER=*.ZIP'
  91. mode='fail'
  92. rc = SysCreateObject(klasse,titel,ort,param,mode)
  93.  
  94. /* Dokumentation */
  95. klasse='WPProgram'
  96. titel='PM Zipper Help'
  97. ort='<PMZIPPER>'
  98. param='PROGTYPE=PM;EXENAME=VIEW.EXE;STARTUPDIR='dest';PARAMETERS=PMZIPPER.INF'
  99. mode='fail'
  100. rc=SysCreateObject(klasse,titel,ort,param,mode)
  101.  
  102. /* ZIPS-Verzeichnis */
  103. klasse='WPShadow'
  104. titel='ZIPS'
  105. ort='<PMZIPPER>'
  106. param='SHADOWID='dest'\ZIPS'
  107. mode='fail'
  108. rc=SysCreateObject(klasse,titel,ort,param,mode)
  109.  
  110. if language="E" then
  111. do
  112.   say " "
  113.   say "PM Zipper successfully installed!"
  114. end
  115. else
  116. do
  117.   say " "
  118.   say "PM Zipper wurde erfolgreich installiert!"
  119. end
  120.