home *** CD-ROM | disk | FTP | other *** search
- HorzLine([C20],[L1,8],[C5],1); /* underline the word GRAD starts at */
- /* column 20, line 1 offset downward */
- /* by 8 dots */
- HorzLine([C9],[L13],300,1); /* starting at 9th column, line 13 */
- SetStyle(0x3333);
- HorzLine([C9],[L13,10],300,1); /* line 13 offset downward by 10 dots */
- SetStyle(0);
- HorzLine([C9],[L13,20],300,1);
- SetStyle(0x11ff);
- HorzLine([C9],[L13,30],300,1);
-
- RelOrg(0,[L31]); /* see GRADEGS.GCM for explanation on */
- SetStyle(0xffff); /* drawing pie charts */
- Earc2(170,50,83,50,100,270);
- ArcPoint(&x1,&y1,&x2,&y2);
- Line(x1,y1,170,50);
- Line(170,50,x2,y2);
- Earc2(178,45,83,50,10,90);
- ArcPoint(&x1,&y1,&x2,&y2);
- Line(x1,y1,178,45);
- Line(178,45,x2,y2);
- PatternFill(160,50,pattern1,0);
- PatternFill(190,30,pattern2,0);
- PrintPage();
-