home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Database / AMIGA-KONTO.dms / in.adf / HDInstall < prev    next >
Encoding:
Text File  |  1993-06-08  |  4.7 KB  |  140 lines
  1. ; Installationsskript für AmigaKonto V2.0
  2. ; erstellt für Installer V1.24, 8.6.93, Autor: Andreas Regul
  3.  
  4. ;   Copyright-Hinweise für Installer:
  5.  
  6. ;     Installer and Installer project icon
  7. ;     (c) Copyright 1991-93 Commodore-Amiga, Inc.  All Rights Reserved.
  8. ;     Reproduced and distributed under license from Commodore.
  9.  
  10. ;     INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE;
  11. ;     NO WARRANTIES ARE MADE. ALL USE IS AT YOUR OWN RISK. NO LIABILITY
  12. ;     OR RESPONSIBILITY IS ASSUMED.
  13.  
  14. (set @default-dest "SYS:")
  15. (set @user-level 2)
  16.  
  17. (set @error-msg (cat "AmigaKonto wurde nicht komplett installiert. Bitte wiederholen Sie die Installation, "
  18.                      "um eine lauffähige Version auf Ihrer Festplatte zu erhalten."))
  19.  
  20. (complete 0)
  21.  
  22. (welcome "Willkommen zur Festplatten-Installation von AmigaKonto.\n")
  23.  
  24. (set mydir
  25.           (askdir
  26.             (prompt "Bitte wählen Sie das Laufwerk für AmigaKonto")
  27.             (help "Für AmigaKonto wird ein eigenes Verzeichnis "
  28.                   "auf der Festplatte benötigt. Um dieses Verzeichnis "
  29.                   "anlegen zu können, müssen Sie hier die Festplatte "
  30.                   "angeben, auf der installiert werden soll (z.B. Work:, DH0:, etc).\n"
  31.             )
  32.             (newpath)
  33.             (default @default-dest)
  34.             (disk)
  35.           )
  36. )
  37.  
  38. (set @default-dest (tackon mydir "AmigaKonto"))
  39. (set icondir (tackon @default-dest "Icons"))
  40.  
  41. (if (NOT (exists @default-dest))
  42.          (makedir @default-dest
  43.             (prompt "Das Verzeichnis \'" @default-dest "\' wird erzeugt. Bitte \'Proceed\' anklicken.")
  44.             (confirm)
  45.             (help "Auf dem von Ihnen ausgewählten Laufwerk wird das Unterverzeichnis "
  46.                   "für AmigaKonto angelegt. Sollten Sie doch einen anderen Pfad als "
  47.                   "\'" @default-dest "\' verwenden wollen, können Sie das Installations- "
  48.                   "programm an dieser Stelle abbrechen. Beim Neustart geben Sie dann den "
  49.                   "von Ihnen gewünschten Pfad an.\n\n"
  50.                   "Als Verzeichnisname wird jedoch in jedem Fall 'AmigaKonto' verwendet.\n")
  51.             (infos)
  52.          )
  53. )
  54.  
  55. (complete 5)
  56.  
  57. (if (NOT (exists icondir))
  58.          (makedir icondir
  59.             (infos)
  60.          )
  61. )
  62.  
  63. (complete 10)
  64.  
  65. (message "Als nächstes werden die Programmdateien kopiert. Bitte \'Proceed\' anklicken, um fortzufahren.")
  66.  
  67. (set n 0)
  68. (while (set thisfile (select n "AmigaKonto:AmigaKonto" "AmigaKonto:AmigaKonto.info" ""))
  69.          ((set n (+ n 1))
  70.             (copyfiles
  71.                (prompt "Kopiere Datei \'"thisfile"\'")
  72.                (help "")
  73.                (source thisfile)
  74.                (dest @default-dest)
  75.                (optional force askuser)
  76.             )
  77.          )
  78. )
  79.  
  80. (complete 70)
  81.  
  82. (set n 0)
  83. (while (set thisfile (select n "AmigaKonto:Icons/def_drawer.info" "AmigaKonto:Icons/def_KontoProject.info"
  84.                                "AmigaKonto:Icons/def_SpecProject.info" "AmigaKonto:Icons/def_KontoTool.info" ""))
  85.          ((set n (+ n 1))
  86.             (copyfiles
  87.                (prompt "Kopiere Datei \'"thisfile"\'")
  88.                (help "")
  89.                (source thisfile)
  90.                (dest icondir)
  91.                (optional force askuser)
  92.             )
  93.          )
  94. )
  95.  
  96. (complete 80)
  97.  
  98. (set osversion (/ (getversion) 65536))
  99.  
  100. (if (< osversion 36)
  101.         (copyfiles
  102.                 (prompt "Kopiere Datei \'AmigaKonto.prefs\'")
  103.                 (help "")
  104.                 (source "AmigaKonto:AmigaKonto.prefs")
  105.                 (dest @default-dest)
  106.         )
  107.         (if (exists "ENVARC:")
  108.                 (copyfiles
  109.                         (prompt "Kopiere Datei \'AmigaKonto.prefs\'")
  110.                         (help "")
  111.                         (source "AmigaKonto:AmigaKonto.prefs")
  112.                         (dest "ENVARC:")
  113.                 )
  114.                        (copyfiles
  115.                                (prompt "Kopiere Datei \'AmigaKonto.prefs\'")
  116.                                (help "")
  117.                                (source "AmigaKonto:AmigaKonto.prefs")
  118.                                (dest @default-dest)
  119.                        )
  120.         )
  121. )
  122.  
  123. (complete 90)
  124.  
  125. (set assign (cat "Assign AmigaKonto: \"" @default-dest "\""))
  126.  
  127. (startup "AmigaKonto"
  128.          (prompt "Es wird ein Assign in der user-startup benötigt. "
  129.                  "Bitte \'Proceed\' anklicken, um hiermit fortzufahren.\n")
  130.          (help "AmigaKonto wird über das logische Laufwerk \"AmigaKonto:\" "
  131.                "angesprochen und benötigt deshalb einen Verweis auf "
  132.                "das entsprechende Festplattenverzeichnis. Dieser Verweis "
  133.                "wird beim Amiga in der Datei 'user-startup' durch einen "
  134.                "Assign-Befehl hergestellt. Diese Installation fügt den "
  135.                "benötigten Befehl selbständig ein.\n")
  136.          (command assign)
  137. )
  138.  
  139. (complete 100)
  140.