>*pal={15,7,6,5} function iter(basex,basey,d,l,depth) if depth==0 then return end local ex=basex+l*math.cos(d) local ey=basey+l*math.sin(d) c=pal[math.max(1,(#pal-depth))] line(basex,basey,ex,ey,c) math.randomseed(d*3+basex*10+basey*100) iter(ex,ey,d-math.pi/4-0.5+rnd(),l*0.8,depth-1) math.randomseed(d*4+basex*10+basey*100) iter(ex,ey,d+math.pi/4-0.5+rnd(),l*0.8,depth-1) end rnd=math.random function TIC() math.randomseed(0) cls() basex=120 basey=126 d=-math.pi/2 l=30 depth=(1+(time()/300)%16)//1 iter(basex,basey,d,l,depth) end