home *** CD-ROM | disk | FTP | other *** search
- ; $VER: MaxonCINEMA4D V3 Install Version 3.2 (23.01.96)
- ; Script zum Installieren des Updates MaxonCINEMA 4D V3 auf Festplatte
- ; © Dipl.-Ing. Michael Giebel
-
- (complete 0)
-
- ;=================
- ;=== Variablen ===
- ;=================
-
- (set os-version (/ (getversion) 65536)) ; OS-Version
- (set os-20 (>= os-version 36))
- (set os-21 (>= os-version 38))
- (set os-30 (>= os-version 39))
-
- (set cpu-type (database "cpu"))
- (set fdversion 1) ; Prozessor-Version
-
- ; Disketten
- (set DISK1 "MC4D3UP1")
- (set DISK2 "MC4D3UP2")
-
- ; Quell-Dateien.
- (set src-lhx "MC4D3UP1:C/LHX")
- (set src-c4dpiclib "RAM:libs/c4dpic.library")
- (set src-cyberlib "RAM:libs/Cyber/c4d.library")
- (set src-egslib "RAM:libs/EGS/c4d.library")
- (set src-egsdoc "RAM:libs/EGS/CinemaEGS.guide")
- (set src-merlinemulib "RAM:libs/Merlin/c4d.library")
- (set src-merlinoldlib "RAM:libs/Merlin/cinemaausgabe.library")
- (set src-merlindoc "RAM:libs/Merlin/CinemaMerlin.txt")
- (set src-picassolib "RAM:libs/Picasso/c4d.library")
- (set src-retinalib "RAM:libs/Retina/c4d.library")
-
- ; LHA-Dateien
- (set src-lha-881 "MC4D3UP1:Programm881.lha")
- (set src-lha-020 "MC4D3UP2:Programm020.lha")
- (set src-lha-ml "MC4D3UP2:MagicLink.lha")
- (set src-lha-libs "MC4D3UP1:LIBS2.LHA")
- (set src-lha-devel "MC4D3UP1:ENTWICKLER2.LHA")
- (set src-lha-icons "MC4D3UP1:ICONS.LHA")
- (set src-lha-tools "MC4D3UP1:TOOLS2.LHA")
- (set src-lha-doc "MC4D3UP1:DOC2.LHA")
- (set src-lha-mat "MC4D3UP1:MATERIALIEN.LHA")
-
- ;=============
- ;=== Texte ===
- ;=============
-
- (set #introduction
- (cat "Mit diesem Installationsprogramm können Sie\n MaxonCINEMA 4D\n auf einer "
- "Festplatte installieren.\nDie Installation läuft "
- "nahezu vollständig automatisch ab.\n"
- "Das komplette Update belegt ca. 2 MByte auf Ihrer Festplatte!\n\n"
- "Drücken Sie \"Weiter\", um mit der Installation fortzufahren.\n"
- "Drücken Sie \"Installation abbrechen\", um die Installation abzubrechen."))
-
- (set #wrk-inst-prg881 "\nDie Version für mathematische Coprozessoren von MaxonCINEMA 4D wird installiert...\n")
- (set #wrk-inst-prg020 "\nDie Version für MC68020 und höher von MaxonCINEMA 4D wird installiert...\n")
- (set #wrk-inst-ml "\nDie Light-Version von MagicLink wird installiert...\n")
- (set #wrk-inst-libs "\nEinige Bibliotheken werden nach LIBS: installiert...\n")
- (set #wrk-inst-devel "\nDie Entwickler-Dokumentation wird entpackt...\n")
- (set #wrk-inst-icons "\nEinige Piktogramme werden entpackt...\n")
- (set #wrk-inst-tools "\nEinige Hilfsprogramme werden entpackt...\n")
- (set #wrk-inst-doc "\nZusätzliche Dokumentation wird entpackt...\n")
- (set #wrk-inst-mat "\nEinige Hilfsprogramme werden entpackt...\n")
-
- (set #prp-installation "Auf welche Festplatten-Partition möchten Sie installieren?")
- (set #prp-installdrawer "In welchem Verzeichnis befindet sich MaxonCINEMA 4D?\n")
- (set #askdir-help
- (cat "\nSie müssen über eine bereits komplett installierte Version 2 oder "
- "V2 Professional verfügen. Andernfalls wird die Installation anschließend "
- "abgebrochen.\n\n"
- "MaxonCINEMA *MUSS* sich in einem Unterverzeichnis einer Festplatte befinden. "
- "\"WORK:\" alleine genügt nicht. Es muß wenigstens ein \"WORK:Cinema\" oder "
- "ähnlich lautendes Verzeichnis sein.\n\n"
- "Geben Sie das Verzeichnis an, in dem sich das Programm \"Cinema4D\" befindet.\n\n"
- @askdir-help))
-
- (set #prp-versionchoice
- (cat "\nMöchten Sie die Version für mathematische Coprozessoren (MC68881/882) "
- "oder die Version für MC68020 (oder höher) installieren?\n"))
- (set #hlp-versionchoice
- (cat "\nBesitzer eines Amigas mit einem MC68020 oder höher *OHNE* mathematischen "
- "Coprozessor wählen die normale Version (z.B. A1200, A4000/30).\n\n"
- "Verfügt Ihr System über einen mathematischen Coprozessor (z.B. A3000, "
- "A4000/40), so wählen Sie Coprozessor-Version.\n\n"
- @askchoice-help))
- (set #881-version "Math. Coprozessor")
- (set #020-version "Normale Version")
-
- (set #prp-insert-disk1
- (cat "\n\nBitte legen Sie nun die Diskette 1\n\nMC4D3UP1\n\n"
- "in ein beliebiges Laufwerk ein!"))
- (set #prp-insert-disk2
- (cat "\n\nBitte legen Sie nun die Diskette 2\n\nMC4D3UP2\n\n"
- "in ein beliebiges Laufwerk ein!"))
-
- (set #prp-somefiles "\nEinige Installationsdateien werden kopiert...\n")
-
- (set #prp-grafikausgabe
- (cat "\nSollen Ausgabetreiber für 24 Bit Grafiksysteme installiert werden?\n"))
- (set #hlp-grafikausgabe
- (cat "\nWenn Sie keine Grafikkarte (oder keine der oben genannten) besitzen, "
- "können Sie diese Frage mit \"Weiter\" überspringen.\n"
- "Ist eine der genannten Grafikkarten in Ihrem Amiga-System vorhanden, "
- "dann können Sie veranlassen, daß der entsprechende Treiber installiert "
- "wird.\n"
- "Fragen Sie nach den neuesten Grafikkarten-Treibern bei der Fa. MAXON nach.\n\n"
- @askchoice-help))
- (set #no-gfx "Keine")
- (set #cyber "CyberGraphX")
- (set #egs "EGS")
- (set #retina "Retina")
- (set #merlin "Merlin")
- (set #picasso "Picasso")
-
- (set #msg-inst-c4dlib
- (cat "\nNun wird die Cinema-Ausgabe-Library im LIBS:-Ordner installiert.\n\n"
- "Diese Library wird benötigt, damit CINEMA 4D direkt "
- "auf der Grafikkarte Bilder darstellen kann."))
-
- (set #prp-copy-c4dlib "Kopieren der Cinema-Ausgabe-Library")
- (set #hlp-copy-c4dlib
- (cat "Die Cinema-Ausgabe-Library enthält leistungsfähige Funktionen zum "
- "Betreiben von CINEMA 4D unter den besonderen Fähigkeiten von "
- "24 Bit Grafikkarten.\n\n"
- @copylib-help))
-
- (set #ERRORRAM (cat "Kann die notwendigen Dateien nicht in die Ram Disk kopieren."))
- (set #ERRORC4D (cat "Im angegebenen Verzeichnis existiert keine Datei \"Cinema4D\".\n\n"
- "Die Installation wird daher abgebrochen!\n\n"
- "Bitte überprüfen Sie Ihre Angaben und starten Sie neu."))
- (set #ABORT20 (cat "Sie verfügen nur über einen MC68000 Prozessor. MaxonCINEMA 4D "
- "arbeitet mit diesem nicht mehr zusammen. Die Installation wird "
- "daher abgebrochen!\n\n"
- "Bitte wenden Sie sich an die Fa. MAXON !"))
- (set #ABORT13 (cat "Sie verfügen leider nicht über Betriebssystem 2.0 oder höher.\n\n"
- "Die Installation wird daher abgebrochen!"))
-
- (set #trace "Bis hierher ging's gut !!!") ; (Breakpoint)
-
- (set @abort-button "Abbruch")
- (set @language "Deutsch")
-
- ;==================
- ;=== Prozeduren ===
- ;==================
-
- (Procedure Inst_LhaFiles
- (working @Working @Dest)
- (run ("RAM:Lhx -E -N x %s \"%s/\"" @Source @Dest))
- )
-
- ;==================
- ;===== MAIN() =====
- ;==================
-
- ; MaxonCINEMA V3 läuft nicht mehr auf einem MC68000
- ; und nicht auf Amiga-OS 1.3
- (if (OR (= cpu-type "68000") (= cpu-type "68010")) (abort #ABORT20)) ; kein 68020 oder höher
- (if (= 0 os-20) ((abort #ABORT13))) ; kein OS 2 oder höher
-
- (message #introduction)
- (welcome)
-
- (set #destiny ; Verzeichnis wählen
- (askdir
- (prompt #prp-installdrawer)
- (help #askdir-help)
- (default "C4D:")
- (disk)
- )
- )
- (set #testfile (tackon #destiny "Cinema4D")) ; Installations-Verzeichnis prüfen
- (if (= 0 (exists #testfile)) (abort #ERRORC4D)) ; kein CINEMA im Verzeichnis
-
- (set @default-dest (expandpath #destiny)) ; wg. Inst_LhaFiles
-
- (complete 5)
-
- (set fdversion ; Normal- oder Turboversion
- (askchoice
- (prompt #prp-versionchoice)
- (help #hlp-versionchoice)
- (choices #881-version #020-version)
- (default fdversion)
- )
- )
-
- (complete 10)
-
- (askdisk ; Diskette 1 einlegen !
- (prompt #prp-insert-disk1)
- (help @askdisk-help)
- (dest DISK1)
- )
-
- (copyfiles ; LHX kopieren
- (prompt #prp-somefiles)
- (help @copyfiles-help)
- (source src-lhx)
- (dest "RAM:")
- (safe)
- )
- (if (= 0 (exists "RAM:Lhx")) (abort #ERRORRAM))
-
- (complete 15)
-
- ; CINEMA-Ausgabe-Libs entpacken
- (set gfxout 0)
- (set gfxout ; Grafikkarte wählen
- (askchoice
- (prompt #prp-grafikausgabe)
- (help #hlp-grafikausgabe)
- (choices #no-gfx #cyber #egs #retina #merlin #picasso)
- ; gfxout = 0 1 2 3 4 5
- (default gfxout)
- )
- )
-
- ( ; Bibliotheken nach RAM: auspacken
- (set @Working "Entpacke Bibliotheken...")
- (set @Source src-lha-libs)
- (set @Dest "RAM:")
- (working @Working @Dest) ; Inst_LhaFiles benutzt "/"
- (run ("RAM:Lhx -E -N x %s \"%s\"" @Source @Dest))
- )
-
- (copyfiles ; c4dpic.lib nach libs: kopieren
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-c4dpiclib)
- (dest "LIBS:")
- )
-
- (if (= gfxout 1) ; CyberGraphX output
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-cyberlib)
- (dest "LIBS:")
- )
- )
-
- (if (= gfxout 2) ; EGS output
- (
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-egslib)
- (dest "LIBS:")
- )
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-egsdoc)
- (dest (tackon @default-dest "DOC-V3"))
- (infos)
- )
- )
- )
-
- (if (= gfxout 3) ; Retina output
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-retinalib)
- (dest "LIBS:")
- )
- )
-
- (if (= gfxout 4) ; Merlin output
- (
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-merlinemulib)
- (dest "LIBS:")
- )
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-merlinoldlib)
- (dest "LIBS:")
- )
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-merlindoc)
- (dest (tackon @default-dest "DOC-V3"))
- (infos)
- )
- )
- )
-
- (if (= gfxout 5) ; Picasso output
- (copyfiles
- (prompt #prp-copy-c4dlib)
- (help #hlp-copy-c4dlib)
- (source src-picassolib)
- (dest "LIBS:")
- )
- )
-
- (run "C:DELETE RAM:libs ALL QUIET") ; aufräumen ...
-
- (complete 35)
-
- ( ; Icons entpacken
- (set @Working #wrk-inst-icons)
- (set @Source src-lha-icons)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- )
-
- (complete 40)
-
- ( ; Dokumentation entpacken
- (set @Working #wrk-inst-doc)
- (set @Source src-lha-doc)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- )
-
- (complete 45)
-
- ( ; Neue Entwickler-Doku entpacken
- (set @Working #wrk-inst-devel)
- (set @Source src-lha-devel)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- )
-
- (complete 50)
-
- ( ; Materialien entpacken
- (set @Working #wrk-inst-mat)
- (set @Source src-lha-mat)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- )
-
- (complete 55)
-
- ( ; Weitere Tools entpacken
- (set @Working #wrk-inst-tools)
- (set @Source src-lha-tools)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- )
-
- (complete 60)
-
- ; Festplatteninstallation
- ; =======================
- (if (= fdversion 0)
- ( ; 881-Version installieren
- (set @Working #wrk-inst-prg881)
- (set @Source src-lha-881)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- (complete 80)
- )
- ( ; 020-Version installieren
- (askdisk ; Diskette 2 einlegen!
- (prompt #prp-insert-disk2)
- (help @askdisk-help)
- (dest DISK2)
- )
- (set @Working #wrk-inst-prg020)
- (set @Source src-lha-020)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- (complete 80)
- )
- )
-
- ( ; MagicLink installieren
- (askdisk ; Diskette 2 einlegen!
- (prompt #prp-insert-disk2)
- (help @askdisk-help)
- (dest DISK2)
- )
- (set @Working #wrk-inst-ml)
- (set @Source src-lha-ml)
- (set @Dest @default-dest)
- (Inst_LhaFiles)
- (complete 95)
- )
-
- (run "C:DELETE RAM:LHX QUIET") ; aufräumen ...
-
- (complete 100)
-
- ;==================
- ;=== Conclusion ===
- ;==================
-
- (message
- (cat "Die Installation von MaxonCINEMA 4D ist erfolgreich beendet.\n\n"
- "Wir wünschen Ihnen viel Spaß beim Arbeiten mit MaxonCINEMA 4D!"))
-