Tezos

random paint drop

Creator

tz1St3n29AbYXZXV8W1BG41qYzz86J2CFAW7

Description

-- random paint drop -- alexthescott -- 9/27/21 8:38am -- new seed every day of the year srand(31*stat(81)+stat(82)) function new_wave(d,c) w={} w.init=function(self) for p=1,128 do add(self.points,p) end end w.c=c w.d=d w.points={} w.step=0 w:init() w.draw=function(self) if self.d==0 then for p in all(self.points) do pset(p,self.step,self.c) end elseif self.d==1 then for p in all(self.points) do pset(128-self.step,p,self.c) end elseif self.d==2 then for p in all(self.points) do pset(p,128-self.step,self.c) end elseif self.d==3 then for p in all(self.points) do pset(self.step,p,self.c) end end end w.update=function(self) move=1+(.75*(#self.points/32)\1) if #self.points>=move then for i=1,move do self.step+=1 rnd_index=rnd(#self.points)\1 del(self.points,self.points[rnd_index]) self:draw() end end end return w end month=stat(81) day=stat(82) col_count=1 col=7 wave=new_wave(rnd(4)\1,col) _set_fps(60) cls() ::♥:: if t()<2 then print("random paint drop",30,59,7) print(month.."/"..day,55,65) else wave:draw() wave:update() if #wave.points<=1 then local d=wave.d d+=1 d%=4 col_count+=1 if col_count>=4 then col_count=1 col= col==7 and 0 or 7 end wave=new_wave(d,col) end end flip() goto ♥

Traits

Tag

pico-8

Tag

pico8

Token

Contract: KT1RJ6...xton
Token ID: 364454

View on marketplace