//Load Molostack ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
path_molo = File.openDialog("Select a Molographic File"); 	//get total file path --> open image Sequence
  	//print("Filepath:", path_molo);

parent_molo = File.getParent(path_molo);					//get folder directory where the selected file is 
  	//print("Directory:", parent_molo);
  	folder_molo = File.getName(parent_molo);				//get folder name --> stack name (needed for stack combination)
  		//print("Foldername:", folder_molo);

run("Image Sequence...", "open="+path_molo+" sort");			//Image Sequence of all Images
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


run("Stack to Images");									//Einzelne Bilder aus Stack machen
	openImages = nImages();									//Anzahl der offenen Bilder
 		//print(openImages); 




 i = 0;													//Schleife fuer alle Bilder
 while (i<openImages) 
 {
//Titel extrahieren/////////////////////////////////
	MetaInfo = getMetadata("Info");								//MetaInfos auslesen
			//print("MetaInfo:", MetaInfo);		
	Titel_end = indexOf(MetaInfo, ".tif"); 				//Weleche Position hat ".tif"
	MetaTitel = substring (MetaInfo, 0, Titel_end); 	//Titel extrahieren von Position "0" bis ".tif"
		//print("MetaTitel:", MetaTitel);
////////////////////////////////////////////////////


/*Coupling value///////////////////////////////////
Looks in the MetaInfos for the coupling value
Looks for [title="Coupling value" value="] if not present value=-1
*/
	Coupling_start = indexOf(MetaInfo, "title=\"Coupling value\" value=");
	Coupling_start = Coupling_start + 30;	//increase start index to get rid of text in front of value
		//print("C_start:", Coupling_start);
	Coupling_end = indexOf(MetaInfo, "\"/><CouplingGrayFilter");
		//print("C_end:", Coupling_end);
		Coupling = substring (MetaInfo, Coupling_start, Coupling_end); 	//Titel extrahieren von Position "0" bis ".tif"
		print("C:", Coupling);
////////////////////////////////////////////////////


	close();
 	i = i + 1;
 } 


close();
close();
}