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

cell = {
  center = 64,
  startx = 64,
  endx = 64,
  starty = 64,
  endy = 64,
}

function draw_loop(startx,endx,starty,endy)
  for dx=startx,endx do
    for dy=starty,endy do
      pset(dx,dy,1+rnd(15))
    end
  end
end

function derive_bounds(i)
  cell.startx -= i
  cell.starty -= i
  cell.endx += i
  cell.endy += i   
end

function _init()
  cls()
end

function _update60()
  cls()
end

function _draw()
  draw_loop(cell.startx,cell.endx,cell.starty,cell.endy)
  r = rnd(20)
  if ( r > 19 ) then
    derive_bounds(1)
  end
end


__gfx__
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00077000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
00700700000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000