How many characters of code did you use?
343

Include your code here, if you'd like to show it off!
p=pal p(2,0)p(4,8)p(6,140,1)t=0cls()r=0.5000o=ovalfill
n=sin::★:: t+=r
x=n(t)*128y=t*(r/20000)line(x,y,x,y-t/128,1)
if(t>64)r+=0.05t=0
if (r<1700) goto ★
memcpy(16128,24576,8191)function _draw()memcpy(24576,16128+t*16,8191)
t+=1k=function(u,y)w=n(t/4)*2l=n(t/9)*u o(47+l,47+w+y,79-l,79+w-y,u%3+y) end
k(2,n(t/16)*30)for i=1,4do
k(i*2,0)end end

(Seizure warning!!!)