Something I did last summer, while trying to do something with harmonographs

f={32,8,32,8.1}p={0,0,1,1}t=0u=0r=rnd
function h(i,t)return 30*sin(t*f[i]+p[i]/4)end::_::if(u==0)flip()cls()
t+=.001
u=(t*10^9)%1
circ(h(1,t)+h(2,t)+64,h(3,t)+h(4,t)+64,4,6)goto _

x=0g=64l=line::_::for i=1,12,3do?"\^!5f01⁷"..sub("⁷⁶⁵\n\t⁴ᶜ\r¹ᵉ⁸²",i,i+3)
sspr(0,0,128,128,i/6\1*g,(i-1)/3%2*g,g,g)end?"⁶1⁶c"
?"\^!5f55\0"
cls()pal(0)for o=0,4do
e=o/5+t()/8z=sin(e)+2.2a=x
x=sin(e)*40for j=a,x do
l(.7*j+g,30,j+g,50,z)l(g,99,z+.95)end
end
reset()goto _

Just moving stuff from twitter over to here

n=128r,s=ovalfill,sin::_::srand(31)cls()r(32,32,80,80,7)for i=0,30do
pset(rnd(n),rnd(n))end
r(86,9,90,6,1)r(87,6,89,150)for i=0,70do
z=t()y=2*s(i/42+5*z/7)+s(i/n+z/7)+s(i/200+z/2)+70x=y+i/3-9v=y-2*i/3if(i==70)line(87,13,x,v)line(86,n,x,y)
r(x,y,x,v)end
flip()goto _

Mastodon

The original server operated by the Mastodon gGmbH non-profit