MapIndexed[Mod[#1+#2[[1]]+1,2]&,CellularAutomaton[30,{{1},0},100,{All,All}]]