INC SUM,2*PI()*RED/TOTAL 'INCREMENT THE PERCENTAGE SUM GLINE 200,120,200+50*SIN(SUM),120-50*COS(SUM) 'DRAW DIVISION LINE ANG=SUM-PI()*RED/TOTAL 'AUXILIARY ANGLE FOR PAINTING GPAINT 200+45*SIN(ANG),120-45*COS(ANG),#RED 'PAINT IN DIVISION You can then simply repeat this above code for every color, replacing RED with the appropriate color.