+/* $NetBSD: morg.c,v 1.18 2008/02/24 06:07:06 dholland Exp $ */
+
/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.
+ * Copyright (c) 1980, 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
* 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
+ * 3. 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.
*
* SUCH DAMAGE.
*/
+#include <sys/cdefs.h>
#ifndef lint
-/*static char sccsid[] = "from: @(#)morg.c 5.3 (Berkeley) 6/1/90";*/
-static char rcsid[] = "$Id: morg.c,v 1.2 1993/08/01 18:53:34 mycroft Exp $";
+#if 0
+static char sccsid[] = "@(#)morg.c 8.1 (Berkeley) 5/31/93";
+#else
+__RCSID("$NetBSD: morg.c,v 1.18 2008/02/24 06:07:06 dholland Exp $");
+#endif
#endif /* not lint */
-# include "monop.ext"
+#include "monop.h"
/*
* These routines deal with mortgaging.
*/
-static char *names[MAX_PRP+2],
- *morg_coms[] = {
+static const char *names[MAX_PRP+2],
+ *const morg_coms[] = {
"quit", /* 0 */
"print", /* 1 */
"where", /* 2 */
"own holdings", /* 3 */
"holdings", /* 4 */
- "shell", /* 5 */
- "mortgage", /* 6 */
- "unmortgage", /* 7 */
- "buy", /* 8 */
- "sell", /* 9 */
- "card", /* 10 */
- "pay", /* 11 */
- "trade", /* 12 */
- "resign", /* 13 */
- "save game", /* 14 */
- "restore game", /* 15 */
+ "mortgage", /* 5 */
+ "unmortgage", /* 6 */
+ "buy", /* 7 */
+ "sell", /* 8 */
+ "card", /* 9 */
+ "pay", /* 10 */
+ "trade", /* 11 */
+ "resign", /* 12 */
+ "save game", /* 13 */
+ "restore game", /* 14 */
0
};
-static shrt square[MAX_PRP+2];
+static short square[MAX_PRP+2];
+
+static int num_good, got_houses;
+
-static int num_good,got_houses;
+static int set_mlist(void);
+static void m(int);
+static int set_umlist(void);
+static void unm(int);
/*
* This routine is the command level response the mortgage command.
* it gets the list of mortgageable property and asks which are to
* be mortgaged.
*/
-mortgage() {
-
- reg int prop;
+void
+mortgage()
+{
+ int propnum;
for (;;) {
if (set_mlist() == 0) {
if (got_houses)
- printf("You can't mortgage property with houses on it.\n");
+ printf("You can't mortgage property with "
+ "houses on it.\n");
else
- printf("You don't have any un-mortgaged property.\n");
+ printf("You don't have any un-mortgaged "
+ "property.\n");
return;
}
if (num_good == 1) {
- printf("Your only mortageable property is %s\n",names[0]);
+ printf("Your only mortgageable property is %s\n",
+ names[0]);
if (getyn("Do you want to mortgage it? ") == 0)
m(square[0]);
return;
}
- prop = getinp("Which property do you want to mortgage? ",names);
- if (prop == num_good)
+ propnum = getinp("Which property do you want to mortgage? ",
+ names);
+ if (propnum == num_good)
return;
- m(square[prop]);
- notify(cur_p);
+ m(square[propnum]);
+ notify();
}
}
+
/*
* This routine sets up the list of mortgageable property
*/
-set_mlist() {
-
- reg OWN *op;
+static int
+set_mlist()
+{
+ OWN *op;
num_good = 0;
for (op = cur_p->own_list; op; op = op->next)
- if (!op->sqr->desc->morg)
+ if (!op->sqr->desc->morg) {
if (op->sqr->type == PRPTY && op->sqr->desc->houses)
got_houses++;
else {
names[num_good] = op->sqr->name;
square[num_good++] = sqnum(op->sqr);
}
+ }
names[num_good++] = "done";
names[num_good--] = 0;
return num_good;
}
+
/*
* This routine actually mortgages the property.
*/
-m(prop)
-reg int prop; {
-
- reg int price;
-
- price = board[prop].cost/2;
- board[prop].desc->morg = TRUE;
+static void
+m(propnum)
+ int propnum;
+{
+ int price;
+
+ price = board[propnum].cost/2;
+ board[propnum].desc->morg = TRUE;
printf("That got you $%d\n",price);
cur_p->money += price;
}
+
/*
* This routine is the command level repsponse to the unmortgage
* command. It gets the list of mortgaged property and asks which are
* to be unmortgaged.
*/
-unmortgage() {
-
- reg int prop;
+void
+unmortgage()
+{
+ int propnum;
for (;;) {
if (set_umlist() == 0) {
return;
}
if (num_good == 1) {
- printf("Your only mortaged property is %s\n",names[0]);
+ printf("Your only mortgaged property is %s\n",
+ names[0]);
if (getyn("Do you want to unmortgage it? ") == 0)
unm(square[0]);
return;
}
- prop = getinp("Which property do you want to unmortgage? ",names);
- if (prop == num_good)
+ propnum = getinp("Which property do you want to unmortgage? ",
+ names);
+ if (propnum == num_good)
return;
- unm(square[prop]);
+ unm(square[propnum]);
}
}
+
/*
* This routine sets up the list of mortgaged property
*/
-set_umlist() {
-
- reg OWN *op;
+static int
+set_umlist()
+{
+ OWN *op;
num_good = 0;
for (op = cur_p->own_list; op; op = op->next)
names[num_good--] = 0;
return num_good;
}
+
/*
* This routine actually unmortgages the property
*/
-unm(prop)
-reg int prop; {
+static void
+unm(int propnum)
+{
+ int price;
- reg int price;
-
- price = board[prop].cost/2;
- board[prop].desc->morg = FALSE;
+ price = board[propnum].cost/2;
+ board[propnum].desc->morg = FALSE;
price += price/10;
printf("That cost you $%d\n",price);
cur_p->money -= price;
- set_umlist();
+ (void)set_umlist();
}
+
/*
* This routine forces the indebted player to fix his
- * financial woes.
+ * financial woes. It is fine to have $0 but not to be in debt.
*/
-force_morg() {
-
+void
+force_morg(void)
+{
told_em = fixing = TRUE;
- while (cur_p->money <= 0)
- fix_ex(getinp("How are you going to fix it up? ",morg_coms));
+ while (cur_p->money < 0) {
+ told_em = FALSE;
+ (*func[(getinp("How are you going to fix it up? ", morg_coms))])();
+ notify();
+ }
fixing = FALSE;
}
-/*
- * This routine is a special execute for the force_morg routine
- */
-fix_ex(com_num)
-reg int com_num; {
-
- told_em = FALSE;
- (*func[com_num])();
- notify();
-}