;$VER pcd.datatype Install 43.5

(set #dt-dir
	(askdir
		(prompt "Where do you store your datatypes ?")
		(help @askdir-help)
		(default "SYS:Classes/DataTypes")
	)
)

(set #dc-dir
	(askdir
		(prompt "Where do you store your descriptor files ?")
		(help @askdir-help)
		(default "DEVS:DataTypes")
	)
)

(set #c-dir
	(askdir
		(prompt "This datatype requires the PCD decoder 'pcdtoppm',\nwhich MUST be available in your path !\nWhere do you want to store the decoder ?")
		(help @askdir-help)
		(default "C:")
	)
)

(set #prefs-dir
	(askdir
		(prompt "Where do you store your preferences for datatypes ?")
		(help @askdir-help)
		(default "SYS:Prefs/DataTypes")
	)
)

(set #icon
	(askchoice
		(prompt "What type of icons do you want to use ?")
		(help @askchoice-help)
		(choices "MWB style (8 colors)" "NewIcons style")
	)
)

(copylib
	(prompt "PCD Datatype Version Checking")
	(source "Classes/DataTypes/pcd.datatype")
	(dest #dt-dir)
	(help @copylib-help)
	(confirm)
)

(copyfiles
	(source "Devs/DataTypes/PCD")
	(dest #dc-dir)
)

(copyfiles
	(source "C/pcdtoppm")
	(dest #c-dir)
)

(copyfiles
	(source "Env/DataTypes/pcd.prefs")
	(dest "ENVARC:DataTypes")
)

(copyfiles
	(source "Env/DataTypes/pcd.prefs")
	(dest "ENV:DataTypes")
)

(copyfiles
	(source "Prefs/PCDPrefs")
	(dest #prefs-dir)
	(infos)
)

(if (= #icon 1)
	(
	(copyfiles
		(source "NewIcons/Tool.info")
		(dest #prefs-dir)
		(newname "PCDPrefs.info")
	)
	)
)