1/* $NetBSD: done.c,v 1.9 2005/07/01 00:03:36 jmc Exp $ */ 2 3/*- 4 * Copyright (c) 1991, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * The game adventure was originally written in Fortran by Will Crowther 8 * and Don Woods. It was later translated to C and enhanced by Jim 9 * Gillogly. This code is derived from software contributed to Berkeley 10 * by Jim Gillogly at The Rand Corporation. 11 * 12 * Redistribution and use in source and binary forms, with or without 13 * modification, are permitted provided that the following conditions 14 * are met: 15 * 1. Redistributions of source code must retain the above copyright 16 * notice, this list of conditions and the following disclaimer. 17 * 2. Redistributions in binary form must reproduce the above copyright 18 * notice, this list of conditions and the following disclaimer in the 19 * documentation and/or other materials provided with the distribution. 20 * 3. Neither the name of the University nor the names of its contributors 21 * may be used to endorse or promote products derived from this software 22 * without specific prior written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 34 * SUCH DAMAGE. 35 */ 36 37#include <sys/cdefs.h> 38#ifndef lint 39#if 0 40static char sccsid[] = "@(#)done.c 8.1 (Berkeley) 5/31/93"; 41#else 42__RCSID("$NetBSD: done.c,v 1.9 2005/07/01 00:03:36 jmc Exp $"); 43#endif 44#endif /* not lint */ 45 46/* Re-coding of advent in C: termination routines */ 47 48#include <stdio.h> 49#include <stdlib.h> 50#include "hdr.h" 51#include "extern.h" 52 53int 54score(void) 55{ /* sort of like 20000 */ 56 int myscore, i; 57 58 maxscore = myscore = 0; 59 for (i = 50; i <= maxtrs; i++) { 60 if (ptext[i].txtlen == 0) 61 continue; 62 k = 12; 63 if (i == chest) 64 k = 14; 65 if (i > chest) 66 k = 16; 67 if (prop[i] >= 0) 68 myscore += 2; 69 if (place[i] == 3 && prop[i] == 0) 70 myscore += k - 2; 71 maxscore += k; 72 } 73 myscore += (maxdie - numdie) * 10; 74 maxscore += maxdie * 10; 75 if (!(scoring || gaveup)) 76 myscore += 4; 77 maxscore += 4; 78 if (dflag != 0) 79 myscore += 25; 80 maxscore += 25; 81 if (isclosing) 82 myscore += 25; 83 maxscore += 25; 84 if (closed) { 85 if (bonus == 0) 86 myscore += 10; 87 if (bonus == 135) 88 myscore += 25; 89 if (bonus == 134) 90 myscore += 30; 91 if (bonus == 133) 92 myscore += 45; 93 } 94 maxscore += 45; 95 if (place[magazine] == 108) 96 myscore++; 97 maxscore++; 98 myscore += 2; 99 maxscore += 2; 100 for (i = 1; i <= hintmax; i++) 101 if (hinted[i]) 102 myscore -= hints[i][2]; 103 return myscore; 104} 105 106/* entry=1 means goto 13000 */ /* game is over */ 107/* entry=2 means goto 20000 */ /* 3=19000 */ 108void 109done(int entry) 110{ 111 int i, sc; 112 if (entry == 1) 113 mspeak(1); 114 if (entry == 3) 115 rspeak(136); 116 printf("\n\n\nYou scored %d out of a ", (sc = score())); 117 printf("possible %d using %d turns.\n", maxscore, turns); 118 for (i = 1; i <= classes; i++) 119 if (cval[i] >= sc) { 120 speak(&ctext[i]); 121 if (i == classes - 1) { 122 printf("To achieve the next higher rating"); 123 printf(" would be a neat trick!\n\n"); 124 printf("Congratulations!!\n"); 125 exit(0); 126 } 127 k = cval[i] + 1 - sc; 128 printf("To achieve the next higher rating, you need"); 129 printf(" %d more point", k); 130 if (k == 1) 131 printf(".\n"); 132 else 133 printf("s.\n"); 134 exit(0); 135 } 136 printf("You just went off my scale!!!\n"); 137 exit(0); 138} 139 140/* label 90 */ 141void 142die(int entry) 143{ 144 int i; 145 if (entry != 99) { 146 rspeak(23); 147 oldloc2 = loc; 148 } 149 if (isclosing) { /* 99 */ 150 rspeak(131); 151 numdie++; 152 done(2); 153 } 154 yea = yes(81 + numdie * 2, 82 + numdie * 2, 54); 155 numdie++; 156 if (numdie == maxdie || !yea) 157 done(2); 158 place[water] = 0; 159 place[oil] = 0; 160 if (toting(lamp)) 161 prop[lamp] = 0; 162 for (i = 100; i >= 1; i--) { 163 if (!toting(i)) 164 continue; 165 k = oldloc2; 166 if (i == lamp) 167 k = 1; 168 drop(i, k); 169 } 170 loc = 3; 171 oldloc = loc; 172} 173