pivot Example
10 CLEAR SCREEN
20 GINIT
30 MOVE 40,40
40 DEG
50 PIVOT 45
60 RECTANGLE 10,20
70 DISP "1"
80 WAIT 1
90 AREA PEN 3
100 RECTANGLE 10,-20,FILL
110 DISP "2"
120 WAIT 1
130 PEN 2
140 RECTANGLE -10,-20,EDGE
150 DISP "3"
160 WAIT 1
170 AREA PEN 7
180 PEN 8
190 RECTANGLE -10,20,FILL,EDGE
200 DISP "4"
210 WAIT 1
220 DISP
230 END
