macro "Stack FFT" { requires("1.51o"); dir = "/Users/wayne/Downloads/FFT_Stack/"; setBatchMode(true); run("T1 Head (2.4M, 16-bits)"); for (i=1; i<=nSlices; i++) { setSlice(i); run("FFT"); saveAs("TIFF", dir+"FFT of "+IJ.pad(i,4)); close; } run("Image Sequence...", "open=&dir sort use"); setBatchMode(false); } macro "Stack Inverse FFT" { stack = getImageID; setBatchMode(true); setSlice(2); n = nSlices; for (i=1; i<=n; i++) { selectImage(stack); setSlice(i); run("Inverse FFT"); } run("Images to Stack", "title=[Inverse FFT] use"); setBatchMode(false); }