|
@@ -0,0 +1,51 @@
|
|
|
+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
|