--demo pix read
t=0
--Draw some background
cls(0)
for i=0,15 do
 rect(9*i,6*i,6*i,3*i,i)
end

function TIC()
 if(t>12)then --wait some time
  t=0
  for x=0,240,2 do   --every 2 pixel in width
   for y=0,136,2 do  --every 2 pixel in height
    c=pix(x,y)       --take color
    c=(c+1)%15       --change it
    pix(x,y,c)       --put it back
  end
 end
end
t=t+1
end