initial import of 386bsd-0.1 sources

1 files changed, 192 insertions, 0 deletions

diff --git a/monop/print.c b/monop/print.c
new file mode 100644
index 00000000..6c91a5ec
--- /dev/null
+++ b/monop/print.c
@@ -0,0 +1,192 @@
+/*
+ * Copyright (c) 1980 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
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 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
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)print.c	5.4 (Berkeley) 6/1/90";
+#endif /* not lint */
+
+# include	"monop.ext"
+
+static char	buf[80],		/* output buffer		*/
+		*header	= "Name      Own      Price Mg # Rent";
+
+/*
+ *	This routine prints out the current board
+ */
+printboard() {
+
+	reg int	i;
+
+	printf("%s\t%s\n", header, header);
+	for (i = 0; i < N_SQRS/2; i++) {
+		printsq(i, FALSE);
+		putchar('\t');
+		printsq(i+N_SQRS/2, TRUE);
+	}
+}
+/*
+ *	This routine lists where each player is.
+ */
+where() {
+
+	reg int	i;
+	char	*bsp;
+
+	printf("%s Player\n", header);
+	for (i = 0; i < num_play; i++) {
+		printsq(play[i].loc, FALSE);
+		printf(" %s (%d)", play[i].name, i+1);
+		if (cur_p == &play[i])
+			printf(" *");
+		putchar('\n');
+	}
+}
+/*
+ *	This routine prints out an individual square
+ */
+printsq(sqn, eoln)
+int		sqn;
+reg bool	eoln; {
+
+	reg int		rnt;
+	reg PROP	*pp;
+	reg SQUARE	*sqp;
+	int		i;
+
+	sqp = &board[sqn];
+	printf("%-10.10s", sqp->name);
+	switch (sqp->type) {
+	  case SAFE:
+	  case CC:
+	  case CHANCE:
+	  case INC_TAX:
+	  case GOTO_J:
+	  case LUX_TAX:
+	  case IN_JAIL:
+spec:
+		if (!eoln)
+			printf("                        ");
+		break;
+	  case PRPTY:
+		pp = sqp->desc;
+		if (sqp->owner < 0) {
+			printf(" - %-8.8s %3d", pp->mon_desc->name, sqp->cost);
+			if (!eoln)
+				printf("         ");
+			break;
+		}
+		printf(" %d %-8.8s %3d", sqp->owner+1, pp->mon_desc->name,
+			sqp->cost);
+		printmorg(sqp);
+		if (pp->monop) {
+			if (pp->houses < 5)
+				if (pp->houses > 0)
+					printf("%d %4d", pp->houses,
+						pp->rent[pp->houses]);
+				else
+					printf("0 %4d", pp->rent[0] * 2);
+			else
+				printf("H %4d", pp->rent[5]);
+		}
+		else
+			printf("  %4d", pp->rent[0]);
+		break;
+	  case UTIL:
+		if (sqp->owner < 0) {
+			printf(" -          150");
+			if (!eoln)
+				printf("         ");
+			break;
+		}
+		printf(" %d          150", sqp->owner+1);
+		printmorg(sqp);
+		printf("%d", play[sqp->owner].num_util);
+		if (!eoln)
+			printf("    ");
+		break;
+	  case RR:
+		if (sqp->owner < 0) {
+			printf(" - Railroad 200");
+			if (!eoln)
+				printf("         ");
+			break;
+		}
+		printf(" %d Railroad 200", sqp->owner+1);
+		printmorg(sqp);
+		rnt = 25;
+		rnt <<= play[sqp->owner].num_rr - 1;
+		printf("%d %4d", play[sqp->owner].num_rr, 25 << (play[sqp->owner].num_rr - 1));
+		break;
+	}
+	if (eoln)
+		putchar('\n');
+}
+/*
+ *	This routine prints out the mortgage flag.
+ */
+printmorg(sqp)
+reg SQUARE	*sqp; {
+
+	if (sqp->desc->morg)
+		printf(" * ");
+	else
+		printf("   ");
+}
+/*
+ *	This routine lists the holdings of the player given
+ */
+printhold(pl)
+reg int	pl; {
+
+	reg OWN		*op;
+	reg PLAY	*pp;
+	char		*bsp;
+
+	pp = &play[pl];
+	printf("%s's (%d) holdings (Total worth: $%d):\n", name_list[pl], pl+1,
+		pp->money + prop_worth(pp));
+	printf("\t$%d", pp->money);
+	if (pp->num_gojf) {
+		printf(", %d get-out-of-jail-free card", pp->num_gojf);
+		if (pp->num_gojf > 1)
+			putchar('s');
+	}
+	putchar('\n');
+	if (pp->own_list) {
+		printf("\t%s\n", header);
+		for (op = pp->own_list; op; op = op->next) {
+			putchar('\t');
+			printsq(sqnum(op->sqr), TRUE);
+		}
+	}
+}