autocrop 20 setxunit 10 setfontsize rouge /fillstyle {fill} def O 1 cercle* blanc -30 30 O 1.1 wedge* noir setTimes (60°) .7 0 cctext