1 /* $NetBSD: trade.c,v 1.16 2012/06/19 05:35:32 dholland Exp $ */
4 * Copyright (c) 1980, 1993
5 * The Regents of the University of California. All rights reserved.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 #include <sys/cdefs.h>
35 static char sccsid
[] = "@(#)trade.c 8.1 (Berkeley) 5/31/93";
37 __RCSID("$NetBSD: trade.c,v 1.16 2012/06/19 05:35:32 dholland Exp $");
43 struct trd_st
{ /* how much to give to other player */
44 int trader
; /* trader number */
45 int cash
; /* amount of cash */
46 int gojf
; /* # get-out-of-jail-free cards */
47 OWN
*prop_list
; /* property list */
50 typedef struct trd_st TRADE
;
52 static const char *plist
[MAX_PRP
+2];
54 static int used
[MAX_PRP
];
56 static TRADE trades
[2];
58 static void get_list(int, int );
59 static int set_list(OWN
*);
60 static void summate(void);
61 static void do_trade(void);
62 static void move_em(TRADE
*, TRADE
*);
70 for (i
= 0; i
< 2; i
++) {
72 trades
[i
].gojf
= FALSE
;
73 trades
[i
].prop_list
= NULL
;
77 printf("There ain't no-one around to trade WITH!!\n");
81 tradee
= getinp("Which player do you wish to trade with? ",
83 if (tradee
== num_play
)
85 if (tradee
== player
) {
86 printf("You can't trade with yourself!\n");
94 if (getyn("Do you wish a summary? ") == 0)
96 if (getyn("Is the trade ok? ") == 0)
101 * This routine gets the list of things to be trader for the
102 * player, and puts in the structure given.
105 get_list(int struct_no
, int play_no
)
109 int numin
, propnum
, num_prp
;
113 for (numin
= 0; numin
< MAX_PRP
; numin
++)
115 sn
= struct_no
, pn
= play_no
;
119 printf("player %s (%d):\n", pp
->name
, pn
+1);
121 numin
= set_list(pp
->own_list
);
122 for (num_prp
= numin
; num_prp
; ) {
123 propnum
=getinp("Which property do you wish to trade? ",
125 if (propnum
== numin
)
127 else if (used
[propnum
])
128 printf("You've already allocated that.\n");
131 used
[propnum
] = TRUE
;
132 for (op
= pp
->own_list
; propnum
--; op
= op
->next
)
134 add_list(pn
, &(tp
->prop_list
), sqnum(op
->sqr
));
139 printf("You have $%d. ", pp
->money
);
140 tp
->cash
= get_int("How much are you trading? ");
142 if (pp
->num_gojf
> 0) {
144 printf("You have %d get-out-of-jail-free cards. ",pp
->num_gojf
);
145 tp
->gojf
= get_int("How many are you trading? ");
146 if (tp
->gojf
> pp
->num_gojf
) {
147 printf("You don't have that many. Try again.\n");
154 * This routine sets up the list of tradable property.
157 set_list(OWN
*the_list
)
163 for (op
= the_list
; op
; op
= op
->next
)
165 plist
[i
++] = op
->sqr
->name
;
172 * This routine summates the trade.
182 for (i
= 0; i
< 2; i
++) {
185 printf("Player %s (%d) gives:\n", play
[tp
->trader
].name
,
188 printf("\t$%d\n", tp
->cash
), some
++;
190 printf("\t%d get-out-of-jail-free card(s)\n", tp
->gojf
),
193 for (op
= tp
->prop_list
; op
; op
= op
->next
)
194 putchar('\t'), printsq(sqnum(op
->sqr
), TRUE
);
198 printf("\t-- Nothing --\n");
203 * This routine actually executes the trade.
208 move_em(&trades
[0], &trades
[1]);
209 move_em(&trades
[1], &trades
[0]);
213 * This routine does a switch from one player to another
216 move_em(TRADE
*from
, TRADE
*to
)
221 pl_fr
= &play
[from
->trader
];
222 pl_to
= &play
[to
->trader
];
224 pl_fr
->money
-= from
->cash
;
225 pl_to
->money
+= from
->cash
;
226 pl_fr
->num_gojf
-= from
->gojf
;
227 pl_to
->num_gojf
+= from
->gojf
;
228 for (op
= from
->prop_list
; op
; op
= op
->next
) {
229 add_list(to
->trader
, &(pl_to
->own_list
), sqnum(op
->sqr
));
230 op
->sqr
->owner
= to
->trader
;
231 del_list(from
->trader
, &(pl_fr
->own_list
), sqnum(op
->sqr
));
233 set_ownlist(to
->trader
);
237 * This routine lets a player resign
246 if (cur_p
->money
<= 0) {
247 switch (board
[cur_p
->loc
].type
) {
251 new_own
= board
[cur_p
->loc
].owner
;
252 /* If you ran out of money by buying current location */
253 if (new_own
== player
)
256 default: /* Chance, taxes, etc */
260 if (new_own
== num_play
)
261 printf("You would resign to the bank\n");
263 printf("You would resign to %s\n", name_list
[new_own
]);
265 else if (num_play
== 1) {
267 printf("You would resign to the bank\n");
270 name_list
[num_play
] = "bank";
272 new_own
= getinp("Who do you wish to resign to? ",
274 if (new_own
== player
)
275 printf("You can't resign to yourself!!\n");
276 } while (new_own
== player
);
277 name_list
[num_play
] = "done";
279 if (getyn("Do you really want to resign? ") != 0)
282 printf("Then NOBODY wins (not even YOU!)\n");
285 if (new_own
< num_play
) { /* resign to player */
286 printf("resigning to player\n");
287 trades
[0].trader
= new_own
;
288 trades
[0].cash
= trades
[0].gojf
= 0;
289 trades
[0].prop_list
= NULL
;
290 trades
[1].trader
= player
;
291 trades
[1].cash
= cur_p
->money
> 0 ? cur_p
->money
: 0;
292 trades
[1].gojf
= cur_p
->num_gojf
;
293 trades
[1].prop_list
= cur_p
->own_list
;
296 else { /* resign to bank */
297 printf("resigning to bank\n");
298 for (op
= cur_p
->own_list
; op
; op
= op
->next
) {
301 sqp
->desc
->morg
= FALSE
;
302 if (sqp
->type
== PRPTY
) {
303 is_not_monop(sqp
->desc
->mon_desc
);
304 sqp
->desc
->houses
= 0;
310 free(play
[player
].name
);
311 for (i
= player
; i
< num_play
; i
++) {
312 name_list
[i
] = name_list
[i
+1];
313 if (i
+ 1 < num_play
)
316 name_list
[num_play
--] = NULL
;
317 for (i
= 0; i
< N_SQRS
; i
++)
318 if (board
[i
].owner
> player
)
320 player
= player
== 0 ? num_play
- 1 : player
- 1;
323 printf("\nThen %s WINS!!!!!\n", play
[0].name
);
325 printf("That's a grand worth of $%d.\n",
326 play
[0].money
+prop_worth(&play
[0]));