0e3d540892
This contains the full eti (panel, form, menu) extensions. bmake glue to follow. Obtained from: ftp://ftp.clark.net/pub/dickey/ncurses
132 lines
2.2 KiB
C
132 lines
2.2 KiB
C
/*
|
|
* $Id: rain.c,v 1.11 1997/09/18 18:36:46 tom Exp $
|
|
*/
|
|
#include <test.priv.h>
|
|
|
|
#include <term.h> /* for tparm() */
|
|
|
|
#include <signal.h>
|
|
|
|
/* rain 11/3/1980 EPS/CITHEP */
|
|
|
|
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)
|
|
{
|
|
int x, y, j;
|
|
static int xpos[5], ypos[5];
|
|
float r;
|
|
float c;
|
|
|
|
for (j=SIGHUP;j<=SIGTERM;j++)
|
|
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;
|
|
}
|
|
|
|
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();
|
|
return(EXIT_SUCCESS);
|
|
#ifdef KEY_RESIZE
|
|
case(KEY_RESIZE):
|
|
r = (float)(LINES - 4);
|
|
c = (float)(COLS - 4);
|
|
break;
|
|
#endif
|
|
}
|
|
napms(50);
|
|
}
|
|
}
|
|
|
|
static void
|
|
onsig(int n GCC_UNUSED)
|
|
{
|
|
curs_set(1);
|
|
endwin();
|
|
exit(EXIT_FAILURE);
|
|
}
|
|
|
|
static float
|
|
ranf(void)
|
|
{
|
|
float rv;
|
|
long r = rand();
|
|
|
|
r &= 077777;
|
|
rv =((float)r/32767.);
|
|
return rv;
|
|
}
|