head     40.8;
branch   ;
access   ;
symbols  ;
locks    ; strict;
comment  @# @;


40.8
date     93.04.06.12.28.48;  author vertex;  state Exp;
branches ;
next     40.7;

40.7
date     93.04.06.10.34.15;  author vertex;  state Exp;
branches ;
next     40.6;

40.6
date     93.04.05.11.32.15;  author vertex;  state Exp;
branches ;
next     40.5;

40.5
date     93.04.05.11.10.11;  author vertex;  state Exp;
branches ;
next     40.4;

40.4
date     93.04.01.14.29.51;  author vertex;  state Exp;
branches ;
next     40.3;

40.3
date     93.03.31.13.58.49;  author vertex;  state Exp;
branches ;
next     40.2;

40.2
date     93.03.19.16.36.06;  author vertex;  state Exp;
branches ;
next     40.1;

40.1
date     93.03.17.14.56.19;  author vertex;  state Exp;
branches ;
next     ;


desc
@A4091 setup formatting/copying installer script
@


40.8
log
@*** empty log message ***
@
text
@; $Date: 93/04/06 10:34:15 $ $Revision: 40.7 $
; Script to setup a 4091

(complete 0)

;=============================================================================
; English strings

(if (= @@language "english")
(
(set @@abort-button "Abort")

(set #bad-kick
(cat "You must be using Kickstart 2.0 to use the A4091 software"
))

(set #introduction
(cat "\nThis program lets you perform two basic tasks relating to your "
     "A4091 controller. It lets you upgrade certain AmigaDOS files which "
     "are required for correct operation of the A4091. It also lets you "
     "partition and format previously unformatted SCSI hard drives connected "
     "to the A4091.\n\n"
))

(set #introduction-help
(cat "\nThe A4091 requires that certain AmigaDOS files already in your "
     "system be upgraded to their latest versions. These include the "
     "following files: SetPatch, 68040.library, and HDToolBox. "
     "Selecting the \"Update AmigaDOS Files\" gadget will update "
     "these files automatically.\n\n"
     "Before being used on the Amiga, a hard drive must first be partitioned "
     "and formatted. Partitioning involves giving the hard drive a name "
     "that is used by the system to recognize the unit, and organizing "
     "low-level information on the hard drive. Formatting is the process "
     "by which a hard drive is prepared for use by AmigaDOS. Formatting "
     "a hard drive is just like formatting a floppy disk."
))

(set #ask-function
(cat "\nDo you wish to upgrade AmigaDOS files, or partition a new hard drive?\n\n"
     "If you already have Workbench 3.1 in your system, you do not need to "
     "upgrade the AmigaDOS files, as you already have the correct versions "
     "in order to use the A4091."
))

(set #ask-function-1
(cat "Update AmigaDOS Files"
))

(set #ask-function-2
(cat "Partition New Hard Drive"
))

(set #ask-function-help
(cat "\nYou must choose which operation you would like to "
     "perform.\n\n"
     "Selecting the \"Update AmigaDOS Files\" gadget lets you update certain files "
     "already present on your system to versions required for correct operation "
     "of the A4091.\n\n"
     "Selecting the \"Partition New Hard Drive\" gadget lets you partition and "
     "format a previously unpartitioned hard drive, in order to have "
     "this hard drive be recognized by AmigaDOS."
))

(set #done-update
(cat "\n\nThe required AmigaDOS files have been updated on your system."
))

(set #partition-notfound
(cat "Could not find a hard drive needing partitioning!\n"
))

(set #really-partition
(cat "The drive connected to '%s' unit %s appears to have never been formatted "
     "previously. If you proceed, this drive will be partitioned and "
     "formatted for use by AmigaDOS."
))

(set #really-partition-help
(cat "A4091Setup has determined that the drive connected to '%s' with SCSI bus "
     "address %s has never been partitioned and formatted on an Amiga before. "
     "Continuing with this procedure will partition the drive and format it. "
     "This will have the effect of loosing all information on the drive, "
     "that could have been put there by another incompatible computer system."
))

(set #really-partition-1
(cat "Partition Drive"
))

(set #really-partition-2
(cat "Abort"
))

(set #partition-complete
(cat "\n\nThe partioning and formatting is now complete. Your drive has been named "
     "%s (%s). You should now be able to use the drive for regular operations."
))

(set #partition-error
(cat "\n\nThe partioning process did not work correctly. The drive is not ready "
     "for operation. Use the HDToolBox program found in the Tools directory "
     "of your Workbench partition in order to solve this problem."
))

(set #partition-aborted
(cat "\n\nOperation aborted. No partioning will be done."
))

(set #empty-name
(cat "Empty"
))

))


;=============================================================================
; Spanish strings

(if (= @@language "espaol")
(
(set #empty-name
(cat "Empty"
))
))


;=============================================================================
; Portugues strings

(if (= @@language "portugus")
(
(set @@abort-button "Interromper")

(set #bad-kick
(cat "Tem que ter o KickStart 2.0 para usar o software da A4091"
))

(set #introduction
(cat "\nEste programa permite-lhe executar duas tarefas bsicas relacionadas "
     "com a sua controladora A4091. Permite-lhe substituir certos ficheiros do AmigaDOS "
     "que so necessrios para um funcionamento correcto da A4091. Permite-lhe tambm "
     "'particionar' e formatar os discos rgidos SCSI que esto ligados  A4091.\n\n"
))

(set #introduction-help
(cat "\nPara que a A4091 funcione correctamente  necessrio que sejam substituidos"
     "certos ficheiros do AmigaDOS pelas suas ltimas verses. Incluido os "
     "seguintes: SetPatch, 68040.library e o HDToolBox. "
     "Seleccionando o boto \"Substituir Ficheiros\" vai fazer com que "
     "a substituio seja feita automticamente.\n\n"
     "Antes de ser uado num Amiga, um disco rgido tem que ser 'particionado' "
     "e formatado. 'Particionar' consiste dar um nome ao disco rgido "
     "este  usado pelo sistema para reconhecer a unidade, e organizar "
     "a informao de baixo-nvel do disco. Formatao  o processo "
     "pelo qual um disco rgido  preparado para ser usado pelo AmigaDOS. "
     "Formatar um disco rgido  o mesmo que formatar uma diskette."
))

(set #ask-function
(cat "\nDeseja substituir os ficheiros do AmigaDOS, ou 'particionar' um novo disco?\n\n"
     "Se j tiver o  Workbench 3.1 no seu sistema, no precisar de substituir "
     "os ficheiros do AmigaDOS, porque j dispe das verses correctas para "
     "poder usar a A4091."
))

(set #ask-function-1
(cat "Substituir Ficheiros"
))

(set #ask-function-2
(cat "'Particionar' um Disco"
))

(set #ask-function-help
(cat "\nTem que escolher a operao que gostaria de executar.\n\n"
     "Selecionando o boto \"Substituir Ficheiros\" permite-lhe substituir "
     "certos ficheiros que esto presentes no seu sistema pelas verses que so "
     "precisas para um correcto funcionamento da A4091.\n\n"
     "Seleccionando o boto \"'Particionar' um Disco\" permite-lhe 'particionar' e "
     "formatar um novo disco rgido, para este seja reconhecido pelo AmigaDOS. "
))

(set #done-update
(cat "\n\nOs ficheiros necessrios do AmigaDOS no seu sistema foram substituidos."
))

(set #really-partition
(cat "O disco ligado  unidade '%s' %s parece que nunca foi formatado "
     "antes. Se continuar, este disco ser 'particionado' e formatado "
     "para uso no AmigaDOS."
))

(set #really-partition-help
(cat "O programa A4091Setup determinou que o disco ligado a '%s' com o "
     "endereo SCSI %s nunca foi 'particionado' e formatado num Amiga. "
     "Continuando este processo vai particionar o disco e formata-lo. "
     "Isto far com que toda a informao no disco, que tenha sido l "
     "colocada por outro computador incompatvel, seja perdida. "
))

(set #really-partition-1
(cat "'Particionar' um novo Disco"
))

(set #really-partition-2
(cat "Interromper"
))

(set #partition-complete
(cat "\n\nO 'particionamento' e a formatao esto completos. O seu disco chama-se "
     "%s (%s). Poder agora us-lo em todas as operaes usuais."
))

(set #partition-error
(cat "\n\nO processo de 'particionamento' no funcionou correctamente. O disco no est pronto  "
     "para ser usado. Use o programa 'HDToolBox' que est na directoria 'Tools' "
     "da sua 'partio' do Workbench para poder resolver este problema."
))

(set #partition-aborted
(cat "\n\nO processo foi interrompido. No ser feita nenhuma 'partio'."
))

(set #empty-name
(cat "Vazio"
))

))


;=============================================================================
; French strings

(if (= @@language "franais")
(
(set @@abort-button "Abort")

(set #bad-kick
(cat "vous devez posseder un Kickstart 2.0 afin d'utiliser le logiciel A4091"
))

(set #introduction
(cat "\nCe programme va vous permettre de raliser deux taches ssentielles"
     "pour votre carte A4091. D'une part, la mise  jour de certains fichiers"
     "AmigaDos, afin de permettre un fonctionnement correct de la carte. Et"
     "d'autre part, va vous permettre de partitionner puis formater les disques"
     "durs connects  la carte A4091.\n\n"
))

(set #introduction-help
(cat "\nLa carte A4091 impose que certains fichiers prsents dans le systme,"
     "soient mis  jour. Il s'agit des fichiers suivants : SetPatch, "
     "68040.library et HDToolBox."
     "En slectionnant l'option \"Mise  jour des fichiers AmigaDos\" vous"
     "mettrez  jour automatiquement les fichiers cits ci-dessus.\n\n"
     "Avant d'tre utilis sur l'Amiga, votre disque dur doit tre partitionn"
     "puis format. Partitionner consiste  donner un nom au disque dur afin que"
     "le sustme le reconnaisse et puisse organiser les informations bas-niveau"
     "sur le disque dur. Formater consiste  prparer le disque  recevoir des"
     "informations AmigaDos. Formater un disque dur est identique  un "
     "formatage de disquette."
))

(set #ask-function
(cat "\nVoulez-vous mettre  jour les fichiers AmigaDos, ou partitionner un"
     "nouveau disque dur? \n\n"
     "Si vous possdez dj une version 3.1 du Workbench, vous n'avez pas"
     "besoin de mettre  jour les fichiers AmigaDos, car les versions installes"
     "sont correctes pour fonctionner avec votre carte A4091."
))

(set #ask-function-1
(cat "Mise  jour des fichiers AmigaDos"
))

(set #ask-function-2
(cat "Partitionner un nouveau disque dur"
))

(set #ask-function-help
(cat "\nVous devez choisir quelle opration vous souhaitez faire.\n\n"
     "En selectionnant l'option \"Mise  jour des fichiers AmigaDos \" mettra "
     "jour certain fichiers dj presents afin d'obtenir un fonctionnement"
     "optimum de votre carte A4091.\n\n"
     "En slectionnant l'option \"Partitionner un nouveau disque dur\" va permettre"
     "de partitionner un disque non-format, qui sera ensuite reconnu par"
     "l'AmigaDos."
))

(set #done-update
(cat "\n\nLes fichiers AmigaDos ont t mis  jour."
))

(set #really-partition
(cat "Le disque dur connect  '%s' semble n'avoir jamais t format auparavant."
     "Si vous continuez, ce disque sera partitionn et format pour fonctionner"
     "en AmigaDos."
))

(set #really-partition-help
(cat "L'autoconfiguration de la carte A4091  dtermine que le disque dur"
     "connect  '%s'avec une adresse SCSI %s n' jamais t partitionn et"
     "format sur un Amiga auparavant. En continuant cette procdure, le disque"
     "dur sera partitionn et format. Toutes les informations prsentes sur ce"
     "disque seront dtruites, y compris les informations provenant d'autres"
     "ordinateurs non-compatibles avec l'Amiga."
))

(set #really-partition-1
(cat "Partitionnement"
))

(set #really-partition-2
(cat "Abandonner"
))

(set #partition-complete
(cat "\n\nLe partitionnement et le formatage sont maintenant termins. Votre disque"
     " t nomm %s (%s). Vous pouvez maintenant utiliser votre disque dur."
))

(set #partition-error
(cat "\n\nL'opration de partitionnement n' pas fonctionne correctement. Le "
     "disque dur n'est pas prt. Utilisez le programme HDToolBox, dans le tiroir"
     "Tools de votre partition Workbench afin de rsoudre le problme."
))

(set #partition-aborted
(cat "\n\nOpration abandonne. Le partitionnement ne sera pas ffectu."
))

(set #empty-name
(cat "Vide"
))

(set #partition-notfound ?
(cat "\n\nL'utilitaire de partitionnement ne trouve pas de nouveau disque dur"
     "ou partition. Si vous utilisez un nouveau disque dur, verifiez les"
     "connecxions, puis utilisez le programme HDToolBox, rang dans le tiroir"
     "Tools de votre partition Workbench, afin de rsoudre ce problme."
     "\nLe programme A4091 va s'intrrompre maintenant."
))

))


;=============================================================================
; German strings

(if (= @@language "deutsch")
(
(set @@abort-button "Abbrechen")

(set #bad-kick
(cat "Sie bentigen mindestens Kickstart 2.0 fr die A4091-Software"
))

(set #introduction
(cat "\nMit diesem Programm knnen Sie zwei verschiedene Arbeiten "
     "erledigen: Sie knnen diverse AmigaDOS-Dateien aktualisieren, "
     "die zur korrekten Arbeit mit dem A4091-Adapter ntig sind. Sie "
     "knnen auch am A4091 angeschlossene, noch unformatierte "
     "SCSI-Festplatten formatieren und sie partitionieren.\n\n"
))

(set #introduction-help
(cat "\nDer A4091-Adapter bentigt bestimmte AmigaDOS-Dateien Ihres "
     "System in ihrer aktuellsten Version, nmlich: SetPatch, "
     "68040.library und HDToolBox. Whlen Sie \"AmigaDOS(-Dateien) "
     "aktualisieren\", um sie automatisch zu aktualisieren.\n\n"
     "Vor der Benutzung im Amiga mu eine Festplatte erst partitioniert "
     "und formatiert werden. Beim Partitionieren bekommen die "
     "Festplattenunterteilungen eigene Namen, und Grundinformationen "
     "zur Datenorganisation werden geschrieben. Durch das Formatieren "
     "wird jede Partition zum Gebrauch unter AmigaDOS vorbereitet. "
     "Das Formatieren einer Festplattenpartition ist das gleiche wie das "
     "Formatieren einer Diskette."
))

(set #ask-function
(cat "\nWollen Sie AmigaDOS-Dateien aktualisieren oder eine neue "
     "Festplatte partitionieren?\n\nWenn Sie schon Workbench 3.1 in "
     "Ihrem System haben, brauchen Sie dies nicht zu tun, da Sie schon "
     "die korrekten Dateiversionen fr den A4091 haben."
))

(set #ask-function-1
(cat "AmigaDOS aktualisieren"
))

(set #ask-function-2
(cat "Festplatte partitionieren"
))

(set #ask-function-help
(cat "\nSie mssen den gewnschten Vorgang whlen:\n\n"
     "Mit \"AmigaDOS(-Dateien) aktualisieren\" kopieren Sie aktuelle "
     "Versionen schon vorhandener Dateien, die zum korrekten Arbeiten "
     "des A4091 bentigt werden.\n\n"
     "Mit \"Festplatte partitionieren\" knnen Sie eine vorher "
     "unpartitionierte Festplatte partitionieren und formatieren, damit "
     "sie von AmigaDOS erkannt und benutzbar wird."
))

(set #done-update
(cat "\n\nDie bentigten AmigaDOS-Dateien sind auf Ihrem System "
     "aktualisiert worden."
))

(set #really-partition
(cat "Das Laufwerk angeschlossen an '%s', Einheit %s scheint noch nie "
     "formatiert worden zu sein. Wenn Sie weitermachen, wird das Laufwerk "
     "fr den Betrieb unter AmigaDOS partitioniert und formatiert."
))

(set #really-partition-help
(cat "Das Laufwerk, das an '%s' angeschlossen ist mit der "
     "SCSI-Bus-Adresse %s, ist offensichtlich noch nie auf einem Amiga "
     "partitioniert und formatiert worden. Wenn Sie jetzt weitermachen, "
     "wird das Laufwerk partitioniert und formatiert. "
     "Das hat zur Folge, da alle Informationen, die evtl. von einem "
     "anderen, inkompatiblen Computersystem dort gespeichert wurden, "
     "verlorengehen."
))

(set #really-partition-1
(cat "Laufwerk partitionieren"
))

(set #really-partition-2
(cat "Abbrechen"
))

(set #partition-complete
(cat "\n\nPartitionierung und Formatierung sind nun abgeschlossen. Ihr "
     "Laufwerk heit %s (%s). Es sollte jetzt fr normale Arbeiten "
     "einsetzbar sein."
))

(set #partition-error
(cat "\n\nBeim Partitionieren trat ein Fehler auf. Das Laufwerk ist "
     "nicht einsatzbereit. Benutzen Sie das Programm HDToolBox aus der "
     "Schublade Tools Ihrer Workbench-Partition, um das Problem zu lsen."
))

(set #partition-aborted
(cat "\n\nVorgang abgebrochen. Keine Partitionierung wurde vorgenommen."
))

(set #empty-name
(cat "Leer"
))

(set #partition-notfound
(cat "\n\nEs konnte kein Laufwerk gefunden werden, das eine Partitionierung "
     "ntig htte!\n"
))

))


;=============================================================================
; Dutch strings

(if (= @@language "nederlands")
(
(set @@abort-button "Afbreken")

(set #bad-kick
(cat "Om de A4091 software te installeren moet u Kickstart 2.0 gebruiken"
))

(set #introduction
(cat "\nDit programma stelt u in staat om twee standaard taken "
     "uit te voeren met betrekking tot uw A4091 controller. U kunt "
     "bepaalde AmigaDOS bestanden vervangen door nieuwere versies welke "
     "nodig zijn voor het juist functioneren van de A4091. Tevens kunt u "
     "de ongeformatteerde SCSI harddisken, die op de A4091 aangesloten "
     "zijn, partitioneren en formatteren.\n\n"
))

(set #introduction-help
(cat "\nDe A4091 vereist dat bepaalde AmigaDOS bestanden van uw systeem "
     "vervangen worden door de nieuwste versies. De bestanden die "
     "overschreven worden zijn: SetPatch, 68040.library, en HDToolBox. "
     "De selectie \"Vervang AmigaDOS bestanden\" voert deze handeling "
     "automatisch uit.\n\n"
     "Voordat een harddisk in een Amiga gebruikt kan worden, dient deze "
     "gepartitioneerd en geformatteerd te worden. Partitioneren bestaat "
     "uit het indelen van de harddisk en het toekennen van een naam zodat "
     "het systeem de harddisk herkent. Formatteren maakt "
     "de harddisk klaar voor het gebruik onder AmigaDOS. Een harddisk "
     "formatteren gebeurt op dezelfde wijze als het formatteren van een "
     "floppy disk."
))

(set #ask-function
(cat "\nWilt u de AmigaDOS bestanden vervangen, of wilt u een nieuwe "
     "harddisk partitioneren?\n\n"
     "Als u reeds Workbench 3.1 op uw systeem genstalleerd heeft, hoeft "
     "u de AmigaDOS bestanden niet te vervangen. U heeft de juiste versies "
     "voor het goed functioneren van de A4091 namelijk al."
))

(set #ask-function-1
(cat "Vervang AmigaDOS bestanden"
))

(set #ask-function-2
(cat "Partitioneer harddisk"
))

(set #ask-function-help
(cat "\nU moet kiezen welke handeling u wilt uitvoeren.\n\n"
     "De keuze \"Vervang AmigaDOS bestanden\" vervangt een aantal AmigaDOS "
     "bestanden door nieuwere versies welke nodig zijn voor het juist "
     "functioneren van de A4091.\n\n"
     "De keuze \"Partitioneren van harddisk\" laat u een "
     "nieuwe harddisk partitioneren en formatteren, zodat deze door "
     "AmigaDOS herkend wordt."
))

(set #done-update
(cat "\n\nDe benodigde AmigaDOS bestanden van uw systeem zijn vervangen."
))

(set #really-partition
(cat "De harddisk die aangesloten is op '%s' unit %s blijkt nog nooit "
     "eerder geformatteerd te zijn. Als u deze opdracht vervolgt zal de "
     "harddisk gepartitioneerd en geformatteerd worden voor het gebruik "
     "met AmigaDOS."
))

(set #really-partition-help
(cat "A4091 Setup heeft vastgesteld dat de harddisk die aangesloten is op "
     "'%s' met SCSI bus adres %s nog nooit eerder geformatteerd is. "
     "Als u deze opdracht vervolgd zal de harddisk gepartitioneerd en "
     "geformatteerd worden voor het gebruik met AmigaDOS. Door deze handeling "
     "zullen alle gegevens die mogelijk op de harddisk zijn opgeslagen vanuit "
     "een ander incompatibele computersysteem gewist worden."
))

(set #really-partition-1
(cat "Partitioneer harddisk"
))

(set #really-partition-2
(cat "Afbreken"
))

(set #partition-complete
(cat "\n\nDe harddisk is nu gepartitioneerd en geformatteerd. Uw harddisk "
     "heeft nu de naam %s (%s) gekregen. De hardisk is thans klaar voor "
     "gebruik."

))

(set #partition-error
(cat "\n\nHet partitioneren is niet gelukt. De harddisk is niet klaar voor "
     "gebruik. Gebruik het programma HDToolBox uit de Tools directory van "
     "uw Workbench om het probleem op te lossen."
))

(set #partition-notfound
(cat "\n\nHet partitioneren is niet gelukt. In dit systeem is geen "
     "harddisk gevonden die nog niet geformatteerd is."
))

(set #partition-aborted
(cat "\n\nProcedure afgebroken. Partitioneren niet uitgevoerd."
))

(set #empty-name
(cat "Leeg"
))

))


;=============================================================================
; Italian strings

(if (= @@language "italiano")
(
(set @@abort-button "Abort")

(set #bad-kick
(cat "E' necessario il Kickstart 2.0 o superiore per usare il software del 4091."
))

(set #introduction
(cat "\nQuesto programma vi permette due operazioni di base per l'uso del "
     "controller A4091. Aggiornare alcuni file di AmigaDOS che sono "
     "richiesti per un corretto funzionamento dello stesso. Partizionare e "
     "formattare dischi SCSI non formattati collegati al 4091.\n\n"
))

(set #introduction-help
(cat "\nIl A4091 richiede che alcuni file di AmigaDOS gi presenti nel vostro "
     "sistema siano aggiornati alla loro ultima versione. Sono inclusi i "
     "seguenti file: SetPatch, 68040.library e HDToolBox. "
     "Selezionare il pulsante \"Aggiorna file AmigaDOS\" per aggiornare "
     "automaticamente questi file.\n\n"
     "Prima di essere usato con Amiga, un disco fisso deve essere partizionato "
     "e formattato. La partizione prevede l'uso di un nome per il disco "
     "fisso che verr usato dal sistema per riconoscere l'unit e organizzare "
     "le informazioni di basso livello su di esso. La formattazione  il "
     "processo che permette al disco fisso di essere preparato all'uso con "
     "AmigaDOS. La formattazione di un disco fisso  simile a quella di "
     "un dischetto."
))

(set #ask-function
(cat "\nVolete aggiornare i file di AmigaDOS, o partizionare un nuovo disco "
     "fisso?\n\n"
     "Se possedete il Workbench 3.1 nel vostro sistema, non  necessario "
     "aggiornare i file di AmigaDOS, in quanto avete gi le versioni corrette "
     "per utilizzare il controller A4091."
))

(set #ask-function-1
(cat "Aggiorna file AmigaDOS"
))

(set #ask-function-2
(cat "Partiziona disco fisso"
))

(set #ask-function-help
(cat "\nDovete scegliere l'operazione che volete effettuare.\n\n"
     "Selezionare \"Aggiorna file AmigaDOS\" per aggiornare alcuni file "
     "gi presenti nel sistema alle versioni richieste per il corretto "
     "funzionamento del A4091.\n\n"
     "Selezionare \"Partiziona disco fisso\" per partizionare e formattare "
     "un disco fisso non partizionato in modo che sia automaticamente "
     "riconosciuto da AmigaDOS."
))

(set #done-update
(cat "\n\nI file di AmigaDOS richiesti sul vostro sistema sono stati aggiornati."
))

(set #partition-notfound
(cat "\n\nIl processo di partizione non ha trovato dischi su cui operare. "
     "Verificare i collegamenti in caso abbiate installato un disco nuovo "
     "oppure usare HDToolBox nel cassetto Tools della partizione Workbench "
     "per risolvere questo problema."
     "\n\nIl programma A4091Setup viene interrotto."
))

(set #really-partition
(cat "Il disco collegato a '%s' unit %s non sembra sia stato formattato "
     "precedentemente. Se procedete, questo disco verr partizionato e "
     "formattato per l'uso con AmigaDOS."
))

(set #really-partition-help
(cat "A4091Setup ha determinato che il disco collegato a '%s' con indirizzo "
     "SCSI bus %s non  mai stato partizionato e formattato con Amiga. "
     "Continuando con questa procedura il disco verr partizionato e formattato. "
     "Questa operazione canceller tutte le informazioni contenute sul disco, "
     "che potrebbero appartenere ad un sistema incompatibile con AmigaDOS."
))

(set #really-partition-1
(cat "Partiziona disco"
))

(set #really-partition-2
(cat "Annulla"
))

(set #partition-complete
(cat "\n\nLa partizione e la formattazione sono terminate. Il disco  stato chiamato "
     "%s (%s). Ora potrete utilizzare il disco per le normali operazioni."
))

(set #partition-error
(cat "\n\nIl processo di partizione non ha funzionato. Il disco non  pronto "
     "per operare. Usate il programma HDToolBox nel cassetto Tools della "
     "partizione Workbench per risolvere questo problema."
))

(set #partition-aborted
(cat "\n\nOperazione annullata. Non verr effettuata la partizione."
))

(set #empty-name
(cat "Vuoto"
))

))


;=============================================================================
; Danish strings

(if (= @@language "dansk")
(
(set @@abort-button "Abort")

(set #bad-kick
(cat "For at bruge A4091 softwaren er det ndvendigt, at der kres under "
     "kickstart 2.0"
))

(set #introduction
(cat "\nDette program gr dig istand til at gennemfre to grundlggende "
     "operationer i forbindelse med din A4091 controller. Det giver dig "
     "mulighed for at opgradere visse AmigaDOS-filer som er ndvendige ved "
     "korrekt brug af A4091. Det giver ogs mulighed for at partitionere og "
     "formattere tidligere uformatterede SCSI harddiske tilsluttet "
     "til A4091.\n\n"
))

(set #introduction-help
(cat "\nA4091 krver, at visse AmigaDOS-filer i dit system bliver "
     "opdateret til nyeste version. Disse omfatter flgende filer: "
     "SetPatch, 68040.library og HDToolBox. "
     "Ved at vlge \"Opdatere AmigaDOS filer\", vil disse filer automatisk "
     "blive opdateret.\n\n"
     "Fr man kan bruge en harddisk p en Amiga, m harddisken frst "
     "partitioneres og formatteres. At partitionere vil blandt andet sige, "
     "at give harddisken et navn, som bliver brugt af systemet til at "
     "kunne genkende disken. Under partitioneringen bliver der ogs "
     "lagt low-level information ned p harddisken."
     "At formattere vil sige, at gre harddisken klar til brug for, "
     "i dette tilflde, AmigaDOS. At formattere en harddisk svarer "
     "fuldstndig til det, at formattere en floppy-disk."
))

(set #ask-function
(cat "\nnsker du at opgradere AmigaDOS filer, eller partitionere en ny harddisk?\n\n"
     "Hvis du allerede har Workbench 3.1 i dit system, behver du ikke at "
     "opgradere AmigaDOS filerne, idet du s allerede har de korrekte versioner "
     "til at kunne bruge A4091."
))

(set #ask-function-1
(cat "Opdatere AmigaDOS filer"
))

(set #ask-function-2
(cat "Partitionere ny Harddisk"
))

(set #ask-function-help
(cat "\nFlgende er valgmulighederne: "
     "\n\n"
     "Vlg \"Opdatere AmigaDOS filer\" for at opdatere filer, som "
     "allerede er i Deres system, til nye versioner. Denne opdatering er "
     "ndvendig for at A4091 kan fungere korrekt.\n\n"
     "Vlg \"Partitionere ny Harddisk\" for at partitionere og "
     "formatere en upartitioneret harddisk. Dette er ndvendigt, hvis "
     "AmigaDos skal kunne bruge denne harddisk."
))

(set #done-update
(cat "\n\nDeres system er nu blevet opdateret med de ndvendige AmigaDOS filer."
))

(set #really-partition
(cat "Disken som er forbundet til '%s' enhed %s syntes ikke at have vret "
     "formateret tidligere. Hvis de fortstter, vil disken blive partitioneret "
     "og formatteret til AmigaDOS brug."
))

(set #really-partition-help
(cat "A4091Setup har fundet ud af at disken, som er forbundet til '%s' med SCSI bus "
     "addresse %s, aldrig fr har vret partitioneret og formatteret p en Amiga. "
     "Hvis De fortstter, vil disken blive partitioneret og formatteret. "
     "Dette betyder at al information p disken gr tabt. Hermed ogs information, "
     "som mtte vre lagt p af et andet inkompatibel (ikke Amiga) computer system."
))

(set #really-partition-1
(cat "Partitionere Disk"
))

(set #really-partition-2
(cat "Afbryde"
))

(set #partition-complete
(cat "\n\nPartionering og formattering er nu frdig. Deres disk har fet navnet "
     "%s (%s). De kan nu benytte disken p normal vis."
))

(set #partition-notfound
(cat "\n\nPartitionerings processen kan ikke finde en ny disk eller partition. "
     "Hvis der er installeret en ny harddisk s check forbindelses kabler, "
     "og benyt ellers HDToolBox programmet i Tools skuffen p Deres Workbench "
     "partition, for at lse dette problem."
     "\nA4091Setup standses nu."
))

(set #partition-error
(cat "\n\nPartionering blev IKKE lavet korrekt. Harddisken er ikke klar til "
     "brug. Brug HDToolBox programmet, i Tools skuffen p "
     "Deres Workbench partition, for at lse dette problem."
))

(set #partition-aborted
(cat "\n\nOperationen afbrudt. Partionering bliver ikke lavet."
))

(set #empty-name
(cat "Tom"
))

))


;=============================================================================
; Swedish strings

(if (= @@language "svenska")
(
(set @@abort-button "Avbryt")

(set #bad-kick
(cat "Du mste anvnda Kickstart 2.0 eller senare fr att anvnda A4091"
))

(set #introduction
(cat "\nDetta program lter dig utfra tv grundlggande funktioner relaterade "
     "till ditt A4091-kort. Det lter dig uppgradera vissa AmigaDOS-filer "
     "som krvs fr att A4091-kortet skall fungera korrekt. Dessutom lter det "
     "dig partitionera och formattera tidigare oformatterade SCSI-hrddiskar "
     "anslutna till A4091-kortet.\n\n"
))

(set #introduction-help
(cat "\nA4091-kortet krver att vissa AmigaDOS-filer uppgraderas till senaste "
     "versionen. Det inkluderar fljande filer: SetPatch, 68040.library, och "
     "HDToolBox. Om du vljer alternativet \"Uppdatera AmigaDOS-filer\" s "
     "kommer dessa filer automatiskt att uppdateras.\n\n"
     "Innan en hrddisk kan anvndas i din Amiga s mste den frst "
     "partitioneras och formatteras. Partitionera innebr att dela upp "
     "hrddisken i delar och namnge dessa. Att formattera innebr att "
     "frbereda hrddisken fr anvndning under AmigaDOS. Att formattera "
     "en hrddisk r precis som att formattera en diskett."
))

(set #ask-function
(cat "\nVill du uppdatera AmigaDOS-filer, eller partitionera en ny "
     "hrddisk?\n\nOm du har Workbench 3.1 eller senare s behver du inte "
     "uppgradera AmigaDOS-filerna, eftersom Workbench 3.1 redan har rtt "
     "versioner fr att fungera korrekt med A4091."
))

(set #ask-function-1
(cat "Uppdatera AmigaDOS-filer"
))

(set #ask-function-2
(cat "Partitionera ny hrddisk"
))

(set #ask-function-help
(cat "\nDu mste vlja vilken funktion du vill utfra.\n\n"
     "Om du vljer \"Uppdatera AmigaDOS-filer\" s uppdateras ett antal "
     "systemfiler, vilket behvs fr korrekt funktion med A4091-kortet. Det "
     "inkluderar fljande filer: SetPatch, 68040.library, och HDToolBox.\n\n"
     "Om du vljer \"Partitionera ny hrddisk\" s kan du partitionera och "
     "formattera en tidigare oanvnd hrddisk, s att den kan hittas och "
     "anvndas av AmigaDOS."
))

(set #done-update
(cat "\n\nAmigaDOS-filerna p din hrddisk har uppdaterats."
))

(set #partition-notfound
(cat "\n\nInstallationsprogrammet har inte funnit ngon oanvnd hrddisk "
     "i datorn."
))

(set #really-partition
(cat "Hrddisken ansluten till '%s', enhet %s verkar aldrig ha varit "
     "formatterad tidigare. Om du vljer att fortstta kommer den att "
     "partitioneras och formatteras fr anvndning av AmigaDOS."
))

(set #really-partition-help
(cat "A4091Setup har underskt hrddisken ansluten till '%s' med SCSI-"
     "adress %s, och funnit att den aldrig partitionerats och formatterats "
     "p en Amiga tidiagare. Om du vljer att fortstta kommer den att "
     "partitioneras och formatterats. Detta medfr att all information "
     "som tidigare eventuellt kan ha funnits p den (om den t.ex anvnts p "
     "en annan, icke kompatibel dator) kommer att frloras."
))

(set #really-partition-1
(cat "Partitionera hrddisk"
))

(set #really-partition-2
(cat "Avbryt"
))

(set #partition-complete
(cat "\n\nPartionering och formattering r klar. Din hrddisk har dpts till "
     "%s (%s). Du kan nu anvnda hrddisken som vanligt."
))

(set #partition-error
(cat "\n\nPartioneringen fungerade inte som den skulle. Hrddisken r inte "
     "klar fr anvndning. Anvnd programet HDToolBox i Tools-ldan p din "
     "Workbench-partition fr att frska lsa problemet manuellt."
))

(set #partition-aborted
(cat "\n\nPartitionering avbruten."
))

(set #empty-name
(cat "Tom"
))

))


;=============================================================================
; Norwegian strings

(if (= @@language "norsk")
(
(set @@abort-button "Avbryt")

(set #bad-kick
(cat "Du m bruke Kickstart 2.0 for  kunne benytte programvaren til "
     "A4091."
))

(set #introduction
(cat "\nDette programmet lar deg utfre to viktige funksjoner som angr "
     "din A4091 kontroller.\n\n"
     "Det lar deg oppgradere visse AmigaDOS-filer "
     "for at A4091 skal fungere korrekt, og det lar deg "
     "partisjonere og formatere tidligere uformaterte SCSI "
     "harddisker som er koplet til A4091.\n\n"
))

(set #introduction-help
(cat "\nA4091-kontrolleren krever at visse AmigaDOS-filer som allerede "
     "finnes i systemet ditt m oppgraderes til siste versjoner. Dette "
     "gjelder bl.a. flgende filer: SetPatch, 68040.library og HDToolBox. "
     "Ved  velge knappen \"Oppdater AmigaDOS-filer\", vil "
     "disse filene automatisk bli oppdatert.\n\n"
     "Fr Amiga kan benytte en harddisk, m disken partisjoneres og "
     "formateres. Ved partisjoneringen gis harddisken et navn som "
     "systemet benytter til identifikasjon av enheten, i tillegg til at "
     "lav-niv informasjon om harddisken defineres.\n\n"
     "Ved formateringen "
     "blir harddisken klargjort for  kunne benyttes av AmigaDOS. "
     " formatere en harddisk foregr p samme mte som med en diskett."
))

(set #ask-function
(cat "\nVil du oppgradere AmigaDOS-filer eller partisjonere en ny "
     "harddisk?\n\n"
     "Hvis du allerede har Workbench 3.1 i systemet, behver du ikke "
     "oppgradere AmigaDOS-filene, fordi du allerede har de korrekte "
     "versjonene som behves for  benytte A4091."
))

(set #ask-function-1
(cat "Oppdater AmigaDOS-filer"
))

(set #ask-function-2
(cat "Partisjoner ny harddisk"
))

(set #ask-function-help
(cat "\nDu m velge hvilken operasjon som skal utfres.\n\n"
     "Ved  velge \"Oppdater AmigaDOS-filer\", vil visse filer som "
     "allerede finnes i systemet ditt bli oppgradert til versjoner som "
     "passer til A4091.\n\n"
     "Ved  velge \"Partisjoner ny harddisk\", kan du partisjonere og "
     "formatere en tidligere upartisjonert harddisk for at den "
     "skal kunne benyttes av AmigaDOS."
))

(set #done-update
(cat "\n\nDe aktuelle AmigaDOS-filene i systemet ditt har blitt oppdatert."
))

(set #really-partition
(cat "A4091Setup har funnet ut at disken som er koplet til '%s' med SCSI "
     "bus-adresse %s aldri er partisjonert og formatert p en Amiga fr. "
     "Fortsetter du denne prosedyren vil disken partisjoneres og "
     "formateres. Dette vil medfre at all informasjon som "
     "kan ha vrt lagret p disken med et inkompatibelt datasystem, "
     "blir slettet."
))

(set #really-partition-1
(cat "Partisjoner disken"
))

(set #really-partition-2
(cat "Avbryt"
))

(set #partition-complete
(cat "\n\nPartisjonering og formatering er n utfrt. Den nye harddisken "
     "er blitt kalt %s (%s). Du kan n benytte disken til normale "
     "operasjoner."
))

(set #partition-error
(cat "\n\nPartisjoneringsprosessen fungerte ikke korrekt. Disken er ikke "
     "klar til bruk. Bruk HDToolBox-programmet som ligger i Tools-skuffen "
     "p Workbench-partisjonen for  lse dette problemet."
))

(set #partition-aborted
(cat "\n\nOperasjonen avbrutt. Ingen partisjonering vil bli utfrt."
))

(set #empty-name
(cat "Tom"
))

))


;=============================================================================
; make sure we are running V39

(if (< (/ (getversion) 65536) 37)
(
    (abort #bad-kick)
))


;=============================================================================
; what do you want to do?

(message #introduction
         (help #introduction-help)
)

(if (askbool (prompt #ask-function)
	     (help #ask-function-help)
	     (choices #ask-function-1 #ask-function-2)
    )
(
    ; update system software

    (copylib (source "A4091:Libs/68040.library")
             (dest "LIBS:")
    )

    (copylib (source "A4091:C/SetPatch")
             (dest "C:")
    )

    (copylib (source "A4091:Tools/HDToolBox")
             (dest "SYS:Tools")
    )

    (message #done-update)
)
(
    ; partition a new HD
    (run "A4091:C/FindNotFormatted >ENV:NotFormatted" (safe))
    (set deviceunit (getenv "NotFormatted"))

    (if (= (strlen deviceunit) 0)
    (
        (message #partition-notfound)
    )
    (
        (set unit (substr deviceUnit 0 1))
        (set device (substr deviceUnit 2))
        (set device (substr device 0 (- (strlen device) 1)))

        (if (askbool (prompt (#really-partition device unit))
                     (help (#really-partition-help device unit))
                     (choices #really-partition-1 #really-partition-2)
            )
        (
            (set driveNum 0)
            (set driveName ("HD%ld" driveNum))
            (while (<> (getassign driveName "d") "")
            (
                (set driveNum (+ driveNum 1))
                (set driveName ("HD%ld" driveName driveNum))
            ))
            (set driveName (cat driveName ":"))

            (textfile (dest "RAM:A4091PrepScript")
                      (append "addpart " driveName " rest dostype 0x444f5303 buffers 30 mask 0xFFFFFFFE\nreselect on\nwriterdb force\nquit\n")
            )

            (set result (run "A4091:C/Prod_Prep Device " device " Unit " unit " layout RAM:A4091PrepScript"))
            (if (= result 0)
            (
                (run "A4091:C/Wait")
                (run ("A4091:System/Format >NIL: <NIL: device \"%s\" name \"%s\" quick" driveName #empty-name))
                (run "A4091:C/Wait")
                (copyfiles (source "A4091:Update/Disk.info")
                           (dest driveName)
                           (nogauge)
                )

                (message (#partition-complete #empty-name driveName))
            )
            (
                (abort #partition-error)
            ))

            (delete "RAM:A4091PrepScript")
        )
        (
            (message #partition-aborted)
        ))
    ))
))


;=============================================================================
; bye

(exit (quiet))


;=============================================================================
; we never get here, but this keeps the Installer from being a pest
(welcome)
@


40.7
log
@*** empty log message ***
@
text
@d1 1
a1 1
; $Date: 93/04/05 11:32:15 $ $Revision: 40.6 $
d133 92
d226 1
a226 1
(cat "Empty"
d228 1
@


40.6
log
@*** empty log message ***
@
text
@d1 1
a1 1
; $Date: 93/04/05 11:10:11 $ $Revision: 40.5 $
d837 94
d932 1
a932 1
(cat "Empty"
d934 1
@


40.5
log
@*** empty log message ***
@
text
@d1 1
a1 1
; $Date: 93/04/01 14:29:51 $ $Revision: 40.4 $
d144 96
d241 9
a249 1
(cat "Empty"
d251 1
@


40.4
log
@*** empty log message ***
@
text
@d1 1
a1 1
; $Date: 93/03/31 13:58:49 $ $Revision: 40.3 $
d152 1
d155 98
d254 6
a259 1
(cat "Empty"
d261 1
d270 106
d377 1
a377 1
(cat "Empty"
d379 1
d503 107
d611 1
a611 1
(cat "Empty"
d613 1
@


40.3
log
@*** empty log message ***
@
text
@d1 1
a1 1
; $Date: 93/03/19 16:36:06 $ $Revision: 40.2 $
d232 8
@


40.2
log
@Fixed some bugs
@
text
@d1 1
a1 1
; $Date: 93/03/17 14:56:19 $ $Revision: 40.1 $
d69 4
d176 95
d272 1
a272 1
(cat "Empty"
d274 1
d294 98
d393 1
a393 1
(cat "Empty"
d395 1
@


40.1
log
@installerscripts
Initial V40 RCS checkin
@
text
@d1 1
a1 1
; $Date: 93/02/26 14:49:16 $ $Revision: 40.2 $
d250 2
a251 3
;    (run "A4091:C/FindNotFormatted >ENV:NotFormatted" (safe))
;    (set deviceunit (getenv "NotFormatted"))
    (set deviceUnit "0 blah.device")
d260 1
d291 1
a291 1
                (message (#complete-partition #empty-name driveName))
@
