; Installationsskript für Karte [Deutschland-Spezial] von AmiAtlas Pro ; erstellt für Installer V1.24, 18.5.95, Autor: Andreas Regul ; Copyright-Hinweise für Installer: ; Installer and Installer project icon ; (c) Copyright 1991-93 Commodore-Amiga, Inc. All Rights Reserved. ; Reproduced and distributed under license from Commodore. ; INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE; ; NO WARRANTIES ARE MADE. ALL USE IS AT YOUR OWN RISK. NO LIABILITY ; OR RESPONSIBILITY IS ASSUMED. (set @user-level 2) (set @language "deutsch") (set @abort-button "Installation abbrechen") (set @special-msg "Ein fataler Fehler ist aufgetreten !\nBitte wiederholen Sie die Installation.") (set @error-msg (cat "\nFehler...\n\n" "Kartendaten von Deutschland wurden nicht komplett installiert. " "Bitte wiederholen Sie die Installation, um eine lauffähige Version auf Ihrer " "Festplatte zu erhalten.")) (complete 0) (set @sysdir (expandpath "SYS:")) (set @default-dest "AmiAtlas:germany_special") (set lhatarget (cat @default-dest "/")) (if (< (/ (getversion) 65536) 36) (set prefspath "AmiAtlas:") (set prefspath "ENVARC:") ) (complete 4) ; Prüfen, ob AmiAtlas schon installiert ist (if (NOT (exists "AmiAtlas:")) ( (message (cat "\n" "Warnung !!! \n" " \n" "'AmiAtlas Pro' ist nicht auf Ihrer Festplatte\n" "installiert. \n" " \n" "Bitte installieren Sie zunächst AmiAtlas Pro,\n" "um danach die Kartendaten zu kopieren. \n") ) (exit (quiet)) ) ) (complete 6) ; Ist ältere AmiAtlas-Version intalliert ? (if (< (/ (getversion "AmiAtlas:AmiAtlas") 65536) 2) ( (message (cat "\n" "Warnung !!! \n" " \n" "Es ist eine ältere AmiAtlas-Version auf Ihrer\n" "Festplatte installiert, die das Kartenformat \n" "dieser Karte nicht laden kann. \n" " \n" "Bitte installieren Sie zunächst Version 2.0 \n" "und kopieren Sie danach die Kartendaten von \n" "Deutschland-Spezial. \n") ) (exit (quiet)) ) ) (complete 8) (welcome "Willkommen zur Festplatten-Installation der Deutschland-Spezial-Karte von 'AmiAtlas Pro'.") ; Verzeichnis für Deutschlandkarte erzeugen (if (NOT (exists @default-dest)) (makedir @default-dest (prompt "\nVerzeichnis für Karte\n\n" "Bitte klicken Sie 'Proceed' an, um das Verzeichnis '" @default-dest "' für " "die Kartendaten zu erzeugen.") (confirm) (help "\nHilfe zur Verzeichniserstellung\n\n" "Im Verzeichnis von 'AmiAtlas Pro' wird ein Unterverzeichnis für die Karte " "von Deutschland-Spezial benötigt. In dieses Verzeichnis werden daraufhin alle Daten " "zur Deutschlandkarte kopiert.") (infos) ) ( (if (NOT (askbool (prompt (cat "\n" "Hinweis \n" " \n" "Die Deutschland-Spezial-Karte ist bereits \n" "installiert. Soll erneut eine Installation \n" "durchgeführt werden ? \n" " \n" "Warnung: Die vorhandenen Daten werden über-\n" "schrieben. \n")) (help "\nHilfe zu existierender Karte\n\n" "Im Verzeichnis von 'AmiAtlas Pro' wurde das Unterverzeichnis " "'germany_special' gefunden. In dieses Verzeichnis wurden bereits zu " "einem früheren Zeitpunkt die Kartendaten von Deutschland kopiert.\n\n" "Eine Neuinstallation ist dann sinnvoll, wenn die Daten aus irgendeinem " "Grunde ungültig geworden sind oder eine erweiterte Karte installiert " "werden soll.") (choices "Ja" "Nein") (default 0) ) ) (exit (quiet)) ) ) ) (complete 10) (working "Entpacke Karte Deutschland-Spezial...") (run (cat "lhx x germany_special.lha \"" lhatarget "\"")) (complete 60) (set n 0) (while (set fileextension (select n ".borders" ".coasts" ".islands" ".rivers" ".sea" ".carID" ".parks" ".hotels" ".journey" ".mappos" "")) ( (set n (+ n 1)) (set sourcefile (cat "AmiAtlas:germany/germany" fileextension)) (if (exists sourcefile) (copyfiles (prompt "Übernehme Daten von der Standard-Deutschland-Karte...") (help "") (source sourcefile) (dest "AmiAtlas:germany_special") (infos) ) (message (cat "\n" "Hinweis \n" " \n" "Konnte folgende Datei nicht finden: \n" " \n" sourcefile) ) ) ) ) (complete 80) ; Share-Dateien in umliegenden Staaten anpassen (if (askbool (prompt "\nGrenzverbindungen ändern\n\n" "Um eine korrekte Verbindung zu den zu Deutschland angrenzenden " "Staaten zu gewährleisten, müssen die Grenzbeschreibungsdateien " "dieser Staaten verändert werden. Sollen diese Veränderungen " "nun durchgeführt werden ?") (help "") (choices "Ja" "Nein") (default 0) ) ( ; Verzeichnis für veraltete share-Dateien erzeugen (if (NOT (exists "AmiAtlas:obsolete")) (makedir "AmiAtlas:obsolete" (infos) ) ) (if (NOT (exists "AmiAtlas:obsolete/shares")) (makedir "AmiAtlas:obsolete/shares" (infos) ) ) (set n 0) (while (set country (select n "danmark" "benelux" "belgium" "france" "swiss" "austria" "cz_sk" "poland" "")) ( (set n (+ n 1)) (set countrypath (cat "AmiAtlas:" country)) (set lhacountrypath (cat countrypath "/")) (set sharefile (cat "AmiAtlas:" country "/" country ".share")) (set newsharefile (cat country ".share")) (if (exists countrypath) ( (if (exists sharefile) (copyfiles (prompt "Erstelle Kopie der Grenzverbindungen") (help "") (source sharefile) (dest "AmiAtlas:obsolete/shares") (infos) ) ) (working "Erstelle neue Grenzverbindungen...") (run (cat "lhx x new_shares.lha " newsharefile " " lhacountrypath)) ) ) ) ) (set obsolete_message (cat "\n" " Eine Kopie der alten Grenzbeschreibungen \n" " wurde im folgenden Verzeichnis abgelegt: \n" " \n" "'" (expandpath "AmiAtlas:obsolete/shares") "'\n") ) ) ( (if (NOT (exists "AmiAtlas:new_shares")) (makedir "AmiAtlas:new_shares" (infos) ) ) (run "lhx x new_shares.lha AmiAtlas:new_shares/") (message (cat "\n" " Hinweis für die Kartenverbindung \n" " \n" " Die Grenzdateien blieben unverändert. Bitte \n" " ersetzen Sie 'per Hand' die share-Dateien in\n" " den Deutschland umliegenden Staaten. \n" " \n" " Passende share-Dateien befinden sich in \n" " folgendem Verzeichnis: \n" " \n" (expandpath "AmiAtlas:new_shares")) ) ) ) (complete 90) ; Voreinstellungen auf Wunsch ändern (if (askbool (prompt "\nVoreinstellung ändern\n\n" "Soll die Voreinstellung so verändert werden, daß beim Starten von 'AmiAtlas Pro' " "sofort die Deutschland-Spezial-Karte geladen wird ?") (help "\nHilfe zu Änderung der Voreinstellung\n\n" "'AmiAtlas Pro' legt in seiner Voreinstellung fest, welche Karte beim Laden des " "Programms geöffnet wird. Nach der Installation der neuen Karte wird normalerweise " "weiterhin die vorher festgelegte Karte von 'AmiAtlas Pro' verwendet.\n\n" "Hier kann nun die Voreinstellung verändert werden, so daß automatisch auch die " "neue Karte verwendet wird. Beachten Sie jedoch, daß dabei alle anderen " "Voreinstellungen von 'AmiAtlas Pro' auf die Standardwerte zurückgesetzt werden.") (choices "Ja" "Nein") (default 0) ) (copyfiles (prompt "Kopiere Datei 'AmiAtlas.prefs'") (help "") (source "s/AmiAtlas.prefs") (dest prefspath) (infos) ) (message (cat "\n" " Hinweis zum Laden der neuen Karte \n" " \n" " Die Voreinstellung von 'AmiAtlas Pro' blieb \n" " unverändert. \n" " \n" " Um die neue Karte zu öffnen, laden Sie diese\n" " bitte über den Menüpunkt 'Laden...' aus dem \n" " 'Karte'-Menü des Hauptprogramms. \n") ) ) (complete 100) ; Abschlußmeldung (message (cat "\n" " Installation beendet \n" " \n" " Die Deutschland-Spezial-Karte befindet sich\n" " nun im Verzeichnis: \n" " \n" "'" (expandpath @default-dest) "'\n" obsolete_message) ) (exit (quiet))