home *** CD-ROM | disk | FTP | other *** search
- #include "gwin.user.h"
- main()
- {
- float x, y, ydummy;
- float sides;
- int isides;
-
- USTART("high2",0.0,640.,0.0,400.);
- upset(G,"colo",0.0);
- uset(G,"fill");
- uoutln(G);
- uset(G,"nofi");
- upset(G,"colo",2.0);
- uprint(G,10.,95.,"Makes 3-D images - you will ");
- uprnt1(G,"text","need red/blue glasses to view images.");
-
- uprint(G,20.,90.,"Click and hold, move laterally, release, etc.");
-
- uuev.key = ' ';
-
- usetrgb(G,5.0,15.0,0.0,0.0);
- usetrgb(G,6.0,0.0,0.0,15.0);
-
- isides = 4;
- sides = isides;
-
- while(uuev.key != 'q'){
-
- if(ugrinc(G,&x,&y,&uuev)){UEND();exit(0);};
- upset(G,"colo",5.0);
- uplygn(G,x,y,sides,5.);
-
- if(ugrinc(G,&x, &ydummy, &uuev)){UEND();exit(0);};
- upset(G,"colo",6.0);
- uplygn(G,x, y+.26, sides, 5.);
-
- isides = ++isides % 10;
- if(isides < 3) isides = 3;
- sides = isides;
- }
-
- UEND();
- }
-
-