;
; $VER: MCP-INSTALLER!
;

	(complete 0)
	(welcome)

	(set #WrongKickStart "\nYou must be using at least KickStart 2.04 to use MCP")


	(if (< (/ (getversion) 65536) 37)
	  (abort #WrongKickStart)
	)

	(message
	  "\n\n\n\n"
	  "Welcome To \n\nMCP Version 1.02\nInstallation 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 Do You Want To Install \n\nReqTool.library Version "wert1"."wert2"\n\nCurrent installed Version "oldwert1"."oldwert2"\n\n")
		(help @askbool_help)
		(default 1)) 
		(copyfiles 
			(prompt "\nCopying the ReqTools.library...\n")
			(help @copyfiles-help)
			(source ":Libs")
			(dest   "Libs:")
			(all)
			(files)
			(infos)
		)
	)

	(complete 10)

	(set mcp-dest
		(askdir (prompt "Please Select Destination for MCP")
			(help @askdir-help)
			(default "C:")
		)
	)

	(set prozess (database "cpu"))
	(if (< "68010" prozess)
		(set mcp-ver "MCP.020")
		(set mcp-ver "MCP")
	)

	(copyfiles 
		(prompt "\nCopying the MCP...\n")
		(help @copyfiles-help)
		(source mcp-ver)
		(dest   mcp-dest)
		(files)
	)

	(complete 20)

	(if(askbool
		(prompt "\n Do you want to copy MCP-Icon to "mcp-dest" ???")
		(help @askbool_help)
		(default 1)) 
		(copyfiles 
			(prompt "\nCopying the 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 "\nCopying the MCP-Demo-Configuration...\n")
			(help @copyfiles-help)
			(source "EnvArc/MCP/MCP.config")
			(dest   "ENVARC:MCP")
			(files)
		)
	)

	(complete 40)

	(if (exists("ENVARC:AssignManager.prefs"))
		(if(askbool
			(prompt "\n Do you want to Convert AssignManager.prefs To MCP.config ?\n")
			(help @askbool_help)
			(default 1)) 
			(
				(RUN "ConvAM"
					(help "Converting...")
					(prompt "Converting.. Please Wait!")
				)
			)
		)
	)

	(complete 45)

	(if (exists("ENVARC:AssignPrefs"))
		(if(askbool
			(prompt "\n Do you want to Convert AssignPrefs To MCP.config ?\n")
			(help @askbool_help)
			(default 1)) 
			(
				(RUN "ConvAP"
					(help "Converting...")
					(prompt "Converting.. Please Wait!")
				)
			)
		)
	)

	(complete 50)

	(if(askbool
		(prompt "\n Do you want to install a Demo 16-Color Pointer ?")
		(help @askbool_help)
		(default 1)) 
		(copyfiles 
			(prompt "\nCopying 16-Color Demopointer...\n")
			(help @copyfiles-help)
			(source "EnvArc/MCP/mcppointer.prefs")
			(dest "ENVARC:MCP")
			(files)
			(infos)
		)
	)

	(makedir "ENV:MCP")

	(if (exists("ENVARC:MCP"))
		(copyfiles 
			(prompt "\nTransfering ENVARC To ENV...\n")
			(help @copyfiles-help)
			(source "EnvArc:MCP/")
			(dest "ENV:MCP/")
			(all)
		)
	)

	(complete 60)

	(copyfiles
		(prompt "\nCopying the GuruInformation...\n")
		(help @copyfiles-help)
		(source "S/mcp.gurudat")
		(dest   "S:")
		(files)
	)

	(complete 70)

	(copyfiles
		(prompt "\nCopying the GuruHistory...\n")
		(help @copyfiles-help)
		(source "S/GuruHistory")
		(dest   "S:")
		(files)
	)

	(complete 80)

	(set mcpprefs-dest
		(askdir (prompt "Please Select Destination for MCP-Preferences")
			(help @askdir-help)
			(default "SYS:Prefs")
		)
	)
	(copyfiles 
		(prompt "\nCopying the MCP-Preferences...\n")
		(help @copyfiles-help)
		(source "MCPPrefs")
		(dest   mcpprefs-dest)
		(files)
		(infos)
	)

	(complete 90)

	(if(askbool
		(prompt "\n Do you want to Install MCP-Documentation ?\n")
		(help @askbool_help)
		(default 1)) 
		(
			(set mcpdoc-dest
				(askdir (prompt "Please Select Destination for MCP.doc")
					(help @askdir-help)
					(default "C:")
				)
			)
			(copyfiles 
			(prompt "\nCopying the MCP.doc..\n")
			(help @copyfiles-help)
			(source "MCP.doc")
			(dest   mcpdoc-dest)
			(files)
			(infos))
		)
	)
	(complete 99)

	(message "\n\nEdit now your \nS:Startup-Sequence\nand insert\n"mcp-dest"MCP\nafter your first\nAssign ENV: ???? .\n ... ENJOY ...")

	(set @default-dest mcp-dest)
	(complete 100)