set/create project

(
	projectFolder = getSavePath()
	if projectFolder != undefined do
	(
		if pathConfig.isLegalPath projectFolder do
		(
			if (pathConfig.isProjectFolder projectFolder == true) then
			(
				pathConfig.setCurrentProjectFolder projectFolder
			)
			else
			(
				if queryBox "No project exists in the current directory.\nDo you want to create a new project here?" title:"set project" beep:false then
				(
					--backup the current config paths settings
					pathconfig.SaveTo(pathconfig.getCurrentProjectFolderPath())
					pathconfig.setCurrentProjectFolder projectFolder
					dirCount = pathconfig.getProjectSubDirectoryCount()
					for i = 1 to dirCount do
					(
						dir = pathconfig.getProjectSubDirectory i
						dir = pathconfig.convertPathToAbsolute dir
						makedir dir all:true
					)
					-- save new config paths settings in <rootProjectFolderName>.mxp
					mxpFileName = pathconfig.stripPathToLeaf(projectFolder) + ".mxp"
					pathconfig.SaveTo(pathconfig.appendpath projectFolder mxpFileName)
				)
			)
		)
	)
)