end.c revision 1.4 1 1.4 cgd /* $NetBSD: end.c,v 1.4 1995/03/24 05:01:30 cgd 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.1 cgd #ifndef lint
37 1.4 cgd #if 0
38 1.4 cgd static char sccsid[] = "@(#)end.c 8.1 (Berkeley) 5/31/93";
39 1.4 cgd #else
40 1.4 cgd static char rcsid[] = "$NetBSD: end.c,v 1.4 1995/03/24 05:01:30 cgd Exp $";
41 1.4 cgd #endif
42 1.1 cgd #endif /* not lint */
43 1.1 cgd
44 1.1 cgd # include "mille.h"
45 1.1 cgd
46 1.1 cgd /*
47 1.1 cgd * @(#)end.c 1.1 (Berkeley) 4/1/82
48 1.1 cgd */
49 1.1 cgd
50 1.1 cgd /*
51 1.1 cgd * print out the score as if it was final, and add the totals for
52 1.1 cgd * the end-of-games points to the user who deserves it (if any).
53 1.1 cgd */
54 1.1 cgd finalscore(pp)
55 1.1 cgd reg PLAY *pp; {
56 1.1 cgd
57 1.1 cgd reg int temp, tot, num;
58 1.1 cgd
59 1.1 cgd if (pp->was_finished == Finished)
60 1.1 cgd return;
61 1.1 cgd
62 1.1 cgd pp->was_finished = Finished;
63 1.1 cgd num = pp - Player;
64 1.1 cgd temp = num * 6 + 21 + 1;
65 1.1 cgd for (tot = 5; tot <= 9; tot++)
66 1.1 cgd mvaddstr(tot, temp, " 0");
67 1.1 cgd if (pp->mileage == End) {
68 1.1 cgd mvaddstr(5, temp, "40");
69 1.1 cgd tot = SC_TRIP;
70 1.1 cgd if (pp->nummiles[C_200] == 0) {
71 1.1 cgd mvaddstr(6, temp, "30");
72 1.1 cgd tot = SC_TRIP + SC_SAFE;
73 1.1 cgd }
74 1.1 cgd if (Topcard <= Deck) {
75 1.1 cgd mvaddstr(7, temp, "30");
76 1.1 cgd tot += SC_DELAY;
77 1.1 cgd }
78 1.1 cgd if (End == 1000) {
79 1.1 cgd mvaddstr(8, temp, "20");
80 1.1 cgd tot += SC_EXTENSION;
81 1.1 cgd }
82 1.1 cgd if (Player[other(num)].mileage == 0) {
83 1.1 cgd mvaddstr(9, temp, "50");
84 1.1 cgd tot += SC_SHUT_OUT;
85 1.1 cgd }
86 1.1 cgd pp->total += tot;
87 1.1 cgd pp->hand_tot += tot;
88 1.1 cgd }
89 1.1 cgd }
90 1.1 cgd
91 1.1 cgd # ifdef EXTRAP
92 1.1 cgd static int Last_tot[2]; /* last tot used for extrapolate */
93 1.1 cgd
94 1.1 cgd /*
95 1.1 cgd * print out the score as if it was final, and add the totals for
96 1.1 cgd * the end-of-games points to the user who deserves it (if any).
97 1.1 cgd */
98 1.1 cgd extrapolate(pp)
99 1.1 cgd reg PLAY *pp; {
100 1.1 cgd
101 1.1 cgd reg int x, num, tot, count;
102 1.1 cgd
103 1.1 cgd num = pp - Player;
104 1.1 cgd tot += SC_TRIP + SC_DELAY + SC_EXT;
105 1.1 cgd x = num * 6 + 21 + 3;
106 1.1 cgd for (tot = 5; tot <= 9; tot++)
107 1.1 cgd mvaddch(tot, x, '0');
108 1.1 cgd x -= 2;
109 1.1 cgd pp = &Player[other(num)];
110 1.1 cgd for (count = 0, tot = 0; tot < NUM_SAFE; tot++)
111 1.1 cgd if (pp->safety[tot] != S_PLAYED)
112 1.1 cgd count += SC_SAFE;
113 1.1 cgd mvprintw(3, x, "%3d", count);
114 1.1 cgd tot += count;
115 1.1 cgd if (count == 400) {
116 1.1 cgd mvaddstr(4, x, "30");
117 1.1 cgd tot += SC_ALL_SAFE;
118 1.1 cgd }
119 1.1 cgd pp = &Player[num];
120 1.1 cgd for (count = 0, tot = 0; tot < NUM_SAFE; tot++)
121 1.1 cgd if (pp->safety[tot] != S_PLAYED)
122 1.1 cgd count += SC_COUP / 10;
123 1.1 cgd mvprintw(4, x - 1, "%3d", count);
124 1.1 cgd tot += count;
125 1.1 cgd tot += 1000 - pp->mileage;
126 1.1 cgd mvaddstr(5, x, "40");
127 1.1 cgd mvaddstr(7, x, "30");
128 1.1 cgd mvaddstr(8, x, "20");
129 1.1 cgd if (pp->nummiles[C_200] == 0) {
130 1.1 cgd mvaddstr(6, x, "30");
131 1.1 cgd tot = SC_TRIP + SC_SAFE;
132 1.1 cgd }
133 1.1 cgd if (Player[other(num)].mileage == 0) {
134 1.1 cgd mvaddstr(9, x, "50");
135 1.1 cgd tot += SC_SHUT_OUT;
136 1.1 cgd }
137 1.1 cgd pp->total += tot;
138 1.1 cgd pp->hand_tot += tot;
139 1.1 cgd Last_tot[num] = tot;
140 1.1 cgd }
141 1.1 cgd
142 1.1 cgd undoex() {
143 1.1 cgd
144 1.1 cgd reg PLAY *pp;
145 1.1 cgd reg int i;
146 1.1 cgd
147 1.1 cgd i = 0;
148 1.1 cgd for (pp = Player; pp < &Player[2]; pp++) {
149 1.1 cgd pp->total -= Last_tot[i];
150 1.1 cgd pp->hand_tot -= Last_tot[i++];
151 1.1 cgd }
152 1.1 cgd }
153 1.1 cgd # endif
154 1.1 cgd
155