.key PGA,param2
.bra {
.ket }

if "{PGA}" eq ""
	echo "Install cancelled."
	skip cancel
endif

if not "{param2}" eq ""
	echo "Path names with spaces must be enclosed in double quotes."
	skip cancel
endif

echo "*NInstalling 4D Boxing to *"{PGA}*"."


if not exists "{PGA}"
	echo "*NCreating directory..."
	makedir "{PGA}"
	copy "4DBoxing1:Empty.drwr.info" "{PGA}.info"	
else
	echo "The directory *"{PGA}*" already exists."
	ask "Do you wish to install to this directory? (Y to install, N to quit) :"
	if not warn 
		echo "Installation cancelled*N"
		skip cancel
	endif	
endif

copy "4DBoxing1:#?" "{PGA}"
copy "4DBoxing2:#?" "{PGA}"                         

echo "*N    4D Boxing installation finished."                                         
                      
lab cancel

