InfoMagic Source Code 1993 July/THE_SOURCE_CODE_CD_ROM.iso/bsd_srcs/games/monop/print.c

C/C++ Source or Header | 1991-04-08 | 4.7 KB | 193 lines

/*
 * 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);
        }
    }
}