@pancelor.bsky.social
@gunturtle.bsky.social
(I'm sure there are others I should have included....)
myself?
@pancelor.bsky.social
@gunturtle.bsky.social
(I'm sure there are others I should have included....)
myself?
l={0}m={0}for i=2,128do
l[i]=(s(i>>8)+s(i>>6)+s(i>>7)*2+s(i/8)/32)*20+s(i>>4)m[i]=0end::_::l[128]=0?"⁶1⁶!5f101▒▒0056673"
n={0}for i=2,127do
q=l[i]m[i]+=l[i+1]+l[i-1]-q*2n[i]=q+m[i]/128line(i-1,l[i-1]+76,i,q+76,mid(m[i]/4+4.5,8))end
l=n
goto _
l={0}m={0}for i=2,128do
l[i]=(s(i>>8)+s(i>>6)+s(i>>7)*2+s(i/8)/32)*20+s(i>>4)m[i]=0end::_::l[128]=0?"⁶1⁶!5f101▒▒0056673"
n={0}for i=2,127do
q=l[i]m[i]+=l[i+1]+l[i-1]-q*2n[i]=q+m[i]/128line(i-1,l[i-1]+76,i,q+76,mid(m[i]/4+4.5,8))end
l=n
goto _
w=(w+71)%192x=max(w-63.5)-8s=0for y=max(127-w-w)-16,min(256-x-x,127)do
p=x+u
q=y+v
a=p\12c=a+q\12if(c!=b)h=((a~c)&15)/3b=c
l=h
s-=.29if(s<h)l+=2s=h
pset(x,y,l+(p~q)%3/3)x+=.5end
end?"⁶1⁶!5f11█ˇ5●67"
goto _
w=(w+71)%192x=max(w-63.5)-8s=0for y=max(127-w-w)-16,min(256-x-x,127)do
p=x+u
q=y+v
a=p\12c=a+q\12if(c!=b)h=((a~c)&15)/3b=c
l=h
s-=.29if(s<h)l+=2s=h
pset(x,y,l+(p~q)%3/3)x+=.5end
end?"⁶1⁶!5f11█ˇ5●67"
goto _
i=k%15j=k\15p=g[i]or i
o=g[j]or j
q=1z=4if(p==s)q=r f=i
if(o==s)z*=r
x=5*u+q*(p%4-u)+z*(o%4-u)<<3y=5*v+q*(p\4-v)+z*(o\4-v)<<3rectfill(x,y,x+6,y+6,(i+j)%15+1)end?"⁶1⁶c"
r-=.1if(r<0)g[f]=u+v*4u=s%4v=s\4while(r!=1or g[f]==s)s=rnd(16)\1r=abs(s%4-u)+abs(s\4-v)
goto _
i=k%15j=k\15p=g[i]or i
o=g[j]or j
q=1z=4if(p==s)q=r f=i
if(o==s)z*=r
x=5*u+q*(p%4-u)+z*(o%4-u)<<3y=5*v+q*(p\4-v)+z*(o\4-v)<<3rectfill(x,y,x+6,y+6,(i+j)%15+1)end?"⁶1⁶c"
r-=.1if(r<0)g[f]=u+v*4u=s%4v=s\4while(r!=1or g[f]==s)s=rnd(16)\1r=abs(s%4-u)+abs(s\4-v)
goto _
sspr(0,1,l,l,0,0,l,l)for k=0,8do
j=k%3/3n=t()r=6+2*cos(n/7+j)circfill(s(n/8+j)*49+62+r*s(k/9+n/5),r*22-68+r*s(k/9+n/4),r,k%3*5+4)end
f(░)line(0,l,l,l,n\7%3*5+1)f()goto _
sspr(0,1,l,l,0,0,l,l)for k=0,8do
j=k%3/3n=t()r=6+2*cos(n/7+j)circfill(s(n/8+j)*49+62+r*s(k/9+n/5),r*22-68+r*s(k/9+n/4),r,k%3*5+4)end
f(░)line(0,l,l,l,n\7%3*5+1)f()goto _
for h=0,47do
i=h%12q=p[i]or{x=z(128),y=z(128),u=0,v=0,c=i\6*2-1}p[i]=q
pset(q.x,q.y,2)q.x+=q.u/8q.y+=q.v/8pset(q.x,q.y,2+q.c)for j=0,i do
s=p[j]a=s.x-q.x>>7b=s.y-q.y>>7r=q.c*s.c*(1+((a*a+b*b)^1.5<<10))q.u-=a/r
q.v-=b/r
s.u+=a/r
s.v+=b/r
end
end?"⁶1⁶!5f10█●ˇ="
goto _
for h=0,47do
i=h%12q=p[i]or{x=z(128),y=z(128),u=0,v=0,c=i\6*2-1}p[i]=q
pset(q.x,q.y,2)q.x+=q.u/8q.y+=q.v/8pset(q.x,q.y,2+q.c)for j=0,i do
s=p[j]a=s.x-q.x>>7b=s.y-q.y>>7r=q.c*s.c*(1+((a*a+b*b)^1.5<<10))q.u-=a/r
q.v-=b/r
s.u+=a/r
s.v+=b/r
end
end?"⁶1⁶!5f10█●ˇ="
goto _