A little bit of fun with "c=" :)1 pi=3.14159265359:r=6
10 for i=0to360step16
20 x=20-(sin(i*pi/180)*r):?spc(x)"c="
30 next:r=r+((r<19)*-1)
80 goto 10
