Colorcell Sluice

Thanks to the Versum CLI, I was able to get a list of all my collectors across platforms. This token is a gift, airdropped on 2022-08-07, to all my collectors holding 3 or more of any of my tokens. THANK YOU SO MUCH!

This piece is originally based on the TTCS01T10 token, The River is Drying Up, located here: https://www.fxhash.xyz/generative/17135

Tap or Click the screen to get a new one.

Source Code:

pico-8 cartridge // http://www.pico-8.com
version 36
__lua__
-- duh 60 fps > 30 fps
_set_fps(60)

-- lazy function redclarations
r=rnd
g=pget

-- four way mirror
poke(24364,7)

-- enable mouse input
poke(0x5f2d,1)

-- get and set random seed
s=r(-1)
srand(s)

-- randomize palette all p8 cols
for i=0,15do pal(i,r(32)-16,1)end

-- clear screen
cls()

-- color of seed pixel
c=0

-- cellular automata rules
n=r(2)
m=r(1)


-- draw loop start
::_::

	-- simple entropy lock
	if(r()>.9)srand(s)
	
	-- slide top row to the right
	for x=128,1,-1 do
		pset(x,0,g(x-1,0))
	end
	
	-- increment colors
	c+=r(.01)
	
	-- set a seed pixel randomly
	pset(0,0,r(16))
	
	-- non-random grid sampling
	-- would prob be nicer as a
	-- shader
	for x=0,128do
		for y=0,128,2do			
			-- interested in the color of
			-- the pixel above
			u=y+1
			v=g(x,y)
			b=g(x,u)
			
			-- execute cellular automata
			if v!=b and v!=0 then 
			 f=r(n)-m
			 -- one pixel radius circle
			 -- creates grid
			 if(g(x+f,u)==0)circ(x+f,u,1,v)
			end
		end
	end
	
	-- draw graphics buffer
	flip()

 -- if click or tap, reset
 if(stat(34)==1)extcmd("reset")

-- draw loop end	
goto _