How many characters of code did you use?
494

Include your code here, if you'd like to show it off!
c,u,k,q=circfill,unpack,poke,24405
k(24365,1)::❎::?"\ac0"
w,f={},0for i=0,6do add(w,{0,64})end
k(q)cls(4)::🅾️::k(q)if(f==0)f={rnd(119)+4,rnd(119)+4}
b,v=u(w[#w])c(b,v,2,2)c(f[1],f[2],5,9)for i=#w,2,-1do
w[i]={u(w[i-1])}end
x,y=u(w[1])m,n=stat(32),stat(33)b,v=m-x,n-y
d=sqrt(b*b+v*v)b/=d v/=d
x+=b*3y+=v*3b+=x v+=y
s=pget(b,v)b,v=u(w[#w])if(s>13or min(x,y)<0or 127<max(x,y))goto ❎
if(s>4)c(f[1],f[2],5,2)f=0add(w,{b,v})?"\af"
c(x,y,2,14)w[1]={x,y}k(q,1)cls()spr(0,0,0,16,16)c(m,n,2,7)flip()goto 🅾️