home *** CD-ROM | disk | FTP | other *** search
/ The Amiga Game Guide / AmigaGameGuide_CD.iso / Amiga / Patches / Minerva / Install < prev    next >
Encoding:
Text File  |  1978-01-01  |  11.1 KB  |  465 lines
  1. ; * $VER: Install Update for MINERVA 1.1
  2. ; * Script written by Eckhard Ludwig
  3. ;=============================================================================
  4.  
  5. (complete 0)
  6.  
  7. (set #Lang    0)
  8. (set #welcome
  9.   (cat
  10.     "\n\nWelcome to the Update for the Adventure\n"
  11.     "MINERVA 1997 by Stephan Stoske (Public-Domain).\n"
  12.     "(See CDROM APC&TCP Vol.5 and AmigaSpecial Spiele Hits.)\n\n"
  13.     "This Update installs a Screenmoderequester and newer programmes.\n\n"
  14.     "The Update is written 1998 by Eckhard Ludwig."
  15.   ))
  16.  
  17. (set #choose-text
  18.   (cat "Please choose a directory where MINERVA should be installed. A drawer will be created there."
  19.   ))
  20.  
  21. (set #choose-help
  22.   (cat "In this location a drawer will be created. All files will be installed inside this drawer."
  23.   ))
  24.  
  25. (set #Lang-text  "What language do you want to install?")
  26.  
  27. (set #size-text
  28.         (cat
  29.         "Please select Data for HD-Install.\n"
  30.         "(See Help)"
  31.         )
  32. )
  33.  
  34. (set #size-help
  35.         (cat
  36.         "400kb - Only Programm\n"
  37.         "5Mb   - Sound Data\n"
  38.         "85Mb  - Graphic Data\n"
  39.         "90Mb  - Sound- and Graphic-Data\n"
  40.         )
  41. )
  42.  
  43. (set #source-text 
  44.     (cat
  45.            "I need Original CDROM with Minerva-Data .\n"
  46.         "(APC&TCP Vol.5 or AmigaSpecial Spiele Hits)")
  47. )
  48.  
  49. (set #source-error 
  50.     (cat
  51.              "\n\nCDROM or Minerva Data not found!?!\n\nInsert CDROM or Select Proceed.")
  52. )
  53.  
  54. (set #copying     "\n\nCopying graphic and sound files ...\n\nPlease Wait...\n")
  55.  
  56. (set #fxoff-text
  57.   (cat "Select your Hardware."
  58.   ))
  59.  
  60. (set #fxoff-help
  61.   (cat "Set Tooltype/Cli-Arg FXOFF"
  62.   ))
  63.  
  64. (set #inst-main
  65.   (cat "Copying executables on your hard disk..."
  66.   ))
  67.  
  68. (set #inst-fonts
  69.   (cat "Installing XEN Fonts ..."
  70.   ))
  71.  
  72. (set #create-maindir
  73.   (cat "Creating MINERVA directory"
  74.   ))
  75.  
  76. (set #inst-docs
  77.   (cat "Installing program documentation ..."
  78.   ))
  79.  
  80.  (SET #exit-Msg 
  81.   (CAT "\n\nMuch fun with MINERVA\n wish you\n\n"
  82.                    "Eckhard Ludwig" 
  83.   ))
  84.  
  85. ; deutsche Texte *****************************
  86.  
  87. (IF (= @language "deutsch")
  88.  
  89. (
  90. (set #Lang  1)
  91. (set #welcome
  92.   (cat
  93.     "\n\nWillkommen zu dem Update für\n"
  94.     "DAS TOR DER MINERVA 1997 by Stephan Stoske.\n\n"
  95.     "Veröffentlicht wurde das Adventure auf den CDROM\n"
  96.     "APC&TCP Vol.5 und AmigaSpecial Spiele Hits.\n"
  97.     "Das Update installiert neben einen Screenmoderequester eine verbesserte Programmversion, "
  98.     "realisiert mit Adventureshop V3.0.\n\n"
  99.     "Update is written 1998 by Eckhard Ludwig."
  100.   ))
  101.  
  102. (set #choose-text
  103.   (cat "Bitte wählen Sie das Verzeichniss wohin MINERVA installiert werden soll. Dieses Installationsscript legt dort selbst eine Schublade an."
  104.   ))
  105.  
  106. (set #choose-help
  107.   (cat "Bei der Installation werden alle Dateien in dieses Verzeichniss installiert."
  108.   ))
  109.  
  110. (set #Lang-text  "Welche Sprache soll installiert werden?")
  111.  
  112. (set #fxoff-text
  113.   (cat "Wählen Sie die verfügbare Hardware. Auf langsamer Grafik werden einfachere Bildeffekte benutzt, um Bildstörungen zu minimieren."
  114.   ))
  115.  
  116. (set #fxoff-help
  117.   (cat "Für AGA und Zorro2 Graficcards wird das Shellargument FXOFF gesetzt.\n"
  118.     "Das Argument bewirkt, dass Bildübergangseffekte mit Zoom durch andere Effekte ersetzt werden.\n"
  119.     "Zoomeffekte führen auf AGA/256 Farben leider zu erheblichen Bildstörungen."
  120.   ))
  121.  
  122. (set #size-text
  123.         (cat
  124.         "Wie viele Daten möchten Sie auf Ihrer Festplatte speichern?\n"
  125.         "(Siehe Hilfe)"
  126.         )
  127. )
  128.  
  129. (set #size-help
  130.         (cat
  131.         "Die Geschwindigkeit, mit der MINERVA Graphiken und Sounds anzeigen kann, "
  132.         "hängt von der Geschwindigkeit des CD-ROM Laufwerkes und der CPU ab. Da "
  133.         "CD-ROM's langsamer als Festplatten sind, sollten Sie bei langsameren "
  134.         "Systemen Daten auf Ihrer Festplatte speichern, so das MINERVA schnelleren "
  135.         "Zugriff darauf hat und so schneller anzeigen kann.\n\n"
  136.         "400KB - installiert nur das Programm. Graphiken, Sounds und "
  137.         "Animationen werden von der CDROM geladen.\n"
  138.         " 5MB  - Kopiert alle Sound-Dateien auf die Festplatte.\n"
  139.         "85MB  - Kopiert alle Graphiken.\n"
  140.         "90MB  - Kopiert alle Sound- und Graphik-Dateien.\n"
  141.         )
  142. )
  143.  
  144. (set #source-text 
  145.     (cat
  146.            "Für die weitere Installation ist eine CDROM mit den Minerva-Dateien erforderlich.\n"
  147.         "Bitte wählen Sie von dieser CD die Schublade MINERVA, oder 'Weiter'!")
  148. )
  149.  
  150. (set #source-error 
  151.     (cat
  152.              "\n\nDie CDROM ist nicht eingelegt, oder die gewählte Schublade ist falsch!\n\n"
  153.         "Soll ich die Voreinstellung (APC&TCP CD Vol.5) benutzen, falls sie diese momentan nicht zur Hand haben?\n\n"
  154.         "Mit 'Nein' können sie erneut auswählen.")
  155. )
  156.  
  157. (set #create-maindir
  158.   (cat "Erstelle MINERVA Verzeichnisse"
  159.   ))
  160.  
  161. (set #copying     "\n\nKopiere Dateien ...\n\nBitte warten...\n")
  162.  
  163. (set #inst-main
  164.   (cat "Installiere MINERVA ..."
  165.   ))
  166.  
  167. (set #inst-fonts
  168.   (cat "Installiere XEN Fonts ..."
  169.   ))
  170.  
  171. (set #inst-docs
  172.   (cat "Installiere Programm Dokumentation ..."
  173.   ))
  174.  
  175. (SET #exit-Msg
  176.   (CAT "\nZum Starten von DAS TOR DER MINERVA doppelklicken sie in der neu angelegten Schublade Minerva-Start.\n\n"
  177.      "In dem darauf erscheinenden Bildschirmmode Requester wählen sie die gewünschte Auflösung, oder Workbench:Window.\n\n"
  178.     "Für Picasso96 Grafikkartentreiber ist Workbench:Klonen oder Workbench:Window auszuwählen!\n"
  179.     "Deaktivieren sie Screenpromoter wie NEWMODE oder CHANGESCREEN!!!"
  180.   ))
  181. ))
  182. ;*********************************************
  183.  
  184. (onerror (CLEANUP))
  185.  
  186. ; Cleanup any temporary mess we created
  187. (procedure CLEANUP
  188.     (delete "t:Background")
  189.     (delete "t:Background.prefs")
  190.     (delete "t:Logopic")
  191.     (delete "t:Logopic.prefs")
  192. )
  193.  
  194. (run "copy Background TO T:Background")
  195. (run "copy Background.prefs TO T:Background.prefs")
  196. (run "copy AShopPic TO T:Logopic")
  197. (run "copy AShopPic.prefs TO T:Logopic.prefs")
  198.  
  199. (run "run InstallerFX t:background")
  200. (run "wait 1")
  201.  
  202. ;*********************************************
  203. ; Greetings & Path ...
  204.  
  205. (message #welcome)
  206. (welcome)
  207.  
  208. (if (exists "Games:" (noreq) )
  209.     (set @default-dest "Games:")
  210.  
  211.     (if (exists "SYS:Games" (noreq) )
  212.         (set @default-dest "SYS:Games")
  213.  
  214.         (if (exists "Work:Games" (noreq) )
  215.             (set @default-dest "Work:Games")
  216.         )
  217.     )
  218. )
  219.  
  220. (set default-dest (askdir
  221.         (prompt #choose-text)
  222.         (help #choose-help)
  223.         (default @default-dest)
  224.         (newpath)
  225.     )
  226.   ) 
  227.  
  228. (set @default-dest (tackon default-dest "MINERVA"))
  229.  
  230. (makedir @default-dest
  231.     (prompt #create-maindir)
  232.     (infos)
  233. )
  234.   
  235. (set DEUTSCH
  236.                  (askchoice
  237.                    (help @askchoice-help)
  238.                    (default #Lang)
  239.                    (choices "English" "Deutsch")
  240.                    (prompt #Lang-text)
  241.                  )
  242.   )
  243.  
  244. (if (= DEUTSCH 1)
  245.     (set LANG "DEUTSCH ")
  246. )
  247.  
  248. (set install
  249.         (askchoice 
  250.                 (prompt #size-text)
  251.                 (choices "400KB" "5MB" "85MB" "90MB")
  252.                 (help    #size-help)
  253.                 (default 2)
  254.         )
  255. )
  256.  
  257. (set FXOFF
  258.         (askchoice 
  259.                 (prompt #fxoff-text)
  260.                 (choices "Amiga AGA" "Zorro 2 Graficcard" "Zorro 3 Graficcard")
  261.                 (help    #fxoff-help)
  262.                 (default 0)
  263.         )
  264. )
  265.  
  266. (if (<> FXOFF 2)
  267.     (set SETFX "FXOFF")
  268. )
  269.  
  270. (complete 5)
  271.  
  272. (run "run InstallerFX t:Logopic")
  273.  
  274. ;*********************************************
  275. ; Installation procedure
  276. ; 
  277.  
  278. (set #old-source (expandpath ""))
  279.  
  280. (if (exists "APC&TCP-CD-Volume-5:" (noreq) )
  281.     (set #old-source "APC&TCP-CD-Volume-5:Tools/Preview/Members/Adventure-Shop/MINERVA/")
  282.  
  283.     (if (exists "Hits-CD:" (noreq) )
  284.             (set #old-source "Hits-CD:APC&TCP/Demoversionen/Adventure-Shop/MINERVA/")
  285.     )
  286. )
  287.  
  288. (if (<> 2 (exists (tackon #old-source "GRAFIK/MINERVA") (noreq)))
  289.          (until (= flag 1)
  290.                ((set #old-source (askdir
  291.                 (prompt #source-text)
  292.                 (help    @askdir-help)
  293.                 (default "APC&TCP-CD-Volume-5:Tools/Preview/Members/Adventure-Shop/MINERVA/")
  294.                 (newpath)
  295.                     ))
  296.                (if (<> 2 (exists (tackon #old-source "GRAFIK/MINERVA") (noreq)))
  297.                  (if (askbool
  298.                      (prompt #source-error)
  299.                      (help " ")
  300.              )
  301.                      (
  302.              (set flag 1)
  303.                      (set #old-source "APC&TCP-CD-Volume-5:Tools/Preview/Members/Adventure-Shop/MINERVA/")
  304.              ))
  305.                      (set flag 1)
  306.              )
  307.         )             
  308.      )
  309. )
  310.  
  311. (set flag (exists (tackon #old-source "GRAFIK/MINERVA") (noreq)))
  312.  
  313. (complete 10)
  314.  
  315. ;*********************************************
  316. ; copy data
  317.  
  318. (if (= flag 2)
  319.  
  320.     (
  321.     (copylib
  322.              (prompt "Install CandoGfx.library")
  323.                  (help @copylib-help)
  324.              (source (tackon #old-source "LIBS/CandoGfx.library"))
  325.              (dest "LIBS:")
  326.              (optional "force" "nofail")
  327.              (confirm "EXPERT")
  328.     )
  329.  
  330.     ; not used for MINERVA
  331.     ;(copylib
  332.     ;         (prompt "Install InovaMusic.library")
  333.         ;         (help @copylib-help)
  334.     ;         (source (tackon #old-source "LIBS/InovaMusic.library"))
  335.     ;         (dest "LIBS:")
  336.     ;         (optional "force" "nofail")
  337.     ;         (confirm "EXPERT")
  338.     ;)
  339.  
  340.     (copyfiles
  341.            (prompt #inst-main)
  342.            (help @copyfiles-help)
  343.            (source (tackon #old-source "c"))
  344.            (dest "C:")
  345.            (pattern "#?")
  346.            (optional "force" "nofail")
  347.            (confirm "EXPERT")
  348.            (files)
  349.     )
  350.     
  351.     (complete 13)
  352.  
  353.     (copyfiles
  354.         (prompt    #inst-fonts)
  355.         (help    @copyfiles-help)
  356.         (source (tackon #old-source "Fonts"))
  357.         (dest    "SYS:Fonts")
  358.            (pattern "#?")
  359.             (optional "force" "nofail")
  360.            (confirm "EXPERT")
  361.            (files)
  362.     )
  363.     (copyfiles
  364.         (prompt    #inst-fonts)
  365.         (help    @copyfiles-help)
  366.         (source (tackon #old-source "Fonts/XEN"))
  367.         (dest    "SYS:Fonts/XEN")
  368.            (pattern "#?")
  369.             (optional "force" "nofail")
  370.            (confirm "EXPERT")
  371.            (files)
  372.     )
  373.  
  374.     (complete 15)
  375.     )
  376. )
  377.  
  378. (copyfiles
  379.     (prompt    #inst-main)
  380.     (help    @copyfiles-help)
  381.     (source "Advplayer.exe")
  382.     (dest    @default-dest)
  383.         (confirm "EXPERT")
  384.         (optional "force" "nofail")
  385. )
  386.  
  387. (complete 17)
  388.  
  389. (copyfiles
  390.     (prompt    #inst-main)
  391.     (help    @copyfiles-help)
  392.     (source "Minerva-Start.info")
  393.     (dest    @default-dest)
  394.         (confirm "EXPERT")
  395.         (optional "force" "nofail")
  396. )
  397.  
  398. (if  (<> flag 2)
  399.     (set ASSIGNP (cat "Assign LIBS: " (tackon #old-source "LIBS") " ADD\nAssign FONTS: " (tackon #old-source "FONTS") " ADD\nAssign C: " (tackon #old-source "C") " ADD\n"))
  400. )
  401. (if  (or (= install 1) (= install 3))
  402.     (set ASSIGNSND "Assign SND: SOUND\n")
  403. )
  404. (if  (or (= install 2) (= install 3))
  405.     (set ASSIGNGFX "Assign GRA: GFX\n")
  406. )
  407.  
  408. (textfile 
  409.     (dest (tackon @default-dest "Minerva-Start"))
  410.         (append "; $VER: Minerva-Start 2.0\n\n" ASSIGNP ASSIGNSND ASSIGNGFX "\nstack 20000 >NIL:\nADVPlayer.exe >NIL: DATA=Start.data ADVENTURE=" #old-source " " LANG SETFX "\n")
  411.  )
  412.  
  413. (complete 18)
  414.  
  415. (copyfiles
  416.     (prompt    #inst-main)
  417.     (help    @copyfiles-help)
  418.     (source "Minerva.data")
  419.     (dest    @default-dest)
  420.         (confirm "EXPERT")
  421.         (optional "force" "nofail")
  422. )
  423.  
  424. (complete 19)
  425.  
  426. (copyfiles
  427.     (prompt    #inst-main)
  428.     (help    @copyfiles-help)
  429.     (source "Start.data")
  430.     (dest    @default-dest)
  431.         (confirm "EXPERT")
  432.         (optional "force" "nofail")
  433. )
  434.  
  435. (complete 20)
  436.  
  437. (working #copying)
  438.  
  439. (if  (or (= install 1) (= install 3))
  440.     (run ("copy \"%s\" TO \"%s\" ALL CLONE" (tackon #old-source "SOUND") (tackon @default-dest "SOUND"))
  441. ))
  442.  
  443. (complete 40)
  444.  
  445. (if  (or (= install 2) (= install 3))
  446.     (run ("copy \"%s\" TO \"%s\" ALL CLONE" (tackon #old-source "GRAFIK") (tackon @default-dest "GFX"))
  447. ))
  448.  
  449. (complete 90)
  450.  
  451. (copyfiles
  452.     (prompt    #inst-docs)
  453.     (help    @copyfiles-help)
  454.     (source "readme-update")
  455.     (dest    @default-dest)
  456.        (optional "force" "nofail")
  457.        (confirm "EXPERT")
  458.     (infos)
  459. )
  460.  
  461. (complete 100)
  462.  
  463. (CLEANUP)
  464. (EXIT #exit-Msg (quiet))
  465.