set date "<dummy date>";
A: line;
B: box;
C: circle;
D: arrow;
   wait;
   redraw A colour 1,0,0;
   wait;
   redraw B filled 0,1,0;
   wait;
   redraw C colour 0,0,1;     
   wait;
   redraw A colour 0,0,0;  
   wait;
   redraw D filled 1,0,0;  
   wait;
   redraw D colour 1,0,0;  
