requires("1.42n");


var sCmds = newMenu("QCRX Menu Tool",
newArray("DG028. Uniformidad", "MD016. Compensacion Mamgrafo", "MD024. Uniformidad Mamgrafo", "MD025. Constancia Uniformidad CR", "MD035. Remanencia", "-", "...Acerca de QCRX..."));
macro "QCRX Menu Tool - T0711Q T8711C T0f11R T8f11X" {
cmd = getArgument();

path = getDirectory("macros")+"QC_RX"+File.separator+"modulos";


//----------------------------------------------------------------------------------------------------------------------------

if (cmd=="DG028. Uniformidad") 
{
runMacro(path+File.separator+"DG028 - Uniformidad.txt");

	exit
}

//----------------------------------------------------------------------------------------------------------------------------

if (cmd=="MD016. Compensacion Mamgrafo") 
{
runMacro(path+File.separator+"MD016 - Compensacion.txt");
	exit
}

//----------------------------------------------------------------------------------------------------------------------------

if (cmd=="MD024. Uniformidad Mamgrafo") 
{
runMacro(path+File.separator+"MD024 - Uniformidad Mamo.txt");
	exit
}

//----------------------------------------------------------------------------------------------------------------------------

if (cmd=="MD025. Constancia Uniformidad CR") 
{
runMacro(path+File.separator+"MD025 - Constancia Uniformidad Mamo.txt");
	exit
}

//----------------------------------------------------------------------------------------------------------------------------

if (cmd=="MD035. Remanencia") 
{
runMacro(path+File.separator+"MD035 - Remanencia.txt");
	exit
}


//----------------------------------------------------------------------------------------------------------------------------

if (cmd=="...Acerca de QCRX...") 
{
runMacro(path+File.separator+"AcercaDe.txt");
	exit
}


if(cmd!="-") {
run(cmd);
}
}
