X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=test%2Frain.c;h=646ab96ee639f7b10af6dc42fa260287fbe22309;hp=c0b39041680bc02979650739f8b0c5f29bb484eb;hb=0eb88fc5281804773e2a0c7a488a4452463535ce;hpb=3a9b6a3bf0269231bef7de74757a910dedd04e0c

diff --git a/test/rain.c b/test/rain.c
index c0b39041..646ab96e 100644
--- a/test/rain.c
+++ b/test/rain.c
@@ -1,5 +1,5 @@
 /*
- * $Id: rain.c,v 1.8 1997/05/03 18:38:27 tom Exp $
+ * $Id: rain.c,v 1.13 1999/10/23 01:31:26 tom Exp $
  */
 #include <test.priv.h>
 
@@ -9,11 +9,22 @@
 
 /* rain 11/3/1980 EPS/CITHEP */
 
-#define cursor(col,row) move(row,col)
-
 static float ranf(void);
 static void onsig(int sig);
 
+static int next_j(int j)
+{
+    if (j==0) j=4; else --j;
+    if (has_colors()) {
+	int z = (int)(3*ranf());
+	chtype color = COLOR_PAIR(z);
+	if (z)
+	    color |= A_BOLD;
+	attrset(color);
+    }
+    return j;
+}
+
 int
 main(
 	int argc GCC_UNUSED,
@@ -28,61 +39,81 @@ float c;
 	if (signal(j,SIG_IGN)!=SIG_IGN) signal(j,onsig);
 
     initscr();
+    if (has_colors()) {
+	int bg = COLOR_BLACK;
+	start_color();
+#ifdef NCURSES_VERSION
+	if (use_default_colors() == OK)
+		bg = -1;
+#endif
+	init_pair(1, COLOR_BLUE, bg);
+	init_pair(2, COLOR_CYAN, bg);
+    }
     nl();
     noecho();
     curs_set(0);
+    timeout(0);
 
     r = (float)(LINES - 4);
     c = (float)(COLS - 4);
     for (j=5;--j>=0;) {
-		xpos[j]=(int)(c* ranf())+2;
-		ypos[j]=(int)(r* ranf())+2;
+	xpos[j]=(int)(c* ranf())+2;
+	ypos[j]=(int)(r* ranf())+2;
     }
+
     for (j=0;;) {
-		x=(int)(c*ranf())+2;
-		y=(int)(r*ranf())+2;
-
-		cursor(x,y); addch('.');
-
-		cursor(xpos[j],ypos[j]); addch('o');
-
-		if (j==0) j=4; else --j;
-		cursor(xpos[j],ypos[j]); addch('O');
-
-		if (j==0) j=4; else --j;
-		cursor(xpos[j],ypos[j]-1);
-		addch('-');
-		cursor(xpos[j]-1,ypos[j]);
-		addstr("|.|");
-		cursor(xpos[j],ypos[j]+1);
-		addch('-');
-
-		if (j==0) j=4; else --j;
-		cursor(xpos[j],ypos[j]-2);
-		addch('-');
-		cursor(xpos[j]-1,ypos[j]-1);
-		addstr("/ \\");
-		cursor(xpos[j]-2,ypos[j]);
-		addstr("| O |");
-		cursor(xpos[j]-1,ypos[j]+1);
-		addstr("\\ /");
-		cursor(xpos[j],ypos[j]+2);
-		addch('-');
-
-		if (j==0) j=4; else --j;
-		cursor(xpos[j],ypos[j]-2);
-		addch(' ');
-		cursor(xpos[j]-1,ypos[j]-1);
-		addstr("   ");
-		cursor(xpos[j]-2,ypos[j]);
-		addstr("     ");
-		cursor(xpos[j]-1,ypos[j]+1);
-		addstr("   ");
-		cursor(xpos[j],ypos[j]+2);
-		addch(' ');
-		xpos[j]=x; ypos[j]=y;
-		refresh();
-		napms(50);
+	x=(int)(c*ranf())+2;
+	y=(int)(r*ranf())+2;
+
+	mvaddch(y,x, '.');
+
+	mvaddch(ypos[j], xpos[j], 'o');
+
+	j = next_j(j);
+	mvaddch(ypos[j], xpos[j], 'O');
+
+	j = next_j(j);
+	mvaddch( ypos[j]-1, xpos[j],    '-');
+	mvaddstr(ypos[j],   xpos[j]-1, "|.|");
+	mvaddch( ypos[j]+1, xpos[j],    '-');
+
+	j = next_j(j);
+	mvaddch( ypos[j]-2, xpos[j],     '-');
+	mvaddstr(ypos[j]-1, xpos[j]-1,  "/ \\");
+	mvaddstr(ypos[j],   xpos[j]-2,  "| O |");
+	mvaddstr(ypos[j]+1, xpos[j]-1,  "\\ /");
+	mvaddch( ypos[j]+2, xpos[j],     '-');
+
+	j = next_j(j);
+	mvaddch( ypos[j]-2, xpos[j],     ' ');
+	mvaddstr(ypos[j]-1, xpos[j]-1,  "   ");
+	mvaddstr(ypos[j],   xpos[j]-2, "     ");
+	mvaddstr(ypos[j]+1, xpos[j]-1,  "   ");
+	mvaddch( ypos[j]+2, xpos[j],     ' ');
+
+	xpos[j] = x; ypos[j] = y;
+
+	switch(getch())
+	{
+	case('q'):
+	case('Q'):
+	    curs_set(1);
+	    endwin();
+	    return(EXIT_SUCCESS);
+	case 's':
+	    nodelay(stdscr, FALSE);
+	    break;
+	case ' ':
+	    nodelay(stdscr, TRUE);
+	    break;
+#ifdef KEY_RESIZE
+	case(KEY_RESIZE):
+	    r = (float)(LINES - 4);
+	    c = (float)(COLS - 4);
+	    break;
+#endif
+	}
+	napms(50);
     }
 }
 
@@ -97,10 +128,6 @@ onsig(int n GCC_UNUSED)
 static float
 ranf(void)
 {
-    float rv;
-    long r = rand();
-
-    r &= 077777;
-    rv =((float)r/32767.);
-    return rv;
+    long r = (rand() & 077777);
+    return ((float) r / 32768.);
 }