home *** CD-ROM | disk | FTP | other *** search
- From decwrl!sun-barr!cs.utexas.edu!uunet!allbery Mon Dec 18 13:05:27 PST 1989
- Article 1233 of comp.sources.misc:
- Path: decwrl!sun-barr!cs.utexas.edu!uunet!allbery
- From: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc)
- Newsgroups: comp.sources.misc
- Subject: v09i067: asciixmas program
- Keywords: fun, merry christmas
- Message-ID: <73844@uunet.UU.NET>
- Date: 16 Dec 89 18:15:14 GMT
- Sender: allbery@uunet.UU.NET
- Reply-To: rich@jolnet.ORPK.IL.US (Rich Andrews)
- Organization: Jolnet, Public access Unix, Orland Park (Joliet) IL
- Lines: 1201
- Approved: allbery@uunet.UU.NET (Brandon S. Allbery - comp.sources.misc)
-
- Posting-number: Volume 9, Issue 67
- Submitted-by: rich@jolnet.ORPK.IL.US (Rich Andrews)
- Archive-name: asciixmas
-
- This is posted for a friend......
-
-
- Here's my Christmas gift to the netlanders from whom I've learned so much over
- the last few months. I just wanted to give something back.
-
-
- --------cut here--------cut here--------cut here--------cut here-----cut here---
- #! /bin/sh
- # This file was wrapped with "dummyshar". "sh" this file to extract.
- # Contents: asciixmas.c
- echo extracting 'asciixmas.c'
- if test -f 'asciixmas.c' -a -z "$1"; then echo Not overwriting 'asciixmas.c'; else
- sed 's/^X//' << \EOF > 'asciixmas.c'
- X/******************************************************************************/
- X/* asciixmas */
- X/* December 1989 Larry Bartz Indianapolis, IN */
- X/* */
- X/* */
- X/* I'm dreaming of an ascii character-based monochrome Christmas, */
- X/* Just like the one's I used to know! */
- X/* Via a full duplex communications channel, */
- X/* At 9600 bits per second, */
- X/* Even though it's kinda slow. */
- X/* */
- X/* I'm dreaming of an ascii character-based monochrome Christmas, */
- X/* With ev'ry C program I write! */
- X/* May your screen be merry and bright! */
- X/* And may all your Christmases be amber or green, */
- X/* (for reduced eyestrain and improved visibility)! */
- X/* */
- X/* */
- X/* */
- X/* */
- X/* */
- X/* IMPLEMENTATION */
- X/* */
- X/* Feel free to modify the defined string FROMWHO to reflect you, your */
- X/* organization, your site, whatever. */
- X/* */
- X/* This really looks a lot better if you can turn off your cursor before */
- X/* execution. I wanted to do that here but very few termcap entries or */
- X/* terminfo definitions have the appropriate string defined. If you know */
- X/* the string(s) for the terminal(s) you use or which your site supports, */
- X/* you could call asciixmas from within a shell in which you issue the */
- X/* string to the terminal. The cursor is distracting but it doesn't really */
- X/* ruin the show. */
- X/* */
- X/* At our site, we invoke this for our users just after login and the */
- X/* determination of terminal type. */
- X/* */
- X/* */
- X/* PORTABILITY */
- X/* */
- X/* I wrote this using only the very simplest curses functions so that it */
- X/* might be the most portable. I was personally able to test on five */
- X/* different cpu/UNIX combinations. */
- X/* */
- X/* */
- X/* COMPILE */
- X/* */
- X/* usually this: */
- X/* */
- X/* cc -O asciixmas.c -lcurses -o asciixmas -s */
- X/* */
- X/* */
- X/* Zilog S8000 models 11, 21, 31, etc with ZEUS variant of SYSTEM III */
- X/* maybe other SYSTEM III also: */
- X/* */
- X/* cc asciixmas.c -lcurses -ltermlib -o asciixmas -s */
- X/* */
- X/* as above with optional "peephole optimizer" installed: */
- X/* */
- X/* cc -O asciixmas.c -lcurses -ltermlib -o asciixmas -s */
- X/* */
- X/* */
- X/* Zilog S8000 models 32, 130 with WE32100 chip and SYS V, REL2 */
- X/* maybe 3B2 also? */
- X/* */
- X/* cc -f -O -K sd asciixmas.c -lcurses -o asciixmas -s */
- X/* */
- X/* */
- X/* Pyramid, Sequent, any other "dual universe" types compile and execute */
- X/* under either universe. The compile line for the ucb universe (as you */
- X/* might expect) is the same as for SYS III UNIX: */
- X/* */
- X/* cc -O asciixmas.c -lcurses -ltermlib -o asciixmas -s */
- X/* */
- X/* The above compile will also hold true for other BSD systems. (I hope) */
- X/* */
- X/* */
- X/* */
- X/* */
- X/* For the Scrooges out there among you who don't want this thing to loop */
- X/* forever (or until the user hits DEL), insert this into your compile */
- X/* line just after "cc" : */
- X/* */
- X/* -DNOLOOP */
- X/* */
- X/* like so: */
- X/* */
- X/* cc -DNOLOOP -O asciixmas.c -lcurses -o asciixmas -s */
- X/* */
- X/* */
- X/* */
- X/******************************************************************************/
- X
- X#include <curses.h>
- X#include <signal.h>
- X
- X#define FROMWHO "I N F O R M A T I O N S Y S T E M S D I V I S I O N"
- X/* #define FROMWHO "from L A R R Y, C O L L E E N, S E A N, & H A L E Y" */
- X
- Xint y_pos, x_pos;
- X
- XWINDOW
- X *treescrn, *treescrn2,*treescrn3, *treescrn4,*treescrn5, *treescrn6,
- X *treescrn7, *treescrn8,
- X *dotdeer0,
- X *stardeer0,
- X *lildeer0, *lildeer1, *lildeer2, *lildeer3,
- X *middeer0, *middeer1, *middeer2, *middeer3,
- X *bigdeer0, *bigdeer1, *bigdeer2, *bigdeer3, *bigdeer4,
- X *lookdeer0, *lookdeer1, *lookdeer2, *lookdeer3, *lookdeer4,
- X *w_holiday,
- X *w_del_msg;
- X
- Xmain()
- X{
- X void done();
- X int loopy;
- X
- X initscr();
- X noecho();
- X nonl();
- X refresh();
- X signal(SIGINT,done);
- X signal(SIGHUP,done);
- X signal(SIGTERM,done);
- X signal(SIGQUIT,done);
- X
- X
- X
- X treescrn = newwin(16,27,3,53);
- X treescrn2 = newwin(16,27,3,53);
- X treescrn3 = newwin(16,27,3,53);
- X treescrn4 = newwin(16,27,3,53);
- X treescrn5 = newwin(16,27,3,53);
- X treescrn6 = newwin(16,27,3,53);
- X treescrn7 = newwin(16,27,3,53);
- X treescrn8 = newwin(16,27,3,53);
- X
- X dotdeer0 = newwin(3,71,0,8);
- X
- X stardeer0 = newwin(4,56,0,8);
- X
- X lildeer0 = newwin(7,53,0,8);
- X lildeer1 = newwin(2,4,0,0);
- X lildeer2 = newwin(2,4,0,0);
- X lildeer3 = newwin(2,4,0,0);
- X
- X middeer0 = newwin(15,42,0,8);
- X middeer1 = newwin(3,7,0,0);
- X middeer2 = newwin(3,7,0,0);
- X middeer3 = newwin(3,7,0,0);
- X
- X bigdeer0 = newwin(10,23,0,0);
- X bigdeer1 = newwin(10,23,0,0);
- X bigdeer2 = newwin(10,23,0,0);
- X bigdeer3 = newwin(10,23,0,0);
- X bigdeer4 = newwin(10,23,0,0);
- X
- X lookdeer0 = newwin(10,25,0,0);
- X lookdeer1 = newwin(10,25,0,0);
- X lookdeer2 = newwin(10,25,0,0);
- X lookdeer3 = newwin(10,25,0,0);
- X lookdeer4 = newwin(10,25,0,0);
- X
- X w_holiday = newwin(1,26,3,27);
- X
- X w_del_msg = newwin(1,12,23,68);
- X
- X mvwaddstr(w_del_msg,0,0,"DEL to quit");
- X
- X mvwaddstr(w_holiday,0,0,"H A P P Y H O L I D A Y S");
- X
- X /* set up the windows for our various reindeer */
- X
- X /* lildeer1 */
- X mvwaddch(lildeer1,0,0,'V');
- X mvwaddch(lildeer1,1,0,'@');
- X mvwaddch(lildeer1,1,1,'<');
- X mvwaddch(lildeer1,1,2,'>');
- X mvwaddch(lildeer1,1,3,'~');
- X
- X /* lildeer2 */
- X mvwaddch(lildeer2,0,0,'V');
- X mvwaddch(lildeer2,1,0,'@');
- X mvwaddch(lildeer2,1,1,'|');
- X mvwaddch(lildeer2,1,2,'|');
- X mvwaddch(lildeer2,1,3,'~');
- X
- X /* lildeer3 */
- X mvwaddch(lildeer3,0,0,'V');
- X mvwaddch(lildeer3,1,0,'@');
- X mvwaddch(lildeer3,1,1,'>');
- X mvwaddch(lildeer3,1,2,'<');
- X mvwaddch(lildeer2,1,3,'~');
- X
- X
- X /* middeer1 */
- X mvwaddch(middeer1,0,2,'y');
- X mvwaddch(middeer1,0,3,'y');
- X mvwaddch(middeer1,1,2,'0');
- X mvwaddch(middeer1,1,3,'(');
- X mvwaddch(middeer1,1,4,'=');
- X mvwaddch(middeer1,1,5,')');
- X mvwaddch(middeer1,1,6,'~');
- X mvwaddch(middeer1,2,3,'\\');
- X mvwaddch(middeer1,2,4,'/');
- X
- X /* middeer2 */
- X mvwaddch(middeer2,0,2,'y');
- X mvwaddch(middeer2,0,3,'y');
- X mvwaddch(middeer2,1,2,'0');
- X mvwaddch(middeer2,1,3,'(');
- X mvwaddch(middeer2,1,4,'=');
- X mvwaddch(middeer2,1,5,')');
- X mvwaddch(middeer2,1,6,'~');
- X mvwaddch(middeer2,2,3,'|');
- X mvwaddch(middeer2,2,5,'|');
- X
- X /* middeer3 */
- X mvwaddch(middeer3,0,2,'y');
- X mvwaddch(middeer3,0,3,'y');
- X mvwaddch(middeer3,1,2,'0');
- X mvwaddch(middeer3,1,3,'(');
- X mvwaddch(middeer3,1,4,'=');
- X mvwaddch(middeer3,1,5,')');
- X mvwaddch(middeer3,1,6,'~');
- X mvwaddch(middeer3,2,2,'/');
- X mvwaddch(middeer3,2,6,'\\');
- X
- X
- X /* bigdeer1 */
- X mvwaddch(bigdeer1,0,17,'\\');
- X mvwaddch(bigdeer1,0,18,'/');
- X mvwaddch(bigdeer1,0,20,'\\');
- X mvwaddch(bigdeer1,0,21,'/');
- X mvwaddch(bigdeer1,1,18,'\\');
- X mvwaddch(bigdeer1,1,20,'/');
- X mvwaddch(bigdeer1,2,19,'|');
- X mvwaddch(bigdeer1,2,20,'_');
- X mvwaddch(bigdeer1,3,18,'/');
- X mvwaddch(bigdeer1,3,19,'^');
- X mvwaddch(bigdeer1,3,20,'0');
- X mvwaddch(bigdeer1,3,21,'\\');
- X mvwaddch(bigdeer1,4,17,'/');
- X mvwaddch(bigdeer1,4,18,'/');
- X mvwaddch(bigdeer1,4,19,'\\');
- X mvwaddch(bigdeer1,4,22,'\\');
- X mvwaddstr(bigdeer1,5,7,"^~~~~~~~~// ~~U");
- X mvwaddstr(bigdeer1,6,7,"( \\_____( /");
- X mvwaddstr(bigdeer1,7,8,"( ) /");
- X mvwaddstr(bigdeer1,8,9,"\\\\ /");
- X mvwaddstr(bigdeer1,9,11,"\\>/>");
- X
- X /* bigdeer2 */
- X mvwaddch(bigdeer2,0,17,'\\');
- X mvwaddch(bigdeer2,0,18,'/');
- X mvwaddch(bigdeer2,0,20,'\\');
- X mvwaddch(bigdeer2,0,21,'/');
- X mvwaddch(bigdeer2,1,18,'\\');
- X mvwaddch(bigdeer2,1,20,'/');
- X mvwaddch(bigdeer2,2,19,'|');
- X mvwaddch(bigdeer2,2,20,'_');
- X mvwaddch(bigdeer2,3,18,'/');
- X mvwaddch(bigdeer2,3,19,'^');
- X mvwaddch(bigdeer2,3,20,'0');
- X mvwaddch(bigdeer2,3,21,'\\');
- X mvwaddch(bigdeer2,4,17,'/');
- X mvwaddch(bigdeer2,4,18,'/');
- X mvwaddch(bigdeer2,4,19,'\\');
- X mvwaddch(bigdeer2,4,22,'\\');
- X mvwaddstr(bigdeer2,5,7,"^~~~~~~~~// ~~U");
- X mvwaddstr(bigdeer2,6,7,"(( )____( /");
- X mvwaddstr(bigdeer2,7,7,"( / |");
- X mvwaddstr(bigdeer2,8,8,"\\/ |");
- X mvwaddstr(bigdeer2,9,9,"|> |>");
- X
- X /* bigdeer3 */
- X mvwaddch(bigdeer3,0,17,'\\');
- X mvwaddch(bigdeer3,0,18,'/');
- X mvwaddch(bigdeer3,0,20,'\\');
- X mvwaddch(bigdeer3,0,21,'/');
- X mvwaddch(bigdeer3,1,18,'\\');
- X mvwaddch(bigdeer3,1,20,'/');
- X mvwaddch(bigdeer3,2,19,'|');
- X mvwaddch(bigdeer3,2,20,'_');
- X mvwaddch(bigdeer3,3,18,'/');
- X mvwaddch(bigdeer3,3,19,'^');
- X mvwaddch(bigdeer3,3,20,'0');
- X mvwaddch(bigdeer3,3,21,'\\');
- X mvwaddch(bigdeer3,4,17,'/');
- X mvwaddch(bigdeer3,4,18,'/');
- X mvwaddch(bigdeer3,4,19,'\\');
- X mvwaddch(bigdeer3,4,22,'\\');
- X mvwaddstr(bigdeer3,5,7,"^~~~~~~~~// ~~U");
- X mvwaddstr(bigdeer3,6,6,"( ()_____( /");
- X mvwaddstr(bigdeer3,7,6,"/ / /");
- X mvwaddstr(bigdeer3,8,5,"|/ \\");
- X mvwaddstr(bigdeer3,9,5,"/> \\>");
- X
- X /* bigdeer4 */
- X mvwaddch(bigdeer4,0,17,'\\');
- X mvwaddch(bigdeer4,0,18,'/');
- X mvwaddch(bigdeer4,0,20,'\\');
- X mvwaddch(bigdeer4,0,21,'/');
- X mvwaddch(bigdeer4,1,18,'\\');
- X mvwaddch(bigdeer4,1,20,'/');
- X mvwaddch(bigdeer4,2,19,'|');
- X mvwaddch(bigdeer4,2,20,'_');
- X mvwaddch(bigdeer4,3,18,'/');
- X mvwaddch(bigdeer4,3,19,'^');
- X mvwaddch(bigdeer4,3,20,'0');
- X mvwaddch(bigdeer4,3,21,'\\');
- X mvwaddch(bigdeer4,4,17,'/');
- X mvwaddch(bigdeer4,4,18,'/');
- X mvwaddch(bigdeer4,4,19,'\\');
- X mvwaddch(bigdeer4,4,22,'\\');
- X mvwaddstr(bigdeer4,5,7,"^~~~~~~~~// ~~U");
- X mvwaddstr(bigdeer4,6,6,"( )______( /");
- X mvwaddstr(bigdeer4,7,5,"(/ \\");
- X mvwaddstr(bigdeer4,8,0,"v___= ----^");
- X
- X
- X /* lookdeer1 */
- X mvwaddstr(lookdeer1,0,16,"\\/ \\/");
- X mvwaddstr(lookdeer1,1,17,"\\Y/ \\Y/");
- X mvwaddstr(lookdeer1,2,19,"\\=/");
- X mvwaddstr(lookdeer1,3,17,"^\\o o/^");
- X mvwaddstr(lookdeer1,4,17,"//( )");
- X mvwaddstr(lookdeer1,5,7,"^~~~~~~~~// \\O/");
- X mvwaddstr(lookdeer1,6,7,"( \\_____( /");
- X mvwaddstr(lookdeer1,7,8,"( ) /");
- X mvwaddstr(lookdeer1,8,9,"\\\\ /");
- X mvwaddstr(lookdeer1,9,11,"\\>/>");
- X
- X /* lookdeer2 */
- X mvwaddstr(lookdeer2,0,16,"\\/ \\/");
- X mvwaddstr(lookdeer2,1,17,"\\Y/ \\Y/");
- X mvwaddstr(lookdeer2,2,19,"\\=/");
- X mvwaddstr(lookdeer2,3,17,"^\\o o/^");
- X mvwaddstr(lookdeer2,4,17,"//( )");
- X mvwaddstr(lookdeer2,5,7,"^~~~~~~~~// \\O/");
- X mvwaddstr(lookdeer2,6,7,"(( )____( /");
- X mvwaddstr(lookdeer2,7,7,"( / |");
- X mvwaddstr(lookdeer2,8,8,"\\/ |");
- X mvwaddstr(lookdeer2,9,9,"|> |>");
- X
- X /* lookdeer3 */
- X mvwaddstr(lookdeer3,0,16,"\\/ \\/");
- X mvwaddstr(lookdeer3,1,17,"\\Y/ \\Y/");
- X mvwaddstr(lookdeer3,2,19,"\\=/");
- X mvwaddstr(lookdeer3,3,17,"^\\o o/^");
- X mvwaddstr(lookdeer3,4,17,"//( )");
- X mvwaddstr(lookdeer3,5,7,"^~~~~~~~~// \\O/");
- X mvwaddstr(lookdeer3,6,6,"( ()_____( /");
- X mvwaddstr(lookdeer3,7,6,"/ / /");
- X mvwaddstr(lookdeer3,8,5,"|/ \\");
- X mvwaddstr(lookdeer3,9,5,"/> \\>");
- X
- X /* lookdeer4 */
- X mvwaddstr(lookdeer4,0,16,"\\/ \\/");
- X mvwaddstr(lookdeer4,1,17,"\\Y/ \\Y/");
- X mvwaddstr(lookdeer4,2,19,"\\=/");
- X mvwaddstr(lookdeer4,3,17,"^\\o o/^");
- X mvwaddstr(lookdeer4,4,17,"//( )");
- X mvwaddstr(lookdeer4,5,7,"^~~~~~~~~// \\O/");
- X mvwaddstr(lookdeer4,6,6,"( )______( /");
- X mvwaddstr(lookdeer4,7,5,"(/ \\");
- X mvwaddstr(lookdeer4,8,0,"v___= ----^");
- X
- X
- X
- X /***********************************************/
- X
- X while(1)
- X {
- X clear();
- X werase(treescrn);
- X touchwin(treescrn);
- X werase(treescrn2);
- X touchwin(treescrn2);
- X werase(treescrn8);
- X touchwin(treescrn8);
- X refresh();
- X sleep(1);
- X boxit();
- X del_msg();
- X sleep(1);
- X seas();
- X del_msg();
- X sleep(1);
- X greet();
- X del_msg();
- X sleep(1);
- X fromwho();
- X del_msg();
- X sleep(1);
- X tree();
- X sleep(1);
- X balls();
- X sleep(1);
- X star();
- X sleep(1);
- X strng1();
- X strng2();
- X strng3();
- X strng4();
- X strng5();
- X
- X
- X /* set up the windows for our blinking trees */
- X /* **************************************** */
- X /* treescrn3 */
- X
- X overwrite(treescrn, treescrn3);
- X
- X /*balls*/
- X mvwaddch(treescrn3, 4, 18, ' ');
- X mvwaddch(treescrn3, 7, 6, ' ');
- X mvwaddch(treescrn3, 8, 19, ' ');
- X mvwaddch(treescrn3, 11, 22, ' ');
- X
- X /*star*/
- X mvwaddch(treescrn3, 0, 12, '*');
- X
- X /*strng1*/
- X mvwaddch(treescrn3, 3, 11, ' ');
- X
- X /*strng2*/
- X mvwaddch(treescrn3, 5, 13, ' ');
- X mvwaddch(treescrn3, 6, 10, ' ');
- X
- X /*strng3*/
- X mvwaddch(treescrn3, 7, 16, ' ');
- X mvwaddch(treescrn3, 7, 14, ' ');
- X
- X /*strng4*/
- X mvwaddch(treescrn3, 10, 13, ' ');
- X mvwaddch(treescrn3, 10, 10, ' ');
- X mvwaddch(treescrn3, 11, 8, ' ');
- X
- X /*strng5*/
- X mvwaddch(treescrn3, 11, 18, ' ');
- X mvwaddch(treescrn3, 12, 13, ' ');
- X
- X
- X /* treescrn4 */
- X
- X overwrite(treescrn, treescrn4);
- X
- X /*balls*/
- X mvwaddch(treescrn4, 3, 9, ' ');
- X mvwaddch(treescrn4, 4, 16, ' ');
- X mvwaddch(treescrn4, 7, 6, ' ');
- X mvwaddch(treescrn4, 8, 19, ' ');
- X mvwaddch(treescrn4, 11, 2, ' ');
- X mvwaddch(treescrn4, 12, 23, ' ');
- X
- X /*star*/
- X wstandout(treescrn4);
- X mvwaddch(treescrn4, 0, 12, '*');
- X wstandend(treescrn4);
- X
- X /*strng1*/
- X mvwaddch(treescrn4, 3, 13, ' ');
- X
- X /*strng2*/
- X
- X /*strng3*/
- X mvwaddch(treescrn4, 7, 15, ' ');
- X mvwaddch(treescrn4, 8, 11, ' ');
- X
- X /*strng4*/
- X mvwaddch(treescrn4, 9, 16, ' ');
- X mvwaddch(treescrn4, 10, 12, ' ');
- X mvwaddch(treescrn4, 11, 8, ' ');
- X
- X /*strng5*/
- X mvwaddch(treescrn4, 11, 18, ' ');
- X mvwaddch(treescrn4, 12, 14, ' ');
- X
- X
- X /* treescrn5 */
- X
- X overwrite(treescrn, treescrn5);
- X
- X /*balls*/
- X mvwaddch(treescrn5, 3, 15, ' ');
- X mvwaddch(treescrn5, 10, 20, ' ');
- X mvwaddch(treescrn5, 12, 1, ' ');
- X
- X /*star*/
- X mvwaddch(treescrn5, 0, 12, '*');
- X
- X /*strng1*/
- X mvwaddch(treescrn5, 3, 11, ' ');
- X
- X /*strng2*/
- X mvwaddch(treescrn5, 5, 12, ' ');
- X
- X /*strng3*/
- X mvwaddch(treescrn5, 7, 14, ' ');
- X mvwaddch(treescrn5, 8, 10, ' ');
- X
- X /*strng4*/
- X mvwaddch(treescrn5, 9, 15, ' ');
- X mvwaddch(treescrn5, 10, 11, ' ');
- X mvwaddch(treescrn5, 11, 7, ' ');
- X
- X /*strng5*/
- X mvwaddch(treescrn5, 11, 17, ' ');
- X mvwaddch(treescrn5, 12, 13, ' ');
- X
- X /* treescrn6 */
- X
- X overwrite(treescrn, treescrn6);
- X
- X /*balls*/
- X mvwaddch(treescrn6, 6, 7, ' ');
- X mvwaddch(treescrn6, 7, 18, ' ');
- X mvwaddch(treescrn6, 10, 4, ' ');
- X mvwaddch(treescrn6, 11, 23, ' ');
- X
- X /*star*/
- X wstandout(treescrn6);
- X mvwaddch(treescrn6, 0, 12, '*');
- X wstandend(treescrn6);
- X
- X /*strng1*/
- X
- X /*strng2*/
- X mvwaddch(treescrn6, 5, 11, ' ');
- X
- X /*strng3*/
- X mvwaddch(treescrn6, 7, 13, ' ');
- X mvwaddch(treescrn6, 8, 9, ' ');
- X
- X /*strng4*/
- X mvwaddch(treescrn6, 9, 14, ' ');
- X mvwaddch(treescrn6, 10, 10, ' ');
- X mvwaddch(treescrn6, 11, 6, ' ');
- X
- X /*strng5*/
- X mvwaddch(treescrn6, 11, 16, ' ');
- X mvwaddch(treescrn6, 12, 12, ' ');
- X
- X /* treescrn7 */
- X
- X overwrite(treescrn, treescrn7);
- X
- X /*balls*/
- X mvwaddch(treescrn7, 3, 15, ' ');
- X mvwaddch(treescrn7, 6, 7, ' ');
- X mvwaddch(treescrn7, 7, 18, ' ');
- X mvwaddch(treescrn7, 10, 4, ' ');
- X mvwaddch(treescrn7, 11, 22, ' ');
- X
- X /*star*/
- X mvwaddch(treescrn7, 0, 12, '*');
- X
- X /*strng1*/
- X mvwaddch(treescrn7, 3, 12, ' ');
- X
- X /*strng2*/
- X mvwaddch(treescrn7, 5, 13, ' ');
- X mvwaddch(treescrn7, 6, 9, ' ');
- X
- X /*strng3*/
- X mvwaddch(treescrn7, 7, 15, ' ');
- X mvwaddch(treescrn7, 8, 11, ' ');
- X
- X /*strng4*/
- X mvwaddch(treescrn7, 9, 16, ' ');
- X mvwaddch(treescrn7, 10, 12, ' ');
- X mvwaddch(treescrn7, 11, 8, ' ');
- X
- X /*strng5*/
- X mvwaddch(treescrn7, 11, 18, ' ');
- X mvwaddch(treescrn7, 12, 14, ' ');
- X
- X
- X sleep(1);
- X reindeer();
- X
- X touchwin(w_holiday);
- X wrefresh(w_holiday);
- X wrefresh(w_del_msg);
- X
- X sleep(1);
- X for(loopy = 0;loopy < 100;loopy++)
- X {
- X blinkit();
- X }
- X
- X#ifdef NOLOOP
- X done();
- X#endif
- X
- X }
- X}
- X
- Xboxit()
- X{
- X int x = 0;
- X
- X while(x < 20)
- X {
- X mvaddch(x, 7, '|');
- X ++x;
- X }
- X
- X x = 8;
- X
- X while(x < 80)
- X {
- X mvaddch(19, x, '_');
- X ++x;
- X }
- X
- X x = 0;
- X
- X while(x < 80)
- X {
- X mvaddch(22, x, '_');
- X ++x;
- X }
- X
- X
- X}
- X
- Xseas()
- X{
- X mvaddch(4, 1, 'S');
- X mvaddch(6, 1, 'E');
- X mvaddch(8, 1, 'A');
- X mvaddch(10, 1, 'S');
- X mvaddch(12, 1, 'O');
- X mvaddch(14, 1, 'N');
- X mvaddch(16, 1, '`');
- X mvaddch(18, 1, 'S');
- X
- X}
- X
- X
- Xgreet()
- X{
- X mvaddch(3, 5, 'G');
- X mvaddch(5, 5, 'R');
- X mvaddch(7, 5, 'E');
- X mvaddch(9, 5, 'E');
- X mvaddch(11, 5, 'T');
- X mvaddch(13, 5, 'I');
- X mvaddch(15, 5, 'N');
- X mvaddch(17, 5, 'G');
- X mvaddch(19, 5, 'S');
- X
- X}
- X
- X
- Xfromwho()
- X{
- X mvaddstr(21, 13, FROMWHO);
- X
- X}
- X
- X
- Xdel_msg()
- X{
- X mvaddstr(23, 68, "DEL to quit");
- X
- X refresh();
- X
- X}
- X
- X
- Xtree()
- X{
- X mvwaddch(treescrn, 1, 11, '/');
- X mvwaddch(treescrn, 2, 11, '/');
- X mvwaddch(treescrn, 3, 10, '/');
- X mvwaddch(treescrn, 4, 9, '/');
- X mvwaddch(treescrn, 5, 9, '/');
- X mvwaddch(treescrn, 6, 8, '/');
- X mvwaddch(treescrn, 7, 7, '/');
- X mvwaddch(treescrn, 8, 6, '/');
- X mvwaddch(treescrn, 9, 6, '/');
- X mvwaddch(treescrn, 10, 5, '/');
- X mvwaddch(treescrn, 11, 3, '/');
- X mvwaddch(treescrn, 12, 2, '/');
- X
- X mvwaddch(treescrn, 1, 13, '\\');
- X mvwaddch(treescrn, 2, 13, '\\');
- X mvwaddch(treescrn, 3, 14, '\\');
- X mvwaddch(treescrn, 4, 15, '\\');
- X mvwaddch(treescrn, 5, 15, '\\');
- X mvwaddch(treescrn, 6, 16, '\\');
- X mvwaddch(treescrn, 7, 17, '\\');
- X mvwaddch(treescrn, 8, 18, '\\');
- X mvwaddch(treescrn, 9, 18, '\\');
- X mvwaddch(treescrn, 10, 19, '\\');
- X mvwaddch(treescrn, 11, 21, '\\');
- X mvwaddch(treescrn, 12, 22, '\\');
- X
- X mvwaddch(treescrn, 4, 10, '_');
- X mvwaddch(treescrn, 4, 14, '_');
- X mvwaddch(treescrn, 8, 7, '_');
- X mvwaddch(treescrn, 8, 17, '_');
- X
- X mvwaddstr(treescrn, 13, 0, "//////////// \\\\\\\\\\\\\\\\\\\\\\\\");
- X
- X mvwaddstr(treescrn, 14, 11, "| |");
- X mvwaddstr(treescrn, 15, 11, "|_|");
- X
- X wrefresh(treescrn);
- X wrefresh(w_del_msg);
- X
- X}
- X
- X
- Xballs()
- X{
- X
- X overwrite(treescrn, treescrn2);
- X
- X mvwaddch(treescrn2, 3, 9, '@');
- X mvwaddch(treescrn2, 3, 15, '@');
- X mvwaddch(treescrn2, 4, 8, '@');
- X mvwaddch(treescrn2, 4, 16, '@');
- X mvwaddch(treescrn2, 5, 7, '@');
- X mvwaddch(treescrn2, 5, 17, '@');
- X mvwaddch(treescrn2, 7, 6, '@');
- X mvwaddch(treescrn2, 7, 18, '@');
- X mvwaddch(treescrn2, 8, 5, '@');
- X mvwaddch(treescrn2, 8, 19, '@');
- X mvwaddch(treescrn2, 10, 4, '@');
- X mvwaddch(treescrn2, 10, 20, '@');
- X mvwaddch(treescrn2, 11, 2, '@');
- X mvwaddch(treescrn2, 11, 22, '@');
- X mvwaddch(treescrn2, 12, 1, '@');
- X mvwaddch(treescrn2, 12, 23, '@');
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- Xstar()
- X{
- X wstandout(treescrn2);
- X mvwaddch(treescrn2, 0, 12, '*');
- X wstandend(treescrn2);
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- Xstrng1()
- X{
- X mvwaddch(treescrn2, 3, 13, '\'');
- X mvwaddch(treescrn2, 3, 12, ':');
- X mvwaddch(treescrn2, 3, 11, '.');
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- Xstrng2()
- X{
- X mvwaddch(treescrn2, 5, 14, '\'');
- X mvwaddch(treescrn2, 5, 13, ':');
- X mvwaddch(treescrn2, 5, 12, '.');
- X mvwaddch(treescrn2, 5, 11, ',');
- X mvwaddch(treescrn2, 6, 10, '\'');
- X mvwaddch(treescrn2, 6, 9, ':');
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- Xstrng3()
- X{
- X mvwaddch(treescrn2, 7, 16, '\'');
- X mvwaddch(treescrn2, 7, 15, ':');
- X mvwaddch(treescrn2, 7, 14, '.');
- X mvwaddch(treescrn2, 7, 13, ',');
- X mvwaddch(treescrn2, 8, 12, '\'');
- X mvwaddch(treescrn2, 8, 11, ':');
- X mvwaddch(treescrn2, 8, 10, '.');
- X mvwaddch(treescrn2, 8, 9, ',');
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- Xstrng4()
- X{
- X mvwaddch(treescrn2, 9, 17, '\'');
- X mvwaddch(treescrn2, 9, 16, ':');
- X mvwaddch(treescrn2, 9, 15, '.');
- X mvwaddch(treescrn2, 9, 14, ',');
- X mvwaddch(treescrn2, 10, 13, '\'');
- X mvwaddch(treescrn2, 10, 12, ':');
- X mvwaddch(treescrn2, 10, 11, '.');
- X mvwaddch(treescrn2, 10, 10, ',');
- X mvwaddch(treescrn2, 11, 9, '\'');
- X mvwaddch(treescrn2, 11, 8, ':');
- X mvwaddch(treescrn2, 11, 7, '.');
- X mvwaddch(treescrn2, 11, 6, ',');
- X mvwaddch(treescrn2, 12, 5, '\'');
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- Xstrng5()
- X{
- X mvwaddch(treescrn2, 11, 19, '\'');
- X mvwaddch(treescrn2, 11, 18, ':');
- X mvwaddch(treescrn2, 11, 17, '.');
- X mvwaddch(treescrn2, 11, 16, ',');
- X mvwaddch(treescrn2, 12, 15, '\'');
- X mvwaddch(treescrn2, 12, 14, ':');
- X mvwaddch(treescrn2, 12, 13, '.');
- X mvwaddch(treescrn2, 12, 12, ',');
- X
- X /* save a fully lit tree */
- X overwrite(treescrn2, treescrn);
- X
- X wrefresh(treescrn2);
- X wrefresh(w_del_msg);
- X}
- X
- X
- X
- Xblinkit()
- X{
- X static int cycle;
- X
- X if(cycle > 4)
- X {
- X cycle = 0;
- X }
- X
- X
- X touchwin(treescrn8);
- X
- X switch(cycle)
- X {
- X
- X case 0:
- X overwrite(treescrn3,treescrn8);
- X wrefresh(treescrn8);
- X wrefresh(w_del_msg);
- X
- X break;
- X case 1:
- X overwrite(treescrn4,treescrn8);
- X wrefresh(treescrn8);
- X wrefresh(w_del_msg);
- X
- X break;
- X case 2:
- X overwrite(treescrn5,treescrn8);
- X wrefresh(treescrn8);
- X wrefresh(w_del_msg);
- X
- X break;
- X case 3:
- X overwrite(treescrn6,treescrn8);
- X wrefresh(treescrn8);
- X wrefresh(w_del_msg);
- X
- X break;
- X case 4:
- X overwrite(treescrn7,treescrn8);
- X wrefresh(treescrn8);
- X wrefresh(w_del_msg);
- X
- X break;
- X }
- X
- X touchwin(treescrn8);
- X
- X
- X
- X /*ALL ON***************************************************/
- X
- X
- X overwrite(treescrn,treescrn8);
- X wrefresh(treescrn8);
- X wrefresh(w_del_msg);
- X
- X
- X ++cycle;
- X}
- X
- X
- Xreindeer()
- X{
- X int looper;
- X
- X y_pos = 0;
- X
- X
- X for(x_pos = 70; x_pos > 62; x_pos--)
- X {
- X if(x_pos < 62)
- X {
- X y_pos = 1;
- X }
- X for(looper = 0; looper < 4; looper++)
- X {
- X mvwaddch(dotdeer0, y_pos, x_pos, '.');
- X wrefresh(dotdeer0);
- X wrefresh(w_del_msg);
- X werase(dotdeer0);
- X wrefresh(dotdeer0);
- X wrefresh(w_del_msg);
- X }
- X }
- X
- X y_pos = 2;
- X
- X for(x_pos; x_pos > 50; x_pos--)
- X {
- X
- X for(looper = 0; looper < 4; looper++)
- X {
- X
- X if(x_pos < 56)
- X {
- X y_pos = 3;
- X
- X mvwaddch(stardeer0, y_pos, x_pos, '*');
- X wrefresh(stardeer0);
- X wrefresh(w_del_msg);
- X werase(stardeer0);
- X wrefresh(stardeer0);
- X wrefresh(w_del_msg);
- X }
- X else
- X {
- X mvwaddch(dotdeer0, y_pos, x_pos, '*');
- X wrefresh(dotdeer0);
- X wrefresh(w_del_msg);
- X werase(dotdeer0);
- X wrefresh(dotdeer0);
- X wrefresh(w_del_msg);
- X }
- X }
- X }
- X
- X x_pos = 58;
- X
- X for(y_pos = 2; y_pos < 5; y_pos++)
- X {
- X
- X touchwin(lildeer0);
- X wrefresh(lildeer0);
- X wrefresh(w_del_msg);
- X
- X for(looper = 0; looper < 4; looper++)
- X {
- X mvwin(lildeer3, y_pos, x_pos);
- X wrefresh(lildeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(lildeer2, y_pos, x_pos);
- X wrefresh(lildeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(lildeer1, y_pos, x_pos);
- X wrefresh(lildeer1);
- X wrefresh(w_del_msg);
- X
- X mvwin(lildeer2, y_pos, x_pos);
- X wrefresh(lildeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(lildeer3, y_pos, x_pos);
- X wrefresh(lildeer3);
- X wrefresh(w_del_msg);
- X
- X touchwin(lildeer0);
- X wrefresh(lildeer0);
- X wrefresh(w_del_msg);
- X
- X x_pos -= 2;
- X }
- X }
- X
- X
- X x_pos = 35;
- X
- X for(y_pos = 5; y_pos < 10; y_pos++)
- X {
- X
- X touchwin(middeer0);
- X wrefresh(middeer0);
- X wrefresh(w_del_msg);
- X
- X for(looper = 0; looper < 2; looper++)
- X {
- X mvwin(middeer3, y_pos, x_pos);
- X wrefresh(middeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(middeer2, y_pos, x_pos);
- X wrefresh(middeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(middeer1, y_pos, x_pos);
- X wrefresh(middeer1);
- X wrefresh(w_del_msg);
- X
- X mvwin(middeer2, y_pos, x_pos);
- X wrefresh(middeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(middeer3, y_pos, x_pos);
- X wrefresh(middeer3);
- X wrefresh(w_del_msg);
- X
- X touchwin(middeer0);
- X wrefresh(middeer0);
- X wrefresh(w_del_msg);
- X
- X x_pos -= 3;
- X }
- X }
- X
- X sleep(2);
- X
- X y_pos = 1;
- X
- X for(x_pos = 8; x_pos < 16; x_pos++)
- X {
- X
- X mvwin(bigdeer4, y_pos, x_pos);
- X wrefresh(bigdeer4);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer3, y_pos, x_pos);
- X wrefresh(bigdeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer2, y_pos, x_pos);
- X wrefresh(bigdeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer1, y_pos, x_pos);
- X wrefresh(bigdeer1);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer2, y_pos, x_pos);
- X wrefresh(bigdeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer3, y_pos, x_pos);
- X wrefresh(bigdeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer4, y_pos, x_pos);
- X wrefresh(bigdeer4);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer0, y_pos, x_pos);
- X wrefresh(bigdeer0);
- X wrefresh(w_del_msg);
- X }
- X
- X --x_pos;
- X
- X for(looper = 0; looper < 6; looper++)
- X {
- X mvwin(lookdeer4, y_pos, x_pos);
- X wrefresh(lookdeer4);
- X wrefresh(w_del_msg);
- X
- X mvwin(lookdeer3, y_pos, x_pos);
- X wrefresh(lookdeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(lookdeer2, y_pos, x_pos);
- X wrefresh(lookdeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(lookdeer1, y_pos, x_pos);
- X wrefresh(lookdeer1);
- X wrefresh(w_del_msg);
- X
- X mvwin(lookdeer2, y_pos, x_pos);
- X wrefresh(lookdeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(lookdeer3, y_pos, x_pos);
- X wrefresh(lookdeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(lookdeer4, y_pos, x_pos);
- X wrefresh(lookdeer4);
- X wrefresh(w_del_msg);
- X
- X }
- X
- X mvwin(lookdeer0, y_pos, x_pos);
- X wrefresh(lookdeer0);
- X wrefresh(w_del_msg);
- X
- X for(y_pos; y_pos < 10; y_pos++)
- X {
- X
- X for(looper = 0; looper < 2; looper++)
- X {
- X mvwin(bigdeer4, y_pos, x_pos);
- X wrefresh(bigdeer4);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer3, y_pos, x_pos);
- X wrefresh(bigdeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer2, y_pos, x_pos);
- X wrefresh(bigdeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer1, y_pos, x_pos);
- X wrefresh(bigdeer1);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer2, y_pos, x_pos);
- X wrefresh(bigdeer2);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer3, y_pos, x_pos);
- X wrefresh(bigdeer3);
- X wrefresh(w_del_msg);
- X
- X mvwin(bigdeer4, y_pos, x_pos);
- X wrefresh(bigdeer4);
- X wrefresh(w_del_msg);
- X }
- X mvwin(bigdeer0, y_pos, x_pos);
- X wrefresh(bigdeer0);
- X wrefresh(w_del_msg);
- X }
- X
- X --y_pos;
- X
- X mvwin(lookdeer3, y_pos, x_pos);
- X wrefresh(lookdeer3);
- X wrefresh(w_del_msg);
- X
- X}
- X
- X
- X
- Xvoid done()
- X{
- X signal(SIGINT,done);
- X signal(SIGHUP,done);
- X signal(SIGTERM,done);
- X signal(SIGQUIT,done);
- X clear();
- X refresh();
- X endwin();
- X exit(0);
- X}
- EOF
- chars=`wc -c < 'asciixmas.c'`
- if test $chars != 32310; then echo 'asciixmas.c' is $chars characters, should be 32310 characters!; fi
- fi
- exit 0
- -----------------------snip-------------------------------
- --
- "Hey Rocky, watch me pull a rabbit out of my hat." Bullwinkle Moose
- "oh...a wise guy....Come here....I'll murder ya..." Moe Howard
- "I'm hunting wabbits...." Elmer Fudd
- "If I could typ I'd be dangerous" Rich Andrews
-
-
-