/*
 EGGX を使ったサンプル  473088 榎田裕一郎
 雪が降る（とりあえず一粒の雪）
*/

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

int main() {
  int win, seed;
  float x, y, w;

  printf("random seed = ");
  scanf("%d",&seed);
  srand(seed); 

  win=gopen(400,400);  /* 描画ウィンドウを開く */
  winname(win, "sample 1"); /* 名前をつける */
  newpen(win, 1); /* 色は白に固定 */

  x=(float)(rand() % 400);   /* x 座標位置はランダム */
  y=400.0;                   /* y 座標位置は画面上端 */
  w=4.0;                     /* 雪の粒の大きさを決める */

  while(1) {
    gclr(win);                 /* 画面を消去 */
    fillrect(win, x, y, w, w); /* 四角を描く */
    y-= w / 2.0;               /* 雪粒の大きさずつ下に移動 */
    if( y < 0.0 ) { 
      x=(float)(rand() % 400); /* x 座標位置を再設定 */
      y=400.0;                 /* y 座標位置は再び上端へ */
    }
    msleep(10);                /* 少し待つ */
  }

  /* このプログラムは終了しないので return 0; などは無し */

}