/*
 EGGX を使ったサンプル
 RGB カラーチャート
 左上が赤、左下が黒、右上が緑、右下が青

 473088 榎田裕一郎
*/

#include <eggx.h>
#include <stdlib.h>

int main() {
  int win, r, g, b, l;
  double x,y,max,rate;

  max=200.0;
  rate=(max*max)/256.0;

  win=gopen((int)max*2,(int)max*2);  /* 描画ウィンドウを開く */
  winname(win, "rgb"); /* 名前をつける */

  for(l=0;l<4;l++) {
    for(x=0;x<max;x++) {
      for(y=0;y<max;y++) {
	r=255-(x*x+(max-y)*(max-y))/rate/(l+1);
	g=255-((max-x)*(max-x)+(max-y)*(max-y))/rate/(l+1);
	b=255-((max-x)*(max-x)+y*y)/rate/(l+1);
	newrgbcolor(win, r, g, b);
	pset(win, x+l/2*max,y+l%2*max);
      };
    };
  };

  ggetch(win);
  gclose(win);

  return(0);

}