Annotation of src/games/monop/rent.c, Revision 1.2
1.1 cgd 1: /*
2: * Copyright (c) 1980 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms, with or without
6: * modification, are permitted provided that the following conditions
7: * are met:
8: * 1. Redistributions of source code must retain the above copyright
9: * notice, this list of conditions and the following disclaimer.
10: * 2. Redistributions in binary form must reproduce the above copyright
11: * notice, this list of conditions and the following disclaimer in the
12: * documentation and/or other materials provided with the distribution.
13: * 3. All advertising materials mentioning features or use of this software
14: * must display the following acknowledgement:
15: * This product includes software developed by the University of
16: * California, Berkeley and its contributors.
17: * 4. Neither the name of the University nor the names of its contributors
18: * may be used to endorse or promote products derived from this software
19: * without specific prior written permission.
20: *
21: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31: * SUCH DAMAGE.
32: */
33:
34: #ifndef lint
1.2 ! mycroft 35: /*static char sccsid[] = "from: @(#)rent.c 5.3 (Berkeley) 6/1/90";*/
! 36: static char rcsid[] = "$Id: $";
1.1 cgd 37: #endif /* not lint */
38:
39: # include "monop.ext"
40:
41: /*
42: * This routine has the player pay rent
43: */
44: rent(sqp)
45: reg SQUARE *sqp; {
46:
47: reg int rnt;
48: reg PROP *pp;
49: PLAY *plp;
50:
51: plp = &play[sqp->owner];
52: printf("Owned by %s\n", plp->name);
53: if (sqp->desc->morg) {
54: lucky("The thing is mortgaged. ");
55: return;
56: }
57: switch (sqp->type) {
58: case PRPTY:
59: pp = sqp->desc;
60: if (pp->monop)
61: if (pp->houses == 0)
62: printf("rent is %d\n", rnt=pp->rent[0] * 2);
63: else if (pp->houses < 5)
64: printf("with %d houses, rent is %d\n",
65: pp->houses, rnt=pp->rent[pp->houses]);
66: else
67: printf("with a hotel, rent is %d\n",
68: rnt=pp->rent[pp->houses]);
69: else
70: printf("rent is %d\n", rnt = pp->rent[0]);
71: break;
72: case RR:
73: rnt = 25;
74: rnt <<= (plp->num_rr - 1);
75: if (spec)
76: rnt <<= 1;
77: printf("rent is %d\n", rnt);
78: break;
79: case UTIL:
80: rnt = roll(2, 6);
81: if (plp->num_util == 2 || spec) {
82: printf("rent is 10 * roll (%d) = %d\n", rnt, rnt * 10);
83: rnt *= 10;
84: }
85: else {
86: printf("rent is 4 * roll (%d) = %d\n", rnt, rnt * 4);
87: rnt *= 4;
88: }
89: break;
90: }
91: cur_p->money -= rnt;
92: plp->money += rnt;
93: }
CVSweb <webmaster@jp.NetBSD.org>