aUCBLogo Demos and Tests / spiro


to spiro
   
ht
   
disls
   
setUpdateGraph false
   
angle=1
   
repeat 360
   
[   cs
      
angle+=1
      
repeat 200
      
[   repeat 25 [fd 10 rt angle/23]
         
rt 90 fd 10
      
]
      
updateGraph
      
if key? [stop]
   
]
end