pico8/auto.p8

pico-8 cartridge // http://www.pico-8.com
version 18
__lua__

cell = {
  x = 64,
  y = 64,
  c = 0,
  size = 1,
}

function pset2(x,y,col)
  color = pget(x,y)
  rcol = rnd(15) + 1
  if ( color == col ) then
    rcol += 1
  end
  pset(x,y,rcol)
end

function draw_cell()
  cf = rnd(1) + 1
  if ( cf > 1.5 ) then 
    cell.size += 1
  else
    cell.size -= 1
  end

  gx = cell.x + cell.size
  gy = cell.y + cell.size
  for cx=cell.x,gx do 
    for cy=cell.y,gy do
      pset2(cx,cy,1+rnd(9))
    end
  end
end
    

function fps()
  f = stat(7)
  print("fps: "..f,0,120,1)
end

function _init()
  cls()
end

function _update()
  cls()
  fps()
end

function _draw()
  draw_cell()
  cell.c += 1
end

__gfx__
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000