An elementary animation showing how easy it is to rotate text in DrawScript
·Zoom(2/3)
·BoundBox(0,0,9,9)
·Font("Bristol.Bold",16,100)
·TextColour(&FF00)
·Fill(&FF0000)
FOR i=1 TO 32
·Circle(4.5,4.5,2)
·Rotate(PI/16,4.5,4.5)
·Print("DRAWSCRIPT",4.5,4.5)
·SaveDrawing("text"+STR$(i))
NEXT
