home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / compressed / graphic / maxoncinema4d_2_demo.lha / MaxonCINEMA_4D_2-DEMO / INSTALL-MC4D-Demo < prev    next >
Text File  |  1995-04-23  |  8KB  |  321 lines
  1. ; $VER: MaxonCINEMA 4D DEMO Install Version 1.0 (17.02.95)
  2. ; Script zum Installieren von MaxonCINEMA 4D V2 DEMO
  3. ; 
  4. ;============================
  5. ;=== Deutsche Erklärungen ===
  6. ;============================
  7. (set #introduction
  8. (cat "\nMit diesem Installationsprogramm können Sie die Demoversion\n\nMaxonCINEMA 4D V2\n\n auf einer "
  9.      "Festplatte installieren bzw. eine vorhandene Version updaten."
  10.      "Die komplette Installation läuft "
  11.      "automatisch ab. "
  12.      "Auf Ihrer Festplatte muß mindestens 2 MB Platz frei sein!\n\n"))
  13.  
  14. (set #askdir-help
  15. (cat "\nWählen Sie zuerst die Partition Ihrer Festplatte aus, auf der "
  16.      "Sie gerne MaxonCINEMA 4D installieren möchten. Sie müssen KEIN Verzeichnis "
  17.      "anlegen, da das Installationsprogramm dies automatisch macht! "
  18.  
  19.       "\nSie können über das Symbol 'Laufwerke anz.' (bzw. 'Show drives') "
  20.       "eine Übersicht über alle Laufwerke Ihres Amiga anfordern; aus "
  21.       "dieser Übersicht sollten Sie nur die oberen, nicht farblich "
  22.       "gekennzeichneten Einträge auswählen.\n"
  23.       "Typische sinnvolle Namen sind z.B. \"WORK:\", \"HD0:\" oder \"DH0:\"; "
  24.       "nicht verwenden sollten Sie Namen wie \"DF0:\", \"DF1:\", "
  25.       "\"DF2:\", \"DF3:\", \"RAD:\", \"RAM:\", \"System2.0:\", "
  26.       "\"WB_2.x:\", \"System3.0:\" oder \"WB_3.x:\"!"
  27.       "\n\n"
  28.       ))
  29.  
  30. (set #help-startup
  31. (cat "Die Datei \"user-startup\" befindet sich im Verzeichnis \"S:\". "
  32.      "In ihr befinden sich spezielle Kommandos, die einige Programme "
  33.      "bereits beim Systemstart ausführen.\n\n"))
  34.  
  35.  
  36. (set #no-inst
  37. (cat "\nDer Platz auf der von Ihnen gewählten Partition reicht nicht aus, um die "
  38.      "Dateien zu kopieren\n\n"
  39.      "!!! Die Installation wird abgebrochen !!!"))
  40.  
  41.  
  42. (set #prp-grafikausgabe
  43. (cat    "\nSollen Ausgabetreiber für 24 Bit Grafiksysteme installiert werden?\n"))
  44. (set #no-gfxout        "Keine")
  45. (set #retina-gfxout    "Retina")
  46. (set #merlin-gfxout    "Merlin, Visiona, Domino")
  47. (set #egs-gfxout        "EGS (u.a. Piccolo, Rainbow, GVP EGS 110/24)")
  48. (set #picasso-gfxout    "Picasso")
  49. (set #hlp-grafikausgabe
  50. (cat    "\nWenn Sie keine Grafikkarte besitzen und wenn EGS auf Ihrem System nicht "
  51.         "installiert ist, können Sie diese Frage mit \"Weiter\" überspringen.\n"
  52.         "Ist eine der genannten Grafikkarten in Ihrem Amiga-System vorhanden, "
  53.         "dann können Sie veranlassen, daß der entsprechende Treiber "
  54.         "installiert wird.\n"
  55.         "Fragen Sie nach den neuesten Grafikkarten-Treibern bei der Fa. MAXON nach.\n\n"
  56.         @askchoice-help))
  57.  
  58.  
  59. (set #msg-install-cinema-lib
  60. (cat    "\nNun wird die Cinema-Ausgabe-Library im LIBS:-Ordner installiert.\n\n"
  61.         "Diese Library wird benötigt, damit CINEMA 4D direkt "
  62.         "auf der Grafikkarte Bilder darstellen kann."))
  63.  
  64. (set #prp-copy-cinelib "Kopieren der Cinema-Ausgabe-Library")
  65. (set #hlp-copy-cinelib
  66. (cat    "Die Cinema-Ausgabe-Library enthält leistungsfähige Funktionen zum "
  67.         "Betreiben von CINEMA 4D unter den besonderen Fähigkeiten von "
  68.         "24 Bit Grafikkarten"
  69.         "\n\n"
  70.         @copylib-help))
  71.  
  72.  
  73. (set #COPVERZ    (cat "\nAuf welcher Partition soll MaxonCINEMA 4D\nangelegt werden?"
  74.                           "\nDas Verzeichnis \"MC4D2-Demo\" wird automatisch erzeugt!"
  75. ))
  76.  
  77. (set sourcefd-guidelib                "RAM:libs/amigaguide.library")
  78. (set sourcefd-retina                    "RAM:libs/Retina/cinemaausgabe.library")
  79. (set sourcefd-picasso                "RAM:libs/Picasso/cinemaausgabe.library")
  80. (set sourcefd-merlin                    "RAM:libs/Merlin.ganzneu/cinemaausgabe.library")
  81. (set sourcefd-egs                        "RAM:libs/EGS/cinemaausgabe.library")
  82. (set sourcefd-egsdoc                    "RAM:libs/EGS/Cinema.guide")
  83.  
  84.  
  85. (set #SIZE 1)
  86.  
  87. (set @language "Deutsch")
  88.  
  89. (set os-version (/ (getversion) 65536))
  90. (set os-13 (< os-version 36))
  91. (set os-20 (>= os-version 36))
  92. (set os-21 (>= os-version 38))
  93.  
  94.  
  95.  
  96. (Procedure Inst_NormFiles
  97.     (if (< (getdiskspace @Dest) @Size)
  98.         (abort #no-inst))
  99.  
  100.     (set @anzeige (cat "Kopiere "@FName" aus "@SOURCE" \nnach "@Dest))
  101.     (copyfiles (prompt @anzeige)(help @copyfiles-help)(source @Source)(choices @FName)(files)(infos)(dest @Dest)(confirm))
  102. )
  103.  
  104. (Procedure Inst_PatternFiles
  105.     (if (< (getdiskspace @Dest) @Size)
  106.         (abort #no-inst))
  107.  
  108.     (set @anzeige (cat "Kopiere "@FName" aus "@SOURCE" \nnach "@Dest))
  109.     (copyfiles (prompt @anzeige)(help @copyfiles-help)(source @Source)(pattern @Pattern)(infos)(dest @Dest)(confirm))
  110. )
  111.  
  112.  
  113.  
  114. (message #introduction)
  115. (welcome)
  116. (set old_level @user-level)
  117.  
  118. (complete 0)
  119.  
  120. (set @user-level 1)
  121. (set @default-src "")
  122.  
  123. (set processor (database "cpu"))
  124.  
  125. (if (OR (= processor "68000") (= processor "68010"))
  126.     (set ProgVersion "000")
  127.  
  128.     (if (= 5 (run "TestFPU" (safe)))
  129.             (set ProgVersion "881")
  130.     )
  131. )
  132.  
  133.  
  134. (set egs (getassign "EGS"))                                ; Ist EGS installiert ?
  135. (set gfxout 0)                                                    ; Keine
  136. (if (<> egs "")((set gfxout 3)))                            ; 4=Picasso, 3=EGS, 2=Merlin, 1=Retina
  137.  
  138.  
  139.  
  140.  
  141. (set @default-dest                           ; Verzeichnis aussuchen 
  142.     (askdir
  143.         (prompt #COPVERZ)
  144.         (help    #askdir-help)
  145.         (default "WORK:")
  146.     )
  147. )
  148.  
  149. (set @default-dest (tackon @default-dest "MC4D2-Demo"))
  150.  
  151.  
  152.  
  153. (if                                          ; Verzeichnis erzeugen
  154.     (= (exists @default-dest) 0)
  155.     (makedir @default-dest (infos))
  156. )
  157.  
  158. (complete 5)
  159.  
  160.  
  161.  
  162.  
  163. (
  164.     (set @Source @default-src)
  165.     (set @Dest @default-dest)
  166.    (set @Pattern "Lhx")
  167.     (Inst_PatternFiles)
  168. )
  169.  
  170. (
  171.     (set @Source @default-src)
  172.     (set @Dest @default-dest)
  173.    (set @Pattern "WICHTIG")
  174.     (set @Size #SIZE)
  175.     (Inst_PatternFiles)
  176. )
  177.  
  178. (
  179.     (set @Source @default-src)
  180.     (set @Dest @default-dest)
  181.    (set @Pattern "INHALT")
  182.     (Inst_PatternFiles)
  183. )
  184.  
  185.  
  186.     (set @TMP (tackon @default-src "libs.lha"))
  187.     (set @Dest_File "RAM:")
  188.     (set @TMP2 (tackon @default-dest "LHX"))
  189.     (run ("%s -q x %s \"%s\"" @TMP2 @TMP @Dest_File))
  190.  
  191. (complete 20)
  192.  
  193. (set gfxout                                                        ; Grafikkarte wählen
  194.     (askchoice
  195.         (prompt #prp-grafikausgabe)
  196.         (help #hlp-grafikausgabe)
  197.         (choices #no-gfxout #retina-gfxout #merlin-gfxout #egs-gfxout #picasso-gfxout)
  198.         (default gfxout)
  199.     )
  200. )
  201.  
  202.  
  203. (if (= gfxout 1)                                                ; Retina output
  204.     (copylib
  205.         (prompt #prp-copy-cinelib)
  206.         (help #hlp-copy-cinelib)
  207.         (source sourcefd-retina)
  208.         (dest "LIBS:")
  209.         (confirm)
  210.     )
  211. )
  212. (if (= gfxout 2)                                                ; Merlin output
  213.     (copylib
  214.         (prompt #prp-copy-cinelib)
  215.         (help #hlp-copy-cinelib)
  216.         (source sourcefd-merlin)
  217.         (dest "LIBS:")
  218.         (confirm)
  219.     )
  220. )
  221. (if (= gfxout 3)                                                ; EGS output
  222.     (
  223.         (copylib
  224.             (prompt #prp-copy-cinelib)
  225.             (help #hlp-copy-cinelib)
  226.             (source sourcefd-egs)
  227.             (dest "LIBS:")
  228.             (confirm)
  229.         )
  230.         (copyfiles
  231.             (prompt #prp-copy-cinelib)
  232.             (help #hlp-copy-cinelib)
  233.             (source sourcefd-egsdoc)
  234.             (dest @default-dest)
  235.             (infos)
  236.         )
  237.     )
  238. )
  239. (if (= gfxout 4)                                                ; Picasso output
  240.     (copylib
  241.         (prompt #prp-copy-cinelib)
  242.         (help #hlp-copy-cinelib)
  243.         (source sourcefd-picasso)
  244.         (dest "LIBS:")
  245.         (confirm)
  246.     )
  247. )
  248. (run "C:DELETE RAM:libs ALL QUIET")                        ; aufräumen ...
  249.  
  250.  
  251.  
  252.  
  253.  
  254.  
  255. (complete 30)
  256.  
  257.  
  258.     (working "\n\nProgrammdateien werden entpackt.\n\nBitte warten!")
  259.     (set @TMP (tackon @default-src "Castillian.lha"))
  260.     (set @Dest_File @default-dest)
  261.     (set @TMP2 (tackon @default-dest "LHX"))
  262.     (run ("%s -q x %s \"%s/\"" @TMP2 @TMP @Dest_File))
  263.  
  264. (complete 40)
  265.  
  266.     (set @TMP (tackon @default-src "MatTex.lha"))
  267.     (set @Dest_File @default-dest)
  268.     (set @TMP2 (tackon @default-dest "LHX"))
  269.     (run ("%s -q x %s \"%s/\"" @TMP2 @TMP @Dest_File))
  270.  
  271. (complete 50)
  272.  
  273.     (set @TMP (tackon @default-src "Szenen.lha"))
  274.     (set @Dest_File @default-dest)
  275.     (set @TMP2 (tackon @default-dest "LHX"))
  276.     (run ("%s -q x %s \"%s/\"" @TMP2 @TMP @Dest_File))
  277.  
  278.  
  279. (if (= ProgVersion "000")
  280.     (
  281.     (set @TMP (tackon @default-src "Demo000.lha"))
  282.     (set @Dest_File @default-dest)
  283.     (set @TMP2 (tackon @default-dest "LHX"))
  284.     (run ("%s -q x %s \"%s/\"" @TMP2 @TMP @Dest_File))
  285.     )
  286. )
  287.  
  288. (complete 60)
  289.  
  290.  
  291. (if (= ProgVersion "881")
  292.     (
  293.     (working "\n\nProgrammdateien werden entpackt.\n\nBitte warten!")
  294.     (set @TMP (tackon @default-src "Demo881.lha"))
  295.     (set @Dest_File @default-dest)
  296.     (set @TMP2 (tackon @default-dest "LHX"))
  297.     (run ("%s -q x %s \"%s/\"" @TMP2 @TMP @Dest_File))
  298.     )
  299. )
  300.  
  301. (complete 80)
  302.  
  303. (
  304.     (set @Source @default-src)
  305.     (set @Dest @default-dest)
  306.    (set @Pattern "Bilder")
  307.     (set @Size #SIZE)
  308.     (Inst_PatternFiles)
  309. )
  310.  
  311. (complete 100)
  312.  
  313. ; ------- FERTIG
  314.  
  315.  
  316.  
  317. (exit)
  318.  
  319. ;=============================================================================
  320.  
  321.