home *** CD-ROM | disk | FTP | other *** search
- ;
- ; $VER: MCP-INSTALLER!
- ;
-
- (complete 0)
- (welcome)
-
- (set #WrongKickStart "\nDu mußt mindestens \nKickStart 2.04\n besitzen um MCP benutzen zu können")
-
- (if (< (/ (getversion) 65536) 37)
- (abort #WrongKickStart)
- )
-
- (message
- "\n\n\n\n"
- "Willkommen zum\n\nMCP Version 1.02\nInstallations Script V0.2\n"
- )
-
- (set oldwert1 (/ (getversion "libs:reqtools.library") 65536))
- (set oldwert2 (BITAND (getversion "libs:reqtools.library") 65535))
- (set wert1 (/ (getversion "libs/reqtools.library") 65536))
- (set wert2 (BITAND (getversion "libs/reqtools.library") 65535))
-
- (if(askbool
- (prompt "\n Willst Du \nReqTools.library Version "wert1"."wert2"\ninstallieren ?\n\nZur Zeit ist Version "oldwert1"."oldwert2" installiert!")
- (help @askbool_help)
- (default 1))
- (copyfiles
- (prompt "\nKopiere ReqTools.library...\n")
- (help @copyfiles-help)
- (source "Libs")
- (dest "Libs:")
- (all)
- (files)
- (infos)
- )
- )
-
- (complete 10)
-
- (set mcp-dest
- (askdir (prompt "Bitte Zielverzeichnis für MCP auswählen")
- (help @askdir-help)
- (default "C:")
- )
- )
-
- (set prozess (database "cpu"))
- (if (< "68010" prozess)
- (set mcp-ver "MCP020/MCP")
- (set mcp-ver "MCP")
- )
-
- (copyfiles
- (prompt "\nKopiere MCP...\n")
- (help @copyfiles-help)
- (source mcp-ver)
- (dest mcp-dest)
- (files)
- )
-
- (complete 20)
-
- (if(askbool
- (prompt "\n Willst Du das MCP-Piktogramm ins \n"mcp-dest"\nVerzeichnis kopieren ?")
- (help @askbool_help)
- (default 1))
- (copyfiles
- (prompt "\nKopiere das MCP-Icon...\n")
- (help @copyfiles-help)
- (source "MCP.info")
- (dest mcp-dest)
- (files)
- (infos)
- )
- )
-
- (complete 30)
-
- (if(askbool
- (prompt "\n Do You Want To Install A MCP-Demo-Configuration ?")
- (help @askbool_help)
- (default 1))
- (copyfiles
- (prompt "\nKopiere die MCP-Demo-Konfiguration...\n")
- (help @copyfiles-help)
- (source "EnvArc/MCP/MCP.config")
- (dest "ENVARC:MCP")
- (files)
- )
- )
-
- (complete 40)
-
- (if (exists("ENVARC:AssignManager.prefs"))
- (if(askbool
- (prompt "\n Willst Du die \nAssignManager.prefs\n zu der MCP.config konvertieren?\n")
- (help @askbool_help)
- (default 1))
- (
- (RUN "C/ConvAM"
- (help "Konvertierung...")
- (prompt "Konvertierung läuft... Bitte warten!")
- )
- )
- )
- )
-
- (complete 45)
-
- (if (exists("ENVARC:AssignPrefs"))
- (if(askbool
- (prompt "\n Willst Du die \nAssignPrefs\n-Konfig zu der MCP.config konvertieren?\n")
- (help @askbool_help)
- (default 1))
- (
- (RUN "C/ConvAP"
- (help "Konvertierung...")
- (prompt "Konvertierung läuft... Bitte warten!")
- )
- )
- )
- )
-
- (complete 50)
-
- (if(askbool
- (prompt "\n Willst Du einen 16-Farben Mauspfeil installieren ?")
- (help @askbool_help)
- (default 1))
- (copyfiles
- (prompt "\nKopiere Demomauspfeil...\n")
- (help @copyfiles-help)
- (source "EnvArc/MCP/mcppointer.prefs")
- (dest "ENVARC:MCP")
- (files)
- )
- )
-
- (makedir "ENV:MCP")
-
- (if (exists("ENVARC:MCP"))
- (copyfiles
- (prompt "\nKopiere ENVARC zu ENV...\n")
- (help @copyfiles-help)
- (source "EnvArc:MCP/")
- (dest "ENV:MCP/")
- (all)
- )
- )
-
- (complete 60)
-
- (copyfiles
- (prompt "\nKopiere Guru-Informationen...\n")
- (help @copyfiles-help)
- (source "S/mcp.gurudat")
- (dest "S:")
- (files)
- )
-
- (complete 70)
-
- (copyfiles
- (prompt "\nKopiere die Guru Geschichte...\n")
- (help @copyfiles-help)
- (source "S/GuruHistory")
- (dest "S:")
- (files)
- )
-
- (complete 80)
-
- (set mcpprefs-dest
- (askdir (prompt "Bitte das Zielverzeichnis für das \nMCP-Konfigurationsprogramm\n auswählen!!")
- (help @askdir-help)
- (default "SYS:Prefs")
- )
- )
- (copyfiles
- (prompt "\nKopiere das MCP-Konfigurationsprogramm...\n")
- (help @copyfiles-help)
- (source "Prefs/MCPPrefs")
- (dest mcpprefs-dest)
- (files)
- (infos)
- )
-
- (complete 90)
-
- (if(askbool
- (prompt "\n Willst Du die MCP-Anleitung installieren ?\n")
- (help @askbool_help)
- (default 1))
- (
- (set mcpdoc-dest
- (askdir (prompt "Please Select Destination for MCP.doc")
- (help @askdir-help)
- (default "C:")
- )
- )
- (copyfiles
- (prompt "\nKopiere MCP.dok..\n")
- (help @copyfiles-help)
- (source "MCP.dok")
- (dest mcpdoc-dest)
- (files)
- (infos))
- )
- )
- (complete 99)
-
- (message "\n\nEditiere nun Deine \nS:Startup-Sequence\nund füge\n"mcp-dest"MCP\nnach dem ersten\nAssign ENV: ???? ein.\n ... Viel Spaß ...")
-
- (set @default-dest mcp-dest)
- (complete 100)
-