harvest
// inspired by @eggnog's Wobbly Lines:
https://www.lexaloffle.com/bbs/?pid=156751#p
(139 chars)
::_::cls(7)for i=0,30do line()for x=0,130,5do line(x,i*7+cos((x-64)/2+t()/3)*(10+cos(t()/3+i/9)*9)+sin(i/12+t()/2)*3,1)end end flip()goto _ |
[Please log in to post a comment]