How many characters of code did you use?
526

Include your code here, if you'd like to show it off!
f,s=circfill,64
x,y,dx,dy,a,c,o=s,s,0,0,.4,7,128
cls()for i=1,400do
pset(s+cos(i/103)*s,s+sin(i/201)*s,i%8+8)
end f(s,s,40,7)f(s,s,30,0)
memcpy(0,24576,8192)::_::cls()camera(-s,-s)
for z=1,8 do
line(0,0,c)for i=2,4do line(cos(a+i/3)*z/2,sin(a+i/3)*z/2)end
for v=-1,1do for u=-1,1do
sspr(0,0,o,o,u*z*o-x*z,v*z*o-y*z,o*z,o*z)
end end end
x+=dx y+=dy x&=~0>>>9y&=~0>>>9
dx*=.95dy*=.95
if(btn(0))a+=1/32
if(btn(1))a-=1/32
if(btn(5))sset(x-u,y-v,c)
u,v,g=cos(a),sin(a),sget(x,y)
if(btn(4))dx+=u/19dy+=v/19
if(g>0)c=g
flip()goto _