list = getFileList(File.directory);

for (i=0; i<list.length; i++) {
run("Clear Results");
run("Set Measurements...", "  decimal=9");

for (noise=1; noise<42; noise++) {
 run("Find Maxima...", "noise=" + noise + " output=Count");
 rows = nResults-1;
 setResult("Noise", rows, noise);
 counts = getResult("Count", rows);
 setResult("logcount", rows, log(counts));
}

title = getTitle();
saveAs("Measurements", File.directory + title +".csv");
run("Open Next");
}