//	M064 : Disassembly and assembly of file path
option double;

//------------------------------------------------------------------------------//
//	Disassembly and assembly of file path										//
//																				//
//	Return	: None																//
//------------------------------------------------------------------------------//
function main()
{
	define	$org, $parts[4], $out;

	_Cls();

	_Print("\nShow original path\n");
	$org = $_GetMacFilePath();
	_Print("original = ", $org, "\n");

	_Print("\nDisassemble path and display each part\n");
	$parts[] = $_SplitPath($org);
	_Print("Parts = <", $parts[0], ">, <", $parts[1], ">, <", $parts[2], ">, <", $parts[3], ">\n");

	_Print("\nAssemble and display the path\n");
	$out = $_MakePath($parts[]);
	_Print("Makepath = ", $out, "\n");
}
