;***************************************************************************** ; ______ __ ______ __ __ __ ; / __ / / / / __ / Update / / \ \ / / ; / / -'__ __ / /___ ______ _____ / /_ -'_____ ______ ______ / /__ \ \ / ; / / \ \/ // __ // ____// .__// // \ / .__// __ // __ // __ / / / ;/ /___ \ // /_/ // __/_ / / / /_/ // / / __ // /_/ // / / / / \ \ ;\____/ / //_____//_____//_/ /_____//_/ /_/ /_// ____//_/ /_/ /_/ \_\ ; /_/ / / ; /_/ ; Domino PicassoII Spectrum Piccolo Z2/3 Picasso II+ RetinaZ3 Cybervision ; PiccoloSD64 A2410 DraCoAltais ; ; CyberGraphX Update Installer Copyright ©1994,1995,1996,1997 by Robert C. Reiswig ; $VER: Version_2.24b (March-12-1997) ; For use with PD and Registered CyberGraphX Only ;-------------------------------------------------------------------------------- ; Installer suggestions, problems or changes: vgr@best.com ;******************************************************************************** ;******************************************************************************** ; Cyber Release & Boards ;******************************************************************************** (set #cyberver "2.24") (set NoBoard 0) (set whereback "SYS:Storage") (message (cat "\nCyberGraphX V" #cyberver "\n~~~~~~~~~~~~~~~~~~\n" "CyberVision64\n\nSpectrum\n\nDomino & A2410\n\n" "DraCo Altais & Retina BLT Z3\n\nPiccolo & Piccolo SD64\n\nPicasso II & Picasso II+" ) ) (welcome) ;******************************************************************************** ; Read All System information ;******************************************************************************** (set cpu (database "cpu")) (if (> (exists ("sys:libs/68060.library")) 0) (set cpu "68060") ) (set vblank (database "vblank")) (set graphmem (database "graphics-mem")) (set totmem (database "total-mem")) (set osver (/ (getversion "LIBS:version.library") 65536)) (if (= vblank "60") ((set blank "NTSC")) ((set blank "PAL"))) (set fastmem (- totmem graphmem)) ( if (= osver 37) ( (set workbench "2.0")) ( if (= osver 38) ( (set workbench "2.1")) ( if (= osver 39) ( (set workbench "3.0")) ( if (= osver 40) ( (set workbench "3.1")) ( if (= osver 41) ( (set workbench "3.2")) ))))) (set CyberDrawer "SYS:") (set were "sys") (set BackDirText "ram:") (set whereback "ram:") (set pick 0) ;******************************************************************************** ; For some reason these seem to get lost ;******************************************************************************** (if (< (exists "env:cybergraphics") 2) (makedir "env:cybergraphics") ) (if (< (exists "envarc:cybergraphics") 2) (makedir "envarc:cybergraphics") ) (if (> (exists ("devs:monitors/Spectrum")) 0) (set #BGuess 1) ) (if (> (exists ("devs:monitors/Piccolo")) 0) (set #BGuess 2) ) (if (> (exists ("devs:monitors/Domino")) 0) (set #BGuess 3) ) (if (> (exists ("devs:monitors/RetinaZ3")) 0) (set #BGuess 4) ) (if (> (exists ("devs:monitors/PiccoSD64")) 0) (set #BGuess 5) ) (if (> (exists ("devs:monitors/A2410")) 0) (set #BGuess 7) ) (if (> (exists ("devs:monitors/CyberVision")) 0) (set #BGuess 6) ) (if (> (exists ("devs:monitors/A2410")) 0) (set #BGuess 7) ) (if (> (exists ("devs:monitors/DraCoAltais")) 0) (set #BGuess 8) ) (if (> (exists ("devs:monitors/Merlin")) 0) (set #BGuess 9) ) (if (> (exists ("devs:monitors/Picasso")) 0) (set #BGuess 0) ) ;******************************************************************************** ;English Strings ;******************************************************************************** (set #By (cat "\n\nCyberGraphX\n\nRelease Version " #cyberver "\n\n\n\n" "by:\n\nVision Factory Development" ;"\n\n\nInstallers & Versions By:\n Robert Reiswig - rcr@netcom.com" ) ) (set #MinReqOS (cat "The following are the MINIMUM REQUIREMENTS!\n" "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n\n" "Kickstart 3.x, **You only have " workbench "**\n\n" "PicassoII in linear mode *not segmented*\n\n" "68020 or higher\n\n" "2 MB of fast memory" ) ) (set #MinReqCp (cat "The following are the MINIMUM REQUIREMENTS!\n" "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n\n" "68020 or higher, **You only have " cpu "**\n\n" "PicassoII in linear mode *not segmented*\n\n" "Kickstart 3.x\n\n" "2 MB of fast memory" ) ) (set #SysInfo (cat "Basic System Check, This Machine Has\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" " \"" workbench "\" Version of OS\n\n" " \"" cpu "\" Processor\n\n " " \"" blank "\" Machine\n\n" " \"" graphmem "\" Total Free Chip Memory\n\n" " \"" fastmem "\" Total Free Fast Memory\n\n \"" totmem "\" Total Free Memory\n\n" ) ) (set #WillInstall "\n\n\n\nThis installer will Move OR Delete the Current Graphic Boards's Drivers. Please read the Docs if you have any question!\n") (set #NeedChangeTool (cat "Currently your 'village.library'\n-The monitor file-\nis set to: " MonitorIS "kHz\n\nIt must be set to 'Custom'!\nYou must first use the PicassoMode program\n" "that came with your Picasso II to create a custom monitorfile. Then you need to change " "the tooltype to CUSTOM. Please read the Docs for PicassoMode to do this!!!\n\n" "YOU MUST DO THIS NOW!" ) ) (set #BackUpFiles "BackUp the Files") (set #DeleteFiles "Delete the Files") (set #ask-BackOrDelete "The Installer will Back up the Current Boards System software, if you select, to: ") (set #ask-MODEFILE "Which modefile should be installed ?") (set #15KHZ "15khz maximum") (set #31KHZ "31khz maximum") (set #35KHZ "35khz maximum") (set #38KHZ "38khz maximum") (set #48KHZ "48khz maximum") (set #57KHZ "57khz maximum") (set #64KHZ "64khz maximum") (set #wishtoinstall "Do you wish to install any of the following?") (set #order "Order Form") (set #guide "AmigaGuide File") (set #devdocs "Developer Documentation") (set #versions "Versions - Shows Vers of CyberGraphX") (set #WhereStuffDir "Please select where you wish to put them.\n(A directory called \"CyberGraphX\" will be created there!)") (set #SetEnv "SetEnv - Sets/Changes Env Vars") (set #Comming (cat "\nCOMING! (Planned Features)\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "15/16/24 bit extension of the "normal" graphics.library, that means that " "you can open 24bit screens as standard intuition screens and that you " "can use all graphics.library functions on them as before. (with some " "limitations of course because of the missing color lookup table)\n\n" "Application to adjust the monitor parameters" ) ) (set #cpup2c (cat "CPUP2C\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "By setting this variable, the planar-to-chunky conversion " "will be done by the CPU (in contrast to the blitter-conversion) " "Therefore the ugly-looking "planar" blitting-effects are gone, " "but the software-conversion is slower. Do you wish to Enable this feature?" ) ) (set #hirescrsr (cat "HIRESCRSR\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "By setting this variable, the Lores-Sprites on non-AA-machines " "become Hires-sprites (they are no longer doubled by " "the CyberGraphX-Software). " "This variable is identical to the tooltype HIRESSPRITE " "of older Picasso-monitor files." ) ) (set #hide15bit (cat "HIDE15BIT\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "By setting this variable, you can switch off 15bit modes to reduce " "screenmode list length. The Modes are still available but hidden." ) ) (set #alertemu (cat "ALERTEMU\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "By setting this variable, DisplayAlert(), (The Screens you get when the machine crashes.) " "will be placed on an CyberGraphX screens." ) ) (set #ask-driver (cat "Select The Driver(s) you wish to install.")) (set #CyberREG (cat "If you have a Registered version of CyberGraphX installed or you are running a CyberVision board, " "please select 'Quick Update'. " ) ) (set #firstTime "First time install") (set #PDInstalled "PD version Installed") (set #REGInstalled "Registered version Installed") (set #quickupdate "Quick Update (New Libs & Drivers only)") (set #cvmode "CVMode (Screen Mode Creator)") (set #WhereReadME "Please select where you wish to put the ReadMe.") (set #NoUp "No, Don't update") (set #OnlyNew "Yes, Only if newer") (set #YesAll "Yes, No matter what") (set #checkcustom (cat "\nThe installer will now check\n" "'SYS:Expansion/village.library.info'\n" "To see if the tool type MONITOR is set to CUSTOM.\n\n" "It would be best to set this to custom so that when you install " "the REG version 'ConvPicassoModes' can convert over all you Sceeen modes " "that you currently use correctly. If you get an error message you can just skip it." ) ) (set #ask-Amax "Do you wish to install the CyberGraphX Amax Driver? (It only does 1024x768x256)") (set #where-Amax "Where do you wish to Install the Amax Driver?\n(The default is \"Work:\")") (set #changes (cat "\nStarting with this release, CyBERgraphics now has a new and better name:" "\n\n\nCyberGraphX\n\n\n" "Also starting with this release the Version Numbering has changed. This would " "have been 40.50 but will now be called 2.0 of CyberGraphX. This has been done " "to remove the link between the cybergraphics.library version and the CyberGraphX package version!" ) ) (set #AboutQuickie (cat "\nThis will ONLY UPDATE the CyberGraphX libraries and Monitor Driver(s).\n\n" "It is meant for CyberGraphX users. This includes Registered, Non-Registered CyberGraphX users along with CyberVision owners!\n\n" "It will update your system to version " #CyberVer " of the CyberGraphX package.\n\nIf this is your first time Installing CyberGraphX " "then you will need to get the _complete_ Archive first!" ) ) (set #yes "Yes - On") (set #no "No - Off") (set #youwantto "You want to set:") (set #to "To:") (set #nochip (cat "NOCHIPSCREEN\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "By setting this variable, 8 bit deep screens are always opened " "in Fast memory. Useful with 1MB chip systems but you should " "avoid it with 2MB chip, because the older method is more " "compatible (no taglist changes etc.) " ) ) (set #planes2 (cat "PLANES2FAST\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "With this option on, non displayable planar bitmaps " "are allocated in fast memory. This options speeds up " "handling of planar bitmaps but could lead to problems " "with amiga graphics which insist on planar graphics " "placed in chip memory. Take care when using this option." ) ) (set #nopass (cat "NOPASSTHROUGH\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "If this option is enabled, the monitor switch on every " "CyberGraphX supported board is deactivated. This option is " "required for multi monitor systems." ) ) (set #keepamiga (cat "KEEPAMIGAVIDEO\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "If this option is disabled, everytime a CyberGraphX display " "becomes frontscreen, Amiga display DMA is switched off in order " "to increase chipmem access speed. You can avoid this by enabling " "this option. " ) ) (set #whatboard (cat "\nPlease Select the Graphics Board you wish to update CyberGraphX Monitor File for:\n")) (set #updatecorrect "\n\n\nThe Monitor file updated correctly!\n\nThe installer created a backup of the old\n Monitor File in:\n\n") (set #updatePD "\n\n\nThe Monitor Updater is for Registered Users only.\n\nThe installer created a backup of the old\n Monitor File in:\n\n") (set #updateBad "\n\n\nThere has been an error in the Monitor File update.\n\nThe Monitor File is corrupt, bad, renamed or it is missing. Please Check this!\n") (set #updateNoUpdate "\n\n\nCurrently there is no Updater for your Monitor File.") (set #updateNoUpdate1 "\n\n\nCurrently there is no Updater for your Monitor File.\n\nThe installer created a backup of the old\n Monitor File in:\n\n") (set #NoUp "No, Don't update") (set #OnlyNew "Yes, Only if newer") (set #OnlyNewB "Yes, Only if newer with backup") (set #YesAll "Yes, No matter what with no backup") (set #thefollowing "The following have been backed up to\n\n") (set #cybergfx "\n\nNot backed up - cybergraphics.library") (set #cyberint "\n\nNot backed up - cyberintuition.library") (set #cyberlayers "\n\nNot backed up - cyberlayers.library") (set #cybervil "\n\nNot backed up - vilintuisup.library") (set #gtlay "\n\nNot backed up - gtlayout.library") (set #cvmode "CVMode - Screen Creator V1.5") (set #cyberprefsx "CyberPrefsX - Set/Explain/Change Settings") (set #tools "\nWhat CyberGraphX Tools do you with to install?\n") (set #Where "Where do you wish to install ") (set #wherecvm "CVMode? If there is a copy already there a backup of it will be created!") (set #wherecpx "CyberPrefsX? If there is a copy already there a backup of it will be created!") (set #whatboard (cat "\nPlease Select the Graphics Board you are using CyberGraphX on:\n")) (set #AltaisMon (cat "\n\nIn order to get the latest CyberGraphX Monitor driver " "for the Altais you must contact:\n\n MacroSystem Computer GmbH\n" "Friedrich-Ebert-Str. 85\n58454 Witten\nTel: +49 (2302) 80391\n" "Fax: +49 (2302) 80884" ) ) ;(set #YesBackup "Back up Monitor file") ;(set #NoBackup "Do Not Back up Monitor file") (set #hasbeen "Has been Backed Up to") (set #wherelibs "Where are your CyberGraphX libraries located? The default is 'SYS:Libs'") (set #backlibs "Do you wish to back up the Current CyberGraphX libraries that are currently installed on your system?") (set #nobackup "No, Do not BackUp CGraphX ") (set #yesbackup "Yes, BackUp CGraphX ") (set #wherebacklibs "Where do you wish to BackUp the CyberGraphX Libs? The Default is 'SYS:Storage'. If a directory Called 'CyberGraphX' is not there one will be created.") (set #wherebackmon "Where do you wish to BackUp the CyberGraphX Monitor File? The Default is 'SYS:Storage'. If a directory Called 'CyberGraphX' is not there one will be created.") (set #updatelib "Update library") (set #noupdatelib "Do not update library") (set #noroom "\n\nThere was no room on SYS: for\n\n") (set #filesum "(Backup file = .)") (set #monitorfile "monitor file.") (set #mc4d "MAXON Cinema4D V3") (set #quickchangeenv "Quick Set/Change Environment Variables ") (set #currenv "\nCurrent Settings for Environment Variables\n") (set #nodraco "\n\n\nNOTE\n\nThe libraries in this Update do not work with the DraCoAltais. If you are using a DraCoAltais you should 'Abort Install' now.") (set boardback "\nNone") (set #CyberBackUp-UnInstall "CyberBackUp-UnInstall") (set #wherebackupU "CyberBackUp-UnInstall? If there is a copy already there a backup of it will be created!") (set #gettingsum "\n\nGetting Checksum") ;--- (set #yes1 "Yes") (set #no1 "No, Done") (set #boardmore "\nWould you like to Update another CyberGraphX Monitor file?\n") ;******************************************************************************** ;German Strings ;******************************************************************************** (if (= @language "deutsch") ( (set #By (cat "\n\nCyberGraphX Software\nVersion " #cyberver "\n\n\n\n" "Software von:\n\nVision Factory Development" ;"\n\n\nInstallerskript von:\n Robert Reiswig - rcr@netcom.com" ) ) (set #MinReqOS (cat "Folgendes sind die Minimalanforderungen !\n" "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n\n" "Kickstart 3.x, **Sie haben nur " Workbench "**\n\n" "PicassoII im linear Modus *nicht segmentiert*\n\n" "68020 oder höher\n\n" "2 MB FAST Ram" ) ) (set #MinReqCP (cat "Folgendes sind die Minimalanforderungen!\n" "~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n\n" "68020 oder höher, **Sie haben nur eine " cpu "**\n\n" "PicassoII im linear Modus *nicht segmentiert*\n\n" "Kickstart 3.x\n\n" "2 MB FAST Ram" ) ) (set #SysInfo (cat "Minimaler System Check, Dieser Rechner hat\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" " Version \"" Workbench "\" des OS\n\n" " \"" cpu "\" Prozessor\n\n " " \"" blank "\" Gerät\n\n" " \"" graphmem "\" freier Chip Speicher\n\n" " \"" fastmem "\" freies Fast RAM\n\n \"" totmem "\" freies RAM gesamt\n\n" ) ) (set #WillInstall "\n\n\n\nDieses Installerskript sichert oder löscht die aktuellen Grafikkarten Treiber. Bitte lesen sie die Guidedatei bei Fragen!\n") (set #NeedChangeTool (cat "Currently your 'village.library'\n-The monitor file-\nis set to: " MonitorIS "kHz\n\nIt must be set to 'Custom'!\nYou must first use the PicassoMode program\n" "that came with your Picasso II to create a custom monitorfile. Then you need to change " "the tooltype to CUSTOM. Please read the Docs for PicassoMode to do this!!!\n\n" "YOU MUST DO THIS NOW!" ) ) (set #ask-MODEFILE "Welche Mode-Definitionsdatei soll aktiviert werden ?") (set #15KHZ "Definition mit 15khz max. HFrequenz") (set #31KHZ "Definition mit 31khz max. HFrequenz") (set #35KHZ "Definition mit 35khz max. HFrequenz") (set #38KHZ "Definition mit 38khz max. HFrequenz") (set #48KHZ "Definition mit 48khz max. HFrequenz") (set #57KHZ "Definition mit 57khz max. HFrequenz") (set #64KHZ "Definition mit 64khz max. HFrequenz") (set #wishtoinstall "Wollen Sie folgende Dateien installieren ?") (set #order "Bestellformular") (set #guide "AmigaGuide Datei") (set #devdocs "Entwickler Dokumentation") (set #versions "Versions - Zeigt die CyberGFX Versionen") (set #WhereStuffDir "Bitte wählen sie einen Zielpfad.\n(Ein Verzeichnis \"CyberGraphX\" wird automatisch erstellt!)") (set #cpup2c (cat "CPUP2C\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Wenn Sie diese Variable setzen, wird die Planar-nach-Chunky Konvertierung " "von der CPU erledigt (im Gegensatz zur Blitter-Konvertierung) " "Damit sind die teilweise merkwürdig aussehenden "planar" Bliteffekte verschwunden, " "aber die CPU-Konvertierung ist langsamer. Wollen Sie diese Möglichkeit aktivieren ?" ) ) (set #hirescrsr (cat "HIRESCRSR\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Wenn diese Variable aktiviert ist, werden Lores-Sprites auf nicht-AGA-Geräten " "zu Hires-sprites (Sie werden nicht mehr von der CyberGraphX Software " "verdoppelt). " "(Diese Variable ist identisch mit dem Tooltype HIRESSPRITE " "in der alten Picasso software)." ) ) (set #NoUp "Nein, nicht erneuern") (set #OnlyNew "Ja, nur wenn neuer") (set #YesAll "Ja, egal was installiert ist") (set #hide15bit (cat "HIDE15BIT\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Wenn diese Variable aktiviert ist, werden die 15Bit Modi deaktiviert, um " "die Screenmodeliste zu verkuerzen. Die Modes sind immer noch da, aber nicht sichtbar." ) ) (set #alertemu (cat "ALERTEMU\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Ist diese Variable aktiviert, wird DisplayAlert(), (Die Routine, die eine Guru-Box erzeugt.) " "auf einen CyberGraphX Bildschirm umgeleitet." ) ) (set #ask-driver (cat "Bitte wählen Sie die Treiber, die installiert werden sollen.")) (set #CyberREG (cat "Haben Sie bereits eine Version von CyberGraphX installiert? Wenn das so ist, ueberschreibt die Installation die Monitordatei nicht ! Sie muessen diese Frage richtig beantworten!")) (set #firstTime "Erstinstallation") (set #PDInstalled "PD version installiert") (set #REGInstalled "Registrierte Version installiert") (set #quickupdate "Schnelles Update (Nur neue Libraries & Treiber)") (set #cvmode "CVMode (Screen Mode Programm)") (set #WhereReadME "Bitte waehlen Sie den Pfad, wo die LiesMich Datei hinkopiert werden soll.") (set #changes (cat "\nBeginnend mit dieser Veröffentlichung heißt das CyBERgraphics System nun anders:" "\n\n\nCyberGraphX\n\n\n" "Ebenso hat sich die Versionsnummernvergabe geändert. Es hätte wie bisher eigentlich " "40.50 sein müssen. Ab sofort ist es aber die Version 2.0 von CyberGraphX. Damit ist endlich der " "Zusammenhang zwischen der Version der cybergraphics.library und dem CyberGraphX Paket aufgehoben" ) ) (set #AboutQuickie (cat "\n\nDieses Paket erneuert NUR die CyberGraphX libraries.\n\n" "Es ist sowohl für registrierte als auch unregistrierte CyberGraphX Benutzer gedacht!\n\n" "Es updated Ihr System auf Version " #CyberVer " der CyberGraphX libraries.\n\nWenn Sie CyberGraphX zum ersten Mal installieren, " "brauchen Sie das _komplette_ Archiv vom Aminet!" ) ) (set #nochip (cat "NOCHIPSCREEN\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Wird diese Option aktiviert, werden CyberGraphX 256-Farben Bildschirme " "immer direkt im FastRAM geöffnet. Das ist sinnvoll bei Rechnern mit 1MB " "ChipRAM, sollte aber mit 2MB ChipRAM Systemen vermieden werden, da die " "alte Methode in einigen Punkten kompatibler ist." ) ) (set #planes2 (cat "PLANES2FAST\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Ist diese Option aktiv, werden nicht darzustellende " "planare BitMaps im FastRAM angelegt. Diese Option " "beschleunigt die Bearbeitung von planaren BitMaps aber " "kann zu Problemen mit Amiga Originalgrafik führen, wenn " "diese davon ausgeht, dass planare BitMaps im ChipRAM liegen. " "Seien Sie vorsichtig mit der Aktivierung dieser Option." ) ) (set #nopass (cat "NOPASSTHROUGH\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Wenn diese Option aktiviert ist, wird der Monitorumschalter " "auf jeder von CyberGraphX unterstützten Karte deaktiviert. " "Diese Option ist für Mehr-Monitor Systeme erforderlich. " ) ) (set #keepamiga (cat "KEEPAMIGAVIDEO\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Ist diese Option nicht aktiv, wird jedesmal, wenn " "ein CyberGraphX Bildschirm nach vorne kommt, die Amiga Bildschirm " "DMA abgeschaltet, um den Zugriff auf das ChipMemory zu beschleunigen. " "Dies kann durch Aktivierung der Option vermieden werden. " ) ) (set #whatboard (cat "\nBitte wählen Sie die Grafikkarte, deren Monitordatei Sie erneuern möchten:\n")) (set #updatecorrect "\n\n\nDie Monitordatei wurde erneuert!\n\nDas Installskript kopierte eine Sicherheitskopie der alten Datei nach:\n\n") (set #updatePD "\n\n\nDas Erneuern der Monitor funktioniert nur mit registrierten Monitordateien!!\n\nDas Installskript kopierte eine Sicherheitskopie der alten Datei nach:\n\n") (set #updateBad "\n\n\nEs ist ein Fehler aufgetreten beim Erneuern.\n\nDie Monitordatei ist entweder defekt, umbenannt oder fehlt. Bitte überprüfen Sie das!\n") (set #updateNoUpdate "\n\n\nEs existiert kein Updater für diesen Monitortreiber in diesem Archiv.") (set #updateNoUpdate1 "\n\n\nEs existiert kein Updater für diesen Monitortreiber in diesem Archiv.\n\nDas Installskript kopierte eine Sicherheitskopie der alten Datei nach:\n\n") (set #yes "Ja") (set #no "Nein") (set #youwantto "Sie wollen die Änderung von:") (set #to "auf:") (set #NoUp "Nein, nicht erneuern") (set #OnlyNew "Ja, nur wenn neuer") (set #OnlyNewB "Ja, nur wenn neuer + Backup") (set #YesAll "Ja, egal welche Version") (set #thefollowing "Folgende Dateien wurden gesichert in\n\n") (set #cybergfx "\n\nNicht gesichert - cybergraphics.library") (set #cyberint "\n\nNicht gesichert - cyberintuition.library") (set #cyberlayers "\n\nNicht gesichert - cyberlayers.library") (set #cybervil "\n\nNicht gesichert - vilintuisup.library") (set #gtlay "\n\nNicht gesichert - gtlayout.library") (set #cvmode "CVMode - Screenedit Tool V1.5") (set #cyberprefsx "CyberPrefsX - Setze/Erkläre/Ändere Werte") (set #tools "\nWelche CyberGraphX Tools möchten Sie installieren?\n") (set #Where "Wohin möchten Sie das hininstallieren: ") (set #wherecvm "CVMode? Wenn es bereits existiert, wird ein Backup erstellt!") (set #wherecpx "CyberPrefsX? Wenn es bereits existiert, wird ein Backup erstellt!") (set #whatboard (cat "\nBitte wählen Sie die Grafikkarte, mit dem Sie CyberGraphX benutzen wollen:\n")) (set #AltaisMon (cat "\n\nUm den aktuellsten CyberGraphX Monitor Treiber für DraCoAltais " "zu bekommen, wenden Sie sich bitte an:\n\n MacroSystem Computer GmbH\n" "Friedrich-Ebert-Str. 85\n58454 Witten\nTel: +49 (2302) 80391\n" "Fax: +49 (2302) 80884" ) ) (set #YesBackup "Sicherung der Monitordateien") (set #NoBackup "Keine Sicherung der Monitordateien") (set #hasbeen "wurde gesichert nach") (set #wherelibs "Wo befinden sich die CyberGraphX libraries? Normal ist 'SYS:Libs'") (set #backlibs "Wollen sie ein Backup der aktuell auf Ihrem System befindlichen CyberGraphX libraries?") (set #nobackup "Nein, keine Sicherung der CGraphX ") (set #yesbackup "Ja, sichere alte CGraphX ") (set #wherebacklibs "Wohin sollen die CyberGraphX Libraries gesichert werden? Normal ist 'SYS:Storage'. Wenn ein Verzeichnis namens 'CyberGraphX' fehlt, wird eins erstellt.") (set #wherebackmon "Wohin soll die CyberGraphX Monitordatei gesichert werden? Normal ist 'SYS:Storage'. Wenn ein Verzeichnis namens 'CyberGraphX' fehlt, wird eins erstellt.") (set #updatelib "Library erneuern") (set #noupdatelib "Library nicht erneuern") (set #noroom "\n\nEs war kein Platz auf sys:\n\n") (set #filesum "(Backupdatei = .)") (set #monitorfile "Monitordatei.") (set boardback "Alten Monitor nicht gesichert.") (set #mc4d "MAXON Cinema4D V3") (set #quickchangeenv "Schnelles Setzen/Ändern der Umgebungsvariablen") (set #currenv "\nMomentane Einstellungen der Umgebungsvariablen\n") (set #nodraco "\n\n\nHinweis\n\nDie Libraries in diesem Update arbeiten nicht mit DraCo zusammen. Wenn Sie einen DraCo benutzen, sollten Sie jetzt 'Abort Install' drücken.") (set boardback "\n(Keine Sicherung)") (set #CyberBackUp-UnInstall "CyberBackUp-UnInstall") (set #wherebackupU "CyberBackUp-UnInstall? Wenn bereits eine Kopie vorhanden ist, wird diese gesichert!") (set #gettingsum "\n\nErzeuge Prüfsumme") ;---- (set #yes1 "Ja") (set #no1 "Nein, fertig") (set #boardmore "\nWollen Sie einen weiteren CyberGraphX Monitortreiber erneuern?\n") ) ) ;******************************************************************************** ; Start Update ;******************************************************************************** (message #by) (if (> (getversion "dracographics.library" (resident)) 0) (message #nodraco) ) (message #AboutQuickie) ;******************************************************************* ; ASK where cybergfx libs are ;******************************************************************* (set wherelibs (askdir (prompt #wherelibs) (help #wherelibs) (default "SYS:Libs") ) ) ;******************************************************************* ; BackUp Libs ? ;******************************************************************* (set back (askchoice (choices (cat #yesbackup "libraries.") (cat #nobackup "libraries.") ) (prompt #backlibs) (help #backlibs) (default 0) ) ) (set whereback "ram:") (if (= back 0) (set whereback (askdir (prompt #wherebacklibs) (help #wherebacklibs) (default "SYS:Storage") ) ) ) ;******************************************************************* ; Make dirs for backup ;******************************************************************* (if (= back 0) ( (set libsdest (tackon whereback "CyberGraphX")) (if (< (exists libsdest) 2) (makedir libsdest (infos)) ) (set libsdest (tackon whereback "CyberGraphX/libs")) (if (< (exists libsdest) 2) (makedir libsdest (infos)) ) ) ) ;******************************************************************* ; Procedure to backup/copy libs ;******************************************************************* (procedure UpdateLib (set vernum1 (getversion (tackon wherelibs #lib)) ) (set ver1 (/ vernum1 65536)) (set rev1 (- vernum1 (* ver1 65536) ) ) (set vernum2 (getversion (cat "libs/" #lib)) ) (set ver2 (/ vernum2 65536)) (set rev2 (- vernum2 (* ver2 65536) ) ) ;*** Check for SIZE and Version (if (= back 0) ( (set sizeneed (getsize (cat "libs/" #lib)) ) (set space (getdiskspace (cat (getdevice libsdest) ":")) ) (set ok 0) (set ##ver (cat ver1 "." rev1) ) (set #cybertext (cat "\n\nNo room on " libsdest " for " #lib ##ver)) (if (> space sizeneed) ( (if (> (exists (tackon wherelibs #lib)) 0) (copyfiles (source (tackon wherelibs #lib)) (dest libsdest) (newname (cat #lib ver1 "." rev1)) ) ) ;(copylib (source (cat "libs/" #lib)) (dest wherelibs)) (set #cybertext (cat "\n\n" #lib ##ver)) (set ok 1) ) ) (if (= ok 0) ( (set #thenewer (cat #noroom #lib ##ver "\n\nThe newer\n\n" #lib ver2 "." rev2 "\n\nwas not copied over/updated to " wherelibs ) ) (if (= LAN 0) (set #thenewer (cat #noroom #lib ##ver "\n\nDie neuere\n\n" #lib ver2 "." rev2 "\n\nwurde nicht kopiert nach " wherelibs ) ) ) (message #thenewer) ) ) ) ) ;**** Copy new Libs (set #text2 (cat "'" #lib "'\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Version Currently Installed : " ver1 "." rev1 "\n\n" "Version From Update Disk/File : " ver2 "." rev2 "\n\n" "Do you wish to install Version " ver2 "." rev2 " of the " "'" #lib "' from the Update Disk/File?" ) ) (if (= @language "deutsch") ; ** German (set #text2 (cat "'" #lib "'\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n" "Im System installiert : " ver1 "." rev1 "\n\n" "zu installierende Version : " ver2 "." rev2 "\n\n" "Wollen Sie die neue Version " ver2 "." rev2 " von der " "'" #lib "' installieren?" ) ) ) (set pick (askchoice (choices #updatelib #noupdatelib) (prompt #text2) (help #text2) (default pick) ) ) (if (= pick 0) (copylib (source (cat "libs/" #lib )) (dest wherelibs)) ) ) ;**** procedure UpdateLib END ;******************************************************************* ; Set Vars for each time thru procedure UpdateLib ;******************************************************************* (set #lib "cybergraphics.library") (UpdateLib) (set #cybergfx #cybertext) (set #lib "cyberintuition.library") (UpdateLib) (set #cyberint #cybertext) (set #lib "cyberlayers.library") (UpdateLib) (set #cyberlayers #cybertext) (set #lib "vilintuisup.library") (UpdateLib) (set #cybervil #cybertext) (set #lib "gtlayout.library") (UpdateLib) (set #gtlay #cybertext) ;******************************************************************* ; Let then know that has been backed up. ;******************************************************************* (if (= back 0) (message (cat #thefollowing libsdest #cybergfx #cyberint #cyberlayers #cybervil #gtlay)) ) ;******************************************************************************** ; Move #?monitor file from envarc: to envarc:CyberGraphics for newer Libraries ; This is here just for backup! ;******************************************************************************** (if (< (exists "env:cybergraphics") 2) (makedir "env:cybergraphics") ) (if (< (exists "envarc:cybergraphics") 2) (makedir "envarc:cybergraphics") ) (if (< (exists ("EnvArc:CyberGraphics/PicassoMonitor")) 1) (if (> (exists ("EnvArc:PicassoMonitor")) 0) (copyfiles (source "EnvArc:PicassoMonitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/PicassoMonitor")) 1) (if (> (exists ("EnvArc:SpectrumMonitor")) 0) (copyfiles (source "EnvArc:SpectrumMonitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/PiccoloMonitor")) 1) (if (> (exists ("EnvArc:PiccoloMonitor")) 0) (copyfiles (source "EnvArc:PiccoloMonitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/DominoMonitor")) 1) (if (> (exists ("EnvArc:DominoMonitor")) 0) (copyfiles (source "EnvArc:DominoMonitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/RetinaZ3Monitor")) 1) (if (> (exists ("EnvArc:RetinaZ3Monitor")) 0) (copyfiles (source "EnvArc:RetinaZ3Monitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/PiccoSD64Monitor")) 1) (if (> (exists ("EnvArc:PiccoSD64Monitor")) 0) (copyfiles (source "EnvArc:PiccoSD64Monitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/CyberVisionMonitor")) 1) (if (> (exists ("EnvArc:CyberVisionMonitor")) 0) (copyfiles (source "EnvArc:CyberVisionMonitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) (if (< (exists ("EnvArc:CyberGraphics/A2410Monitor")) 1) (if (> (exists ("EnvArc:A2410Monitor")) 0) (copyfiles (source "EnvArc:A2410Monitor") (dest "EnvArc:CyberGraphics") (infos) (optional nofail) ) ) ) ;******************************************************************************** ; Update the Monitor file .. ;******************************************************************************** ; NONE ;******************************************************************************** ; Tools to install ;******************************************************************************** ;(set ToDo1 (askoptions (choices #cyberprefsx #CyberBackUp-UnInstall) ; (prompt #tools) ; (help #tools) ; (default 7) ; ) ;) (if (IN ToDo1 0) ( (set CyberDrawer (askdir (prompt #Where #wherecpx) (help #Where #wherecpx) (default CyberDrawer) ) ) (if (> (exists (tackon CyberDrawer "CyberPrefsX") ) 0) ( (set vernum1 (getversion (tackon CyberDrawer "CyberPrefsX"))) (set ver1 (/ vernum1 65536)) (set rev1 (- vernum1 (* ver1 65536) ) ) (copyfiles (source (tackon CyberDrawer "CyberPrefsX")) (dest CyberDrawer) (infos) (newname (cat "CyberPrefsX" ver1 "." rev1)) ) ) ) (copyfiles (source "Tools/CyberPrefsX") (dest CyberDrawer) (infos) (optional "force" "askuser" "nofail")) ) ) (if (IN ToDo1 1) ( (set CyberDrawer (askdir (prompt #Where #wherebackupU) (help #Where #wherebackupU) (default CyberDrawer) ) ) (if (> (exists (tackon CyberDrawer "CyberBackUp-UnInstall") ) 0) ( (set vernum1 (getversion (tackon CyberDrawer "CyberBackUp-UnInstall"))) (set ver1 (/ vernum1 65536)) (set rev1 (- vernum1 (* ver1 65536) ) ) (copyfiles (source (tackon CyberDrawer "CyberBackUp-UnInstall")) (dest CyberDrawer) (infos) (newname (cat "CyberBackUp-UnInstall" ver1 "." rev1)) ) ) ) (copyfiles (source "Tools/CyberBackUp-UnInstall") (dest CyberDrawer) (infos) (optional "force" "askuser" "nofail")) ) ) ;******************************************************************* ; END ;******************************************************************* (if (> (exists ("c:multiview")) 0) (set #mpath "c:") ) (if (> (exists ("sys:Utilities/multiview")) 0) (set #mpath "sys:Utilities") ) (run (cat "run " #mpath "/multiview docs/Changes.txt") ) (delete "ram:lan") (set @default-dest "sys:") (set #done "Update Complete!") (if (= @language "deutsch") (set #done "Update fertig!") ) (exit #done)