-- MeshDirToMax.ms by Anubis (2011.04.15)
(
	dir = getSavePath caption:"Select mesh directory"
	if dir != undefined do (
		listFiles = getFiles (dir+"/*.*")
		for file in listFiles do (
			if (importFile file #noPrompt) do (
				scnFile = getFilenamePath file + getFilenameFile file + ".max"
				saveNodes selection scnFile quiet:on
				delete selection
			)
		)
	)
)
-- simplified version, made for ScriptSpot forum request