1 /* $NetBSD: morg.c,v 1.19 2012/06/19 05:35:32 dholland Exp $ */
4 * Copyright (c) 1980, 1993
5 * The Regents of the University of California. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 #include <sys/cdefs.h>
35 static char sccsid
[] = "@(#)morg.c 8.1 (Berkeley) 5/31/93";
37 __RCSID("$NetBSD: morg.c,v 1.19 2012/06/19 05:35:32 dholland Exp $");
44 * These routines deal with mortgaging.
47 static const char *names
[MAX_PRP
+2],
48 *const morg_coms
[] = {
52 "own holdings", /* 3 */
63 "restore game", /* 14 */
67 static short square
[MAX_PRP
+2];
69 static int num_good
, got_houses
;
72 static int set_mlist(void);
74 static int set_umlist(void);
78 * This routine is the command level response the mortgage command.
79 * it gets the list of mortgageable property and asks which are to
88 if (set_mlist() == 0) {
90 printf("You can't mortgage property with "
93 printf("You don't have any un-mortgaged "
98 printf("Your only mortgageable property is %s\n",
100 if (getyn("Do you want to mortgage it? ") == 0)
104 propnum
= getinp("Which property do you want to mortgage? ",
106 if (propnum
== num_good
)
114 * This routine sets up the list of mortgageable property
122 for (op
= cur_p
->own_list
; op
; op
= op
->next
)
123 if (!op
->sqr
->desc
->morg
) {
124 if (op
->sqr
->type
== PRPTY
&& op
->sqr
->desc
->houses
)
127 names
[num_good
] = op
->sqr
->name
;
128 square
[num_good
++] = sqnum(op
->sqr
);
131 names
[num_good
++] = "done";
132 names
[num_good
--] = 0;
137 * This routine actually mortgages the property.
144 price
= board
[propnum
].cost
/2;
145 board
[propnum
].desc
->morg
= TRUE
;
146 printf("That got you $%d\n",price
);
147 cur_p
->money
+= price
;
151 * This routine is the command level repsponse to the unmortgage
152 * command. It gets the list of mortgaged property and asks which are
161 if (set_umlist() == 0) {
162 printf("You don't have any mortgaged property.\n");
166 printf("Your only mortgaged property is %s\n",
168 if (getyn("Do you want to unmortgage it? ") == 0)
172 propnum
= getinp("Which property do you want to unmortgage? ",
174 if (propnum
== num_good
)
176 unm(square
[propnum
]);
181 * This routine sets up the list of mortgaged property
189 for (op
= cur_p
->own_list
; op
; op
= op
->next
)
190 if (op
->sqr
->desc
->morg
) {
191 names
[num_good
] = op
->sqr
->name
;
192 square
[num_good
++] = sqnum(op
->sqr
);
194 names
[num_good
++] = "done";
195 names
[num_good
--] = 0;
200 * This routine actually unmortgages the property
207 price
= board
[propnum
].cost
/2;
208 board
[propnum
].desc
->morg
= FALSE
;
210 printf("That cost you $%d\n",price
);
211 cur_p
->money
-= price
;
216 * This routine forces the indebted player to fix his
217 * financial woes. It is fine to have $0 but not to be in debt.
222 told_em
= fixing
= TRUE
;
223 while (cur_p
->money
< 0) {
225 (*func
[(getinp("How are you going to fix it up? ", morg_coms
))])();