end.c revision 1.6 1 1.6 lukem /* $NetBSD: end.c,v 1.6 1997/10/12 00:53:51 lukem Exp $ */
2 1.4 cgd
3 1.1 cgd /*
4 1.3 jtc * Copyright (c) 1982, 1993
5 1.3 jtc * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.6 lukem #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.4 cgd #if 0
39 1.4 cgd static char sccsid[] = "@(#)end.c 8.1 (Berkeley) 5/31/93";
40 1.4 cgd #else
41 1.6 lukem __RCSID("$NetBSD: end.c,v 1.6 1997/10/12 00:53:51 lukem Exp $");
42 1.4 cgd #endif
43 1.1 cgd #endif /* not lint */
44 1.1 cgd
45 1.1 cgd # include "mille.h"
46 1.1 cgd
47 1.1 cgd /*
48 1.1 cgd * @(#)end.c 1.1 (Berkeley) 4/1/82
49 1.1 cgd */
50 1.1 cgd
51 1.1 cgd /*
52 1.1 cgd * print out the score as if it was final, and add the totals for
53 1.1 cgd * the end-of-games points to the user who deserves it (if any).
54 1.1 cgd */
55 1.6 lukem void
56 1.1 cgd finalscore(pp)
57 1.6 lukem PLAY *pp;
58 1.5 jtc {
59 1.6 lukem int temp, tot, num;
60 1.1 cgd
61 1.1 cgd if (pp->was_finished == Finished)
62 1.1 cgd return;
63 1.1 cgd
64 1.1 cgd pp->was_finished = Finished;
65 1.1 cgd num = pp - Player;
66 1.1 cgd temp = num * 6 + 21 + 1;
67 1.1 cgd for (tot = 5; tot <= 9; tot++)
68 1.1 cgd mvaddstr(tot, temp, " 0");
69 1.1 cgd if (pp->mileage == End) {
70 1.1 cgd mvaddstr(5, temp, "40");
71 1.1 cgd tot = SC_TRIP;
72 1.1 cgd if (pp->nummiles[C_200] == 0) {
73 1.1 cgd mvaddstr(6, temp, "30");
74 1.1 cgd tot = SC_TRIP + SC_SAFE;
75 1.1 cgd }
76 1.1 cgd if (Topcard <= Deck) {
77 1.1 cgd mvaddstr(7, temp, "30");
78 1.1 cgd tot += SC_DELAY;
79 1.1 cgd }
80 1.1 cgd if (End == 1000) {
81 1.1 cgd mvaddstr(8, temp, "20");
82 1.1 cgd tot += SC_EXTENSION;
83 1.1 cgd }
84 1.1 cgd if (Player[other(num)].mileage == 0) {
85 1.1 cgd mvaddstr(9, temp, "50");
86 1.1 cgd tot += SC_SHUT_OUT;
87 1.1 cgd }
88 1.1 cgd pp->total += tot;
89 1.1 cgd pp->hand_tot += tot;
90 1.1 cgd }
91 1.1 cgd }
92 1.1 cgd
93 1.1 cgd # ifdef EXTRAP
94 1.1 cgd static int Last_tot[2]; /* last tot used for extrapolate */
95 1.1 cgd
96 1.1 cgd /*
97 1.1 cgd * print out the score as if it was final, and add the totals for
98 1.1 cgd * the end-of-games points to the user who deserves it (if any).
99 1.1 cgd */
100 1.1 cgd extrapolate(pp)
101 1.1 cgd reg PLAY *pp; {
102 1.1 cgd
103 1.1 cgd reg int x, num, tot, count;
104 1.1 cgd
105 1.1 cgd num = pp - Player;
106 1.1 cgd tot += SC_TRIP + SC_DELAY + SC_EXT;
107 1.1 cgd x = num * 6 + 21 + 3;
108 1.1 cgd for (tot = 5; tot <= 9; tot++)
109 1.1 cgd mvaddch(tot, x, '0');
110 1.1 cgd x -= 2;
111 1.1 cgd pp = &Player[other(num)];
112 1.1 cgd for (count = 0, tot = 0; tot < NUM_SAFE; tot++)
113 1.1 cgd if (pp->safety[tot] != S_PLAYED)
114 1.1 cgd count += SC_SAFE;
115 1.1 cgd mvprintw(3, x, "%3d", count);
116 1.1 cgd tot += count;
117 1.1 cgd if (count == 400) {
118 1.1 cgd mvaddstr(4, x, "30");
119 1.1 cgd tot += SC_ALL_SAFE;
120 1.1 cgd }
121 1.1 cgd pp = &Player[num];
122 1.1 cgd for (count = 0, tot = 0; tot < NUM_SAFE; tot++)
123 1.1 cgd if (pp->safety[tot] != S_PLAYED)
124 1.1 cgd count += SC_COUP / 10;
125 1.1 cgd mvprintw(4, x - 1, "%3d", count);
126 1.1 cgd tot += count;
127 1.1 cgd tot += 1000 - pp->mileage;
128 1.1 cgd mvaddstr(5, x, "40");
129 1.1 cgd mvaddstr(7, x, "30");
130 1.1 cgd mvaddstr(8, x, "20");
131 1.1 cgd if (pp->nummiles[C_200] == 0) {
132 1.1 cgd mvaddstr(6, x, "30");
133 1.1 cgd tot = SC_TRIP + SC_SAFE;
134 1.1 cgd }
135 1.1 cgd if (Player[other(num)].mileage == 0) {
136 1.1 cgd mvaddstr(9, x, "50");
137 1.1 cgd tot += SC_SHUT_OUT;
138 1.1 cgd }
139 1.1 cgd pp->total += tot;
140 1.1 cgd pp->hand_tot += tot;
141 1.1 cgd Last_tot[num] = tot;
142 1.1 cgd }
143 1.1 cgd
144 1.1 cgd undoex() {
145 1.1 cgd
146 1.1 cgd reg PLAY *pp;
147 1.1 cgd reg int i;
148 1.1 cgd
149 1.1 cgd i = 0;
150 1.1 cgd for (pp = Player; pp < &Player[2]; pp++) {
151 1.1 cgd pp->total -= Last_tot[i];
152 1.1 cgd pp->hand_tot -= Last_tot[i++];
153 1.1 cgd }
154 1.1 cgd }
155 1.1 cgd # endif
156