\Draw 
\Define\ant{ 
   { \Line(6,26)  \Line(35,38) \Line(0,14)  } 
   { \Move(52, 0) \Line(-6,26) \Line(-35,38) \Line( 0,14) } 
   { \Move( 0,26) \Line( 6,14) \Line( 40, 9) \Line( 6,20) } 
   { \Move(52,26) \Line(-6,14) \Line(-40, 9) \Line(-6,20) } 
   \Move(26,29)    \PaintOval(12,23) \Move(0,26) 
   \PaintOval(6,9) \Move(0,12)       \PaintOval(3,3) 
} 
 
\Scale(0.5,0.5) 
{ 
\Color(0,0,1) 
\RotatedAxes(135,225)   \FcNode(o) 
\Move(150,0)   \Node(X)(--X--) 
\Move(-150,50)\Node(Y)(--Y--) 
\TwoDim 
\ArrowHeads(1) 
\Edge(o,X) 
\Edge(o,Y) 
\EndTwoDim 
\EndRotatedAxes 
\Color(0,0,0) 
} 
 
  \Do(1,8){   \R=\Q; \R+90; 
\RotatedAxes(\Val\Q,\Val\R) 
          \MoveF(50)   \ant 
\EndRotatedAxes 
     \Q+45;  } 
\EndDraw