home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Database / Amiatlas / AmiAtlasProZusatzBenelux.dms / in.adf / HDInstall < prev    next >
Encoding:
Text File  |  1994-10-21  |  11.9 KB  |  296 lines
  1. ; Installationsskript für Karte [Benelux] von AmiAtlas Pro V1.2/1.3/1.4
  2. ; erstellt für Installer V1.24, 21.10.94, 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 @user-level 2)
  15. (set @language "deutsch")
  16. (set @abort-button "Installation abbrechen")
  17. (set @special-msg "Ein fataler Fehler ist aufgetreten !\nBitte wiederholen Sie die Installation.")
  18. (set @error-msg (cat "\nFehler...\n\n"
  19.                      "Kartendaten von Benelux wurden nicht komplett installiert. "
  20.                      "Bitte wiederholen Sie die Installation, um eine lauffähige Version auf Ihrer "
  21.                      "Festplatte zu erhalten."))
  22.  
  23. (complete 0)
  24.  
  25. (set @sysdir (expandpath "SYS:"))
  26. (set @default-dest "AmiAtlas:benelux")
  27.  
  28. ; Wurde von der Diskette gebootet ?
  29. (if (= @sysdir "AmiAtlas_Benelux")
  30.       (
  31.             (message "Hinweis\n\nEs wurde von der Karten-Diskette gebootet. Für die Festplatten-Installation "
  32.                      "mit diesem Programm ist es notwendig, vorher von Festplatte zu booten.\n\n"
  33.                      "Bitte entfernen Sie die Diskette aus dem Laufwerk und setzen Sie Ihren Amiga zurück. "
  34.                      "Danach starten Sie das Installationsprogramm erneut.")
  35.  
  36.             (exit (quiet))
  37.       )
  38. )
  39.  
  40. ; Ist AmiAtlas schon auf der Festplatte installiert ?
  41. (if (NOT (exists "AmiAtlas:"))
  42.       (
  43.             (message "\nWarnung !!!\n\n"
  44.                      "'AmiAtlas' ist nicht auf Ihrer Festplatte installiert.\n\n"
  45.                      "Bitte installieren Sie zunächst eine beliebige AmiAtlas-Version, "
  46.                      "um danach die Kartendaten zu kopieren.")
  47.  
  48.             (exit (quiet))
  49.       )
  50. )
  51.  
  52. (welcome "Willkommen zur Festplatten-Installation der Benelux-Karte von 'AmiAtlas Pro'.\n")
  53.  
  54. ; Benelux-Karte noch nicht installiert ?
  55. (if (NOT (exists @default-dest))
  56.       (makedir @default-dest
  57.             (prompt "\nVerzeichnis für Karte\n\n"
  58.                     "Bitte klicken Sie 'Proceed' an, um das Verzeichnis '" @default-dest "' für "
  59.                     "die Kartendaten zu erzeugen.")
  60.             (confirm)
  61.             (help "\nHilfe zur Verzeichniserstellung\n\n"
  62.                   "Im Verzeichnis von 'AmiAtlas Pro' wird ein Unterverzeichnis für die "
  63.                   "Benelux-Karte benötigt. In dieses Verzeichnis werden daraufhin alle Daten "
  64.                   "zur Benelux-Karte kopiert.")
  65.             (infos)
  66.       )
  67.       (
  68.             (if (NOT
  69.                   (askbool
  70.                        (prompt "\nHinweis\n\nDie Benelux-Karte ist bereits installiert.\n"
  71.                                "Soll erneut eine Installation durchgeführt werden ?\n\n"
  72.                                "Warnung: Die vorhandenen Daten werden überschrieben.")
  73.                        (help "\nHilfe zu existierender Karte\n\n"
  74.                              "Im Verzeichnis von 'AmiAtlas Pro' wurde das Unterverzeichnis "
  75.                              "'benelux' gefunden. In dieses Verzeichnis wurden bereits zu "
  76.                              "einem früheren Zeitpunkt die Kartendaten kopiert.\n\n"
  77.                              "Eine Neuinstallation ist dann sinnvoll, wenn die Daten aus irgendeinem "
  78.                              "Grunde ungültig geworden sind oder eine erweiterte Karte installiert "
  79.                              "werden soll.")
  80.                        (choices "Ja" "Nein")
  81.                        (default 0)
  82.                   )
  83.                   )
  84.                   (exit (quiet))
  85.             )
  86.       )
  87. )
  88.  
  89. (complete 4)
  90.  
  91. ; Benelux-Karte kopieren
  92. (message "\nKopieren der Kartendaten\n\n"
  93.          "Bitte klicken Sie 'Proceed' an, um die Benelux-Kartendaten in das "
  94.          "entsprechende Verzeichnis auf Ihrer Festplatte zu kopieren.")
  95.  
  96. (copyfiles
  97.       (prompt "Kopiere Karte Benelux.")
  98.       (help "")
  99.       (source "AmiAtlas_Benelux:benelux")
  100.       (dest @default-dest)
  101.       (pattern "~(#?.info)")
  102.       (optional force askuser)
  103. )
  104.  
  105. (complete 55)
  106.  
  107. ; Abfrage, ob Icons gespeichert werden sollen
  108. (if (askbool
  109.             (prompt "\nIcons speichern\n\n"
  110.                     "'AmiAtlas Pro' ermöglicht es, Icons zu den Kartendaten zu benutzen. "
  111.                      "Karten mit Icons können direkt über diese Icons geöffnet werden.\n\n"
  112.                      "Sollen Icons erzeugt werden ?")
  113.             (help "\nHilfe zu Icons erzeugen\n\n"
  114.                   "'AmiAtlas Pro' verwaltet seine Karten in mehreren Einzeldateien. Diese werden "
  115.                   "normalerweise beim Starten von 'AmiAtlas Pro' direkt nachgeladen und die "
  116.                   "entsprechende Karte sofort dargestellt.\n\n"
  117.                   "Wenn hingegen mehrere Karten vorhanden sind, kann immer nur eine Karte zum "
  118.                   "sofortigen Nachladen bestimmt werden. Die zweite und alle weiteren Karten "
  119.                   "werden dann über die 'Laden'-Funktion aus dem Menü geöffnet.\n\n"
  120.                   "Alternativ dazu können zu den Kartendateien Icons erzeugt werden, über die "
  121.                   "es dann möglich ist, gezielt eine Karte - unabhängig von der Voreinstellung - "
  122.                   "zu laden.")
  123.             (choices "Ja" "Nein")
  124.             (default 0)
  125.       )
  126.       (
  127.             (copyfiles
  128.                   (prompt "Kopiere Icons zur Benelux-Karte")
  129.                   (help "")
  130.                   (source "AmiAtlas_Benelux:benelux")
  131.                   (dest @default-dest)
  132.                   (pattern "#?.info")
  133.                   (optional force askuser)
  134.             )
  135.  
  136.       )
  137. )
  138.  
  139. (complete 60)
  140.  
  141. ; Deutschland-Karte anpassen
  142. (if (exists "AmiAtlas:germany")
  143.     (if (askbool
  144.                 (prompt "\nDeutschland-Karte speichern\n\n"
  145.                         "Auf Ihrer Festplatte ist eine Karte von Deutschland enthalten, die "
  146.                         "im Grenzgebiet nicht mit der neuen Benelux-Karte "
  147.                         "zusammenpaßt. Soll eine passende Deutschland-Karte kopiert werden ?")
  148.                 (help "\nHilfe zur Speicherung der Deutschland-Karte\n\n"
  149.                       "Um bei den Grenzstrecken mit der Benelux-Karte zusammenzupassen, "
  150.                       "muß eine neue Deutschland-Karte installiert werden. Beachten Sie jedoch, "
  151.                       "daß die alten Karten-Daten von Deutschland überschrieben werden. Diese "
  152.                       "Installation fertigt zunächst eine Sicherungskopie an, bevor die Karte "
  153.                       "überschrieben wird.")
  154.                 (choices "Ja" "Nein")
  155.                 (default 1)
  156.           )
  157.           (
  158.                 (message "\nSicherungskopie anfertigen\n\n"
  159.                          "Bitte klicken Sie 'Proceed' an, um von der alten Deutschland-Karte "
  160.                          "eine Kopie anzufertigen (im Verzeichnis 'AmiAtlas:germany_old')")
  161.  
  162.                 (if (NOT (exists "AmiAtlas:germany_old"))
  163.                     (makedir "AmiAtlas:germany_old"
  164.                         (infos)
  165.                     )
  166.                 )
  167.  
  168.                 (copyfiles
  169.                       (prompt "Erzeuge Sicherungskopie der Deutschland-Karte")
  170.                       (help "")
  171.                       (source "AmiAtlas:germany")
  172.                       (dest "AmiAtlas:germany_old")
  173.                       (optional force askuser)
  174.                       (all)
  175.                 )
  176.  
  177.                 (complete 70)
  178.  
  179.                 (set GermanyCopyMsg "Eine Kopie der Deutschland-Karte wurde in 'AmiAtlas:germany_old' abgelegt.")
  180.  
  181.                 (message "\nDeutschland-Karte einrichten\n\n"
  182.                          "Bitte klicken Sie 'Proceed' an, um nun die neue Deutschlandkarte "
  183.                          "auf Ihre Festplatte zu kopieren.")
  184.  
  185.                 (copyfiles
  186.                       (prompt "Kopiere Deutschland-Karte")
  187.                       (help "")
  188.                       (source "AmiAtlas_Benelux:germany_new")
  189.                       (dest "AmiAtlas:germany")
  190.                       (pattern "~(#?.info)")
  191.                       (optional force askuser)
  192.                 )
  193.  
  194.                 (complete 75)
  195.  
  196.                 (if (exists "AmiAtlas:germany/germany.town.info")
  197.                     (copyfiles
  198.                           (prompt "Kopiere Icons zur Deutschland-Karte")
  199.                           (help "")
  200.                           (source "AmiAtlas_Benelux:germany_new")
  201.                           (dest "AmiAtlas:germany")
  202.                           (pattern "#?.info")
  203.                           (optional force askuser)
  204.                     )
  205.                 )
  206.  
  207.                 (complete 80)
  208.           )
  209.     )
  210. )
  211.  
  212. (if (exists "AmiAtlas:germany")
  213.     (
  214.         (message "\nAnpassung der Grenzübergänge\n\n"
  215.                  "Bitte klicken Sie 'Proceed' an, um die Zusatzdaten für Grenzübergänge "
  216.                  "bei der installierten Deutschland-Karte zu ergänzen.")
  217.  
  218.         (copyfiles
  219.               (prompt "Kopiere Grenzbeschreibung")
  220.               (help "")
  221.               (source "AmiAtlas_Benelux:germany_new/germany.share")
  222.               (dest "AmiAtlas:germany")
  223.         )
  224.  
  225.         (complete 85)
  226.  
  227.         (if (exists "AmiAtlas:germany/germany.town.info")
  228.             (copyfiles
  229.                   (prompt "Kopiere Icon für Grenzübergangsdatei")
  230.                   (help "")
  231.                   (source "AmiAtlas_Benelux:germany_new")
  232.                   (dest "AmiAtlas:germany")
  233.                   (pattern "#?.share.info")
  234.                   (optional force askuser)
  235.             )
  236.         )
  237.     )
  238. )
  239.  
  240. (complete 90)
  241.  
  242. (if (askbool
  243.             (prompt "\nVoreinstellung ändern\n\n"
  244.                     "Soll die Voreinstellung so verändert werden, daß beim Starten von 'AmiAtlas Pro' "
  245.                     "sofort die Benelux-Karte geladen wird ?")
  246.             (help "\nHilfe zu Änderung der Voreinstellung\n\n"
  247.                   "'AmiAtlas Pro' legt in seiner Voreinstellung fest, welche Karte beim Laden des "
  248.                   "Programms geöffnet wird. Nach der Installation der neuen Karte wird normalerweise "
  249.                   "weiterhin die vorher festgelegte Karte von 'AmiAtlas Pro' verwendet.\n\n"
  250.                   "Hier kann nun die Voreinstellung verändert werden, so daß automatisch auch die "
  251.                   "neue Karte verwendet wird. Beachten Sie jedoch, daß dabei alle anderen "
  252.                   "Voreinstellungen von 'AmiAtlas Pro' auf die Standardwerte zurückgesetzt werden.")
  253.             (choices "Ja" "Nein")
  254.             (default 0)
  255.       )
  256.       (
  257.             (set osversion (/ (getversion) 65536))
  258.  
  259.             (if (< osversion 36)
  260.                   (copyfiles
  261.                         (prompt "Kopiere Datei 'AmiAtlas.prefs'")
  262.                         (help "")
  263.                         (source "AmiAtlas_Benelux:s/AmiAtlas.prefs")
  264.                         (dest "AmiAtlas:")
  265.                   )
  266.                   (if (exists "ENVARC:")
  267.                         (copyfiles
  268.                               (prompt "Kopiere Datei 'AmiAtlas.prefs'")
  269.                               (help "")
  270.                               (source "AmiAtlas_Benelux:s/AmiAtlas.prefs")
  271.                               (dest "ENVARC:")
  272.                         )
  273.                         (copyfiles
  274.                               (prompt "Kopiere Datei 'AmiAtlas.prefs'")
  275.                               (help "")
  276.                               (source "AmiAtlas_Benelux:s/AmiAtlas.prefs")
  277.                               (dest "AmiAtlas:")
  278.                         )
  279.                   )
  280.             )
  281.       )
  282.       (message "\nHinweis zum Laden der neuen Karte\n\n"
  283.                "Die Voreinstellung von 'AmiAtlas Pro' blieb unverändert.\n\n"
  284.                "Um die neue Karte zu öffnen, laden Sie diese bitte über den Menüpunkt 'Laden...' "
  285.                "im 'Karte'-Menü des Hauptprogramms.")
  286. )
  287.  
  288. (complete 100)
  289.  
  290. (message "\nInstallation beendet\n\n"
  291.          "Die Benelux-Karte befindet sich nun im Verzeichnis: '" @default-dest "'\n\n"
  292.          GermanyCopyMsg)
  293.  
  294. (exit (quiet))
  295.  
  296.