//
// Chessboard using ImageJ array
// Jean-Christophe Taveau
// http://crazybiocomputing.blogspot.com
//

chessSize=256;
wcell= chessSize/8;

cells=newArray(
1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,
1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,
1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1,
1,0,1,0,1,0,1,0,
0,1,0,1,0,1,0,1
);

// M A I N
newImage("cellStack", "8-bit Black", wcell, wcell, cells.length);

for (index=0;index<cells.length;index++)
{
  setSlice(index+1);
  color=cells[index]*255;
  setColor(color,color,color);
  fillRect(0,0,wcell,wcell);
}
run("Make Montage...", "columns=8 rows=8 scale=1 first=1 last=64 increment=1 border=0 font=12");
exit();