X-Git-Url: http://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=test%2Frain.c;h=f2c748eafb599354ed244900378c35dc3c2e4f6b;hp=c0b39041680bc02979650739f8b0c5f29bb484eb;hb=2639531af0c3ca25b48e7bcb9c790fa566cc5892;hpb=3a9b6a3bf0269231bef7de74757a910dedd04e0c diff --git a/test/rain.c b/test/rain.c index c0b39041..f2c748ea 100644 --- a/test/rain.c +++ b/test/rain.c @@ -1,88 +1,147 @@ +/**************************************************************************** + * Copyright (c) 1998-2002,2006 Free Software Foundation, Inc. * + * * + * Permission is hereby granted, free of charge, to any person obtaining a * + * copy of this software and associated documentation files (the * + * "Software"), to deal in the Software without restriction, including * + * without limitation the rights to use, copy, modify, merge, publish, * + * distribute, distribute with modifications, sublicense, and/or sell * + * copies of the Software, and to permit persons to whom the Software is * + * furnished to do so, subject to the following conditions: * + * * + * The above copyright notice and this permission notice shall be included * + * in all copies or substantial portions of the Software. * + * * + * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * + * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * + * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * + * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * + * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * + * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * + * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * + * * + * Except as contained in this notice, the name(s) of the above copyright * + * holders shall not be used in advertising or otherwise to promote the * + * sale, use or other dealings in this Software without prior written * + * authorization. * + ****************************************************************************/ /* - * $Id: rain.c,v 1.8 1997/05/03 18:38:27 tom Exp $ + * $Id: rain.c,v 1.22 2006/05/20 15:34:27 tom Exp $ */ #include -#include /* for tparm() */ - -#include - /* 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, - char *argv[] GCC_UNUSED) + char *argv[]GCC_UNUSED) { -int x, y, j; -static int xpos[5], ypos[5]; -float r; -float c; + int x, y, j; + static int xpos[5], ypos[5]; + float r; + float c; + + setlocale(LC_ALL, ""); - for (j=SIGHUP;j<=SIGTERM;j++) - if (signal(j,SIG_IGN)!=SIG_IGN) signal(j,onsig); + CATCHALL(onsig); initscr(); + if (has_colors()) { + int bg = COLOR_BLACK; + start_color(); +#if HAVE_USE_DEFAULT_COLORS + 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; + 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; } - 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); + + for (j = 0;;) { + 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(); + ExitProgram(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); } } @@ -91,16 +150,12 @@ onsig(int n GCC_UNUSED) { curs_set(1); endwin(); - exit(EXIT_FAILURE); + ExitProgram(EXIT_FAILURE); } 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.); }