#singleinstance
#persistent
outpath:="::{20d04fe0-3aea-1069-a2d8-08002b30309d}"
return

$F11::
fileselectfolder, OUTPATH,*%OUTPATH%,3
Path_tmp:= outpath
	
loop, parse, clipboard,`n,`r
{
	filegetattrib, myATTRIB, %A_loopfield%
	ifnotinstring, myATTRIB, D
	{
		Stringgetpos,myPOS,a_loopfield,\,R
		stringleft, mySTRING, a_loopfield, %MyPos%
	}
	else
		MySTRING:=a_loopfield
		
	if substr(mySTRING,2,1) = "`:"
		stringtrimleft,mySTRING, mySTRING,3

	loop, parse, mySTRING,\
	{
		filecreatedir,%path_tmp%\%a_loopfield%
		Path_tmp.= "\" . a_loopfield
	}
	mySTRING:=
	MyPOS:=0
	PATH_tmp:=outpath
}
return