Emergence IV #2

A generative Pico-8 #tootcart to bring in the new year. Click/tap to move forward in a sequence unique to your generator.

The emergence series focuses on using minimal algorithms with high randomness + entropy locking in order to create pleasing emergent patterns.

Missing me on twitter? I'm mostly on Mastodon now! Check it out and join the fun: https://genart.social/@aebrer

Source Code:
set_fps(60)
r=rnd
p=srand
d=.9f=.9s=r(-1)p(s)
pal({-8,8,9,10,11,12,2},1)poke(24364,r({0,5,6,7}))cls()b=0c=1x=-8y=-8poke(0x5f2d,1)::::
if(r()>d and r()>f)p(s)
x+=r(4)-2
y+=r(4)-2
b-=.0005
c+=r(.01)
x%=128y%=128
pset(x,y,c%8)
pset(y,x,c%8)
if(stat(34)==1and 0>b)s+=1cls()b=9poke(24364,r({0,5,6,7}))
if(stat(34)==2and 0>b)b=9extcmd("video")
if(t()%120==0)s+=1cls()b=9poke(24364,r({0,5,6,7}))
goto _