PROGRAM:PIE         
01 VM 3
02 FOR C=1 TO 6
03 B=(C-1)*60:E=C*60-1
04 FOR R=1 TO 23
05 ARC 29,42,R,R,B,E,C:NEXT
06
07 FOR R=26 TO 28
08 ARC 29,42,R,R,B,E,C+8:NEXT
09 NEXT
10 GOTO 10
#