Posted by
Braekevelt Martin on
Jan 06, 2019; 10:16am
URL: http://imagej.273.s1.nabble.com/macro-problem-tp5021600.html
Dear all,
I am struggling with this macro, to just open images one by one, closing them after a point count and get the results in exell format from the count results from each image.
I included thee macro code with some adjustments from Michael, but some things are not working :
I don't get the counts/image and the results file doesn't get saved on my desktop.
w = 4096;
h = 2160
dir = getDirectory("Choose Source Directory ");
list = getFileList(dir);
for (i=0; i<list.length; i++) {
showProgress(i+1, list.length);
open(dir+list[i]);
run("Set Measurements...", "display redirect=None decimal=0");
run("Canvas Size...", "width=&w height=&h position=Center zero");
run("Maximize");
setLocation(0,0);
run("Unsharp Mask...", "radius=1 mask=0.60");
run("Grid...", "grid=Crosses area=85700 color=green bold center");
run("Set... ", "zoom=50");
setTool("multipoint");
run("Point Tool...", "type=Dot color=Red size=[Extra Large] label show counter=0");
run("Measure");
waitForUser("Your Action Required", "Double click when point is inside,\n one click when on border or on doubt.\nThen press OK");
close();
}
getSelectionCoordinates(xpoints, ypoints);
count = xpoints.length;
row = nResults;
setResult("Label", row, getTitle());
setResult("Count", row, count);
saveAs("Results", "C:/Users/Martin.Braekevelt/Desktop/Results.xls");
I would appreciate it very much if someone could help me to get this macro working.
I also made an icon to get it into the ImageJ GUI, I would also like some help for that.
This is the code below
macro "myTool Tool - C3f0D34D36D45D94DacDf0C0f0D02D04D11D18D25D26D27D28D30D31D41D64D6dD78D87D8dDc2Dc9DceDe1DffCff0D01D08D0bD0cD0dD0eD10D12D14D15D16D17D19D1aD1dD21D23D2bD2cD32D39D3aD3bD3eD3fD44D47D4aD4cD4dD50D51D52D53D54D56D58D5bD63D66D67D69D6aD6eD6fD71D73D74D76D79D7cD7eD82D89D91D93D96D97D99D9aD9dDa0Da8DadDaeDafDb0Db1Db2Db3Db5Db6DbaDbcDbdDbeDc0Dc1Dc4DcaDcdDd0Dd1Dd2Dd3Dd4Dd5DdcDddDdfDe0De4De5De6De7De8DedDeeDefDf2Df4Df6Df8DfaDfbDfdCcf0D35D38D48D4bD5dD65D7aDa4DcfCf90D03D07D0fD1cD1eD20D6cD7bD7dD81D85D8bD95D9eDa5Da6Da7DaaDb4Db7DbfDc5Dd6Dd7Dd9DeaDecDfcC7f0D2dD40D60D6bD77Cf20D13D29D33D4fD57D70D8aD9bDa9Dc3"{
}
Thank you very much in advance.
Kindest regards,
Martin.
::DISCLAIMER:: This e-mail is confidential and intended for use by the addressee only. If you are not the intended recipient, please notify us immediately and delete this e-mail, as well as any attachment.
--
ImageJ mailing list:
http://imagej.nih.gov/ij/list.html