
// include the dotmove procedure...
include dotmove

message "Atomic" "Stop"
logo backcolor = "purple" 

logo circpoints 100
pointlist startcapture
  logo circrotate -30
  ellipse 300 100
  
  logo circrotate 45
  ellipse 300 100

  logo circrotate 100
  ellipse 300 100

pointlist endcapture

pu; moveto middle; pd
circle 40
logo fillcolor = "powderblue"
fillshape
pu

logo fillcolor = "red"
// now move the dots..
//     ndots spacing   offcolor   dotsize  wait
dotmove 12     23      backcolor  8       5


