;*************************************************************************
;*  WarpUP CD-Installer Version 14   15 April 1998                       *
;*                                                                       *
;*  ©1998 HAAGE & PARTNER Computer GmbH                                  *
;*                                                                       *
;*  If you have any installer questions please let us know!              *
;*                                                                       *
;*  Corrections from Pieter Frenssen                                     *
;*************************************************************************
;
; $VER: WarpUP V14.6 Install Version 2.1 (09.08.98)

(complete 0)

; Die Versionsnummer und das Erstellungs-Datum der hier installierten
; Versionen.

(set #warpup-version "Version 14.6")
(set #warpup-date "(16.07.98)")

; // Die Dateigrößen

(set #size-komplett 4) ; MByte CD-Installation

;====================================================================
; Initialisierungen

; --- English strings ---

    (set #yeskey "Yes")
    (set #nokey "No")

    (set #wrongos "\n Sorry, you will need OS2.04 or better\n")

    (set #wrongcpu "\n Sorry, you will need min. a 68020 CPU to use StormC\n")

    (set #welcome (cat "\n\n"
        "Welcome to the installation of the new\n\n"
        "PowerPC native exec kernel WarpUP-WarpOS.\n\n"
        ""#warpup-version " of "#warpup-date"\n\n"
        "This script copies the WarpUP-Libraries\n"
        "to your harddisk!\n\n"
        "© 98 HAAGE&PARTNER Computer GmbH\n"
        ))
    (set #boardsoptstxt "Please choose your Board")
    (set #noboards "No PPC-Board available")
    (set #cyberstorm "CyberStormPPC A3000/A4000")
    (set #developerboard "CyberStorm Developerboard")
    (set #blizzard "Blizzard PPC A1200")

    (set #boardopts_help (cat "\n"
        "The 'warpHW.library' is the hardware driver for the WarpUp-HAL. In the "
        "directory 'hwdrivers' there are detailed documentation and examples sources "
        "which allow everyone to write WarpUp drivers for new PPC hardware. For "
        "every hardware there exists a library 'warpHW.library'. It is absolutely "
        "necessary that the correct library is installed. This can be tested by "
        "running the tool 'GetDriverInfo' (in the 'tools' directory) which prints "
        "out, which hardware is represented by this driver."
        ))


    (set #envoptstxt "Please choose your settings!")

    (set #envdebug "Debug-Modus")
    (set #envmemprot "PPC memory protection")
    (set #envearlyterm "WShell compatible")
    (set #envnoppc "PPC board not available")
    (set #envhidewarning "Ignore warnings")
    (set #envterminator "PPC.lib autoterminator")

    (set #envopts_help ( cat "\n"
        "Settings\n\n"
        "WarpOS knows some env-variables that can be used to make certain preferences. "
        "The following are currently supported:\n\n"

        "Debug Modus - env:powerpc/debug\n\n"

        "May contain a number between 0 and 3. This specifies the debugging-level to "
        "use when WarpOS boots. Should usually be left at 0 unless you are interested "
        "in what happens during the booting process. The debugging-level can be changed "
        "during operation by using the 'setdb' tool.\n\n"

        "PPC memory protection - env:powerpc/memprot\n\n"

        "Can be either 0 or 1. If it is set to 1, the memory-protection facilities of "
        "WarpOS are switched on, otherwise off. If low-memory situations occur it can "
        "help to switch off memory protection.\n\n"

        "PPC board not available - env:powerpc/noPPC\n\n"

        "This variable must be set, if the powerpc.library V8+ is installed on a "
        "Non-PPC system. Afterwards all demos which also run without PPC (but which "
        "try to open the powerpc.library) should run. If the variable is not set, "
        "then the library crashes at initialization.\n\n"

        "WShell compatible - env:powerpc/earlyterm\n\n"

        "If this variable is not set, then problems can occur in conjunction with "
        "programs like WShell. In this case the variable should be set. Afterwards, "
        "the tools 'stackppc' and 'changemmu' can NOT be used anymore. The PPC stack "
        "can be set using the stack command (the PPC stack gets about double the "
        "size of the 68K stack of the shell).\n\n"

        "PPC.lib autoterminator - env:powerpc/Terminator\n\n"

        "If this variable is set to 1, then it's possible to launch WarpOS even if "
        "the ppc.library is active. WarpOS tries then to remove the ppc.library and "
        "related resources from the operating system. Of course it is still not "
        "possible to use both ppc.library and WarpOS at the same time.\n\n"

        "Ignore warnings - env:powerpc/HideWarning\n\n"

        "If this variable is set to 1, the appearance of the requesters, which come "
        "up in conjunction with ppc.library Warning, is avoided. "
          ))

    (set #stormc_install_powerpclib "Copy libraries to Libs:")
    (set #stormc_install_powerpclib_help "You need this library for using WarpOS")

    (set #versoptstxt "Do you want to install WarpOS V14 or the compatible V7?")
    (set #warpos "WarpOS V14")
    (set #s-lib "compatible version 7")
    (set #boardsopt-help (cat "\n"
        "Very important: As soon as WarpOS has been booted, absolutely NO PPC-programs "
        "that are present in ELF-format will run. If compatibility with ELF-programs is "
        "desired, the powerpc.library version 7 must be installed - after that, "
        "ELF-programs as well as programs using the extended hunk-format will run. The "
        "price you have to pay for this is a miserable performance when "
        "context-switches between the CPUs occur. Furthermore, most of the features of "
        "WarpOS will not be usable (version 7 is not an operating system in its own "
        "right)."
        ))

    (set #gfxopts "Is one of the both gfx cards CVisionPPC or BVisonPPC installed in your amiga?")
    (set #cvppctxt "CyberVisionPPC")
    (set #bvppctxt "BlizzardVisionPPC")
    (set #othergfx "Other gfx card")
    (set #nogfx "No gfx card")
    (set #stormc_install_mcpatch "Install patch again ramlib errors.")

    (set #endsuccess "\n\nInstallation successfull")

(if (= @language "deutsch") (


    (set #yeskey "Ja")
    (set #nokey "Nein")

    (set #wrongos "\n Sorry, dieses Paket benötigt mind. OS2.04.\n")

    (set #wrongcpu "\n Sorry, das StormC-Paket setzt eine 68020 CPU voraus!\n")

    (set #welcome (cat "\n\nWillkommen bei der Installation des neuen\n"
        "PowerPC nativen Exec Kernels WarpUP-WarpOS.\n\n"
        ""#warpup-version " vom "#warpup-date"\n\n"
        "Dieses Skript kopiert die verschiedenen\n"
        "Bibliotheken, aus denen sich WarpUP-WarpOS\n"
        "zusammensetzt auf Ihre Festplatte.\n\n"
        "© 98 HAAGE&PARTNER Computer GmbH\n"
        ))

    (set #boardsoptstxt "Bitte Boardtyp auswaehlen")
    (set #noboards "Kein PPC-Board vorhanden")
    (set #cyberstorm "CyberStormPPC A3000/A4000")
    (set #developerboard "CyberStorm Developerboard")
    (set #blizzard "Blizzard PPC A1200")

    (set #boardopts_help (cat "\n"
        "Wählen Sie bitte das entsprechende, in Ihrem Amiga eingebaute PowerPC-Board aus. "
        "Wenn Sie noch ueber kein Board verfuegen, wählen Sie einfach \"Kein PPC-Board vorhanden\". "
        "Sie könenn dann dennoch die beigefuegten Demos ablaufen lassen.\n\n"
        "Die 'warpHW.library' ist der Hardware-Treiber fuer den WarpUp-HAL. Im "
        "Verzeichnis 'hwdrivers' befindet sich eine ausfuehrliche Dokumentation und "
        "Beispiel-Sourcen, welche es jedermann erlauben, WarpUp-Treiber fuer neue "
        "PPC-Hardware zu entwickeln. Fuer jede Hardware gibt es eine warpHW.library. "
        "Es muss natuerlich die korrekte Version installiert sein. Dies kann man "
        "ueberpruefen, indem man das Programm 'GetDriverInfo' (im 'tools'-Verzeichnis) "
        "laufen laesst, welches in der Shell ausgibt, welche Hardware der Treiber "
        "repraesentiert."
        ))


    (set #envoptstxt "Bitte wählen Sie Ihre Einstellung!")

    (set #envdebug "Debug-Modus")
    (set #envmemprot "PPC-Speicherschutz")
    (set #envearlyterm "WShell-Kompatibel")
    (set #envnoppc "PPC-Board ausgebaut")
    (set #envhidewarning "Warnungen ignorieren")
    (set #envterminator "PPC.lib Autoterminator")

    (set #envopts_help ( cat "\n"
          "Voreinstellungen\n\n"
          "WarpOS kennt einige Env-Variablen, womit gewisse Voreinstellungen gemacht "
          "werden können. Zur Zeit sind folgende unterstützt:\n\n"

          "Debug-Modus - env:powerpc/debug\n\n"

          "Kann eine Ziffer zwischen 0 und 3 beinhalten. Damit wird der Debugging-Level "
          "beim Aufstarten von WarpOS festgelegt. Sollte normalerweise auf 0 belassen "
          "werden, ausser jemand interessiert sich für die Vorgänge beim Bootvorgang. "
          "Der Debugging-Level kann nachträglich mit dem Tool-Programm 'setdb' eingestellt "
          "werden.\n\n"

          "PPC-Speicherschutz - env:powerpc/memprot\n\n"

          "Kann entweder 0 oder 1 sein. Wenn es auf 1 gesetzt ist, sind die Speicher-"
          "schutzmöglichkeiten von WarpOS eingeschaltet, ansonsten ausgeschaltet. Wenn "
          "eventuell Speicherplatzprobleme auftauchen, kann es helfen, den Speicherschutz "
          "zu deaktivieren.\n\n"

          "PPC-Board ausgebaut - env:powerpc/noPPC\n\n"

          "Diese Variable muss gesetzt sein, wenn die powerpc.library V8+ auf einem "
          "Nicht-PPC-System installiert wird. Danach funktionieren alle Demos, welche "
          "auch ohne PPC laufen, aber die powerpc.library zu öffnen versuchen. Ist "
          "die Variable dann nicht gesetzt, stürzt die Library in der Initialisierung "
          "ab.\n\n"

          "WShell-Kompatibilität - env:powerpc/earlyterm\n\n"

          "Wenn diese Variable nicht gesetzt ist, kann es im Zusammenhang mit Programmen "
          "wie der WShell zu grossen Problemen kommen, in diesem Fall sollte diese "
          "Variable gesetzt werden. Dann können aber die Tool-Programme 'stackppc' und "
          "'changemmu' nicht mehr benützt werden. Der PPC-Stack kann dann aber mit dem "
          "Stack-Befehl gesetzt werden (Der PPC-Stack ist etwa doppelt so gross wie der "
          "68K-Stack der Shell).\n\n"

          "PPC.lib Autoterminator - env:powerpc/Terminator\n\n"

          "Wenn diese Variable auf 1 gesetzt ist, so wird die Moeglichkeit geschaffen, "
          "WarpOS hochzufahren, auch wenn die ppc.library aktiviert ist. Zu dem Zweck "
          "wird versucht, die ppc.library und verwandte Resourcen aus dem Betriebssystem "
          "zu entfernen. Natuerlich koennen bei laufendem WarpOS dann immer noch keine "
          "ppc.library-Applikationen benuetzt werden.\n\n"

          "Warnungen ignorieren - env:powerpc/HideWarning\n\n"

          "Wenn diese Variable auf 1 gesetzt ist, so wird das Erscheinen der Requester "
          "verhindert, welche im Zusammenhang mit der ppc.library erscheinen und dem "
          "User mitteilen, dass WarpOS nicht so ohne weiteres hochfahren kann."
          ))

    (set #stormc_install_powerpclib "Kopiere die Bibliotheken nach Libs:")
    (set #stormc_install_powerpclib_help "Die Bibliothek wird zwangsläufig zum Betrieb benoetigt.")

    (set #versoptstxt "Möchten Sie WarpOS V14 oder die kompatible V7 installieren")
    (set #warpos "WarpOS V14")
    (set #s-lib "Kompatible Version 7")
    (set #boardsopt-help (cat "\n"
        "Sehr wichtig: Sobald WarpOS hochgefahren wurde, laufen absolut KEINE "
        "PPC-Programme, die im ELF-Format vorliegen. Wenn unbedingt Kompatibilität "
        "zu ELF-Programmen erwünscht ist, muss die powerpc.library Version 7 "
        "installiert werden, wonach sowohl ELF-Programme wie auch Programme im "
        "erweiterten Hunkformat laufen. Der Preis dafür ist schlechte Performance "
        "bei Kontextwechseln zwischen den CPUs. Zudem sind die meisten Features des "
        "WarpOS nicht zugänglich (Die Version V7 ist kein eigenständiges Betriebs-"
        "system)."
        ))

    (set #gfxoptstxt "Haben Sie eine der beiden Grafikkarten CVisonPPC oder BVisonPPC in Ihrem Amiga installiert?")
    (set #cvppctxt "CyberVisionPPC")
    (set #bvppctxt "BlizzardVisionPPC")
    (set #othergfx "Andere Grafikkarte")
    (set #nogfx "Keine Grafikkarte")
    (set #stormc_install_mcpatch "Installiere Patch zur Vermeidung eines ramlib fehlers.")

    (set #endsuccess "\n\nInstallation erfolgreich beendet")
))

(if (= @language "italiano") (


    (set #yeskey "Si")
    (set #nokey "No")

    (set #wrongos "\n Spiacente, é necessario OS2.04 or superiore.\n")

    (set #wrongcpu "\n Spiacente, é necessario al minimo una CPU 68020 o superiore per usare WarpOS\n")

    (set #welcome (cat "\n\n"
        "Benvenuto all'installazione del nuovo\n\n"
        "kernel nativo per PowerPC WarpUP-WarpOS.\n\n"
        ""#warpup-version " del "#warpup-date"\n\n"
        "Questo script copia le librerie WarpUP\n"
        "sul tuo harddisk!\n\n"
        "© 98 HAAGE&PARTNER Computer GmbH\n"
        ))
    (set #boardsoptstxt "Scegli la tua scheda:")
    (set #noboards "Nessuna scheda PPC")
    (set #cyberstorm "CyberStormPPC A3000/A4000")
    (set #developerboard "CyberStorm Developerboard")
    (set #blizzard "Blizzard PPC A1200")

    (set #boardopts_help (cat "\n"
        "La 'warpHW.library' é il driver hardware per il WarpUp-HAL. Nella "
        "directory 'hwdrivers' c'è tutta la documentazione dettagliata e dei "
        "sorgenti di esempio che consentono a chiunque di scrivere dei driver WarpUp "
        "per del nuovo hardware PPC. "
        "Per ogni hardware esistente c'è una libreria 'warpHW.library'. E` assolutamente "
        "necessario che sia installata la libreria corretta. Ciò può essere controllato "
        "tramite il comando 'GetDriverInfo' (che si trova nella directory 'tools' ) che "
        "stampa quale hardware é rappresentato da questo driver."
        ))

    (set #envoptstxt "Scegli le tue impostazioni!")

    (set #envdebug "Livello di Debug")
    (set #envmemprot "Protezione di memoria sotto PPC.")
    (set #envearlyterm "Compatibilità con WShell")
    (set #envnoppc "Scheda PPC non disponibile")
    (set #envhidewarning "Ignorare i 'warnings'")
    (set #envterminator "Autonuclearizzazione PPC.library")

    (set #envopts_help ( cat "\n"
        "Impostazioni:\n\n"
        "WarpOS usa alcune variabili di ambiente (env-variables) che possono essere usate "
        "per cabiare alcune opzioni. "
        "Le opzioni seguenti sono supportate al momento attuale:\n\n"

        "Livello di Debug - env:powerpc/debug\n\n"

        "Può contenere un numero compreso tra 0 e 3. Questo specifica il livello di debugging "
        "da usare quando WarpOS parte. Di solito andrebbe lasciato a 0 a meno che tu sia "
        "interessato in ciò che accade durante il processo di boot. Il livello di debugging "
        "può essere cambiato durante l'utilizzo normale tramite il comando 'setdb'.\n\n"

        "Protezione di memoria sotto PPC. - env:powerpc/memprot\n\n"

        "Può essere o 0 oppure 1. Se imposatao a 1, le risorse di protezione della memoria "
        "di WarpOS saranno attive, altrimenti no. Se capitano delle situazioni di poca "
        "memoria, può essere d'aiuto disattivare la protezione della memoria.\n\n"

        "Scheda PPC non disponibile - env:powerpc/noPPC\n\n"

        "Queata variabile DEVE essere impostata, se la powerpc.library V8+ è installata "
        "in un sistema senza PPC. Dopodiché tutti i demo che possono anche girare senza "
        "PPC (ma che provano ad aprire la powerpc.library) dovrebbero girare. Se la variabile "
        "non é impostata allora la libreria si pianta allegramente all'inizializzazione.\n\n"

        "Compatibilità con WShell - env:powerpc/earlyterm\n\n"

        "Se questa variable non é impostata, allora possono esserci dei problemi con "
        "programmi come WShell. In questo caso, la variabile deve venire impostata. "
        "Dopodiché, i programmi 'stackppc' e 'changemmu' NON possono essere più usati. Lo "
        "stack PPC può essere impostato usando il comando standard 'stack' (lo stack PPC "
        "avrà una dimensione doppia dello stack 68K della shell).\n\n"

        "Autoterminazione PPC.library - env:powerpc/Terminator\n\n"

        "Se questa variabile é impostata a 1, allora é possibile launciare WarpOS anche "
        "se la ppc.library é attiva. WarpOS proverà quindi a rimuovere la ppc.library e "
        "le relative risorse dal sistema operativo. Naturalmente non é ancora possibile "
        "usare sia la ppc.library che WarpOS allo stesso tempo. "
        "I possessori di BlizzardPPC DEVONO impostare a 1 questa variabile per poter usare "
        "WarpOS.\n\n"

        "Ignorare i 'warnings' - env:powerpc/HideWarning\n\n"

        "Con questa variabile impostata a 1, l'apparizione dei requester, che "
        "apparirebbero per l'avvertimento della rimozione della ppc.library, sarà evitata. "
        "E' utile se si installa WarpOS in un sistema in contemporanea con la ppc.library."
          ))

    (set #stormc_install_powerpclib "Copia delle librerie in Libs:")
    (set #stormc_install_powerpclib_help "E' necessaria questa libreria per usare WarpOS")

    (set #versoptstxt "Vuoi installare WarpOS V14 o la versione compatibile V7?")
    (set #warpos "WarpOS V14")
    (set #s-lib "compatibile V7")
    (set #boardsopt-help (cat "\n"
        "NOTA BENE: Dal momento in cui WarpOS viene lanciato, NESSUN programma PPC "
        "che é presente in formato ELF funzionerà più. Se si desidera la compatibilità "
        "con programmi ELF, deve venire installata la powerpc.library versione 7 - dopo, "
        "ciò, funzioneranno sia i programmi ELF che quelli che usano il formato di hunk "
        "esteso (WarpOS). Il prezzo che dovrai pagare per questo é una prestazione "
        "miserevole durante i context-switches tra CPU. Oltretutto, molte delle capacità "
        "di WarpOS non saranno utilizzabili (la versione 7 NON è un sistema operativo vero "
        "e proprio)."
        ))

    (set #gfxopts "Is one of the both gfx cards CVisionPPC or BVisonPPC installed in your amiga?")
    (set #cvppctxt "CyberVisionPPC")
    (set #bvppctxt "BlizzardVisionPPC")
    (set #othergfx "Other gfx card")
    (set #nogfx "No gfx card")
    (set #stormc_install_mcpatch "Install patch again ramlib errors.")

    (set #endsuccess "\n\nL'installazione ha avuto successo. Buon divertimento.")
))

(set #os-version (/ (getversion) 65536))
(set #os-13 (< #os-version 36))
(set #os-20 (>= #os-version 36))
(set #os-21 (>= #os-version 38))

; ------------ Die Pfadnamen der einzelnen Quell-Dateien ----------------

(set #ppcv7 (tackon (pathonly @icon) "WarpUP-WarpOS/V7/PowerPC.library"))
(set #dummyelf (tackon (pathonly @icon) "WarpUP-WarpOS/V7/dummy.elf"))
(set #hw1 (tackon (pathonly @icon) "WarpUP-WarpOS/hwdrivers/CyberStormPPC/warpHW.library"))
(set #hw2 (tackon (pathonly @icon) "WarpUP-WarpOS/hwdrivers/P5Developerboard/warpHW.library"))
(set #hw3 (tackon (pathonly @icon) "WarpUP-WarpOS/hwdrivers/BlizzardPPC/warpHW.library"))
(set #ppcv14 (tackon (pathonly @icon) "WarpUP-WarpOS/libs/PowerPC.library"))
(set #warpV14 (tackon (pathonly @icon) "WarpUP-WarpOS/libs/Warp.library"))
(set #ramlibpatch (tackon (pathonly @icon) "WarpUP-WarpOS/Tools/MCPRamlibPatch"))
;=====================================================================================
; // Beginn der Installation
;=====================================================================================

; // wird min. unter 2.04 installiert ?

(if (= #os-13 1)

    (
        (message #wrongos)

        (exit (quiet))
    )
)

(if (patmatch "68000|68010" (database "cpu"))
    (
        (message #wrongcpu)
        (exit (quiet))
    )
)

(onerror (
    (if (> @ioerr 0)
        (message (cat "\n ERROR CODE: " @ioerr "\n\n"))
    )
))

; // Eine kleine Änderung to enable das script zu laufen (deutsch??).

(run "ASSIGN ENV: WarpUP-WarpOS/ENV/ ADD")

; // Eine kleine Einleitung, gefolgt vom Startbild des Installers.


(message #welcome)

;(welcome)

(complete 2)

; // Alte Version prüfen und entsprechende Abfrage ausgeben!--------------------------------------------

(set #folder "SYS:")

; Libs auf die Platte kopieren

(complete 10)

(set #noppc (getenv "PowerPC/noppc"))

(set #boardopts
    (askchoice
        (prompt #boardoptstxt)
        (help #boardopts_help)
        (choices #noboards #cyberstorm #developerboard #blizzard)
        (default 1)
    )
)

(if (= #boardopts 0)
    ((set #noppc 1))
)

(set destenvarc (tackon "envarc:" "PowerPC"))
(set destenv (tackon "env:" "PowerPC"))
(if                                         ; // Verzeichnis für Envargumente erzeugen
   (= (exists destenvarc) 0)
    (
      (makedir destenvarc (infos))
      (makedir destenv (infos))

      (set #alertfile "CON:0/20/400/200/WarpOS - System Message/AUTO/CLOSE/WAIT/INACTIVE")

      (run "setenv PowerPC/alertfile" #alertfile)
      (run "copy ENV:PowerPC/alertfile ENVARC:PowerPC")

      (set #crashfile "CON:0/20/400/300/WarpOS - PowerPC Exception/AUTO/CLOSE/WAIT/INACTIVE")

      (run "setenv PowerPC/crashfile" #crashfile)
      (run "copy ENV:PowerPC/crashfile ENVARC:PowerPC")

      (run "setenv PowerPC/gfxaddr" 0)
      (run "copy ENV:PowerPC/gfxaddr ENVARC:PowerPC")

      (run "setenv PowerPC/force" 0)
      (run "copy ENV:PowerPC/force ENVARC:PowerPC")

      (set #debug 0)
      (set #gfxaddr 0)
      (set #memprot 1)
      (set #earlyterm 0)
      (set #hidewarning 0)
      (set #terminator 2)
      (set #force 0)
    )
    (
      (set #alertfile (getenv "PowerPC/alertfile"))
      (set #crashfile (getenv "PowerPC/crashfile"))
      (set #debug (getenv "PowerPC/debug"))
      (set #gfxaddr (getenv "PowerPC/gfxaddr"))
      (set #memprot (getenv "PowerPC/memprot"))
      (set #earlyterm (getenv "PowerPC/earlyterm"))
      (set #hidewarning (getenv "PowerPC/hidewarning"))
      (set #terminator (getenv "PowerPC/terminator"))
      (set #force (getenv "PowerPC/force"))
    )
)

(set #envopts 0)

(if (= #debug 1)
   (
   (set #envopts (bitor #envopts 1))
   )
)

(if (= #memprot 1)
   (
   (set #envopts (bitor #envopts 2))
   )
)

(if (= #earlyterm 1)
   (
   (set #envopts (bitor #envopts 4))
   )
)

(if (= #noppc 1)
   (
   (set #envopts (bitor #envopts 8))
   )
)

(if (= #hidewarning 1)
   (
   (set #envopts (bitor #envopts 16))
   )
)

(if (= #terminator 1)
   (
   (set #envopts (bitor #envopts 32))
   )
)

(if (= #terminator 2)
   (
   (set #envopts (bitor #envopts 32))
   )
)

;==================================================================================
(complete 40)

(set #envopts
    (askoptions
        (prompt #envoptstxt)
        (help #envopts_help)
        (choices #envdebug #envmemprot #envearlyterm #envnoppc #envhidewarning #envterminator)
        (default #envopts)
    )
)

(complete 50)

(if (= 1 (bitand #envopts 1))
    (
    (set #debug 1)
    )
    (
    (set #debug 0)
    )
)

(if (= 2 (bitand #envopts 2))
    (
    (set #memprot 1)
    )
    (
    (set #memprot 0)
    )
)

(if (= 4 (bitand #envopts 4))
    (
    (set #earlyterm 1)
    )
    (
    (set #earlyterm 0)
    )
)

(if (= 8 (bitand #envopts 8))
    (
    (set #noppc 1)
    )
    (
    (set #noppc 0)
    )
)

(if (= 16 (bitand #envopts 16))
    (
    (set #hidewarning 1)
    )
    (
    (set #hidewarning 0)
    )
)

(if (= 32 (bitand #envopts 32))
    (
    (set #terminator 2)
    )
    (
    (set #terminator 0)
    )
)

(run "setenv PowerPC/debug" #debug)
(run "copy ENV:PowerPC/debug ENVARC:PowerPC")

(run "setenv PowerPC/memprot" #memprot)
(run "copy ENV:PowerPC/memprot ENVARC:PowerPC")

(run "setenv PowerPC/earlyterm" #earlyterm)
(run "copy ENV:PowerPC/earlyterm ENVARC:PowerPC")

(run "setenv PowerPC/noppc" #noppc)
(run "copy ENV:PowerPC/noppc ENVARC:PowerPC")

(run "setenv PowerPC/hidewarning" #hidewarning)
(run "copy ENV:PowerPC/hidewarning ENVARC:PowerPC")

(run "setenv PowerPC/terminator" #terminator)
(run "copy ENV:PowerPC/terminator ENVARC:PowerPC")

(complete 70)

(set #gfxopts
    (askchoice
        (prompt #gfxoptstxt)
        (help #boardopts_help)
        (choices #cvppctxt #bvppctxt #othergfx #nogfx)
        (default 2)
    )
)

(set #gfxaddr 0)
(set #force 0)

(if (= #gfxopts 0) ;CVPPC
    (
    (set #gfxaddr "$e0000000")
    (set #force 1)
    )
)

(if (= #gfxopts 1) ;BVPPC
    (
    (set #gfxaddr "$e0000000")
    (set #force 1)
    )
)

(run "setenv PowerPC/gfxaddr" #gfxaddr)
(run "copy ENV:PowerPC/gfxaddr ENVARC:PowerPC")

(run "setenv PowerPC/force" #force)
(run "copy ENV:PowerPC/force ENVARC:PowerPC")

(complete 75)

(set #versopts
    (askchoice
        (prompt #versoptstxt)
        (help #boardopts_help)
        (choices #warpos #s-lib)
        (default 0)
    )
)

(if (= #versopts 1)
    (
       (copylib
           (prompt  #stormc_install_powerpclib)
           (help    #stormc_install_powerpclib_help)
           (source  #ppcv7)
           (dest    "libs:")
           (confirm)
       )

       (complete 80)

       ; Dummy Elf kopieren

       (copyfiles
           (prompt  #stormc_install_powerpclib)
           (help    #stormc_install_powerpclib_help)
           (dest "S:")
           (source #dummyelf)
       )
    )
    (     ; WarpOS installieren

       (if (= #boardopts 1)
           ( (set #hwdriver #hw1)
           ))

       (if (= #boardopts 2)
           ( (set #hwdriver #hw2)
           ))

       (if (= #boardopts 3)
           ( (set #hwdriver #hw3)
           ))

       (copyfiles
           (prompt  #stormc_install_powerpclib)
           (help    #stormc_install_powerpclib_help)
           (source   #hwdriver)
           (dest    "libs:")
;           (confirm)
       )

      (complete 80)

       (copylib
           (prompt  #stormc_install_powerpclib)
           (help    #stormc_install_powerpclib_help)
           (source  #ppcv14)
           (dest    "libs:")
           (confirm)
       )

       (complete 90)

       (copylib
           (prompt  #stormc_install_powerpclib)
           (help    #stormc_install_powerpclib_help)
           (source  #warpV14)
           (dest    "libs:")
           (confirm)
       )

    )
)

(copyfiles
  (prompt  #stormc_install_mcpatch)
  (help    #stormc_install_mcpatch)
  (source  #ramlibpatch)
  (dest    "C:")
)

(complete 100)

(exit #endsuccess (quiet))