home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Extra 1996 #6 / AmigaPlus-eXtra-6-96.iso.7z / AmigaPlus-eXtra-6-96.iso / ref3 / ref3install < prev    next >
Text File  |  1984-09-02  |  9KB  |  236 lines
  1. ; $VER:Reflections 3.05 Installscript v1.3 (17.10.1995)
  2. ; written 1995 by Helmut Eisenkolb for Oberland, Kronberg (Germany)
  3. ; Anpassung für Amiga Plus-CD vom 03.09.1996
  4.  
  5.  
  6. (set @minuser "average")
  7. (set @appname "Reflection 3.05")
  8. (set @language "deutsch")
  9.  
  10. (complete 0)
  11.  
  12. (welcome "Willkommen bei Reflection 3.05 Amiga!\n")
  13.  
  14. (message "\nReflections 3.05 Installation v1.3 (17.10.1995)\n\n"
  15.          "Im Folgenden wird Reflections 3.05 auf Ihrem Amiga "
  16.          "installiert. Bitte lesen Sie zuvor unbedingt die "
  17.          "entsprechenden Kapitel im Reflections - Benutzerhandbuch!\n\n"
  18.          "©1995 by Oberland - alle Rechte vorbehalten.\n\n\n\n"
  19.      "Installer © Amiga Technologies GmbH"
  20. )
  21.  
  22. (set modus 1)
  23.  
  24. (if (AND (= (exists "REF3:" (noreq)) 2) (= (exists "REF3:ref3" (noreq)) 1) )
  25.     (set modus (askchoice (prompt "Das Installationsprogramm hat auf Ihrem Rechner unter"
  26.                           " der Zuweisung REF3: eine bereits installierte Version"
  27.                           " von Reflections gefunden. Soll diese Version ersetzt werden?")
  28.                        (help (cat "\nWenn Sie \"Version ersetzen\" auswählen, werden nur"
  29.                           " die Programmdateien und Config-Files Ihrer bereits"
  30.                               " installierten Reflections-Version überschrieben.\n"
  31.                           "Die Datei Ref3.CFG wird unter Ref3.OLD gesichert.\n\n"
  32.                           "Falls Sie sich für eine Neuinstallation entscheiden,"
  33.                           " sollten Sie die alte Zuweisung für REF3: aus Ihrer Datei"
  34.                           " s:user-startup entfernen.\n\n"
  35.                           "Ihre Seriennummer benötigen Sie in jedem Fall !!!"))
  36.                        (choices "Version ersetzen" "Neuinstallation"))
  37.     )
  38. )
  39.  
  40. (if (= modus 1) (
  41.     (set ziel (askdir (prompt "Wo soll eine neue Schublade für\n"
  42.                                     "Reflections 3.05 erstellt werden?")
  43.                             (help (cat "\nHier wählen Sie bitte den Pfad aus, wo"
  44.                                        " eine neue Schublade erstellt wird, in"
  45.                                        " der alle zu Reflections 3.05 gehörigen"
  46.                                        " Programmteile und Daten installiert werden"
  47.                                        " sollen.\n\n"
  48.                                        "Die Schublade wird vom Installationsprogramm"
  49.                                        " automatisch angelegt, Sie brauchen sie nicht"
  50.                                        " in Ihrer Auswahl mit anzugeben.\n\n"
  51.                                        "Der Name der Schublade wird im nächsten"
  52.                                        " Installationsschritt von Ihnen erfragt."))
  53.                             (default @default-dest)
  54.                     )
  55.     )
  56.  
  57.     (set @default-dest ziel)
  58.  
  59.     (set schubname (askstring (prompt "\nWie soll die neue Schublade für\n"
  60.                                       "Reflections 3.05 heissen?")
  61.                               (help (cat "\nHier geben Sie bitte den Namen der Schublade an,"
  62.                                          " die vom Installationsprogramm neu erstellt wird."))
  63.                                   (default "Reflections v3")
  64.                    )
  65.     )
  66.  
  67.     (set pfad (tackon ziel schubname))
  68.     (makedir pfad (infos))
  69.     (makeassign "REF3" pfad)
  70. ))
  71.  
  72. (if (= modus 0) (
  73.     (set pfad "REF3:")
  74.     (set @default-dest "REF3:")
  75.  
  76.     (if(= (exists "REF3:Anims" (noreq)) 2) (
  77.         (rename "REF3:Anims" "REF3:Anim")
  78.         (rename "REF3:Anims.info" "REF3:Anim.info")
  79.     ))
  80.     (if(= (exists "REF3:Ref3.CFG" (noreq)) 1) (
  81.         (delete "REF3:Ref3.OLD")
  82.         (rename "REF3:Ref3.CFG" "REF3:Ref3.OLD")
  83.     ))
  84. ))
  85.  
  86. (delete "REF3:ERRORMSG")
  87.  
  88. (complete 1)
  89.  
  90. (set art (askchoice (prompt "\nWelche Reflections-Version soll installiert werden?\n")
  91.             (help "\nFalls Ihr Rechner mit einem mathematischen Coprozessor"
  92.               " 68881, 68882 oder einem 68040 bzw. 68060 Prozessor mit"
  93.               " integriertem Coprozessor ausgestattet ist, können Sie"
  94.               " die dafür speziell ausgelegte Coprozessorversion von "
  95.               " Reflections 3.05 installieren.")
  96.             (choices "Standardversion" "Coprozessorversion")
  97.      )
  98. )
  99.  
  100. (if (= modus 0)
  101.     (message "\nDie Reflections - Programmdateien werden nun auf Version 3.05 aktualisiert.\n")
  102.     (message "\nDie Reflections 3.05 - Programmdateien werden jetzt installiert.\n"
  103.              "\n Sie haben nun Gelegenheit dazu, Ihre Registraturkarte auszufüllen"
  104.              " und an Oberland zu senden, damit Sie die Reflections-Hotline in"
  105.              " Anspruch nehmen können und stets über neue Progammversionen und"
  106.              " Tools zu Reflections informiert werden.\n"
  107.              "\nBitte übertragen Sie die Seriennummer auf die Registraturkarte und"
  108.              " bewahren den Abschnitt mit der Seriennummer an einem sicheren Ort auf.")
  109. )
  110.  
  111. (working "\nErstellen der Reflections - Unterverzeichnisse...")
  112. (run "lhex -fwREF3: x main.lha")
  113.  
  114. (makedir (tackon pfad "Material") (infos))
  115. (makedir (tackon pfad "Szenen") (infos))
  116. (makedir (tackon pfad "Textur") (infos))
  117. (makedir (tackon pfad "Fonts3D") (infos))
  118. (makedir (tackon pfad "Hilfe") (infos))
  119. (makedir (tackon pfad "Anim") (infos))
  120. (makedir (tackon pfad "Bild") (infos))
  121.  
  122. (complete 3)
  123.  
  124. (if (= modus 1) (
  125.     (working "\nEntpacken der Zubehördateien...")
  126.     (run "lhex -fwREF3:Fonts3d/ x fonts3d.lha")
  127.     (complete 8)
  128.     (run "lhex -fwREF3:Hilfe/ x hilfe.lha")
  129.     (complete 15)
  130.     (run "lhex -fwREF3:Material/ x material.lha")
  131.     (complete 20)
  132.     (run "lhex -fwREF3:Szenen/ x szenen.lha")
  133.     (complete 28)
  134.     (run "lhex -fwREF3:Textur/ x textur.lha")
  135. ))
  136.  
  137. (complete 35)
  138.  
  139. (if (= art 0) (
  140.          (working "\nEntpacken der Reflections Standardversion...")
  141.     (run "lhex -fwREF3: x std.lha")
  142. ))
  143. (if (= art 1) (
  144.          (working "\nEntpacken der Reflections Coprozessorversion...")
  145.     (run "lhex -fwREF3: x copro.lha")
  146. ))
  147.  
  148. (complete 95)
  149.  
  150. (set display (askchoice (prompt "\nAuf welchem Screen soll Reflections arbeiten:\n")
  151.             (help "\nDie hier vorgegebenen Auflösungen werden am häufigsten "
  152.                   "verwendet. Wenn Sie z.B. eine Grafikkarte besitzen, "
  153.                   "können Sie die gewünschte Auflösung in der Datei "
  154.                   "Ref3.CFG selbst eintragen.\n"
  155.                   "PalHires Interlace mit 8 Farben ist auf allen Amigas möglich, "
  156.                   "SuperHires benötigt das AGA-Chipset. Die Auflösung "
  157.                   "1024 x 768 ist nur mit Grafikkarten darstellbar.")
  158.             (choices "Workbench-Screen" "640x512 PAL Hires Interlace, 8 Farben"
  159.                  "800x600 AGA SuperHires Interlace, 32 Farben" "1024x768 mit Grafikkarte, 256 Farben")
  160.          )
  161. )
  162.  
  163. (complete 96)
  164.  
  165. (if (= art 0)
  166.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:cfg1") (append "MAX_LIST 15\n\n\n"))
  167. )
  168. (if (= art 1)
  169.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:cfg1") (append "MAX_LIST 30\n\n\n"))
  170. )
  171. (if (> display 0)
  172.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  173.         (append ";   =================\n;    Bildschirmmodus\n;   =================\n\n")
  174.     )
  175. )
  176. (if (= display 1)
  177.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  178.         (append "DISPLAY 640 512 3\n\n")
  179.     )
  180. )
  181. (if (= display 2)
  182.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  183.         (append "DISPLAY 800 600 5\n\n")
  184.     )
  185. )
  186. (if (= display 3)
  187.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  188.         (append "DISPLAY 1024 768 8\n\n")
  189.     )
  190. )
  191.  
  192. (complete 97)
  193.  
  194. (if (= (askbool (prompt "\nWollen Sie einen externen RGB-Viewer einbinden?")
  195.         (help "\nHier können Sie ein externes Programm z.B. von Ihrer "
  196.               "Grafikkarte auswählen, um Bilder zu betrachten.")
  197.         (choices "Ja" "Nein")
  198.        ) 1)
  199.     (textfile (dest "REF3:Ref3.CFG") (include "REF3:Ref3.cfg")
  200.         (append (cat ";   =============\n;    Grafikkarte\n;   =============\n\nRGB_VIEWER "
  201.                  (askfile (prompt "Bitte Wählen Sie das RGB-Viewer Programm:")
  202.                 (help "\nHier wählen Sie nun die Programm-Datei, die gestartet "
  203.                       "wird, wenn Sie RGB-Bilder betrachten wollen.")
  204.                 (default "SYS:")
  205.                  )
  206.                  "\n\n"
  207.             )
  208.         )
  209.     )
  210. )
  211.  
  212. (complete 98)
  213.  
  214. (delete "REF3:cfg1")
  215.  
  216. (complete 99)
  217.  
  218. (if (= modus 1) (
  219.     (textfile (prompt "\nReflections benötigt die Zuweisung REF3:\n"
  220.                       "Soll das Installationsprogramm die Zeile\n\n"
  221.                       "ASSIGN REF3: \"" pfad "\"\n\n an die Datei s:user-startup"
  222.                       " anfügen?")
  223.               (help (cat "\nDas Installationsprogramm fügt an dieser Stelle die Zuweisung"
  224.                          " REF3: in die Datei s:user-startup ein.\nWenn Sie diese Aktion"
  225.                          " jetzt nicht bestätigen, müssen Sie später selbst die Zeile\n"
  226.                          " \nASSIGN REF3: \"" pfad "\"\n\nin die User-Startup Datei einfügen."))
  227.               (dest "s:user-startup")
  228.               (include "s:user-startup")
  229.               (append (cat "\n;BEGIN Reflections 3.05\nASSIGN REF3: \"" pfad
  230.                            "\"\n;END Reflections 3.05\n\n"))
  231.               (confirm average)
  232.     )
  233. ))
  234.  
  235. (complete 100)
  236.