home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d5xx / d571 / gwin.lha / Gwin / Examples / three-d.c < prev    next >
C/C++ Source or Header  |  1991-12-22  |  885b  |  45 lines
  1. #include "gwin.user.h"
  2. main()
  3. {
  4. float x, y, ydummy;
  5. float sides;
  6. int isides;
  7.  
  8.    USTART("high2",0.0,640.,0.0,400.);
  9.    upset(G,"colo",0.0);
  10.    uset(G,"fill");
  11.    uoutln(G);
  12.    uset(G,"nofi");
  13.    upset(G,"colo",2.0);
  14.    uprint(G,10.,95.,"Makes 3-D images - you will ");
  15.    uprnt1(G,"text","need red/blue glasses to view images.");
  16.  
  17.    uprint(G,20.,90.,"Click and hold, move laterally, release, etc.");
  18.  
  19.    uuev.key = ' ';
  20.  
  21.    usetrgb(G,5.0,15.0,0.0,0.0);
  22.    usetrgb(G,6.0,0.0,0.0,15.0);
  23.  
  24.    isides = 4;
  25.    sides = isides;
  26.  
  27.    while(uuev.key != 'q'){
  28.  
  29.       if(ugrinc(G,&x,&y,&uuev)){UEND();exit(0);};
  30.       upset(G,"colo",5.0);
  31.       uplygn(G,x,y,sides,5.);
  32.  
  33.       if(ugrinc(G,&x, &ydummy, &uuev)){UEND();exit(0);};
  34.       upset(G,"colo",6.0);
  35.       uplygn(G,x, y+.26, sides, 5.);
  36.  
  37.       isides = ++isides % 10;
  38.       if(isides < 3) isides = 3;
  39.       sides = isides;
  40.    }
  41.  
  42.    UEND();
  43. }
  44.  
  45.