/* $OpenBSD: com6.c,v 1.8 1997/12/16 07:54:23 angelos Exp $ */ /* $NetBSD: com6.c,v 1.5 1995/04/27 21:30:23 mycroft Exp $ */ /* * Copyright (c) 1983, 1993 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef lint #if 0 static char sccsid[] = "@(#)com6.c 8.1 (Berkeley) 5/31/93"; #else static char rcsid[] = "$NetBSD: com6.c,v 1.5 1995/04/27 21:30:23 mycroft Exp $"; #endif #endif /* not lint */ #include #include "extern.h" #include "pathnames.h" int launch() { if (testbit(location[position].objects,VIPER) && !notes[CANTLAUNCH]){ if (fuel > 4){ clearbit(location[position].objects,VIPER); position = location[position].up; notes[LAUNCHED] = 1; btime++; fuel -= 4; puts("You climb into the viper and prepare for launch."); puts("With a touch of your thumb the turbo engines ignite, thrusting you back into\nyour seat."); return(1); } else puts("Not enough fuel to launch."); } else puts("Can't launch."); return(0); } int land() { if (notes[LAUNCHED] && testbit(location[position].objects,LAND) && location[position].down){ notes[LAUNCHED] = 0; position = location[position].down; setbit(location[position].objects,VIPER); fuel -= 2; btime++; puts("You are down."); return(1); } else puts("You can't land here."); return(0); } void die(sigraised) /* endgame */ int sigraised; { printf("bye.\nYour rating was %s.\n", rate()); post(' '); exit(0); } void live() { puts("\nYou win!"); post('!'); exit(0); } static FILE *score_fp; open_score_file() { if ((score_fp = fopen(_PATH_SCORE, "a")) == NULL) warn("can't append to high scores file (%s)", _PATH_SCORE); } void post(ch) char ch; { time_t tv; char *date; sigset_t sigset, osigset; sigemptyset(&sigset); sigaddset(&sigset, SIGINT); sigprocmask(SIG_BLOCK, &sigset, &osigset); tv = time(NULL); date = ctime(&tv); date[24] = '\0'; if (score_fp != NULL) { fprintf(score_fp, "%s %8s %c%20s", date, uname, ch, rate()); if (wiz) fprintf(score_fp, " wizard\n"); else if (tempwiz) fprintf(score_fp, " WIZARD!\n"); else fprintf(score_fp, "\n"); } sigprocmask(SIG_SETMASK, &osigset, (sigset_t *)0); } char * rate() { int score; score = max(max(pleasure,power),ego); if (score == pleasure){ if (score < 5) return("novice"); else if (score < 20) return("junior voyeur"); else if (score < 35) return("Don Juan"); else return("Marquis De Sade"); } else if (score == power){ if (score < 5) return("serf"); else if (score < 8) return("Samurai"); else if (score < 13) return("Klingon"); else if (score < 22) return("Darth Vader"); else return("Sauron the Great"); } else{ if (score < 5) return("Polyanna"); else if (score < 10) return("philanthropist"); else if (score < 20) return("Tattoo"); else return("Mr. Roarke"); } } int drive() { if (testbit(location[position].objects,CAR)){ puts("You hop in the car and turn the key. There is a perceptible grating noise,"); puts("and an explosion knocks you unconscious..."); clearbit(location[position].objects,CAR); setbit(location[position].objects,CRASH); injuries[5] = injuries[6] = injuries[7] = injuries[8] = 1; btime += 15; zzz(); return(0); } else puts("There is nothing to drive here."); return(-1); } int ride() { if (testbit(location[position].objects,HORSE)){ puts("You climb onto the stallion and kick it in the guts. The stupid steed launches"); puts("forward through bush and fern. You are thrown and the horse gallups off."); clearbit(location[position].objects,HORSE); while (!(position = rnd(NUMOFROOMS+1)) || !OUTSIDE || !beenthere[position] || location[position].flyhere); setbit(location[position].objects,HORSE); if (location[position].north) position = location[position].north; else if (location[position].south) position = location[position].south; else if (location[position].east) position = location[position].east; else position = location[position].west; return(0); } else puts("There is no horse here."); return(-1); } void light() /* synonyms = {strike, smoke} */ { /* for matches, cigars */ if (testbit(inven,MATCHES) && matchcount){ puts("Your match splutters to life."); btime++; matchlight = 1; matchcount--; if (position == 217){ puts("The whole bungalow explodes with an intense blast."); die(0); } } else puts("You're out of matches."); }