1 1.9 dholland /* $NetBSD: rent.c,v 1.9 2012/06/19 05:35:32 dholland Exp $ */ 2 1.3 cgd 3 1.1 cgd /* 4 1.3 cgd * Copyright (c) 1980, 1993 5 1.3 cgd * 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.6 agc * 3. Neither the name of the University nor the names of its contributors 16 1.1 cgd * may be used to endorse or promote products derived from this software 17 1.1 cgd * without specific prior written permission. 18 1.1 cgd * 19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 1.1 cgd * SUCH DAMAGE. 30 1.1 cgd */ 31 1.1 cgd 32 1.4 christos #include <sys/cdefs.h> 33 1.1 cgd #ifndef lint 34 1.3 cgd #if 0 35 1.3 cgd static char sccsid[] = "@(#)rent.c 8.1 (Berkeley) 5/31/93"; 36 1.3 cgd #else 37 1.9 dholland __RCSID("$NetBSD: rent.c,v 1.9 2012/06/19 05:35:32 dholland Exp $"); 38 1.3 cgd #endif 39 1.1 cgd #endif /* not lint */ 40 1.1 cgd 41 1.8 dholland #include "monop.h" 42 1.1 cgd 43 1.1 cgd /* 44 1.1 cgd * This routine has the player pay rent 45 1.1 cgd */ 46 1.4 christos void 47 1.9 dholland rent(SQUARE *sqp) 48 1.4 christos { 49 1.5 simonb int rnt = 0; 50 1.5 simonb PROP *pp; 51 1.5 simonb PLAY *plp; 52 1.1 cgd 53 1.1 cgd plp = &play[sqp->owner]; 54 1.1 cgd printf("Owned by %s\n", plp->name); 55 1.1 cgd if (sqp->desc->morg) { 56 1.1 cgd lucky("The thing is mortgaged. "); 57 1.1 cgd return; 58 1.1 cgd } 59 1.1 cgd switch (sqp->type) { 60 1.1 cgd case PRPTY: 61 1.1 cgd pp = sqp->desc; 62 1.1 cgd if (pp->monop) 63 1.1 cgd if (pp->houses == 0) 64 1.1 cgd printf("rent is %d\n", rnt=pp->rent[0] * 2); 65 1.1 cgd else if (pp->houses < 5) 66 1.7 dholland printf("with %d house%s, rent is %d\n", 67 1.7 dholland pp->houses, pp->houses == 1 ? "" : "s", 68 1.7 dholland rnt=pp->rent[pp->houses]); 69 1.1 cgd else 70 1.1 cgd printf("with a hotel, rent is %d\n", 71 1.1 cgd rnt=pp->rent[pp->houses]); 72 1.1 cgd else 73 1.1 cgd printf("rent is %d\n", rnt = pp->rent[0]); 74 1.1 cgd break; 75 1.1 cgd case RR: 76 1.1 cgd rnt = 25; 77 1.1 cgd rnt <<= (plp->num_rr - 1); 78 1.1 cgd if (spec) 79 1.1 cgd rnt <<= 1; 80 1.1 cgd printf("rent is %d\n", rnt); 81 1.1 cgd break; 82 1.1 cgd case UTIL: 83 1.1 cgd rnt = roll(2, 6); 84 1.1 cgd if (plp->num_util == 2 || spec) { 85 1.1 cgd printf("rent is 10 * roll (%d) = %d\n", rnt, rnt * 10); 86 1.1 cgd rnt *= 10; 87 1.1 cgd } 88 1.1 cgd else { 89 1.1 cgd printf("rent is 4 * roll (%d) = %d\n", rnt, rnt * 4); 90 1.1 cgd rnt *= 4; 91 1.1 cgd } 92 1.1 cgd break; 93 1.1 cgd } 94 1.1 cgd cur_p->money -= rnt; 95 1.1 cgd plp->money += rnt; 96 1.1 cgd } 97