home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / ACASH_2.DMS / in.adf / ACash_Install < prev    next >
Encoding:
Text File  |  1994-10-31  |  3.9 KB  |  208 lines
  1. ; AChash Professional V1.00 Installer
  2. ; All Rights reserved by the Markovic&Hexel GnbR
  3. ;
  4.  
  5. (welcome "AChash Professional V1.00 Installer")
  6.  
  7. (message
  8.    "\nAChash Professional V1.00 Installer\n\n"
  9.    "All Rights reserved by Markovic&Hexel GnbR\n"
  10.    "\n"
  11.    "Vertrieb:\n"
  12.    "Stefan Ossowskis Schatztruhe\n"
  13.    "Gesellschaft fuer Software mbH\n"
  14.    "Veronikastr. 33 - 45131 Essen\n"
  15.    "Germany\n\n"
  16.    "Tel. ++49-201-788778\n"
  17.    "Fax  ++49-201-798447\n"
  18.    
  19. )
  20.  
  21. (complete 0)
  22.  
  23. (set osversion (/ (getversion) 65536))
  24.  
  25. (set dirname
  26.    (askdir
  27.       (prompt "In welches Verzeichnis wollen Sie ACashPro installieren?")
  28.       (disk)
  29.       (newpath)
  30.       (help @askdir-help)
  31.       (default "WORK:")
  32.     )
  33. )
  34.  
  35. (set outdir      (tackon dirname "ACash"   ))
  36. (set outdir_cata (tackon outdir  "Catalogs"))
  37. (set outdir_mod  (tackon outdir  "Module"  ))
  38. (set outdir_ids  (tackon outdir  "IDS"     ))
  39. (set outdir_rexx (tackon outdir  "Rexx"    ))
  40.  
  41. (makedir outdir
  42.    (prompt "Das Verzeichnis " outdir " wird erzeugt...")
  43.    (help @makedir-help)
  44.    (infos)
  45. )
  46.  
  47. (makedir outdir_cata
  48.    (prompt "Das Verzeichnis " outdir_cata " wird erzeugt...")
  49.    (help @makedir-help)
  50. )
  51.  
  52. (makedir outdir_mod
  53.    (prompt "Das Verzeichnis " outdir_mod " wird erzeugt...")
  54.    (help @makedir-help)
  55. )
  56.  
  57. (makedir outdir_ids
  58.    (prompt "Das Verzeichnis " outdir_ids " wird erzeugt...")
  59.    (help @makedir-help)
  60. )
  61.  
  62. (makedir outdir_rexx
  63.    (prompt "Das Verzeichnis " outdir_rexx " wird erzeugt...")
  64.    (help @makedir-help)
  65.    (infos)
  66. )
  67.  
  68. (askdisk
  69.    (prompt "Bitte legen Sie Diskette 1 des Programmpakets ein!")
  70.    (help @askdisk-help)
  71.    (dest "ACash1")
  72. )
  73.  
  74. (complete 5)
  75.  
  76. (copyfiles
  77.    (prompt "Kopiere Dateien nach " outdir_cata ".")
  78.    (help @copyfiles-help)
  79.    (source "ACash1:catalogs")
  80.    (dest outdir_cata)
  81.    (all)
  82. )
  83.  
  84. (complete 15)
  85.  
  86. (copyfiles
  87.    (prompt "Kopiere Dateien nach " outdir_ids ".")
  88.    (help @copyfiles-help)
  89.    (source "ACash1:IDS")
  90.    (dest outdir_ids)
  91.    (all)
  92. )
  93.  
  94. (complete 20)
  95.  
  96. (copyfiles
  97.    (prompt "Kopiere Dateien nach " outdir_mod ".")
  98.    (help @copyfiles-help)
  99.    (source "ACash1:Module")
  100.    (dest outdir_mod)
  101.    (all)
  102. )
  103.  
  104. (complete 35)
  105.  
  106. (copyfiles
  107.    (prompt "Kopiere Dateien nach " outdir_rexx ".")
  108.    (help @copyfiles-help)
  109.    (source "ACash1:Rexx")
  110.    (dest outdir_rexx)
  111.    (all)
  112. )
  113.  
  114. (complete 40)
  115.  
  116. (copyfiles
  117.    (prompt "Kopiere Dateien nach " outdir ".")
  118.    (help @copyfiles-help)
  119.    (source "ACash1:")
  120.    (pattern "ACash.ReadMe#?")
  121.    (dest outdir)
  122. )
  123.  
  124. (complete 45)
  125.  
  126. (copyfiles
  127.    (prompt "Kopiere Dateien nach ENV")
  128.    (help @copyfiles-help)
  129.    (source "ACash1:ENVARC")
  130.    (dest "ENV:")
  131.    (all)
  132.    (files)
  133. )
  134.  
  135. (complete 47)
  136.  
  137. (copyfiles
  138.    (prompt "Kopiere Dateien nach ENVARC")
  139.    (help @copyfiles-help)
  140.    (source "ACash1:ENVARC")
  141.    (dest "ENVARC:")
  142.    (all)
  143.    (files)
  144. )
  145.  
  146. (complete 50)
  147.  
  148. (if (>= osversion 39)
  149.    (
  150.       (copyfiles
  151.          (prompt "Kopiere Dateien nach " outdir ".")
  152.          (help @copyfiles-help)
  153.          (source "ACash1:")
  154.          (pattern "ACashPro#?")
  155.          (dest outdir)
  156.       )
  157.  
  158.       (askdisk
  159.          (prompt "Bitte legen Sie Diskette 2 des Programmpakets ein!")
  160.          (help @askdisk-help)
  161.          (dest "ACash2")
  162.       )
  163.    )
  164.    (
  165.       (askdisk
  166.          (prompt "Bitte legen Sie Diskette 2 des Programmpakets ein!")
  167.          (help @askdisk-help)
  168.          (dest "ACash2")
  169.       )
  170.  
  171.       (copyfiles
  172.          (prompt "Kopiere Dateien nach " outdir ".")
  173.          (help @copyfiles-help)
  174.          (source "ACash2:AmigaOS2")
  175.          (pattern "ACashPro#?")
  176.          (dest outdir)
  177.       )
  178.    )
  179. )
  180.  
  181. (complete 85)
  182.  
  183. (copyfiles
  184.    (prompt "Kopiere Dateien nach " outdir ".")
  185.    (help @copyfiles-help)
  186.    (source "ACash2:")
  187.    (pattern "ACash.guide#?")
  188.    (dest outdir)
  189. )
  190.  
  191. (complete 100)
  192.  
  193. (message
  194.    "\nInstallation erfolgreich beendet!!\n\n"
  195.    "Kontaktadresse:\n"
  196.    "Markovic&Hexel GnbR\n"
  197.    "Canongasse 14/9\n"
  198.    "A-1180 Wien\n"
  199.    "Austria\n\n"
  200.    "Copyright 1994 by Markovic&Hexel GnbR\n"
  201.    "Individuelle Softwarelösungen\n"
  202. )
  203.  
  204. (exit (quiet))
  205.  
  206. (abort "Installation von ACashPro V1.0 beendet!")
  207.  
  208.