;
; $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.0\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)