macro 'Color Footprint Rainbow' { stackID=getImageID(); nSlicesOri=nSlices; bandHeight=5; bandWidth=round(getWidth()/4/nSlicesOri); run("New...","type=RGB width="+getWidth()+" height="+getHeight()+" slices="+nSlices); newStackID=getImageID(); setPasteMode("Copy"); width=getWidth(); height=getHeight(); reds = newArray(256); greens = newArray(256); blues = newArray(256); for(n=0;n