{"name":"random step b","description":"-- random step b\n-- alexthescott\n-- 9/17/21\n\nfunction new_line(x,ori)\n\tl={}\n\tl.x=x\n\tl.y=0\n\tl.p=30+rnd(68)\n\tl.gp=30+rnd(68)\n\tl.new_p=true\n\tl.dif=0\n\tl.gap=32\n\tl.ori=ori\n\t\n\tl.update=function(self)\n\t\tif self.new_p==true then\n\t\t\tself.dif=(self.gp-self.p)/75\n\t\t\tself.new_p=false\n\t\tend\n\t\tself.p+=self.dif\n\tend\n\t\n\tl.new_h=function(self,p)\n\t\tself.new_p=true\n\t\tif p==-1 then\n\t\t\tself.gp=20+rnd(88)\n\t\telse\n\t\t\tself.gp=p\n\t\tend\n\tend\n\t\n\tl.draw=function(self)\n\t\tlocal g=self.gap\n\t\tif self.ori==1 then\n\t\t\tline(self.x,0,self.x,self.p-g,0)\n\t\t\tline(self.x+1,0,self.x+1,self.p-g,0)\n\t\t\tline(self.x,self.p+g,self.x,128,0)\n\t\t\tline(self.x+1,self.p+g,self.x+1,128,0)\n\t\telse\n\t\t\tline(0,self.x,self.p-g,self.x,0)\n\t\t\tline(0,self.x+1,self.p-g,self.x+1,0)\n\t\t\tline(self.p+g,self.x,128,self.x,0)\n\t\t\tline(self.p+g,self.x+1,128,self.x+1,0)\n\t\tend\n\tend\n\t\n\treturn l\nend\n\nfunction burn()\n\tfor i=1, 1000 do\n\t\tx=rnd(128)\\1\n\t\ty=rnd(128)\\1\n\t\tpc=pget(x,y)\n\t\tif pc==0 then\n\t\t\tpset(x,y,7)\n\t\tend \n\tend\nend\n\nlines={}\nsize=64\nfor i=0,size do\n\tnl=new_line(i*(128/size),1)\n\tadd(lines,nl)\nend\n\nfor i=0,size do\n\tnl=new_line(i*(128/size),0)\n\tadd(lines,nl)\nend\n\nacross={}\n\nfc=0\n\ncls()\n::♥::\nif t()<2 then\n\tprint(\"random step b\",38,64,7)\nelse\n\tburn()\n\t\n\tfor l in all(lines) do\n\t\tl:draw()\n\t\tl:update()\n\tend\n\t\n\tfc+=1\n\t\n\tif fc==75 then\n\t\tlines[1]:new_h(-1)\n\t\tfor i=1,#lines-1 do\n\t\t\tlines[i+1]:new_h(lines[i].p)\n\t\tend\n\t\tfc=0\n\tend\t\nend\nflip()\ngoto ♥","tags":["pico-8","pico8"],"symbol":"OBJKT","artifactUri":"ipfs://Qmc1g1EjRDhCYMey25w29cjypU2iztGrkpXaRrY8bZ7woW","displayUri":"ipfs://QmQtMQyQtFywCqkaPPkfv6YbNtKUNAmkWiNB5f4rymkYtr","thumbnailUri":"ipfs://QmNrhZHUaEqxhyLfqoq1mtHSipkWHeT31LNHb1QEbDHgnc","creators":["tz1St3n29AbYXZXV8W1BG41qYzz86J2CFAW7"],"formats":[{"uri":"ipfs://Qmc1g1EjRDhCYMey25w29cjypU2iztGrkpXaRrY8bZ7woW","mimeType":"application/x-directory"}],"decimals":0,"isBooleanAmount":false,"shouldPreferSymbol":false}