macro "wubbo ratio"{
//uses MRi cell image analyzer -  
      requires("1.38u");
      dir1 = getDirectory("Choose Source Directory ");
      dir2 = dir1+"results"+File.separator;
      File.makeDirectory(dir2);
      if (!File.exists(dir2))
      exit("Unable to create directory");

      list = getFileList(dir1);
	j=0; p=1;
      for (p=0; p<list.length; p+=2) {
          showProgress(p+2, list.length);
 	setBatchMode(false);
	j=p+1;
	run("Set Measurements...", "mean standard display redirect=None decimal=3");
	open(dir1+list[j]);
	title_img=getTitle();
	ID_channel02=getImageID();
//	run("Subtract Background...", "rolling=100");

// get cursor loc to place ROI: 40 pix poi left click, 10 pix roi right click end click+CTRL
      leftButton=16;
      rightButton=4;
      ctrl=2; 
       l=0;
          setOption("DisablePopupMenu", true);

	print("left click=400 pix ROI, right click is 700 pix ROI") ;
      while (l!=1) 	{
          getCursorLoc(x, y, z, flags); 
	makeOval(x-350, y-350, 700, 700);
	makeOval(x-250, y-250, 500, 500);

//              if (flags&ctrl!=0) 
//			{makeOval(x-50, y-50, 100, 100); roiManager("Add");l=1;
//			} 
             if (flags&leftButton!=0) 
			{if (flags&ctrl!=2){ 
				makeOval(x-350, y-350, 600, 600);roiManager("Add");  
				wait(150);setOption("Show All",true); l=1;
				            }
			}
             if (flags&rightButton!=0) 
			{if (flags&ctrl!=2){  
				makeOval(x-250, y-250, 500, 500);roiManager("Add"); l=1; wait(300);}
			}

//close();
}

          setOption("DisablePopupMenu", false);

// measure
//	roiManager("Measure");
	i=p;
	open(dir1+list[i]);
	ID_channel01=getImageID();
	ID_channel01=getTitle();
//	run("Subtract Background...", "rolling=100");
//	setOption("Show All",true);
	roiManager("Measure");

//	dest_measurename=ID_channel01 +"_ROI.zip";
//	fullpath= dir2 + dest_measurename;
//	roiManager("Save",fullpath);
	roiManager("Delete");
	close();
	close();          
	      }
  }