Home | History | Annotate | Line # | Download | only in PSD.doc
twinkle2.c revision 1.1
      1  1.1  cgd .\" Copyright (c) 1980, 1993
      2  1.1  cgd .\"	 The Regents of the University of California.  All rights reserved.
      3  1.1  cgd .\"
      4  1.1  cgd .\" Redistribution and use in source and binary forms, with or without
      5  1.1  cgd .\" modification, are permitted provided that the following conditions
      6  1.1  cgd .\" are met:
      7  1.1  cgd .\" 1. Redistributions of source code must retain the above copyright
      8  1.1  cgd .\"    notice, this list of conditions and the following disclaimer.
      9  1.1  cgd .\" 2. Redistributions in binary form must reproduce the above copyright
     10  1.1  cgd .\"    notice, this list of conditions and the following disclaimer in the
     11  1.1  cgd .\"    documentation and/or other materials provided with the distribution.
     12  1.1  cgd .\" 3. All advertising materials mentioning features or use of this software
     13  1.1  cgd .\"    must display the following acknowledgement:
     14  1.1  cgd .\"	This product includes software developed by the University of
     15  1.1  cgd .\"	California, Berkeley and its contributors.
     16  1.1  cgd .\" 4. Neither the name of the University nor the names of its contributors
     17  1.1  cgd .\"    may be used to endorse or promote products derived from this software
     18  1.1  cgd .\"    without specific prior written permission.
     19  1.1  cgd .\"
     20  1.1  cgd .\" THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     21  1.1  cgd .\" ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     22  1.1  cgd .\" IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     23  1.1  cgd .\" ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     24  1.1  cgd .\" FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     25  1.1  cgd .\" DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     26  1.1  cgd .\" OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     27  1.1  cgd .\" HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     28  1.1  cgd .\" LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     29  1.1  cgd .\" OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     30  1.1  cgd .\" SUCH DAMAGE.
     31  1.1  cgd .\"
     32  1.1  cgd .\"	@(#)twinkle2.c	8.1 (Berkeley) 6/8/93
     33  1.1  cgd .\"
     34  1.1  cgd extern int	_putchar();
     35  1.1  cgd 
     36  1.1  cgd main()
     37  1.1  cgd {
     38  1.1  cgd 	reg char	*sp;
     39  1.1  cgd 
     40  1.1  cgd 	srand(getpid());		/* initialize random sequence */
     41  1.1  cgd 
     42  1.1  cgd 	if (isatty(0)) {
     43  1.1  cgd 	       gettmode();
     44  1.1  cgd 	       if ((sp = getenv("TERM")) != NULL)
     45  1.1  cgd 		       setterm(sp);
     46  1.1  cgd 		signal(SIGINT, die);
     47  1.1  cgd 	}
     48  1.1  cgd 	else {
     49  1.1  cgd 		printf("Need a terminal on %d\n", _tty_ch);
     50  1.1  cgd 		exit(1);
     51  1.1  cgd 	}
     52  1.1  cgd 	_puts(TI);
     53  1.1  cgd 	_puts(VS);
     54  1.1  cgd 
     55  1.1  cgd 	noecho();
     56  1.1  cgd 	nonl();
     57  1.1  cgd 	tputs(CL, NLINES, _putchar);
     58  1.1  cgd 	for (;;) {
     59  1.1  cgd 		makeboard();		/* make the board setup */
     60  1.1  cgd 		puton('*');		/* put on '*'s */
     61  1.1  cgd 		puton(' ');		/* cover up with ' 's */
     62  1.1  cgd 	}
     63  1.1  cgd }
     64  1.1  cgd 
     65  1.1  cgd puton(ch)
     66  1.1  cgd char	ch;
     67  1.1  cgd {
     68  1.1  cgd 	reg LOCS	*lp;
     69  1.1  cgd 	reg int		r;
     70  1.1  cgd 	reg LOCS	*end;
     71  1.1  cgd 	LOCS		temp;
     72  1.1  cgd 	static int	lasty, lastx;
     73  1.1  cgd 
     74  1.1  cgd 	end = &Layout[Numstars];
     75  1.1  cgd 	for (lp = Layout; lp < end; lp++) {
     76  1.1  cgd 		r = rand() % Numstars;
     77  1.1  cgd 		temp = *lp;
     78  1.1  cgd 		*lp = Layout[r];
     79  1.1  cgd 		Layout[r] = temp;
     80  1.1  cgd 	}
     81  1.1  cgd 
     82  1.1  cgd 	for (lp = Layout; lp < end; lp++)
     83  1.1  cgd 			/* prevent scrolling */
     84  1.1  cgd 		if (!AM || (lp->y < NLINES - 1 || lp->x < NCOLS - 1)) {
     85  1.1  cgd 			mvcur(lasty, lastx, lp->y, lp->x);
     86  1.1  cgd 			putchar(ch);
     87  1.1  cgd 			lasty = lp->y;
     88  1.1  cgd 			if ((lastx = lp->x + 1) >= NCOLS)
     89  1.1  cgd 				if (AM) {
     90  1.1  cgd 					lastx = 0;
     91  1.1  cgd 					lasty++;
     92  1.1  cgd 				}
     93  1.1  cgd 				else
     94  1.1  cgd 					lastx = NCOLS - 1;
     95  1.1  cgd 		}
     96  1.1  cgd }
     97