for i=0,1199 do poke(i,207) end o=0
function update()o=o-0.05
for y=1,14 do for x=0,39 do
c=(flr((x-20)/(2*y)+o)+flr(10/y))%2
poke(flr(1200+x+(15+y)*40),c*15)end
end end