mold wars
(256 chars)
o=14cls()n={peek(24322,o)}e=rnd d=o for o=1,o do pal(o,del(n,e(n))+e{0,128},1)f=d d=2+e(62)\1*2pset(d,f,e(4))end ::▒::for o=1,2000do d=f f=2+e(62)\1*2 if(pget(d,f)<1)r=e(4)\1/4x,i=cos(r),sin(r)h=pget(d+x*2,f+i*2)pset(d,f,h)pset(d+x,f+i,h) end flip()goto ▒ |
[Please log in to post a comment]