N=nImages;
for (i=1; i<=N; i++) {
   selectImage(i);
   name=getTitle();
   run("Duplicate...", "title=Duplicate");
   rename("Gray"+name);
   run("8-bit");
}