[net.suicide] Suicide Program

jfb@houxt.UUCP (01/30/84)

It looks like net.suicide is coming back to life again.  I thought I'd
help kick things off with a program I got from this newsgroup when it
was more active.
I'm not much of a C programmer, but I think this will compile with
the command "cc suicide.c -l curses -o suicide"
The resulting program shows someone stepping out in the path of a
car to commit suicide.  I don't know who to credit for the original
distribution of this program, but when they sent it out another user commented
that there was a better program showing a suicide that involved a tree.
--Enjoy!
/************************** BEGIN SUICIDE PROGRAM *****************************/

#include <curses.h>
main()
{
	int i, j;

	static int cx[] = {
		20, 25, 30, 40, 44, 48, 57 };
	

	static char *road[] = {
		"------------------------------------------------------------------------------",
		" ",
		" ",
		" ---   ---   ---   ---   ---   ---   ---   ---   ---   ---   ---   ---   ---",
		" ",
		" ",
		"-----------------------------------------------------------------------------" };

	static char *car[] = {
		" _/-\__",
		" =o--o+"};

	static char *guy[] = {
		"o",
		"X",
		" "};

	static char *boom[] = {
		"    . *  . ",
		"   ^  : .o . ",
		"  =  \'$-# .  ",
		"   . /=./\ ",
		"     . v .  "};

	static char *cry[] = {
		"Hey!",
		"You!",
		"Watch out",
		"for",
		"the",
		"CAR !!!!"};

	static char *bye[] = {
		" ",
		" ",
		" ",
		"Bye",
		"sick",
		" world !!"};

	initscr();
	clear();
	printpic(road, 7, 8, 0);
	for(i=0; i < 60; i++) {
		printpic(car, 2, 12, i);
		if(i%10 == 0) {
			j = i/10;
			printpic(guy, 3, 17-(j), 65);
			mvprintw(3, cx[j], cry[j]);
			mvprintw(20, cx[j]+18, bye[j]);
			if(j == 5)
				mvprintw(14, 64, "---");
		}	
	}
	printpic(boom, 4, 11, 60);
	refresh();
	endwin();
	getchar();
	
}

printpic(pic, len, y, x)
char **pic;
int len, x, y;
{
	int i;
	for (i=0; i < len; i++)
		mvprintw(i + y, x, pic[i]);
	refresh();
}

/****************** END OF SUICIDE PROGRAM ************************************/

glen@intelca.UUCP (Glen Shires) (02/01/84)

...

The programs fun, once you get it compiled.  I had to use:

compile: cc suicide.c -lcurses -ltermcap -o suicide

run:  	 suicide

^ ^     Glen Shires, Intel, Santa Clara, Ca.
O O     {pur-ee,hplabs,ucbvax!amd70}!intelca!glen
 >
\-/    --- stay mellow