Wikis / Unreal Wiki / Legacy:PerformCreateUTSet.Mel

proc setOptionVars (int $forceFactorySettings)
{
	// The variables in this "option" box are not options		   
}
 
global proc performCreateUTSetSetup (string $parent, int $forceFactorySettings)
{
	setParent $parent;
 
	textFieldGrp -edit -tx "myLevel" createUTSetPackage;
	textFieldGrp -edit -tx "" createUTSetGroup;
	textFieldGrp -edit -tx "" createUTSetMesh;
}
 
global proc performCreateUTSetCallback (string $parent, int $doIt)
{
	setParent $parent;
 
	if ($doIt) {
		performCreateUTSet 0;
		addToRecentCommandQueue "performCreateUTSet 0" "CreateUTSet";
	}
}
 
global proc createUTSetOptions ()
{
	string $commandName = "performCreateUTSet";
	string $callback = ($commandName + "Callback");
	string $setup = ($commandName + "Setup");
 
	string $layout = getOptionBox();
	setParent $layout;
	setUITemplate -pushTemplate DefaultTemplate;
	waitCursor -state 1;
 
	string $parent = `columnLayout -adjustableColumn 1`;
 
	textFieldGrp -label "Package" -tx "myLevel" createUTSetPackage;
	textFieldGrp -label "Group" -tx "" createUTSetGroup;
	textFieldGrp -label "Name" -tx "" createUTSetMesh;
 
	setUITemplate -popTemplate;
 
	string $applyBtn = getOptionBoxApplyBtn();
	button -edit -label "CreateUTSet"
	       -command ($callback + " " + $parent + " " + 1)
		$applyBtn;
	string $saveBtn = getOptionBoxSaveBtn();
	button -edit 
		-command ($callback + " " + $parent + " " + 0 + "; hideOptionBox")
		$saveBtn;
	string $resetBtn = getOptionBoxResetBtn();
	button -edit 
		-command ($setup + " " + $parent + " " + 1)
		$resetBtn;
 
	setOptionBoxTitle("Crete UT Set Options");
 
	waitCursor -state 0;
 
	setOptionBoxHelpTag( "createUTSet" );
 
	eval (($setup + " " + $parent + " " + 0));      
	showOptionBox();
}
 
 
proc string assembleCmd()
{
	string $SMName = `textFieldGrp -q -text createUTSetMesh`;
	string $PackName = `textFieldGrp -q -text createUTSetPackage`;
	string $GrpName = `textFieldGrp -q -text createUTSetGroup`;
 
	string $cmd = "";
 
	$cmd += "$createUTSetResult = `sets -name "+$SMName+"`;";
	$cmd += "addAttr -ln package -dt \"string\" "+$SMName+";";
	$cmd += "addAttr -ln group -dt \"string\" "+$SMName+";";
	$cmd += "setAttr -type \"string\" "+$SMName+".package \""+$PackName+"\";";
	$cmd += "setAttr -type \"string\" "+$SMName+".group \""+$GrpName+"\";";
 
	return $cmd;
}
 
global proc string performCreateUTSet(int $action)
{
	string $cmd = "";
 
	switch ($action) {
 
		//	Execute the command.
		//
		case 0:
			//	Get the command.
			//
			$cmd = `assembleCmd`;
 
			//	Execute the command with the option settings.
			//
			evalEcho($cmd);
 
			break;
 
		//	Show the option box.
		//
		case 1:
			createUTSetOptions;
			break;
 
		//	Return the command string.
		//
		case 2:
			//	Get the command.
			//
			$cmd = `assembleCmd`;
			break;
	}
	return $cmd;
}