2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
4 * Ken Stevens, Steve McClure
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 * See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23 * related information and legal notices. It is expected that any future
24 * projects/authors will amend these files as needed.
28 * mark.c: Display report for commodities
30 * Known contributors to this file:
40 #include "commodity.h"
50 pr("The market is disabled.\n");
53 if (player->argp[1] && *(player->argp[1]))
54 return display_mark(player->argp[1]);
56 return display_mark(" ");
60 pr_mark(struct comstr *comm)
66 tleft = MARK_DELAY / 3600.0 - (now - comm->com_markettime) / 3600.0;
69 pr(" %3d $%12.2f %2d %5.2f hrs (%3d) %c %6d ",
73 tleft, comm->com_owner, comm->com_type, comm->com_amount);
74 if (comm->com_owner == player->cnum || player->god)
75 pr("%s", xyas(comm->sell_x, comm->sell_y, player->cnum));
80 display_mark(s_char *arg)
90 int cheapest_items[I_MAX + 2];
94 /* First, we execute all trades, so that we can only buy what is available. */
98 p = getstarg(arg, "What commodity (or 'all')? ", buf);
102 for (ip = &ichr[0]; ip && ip->i_mnem; ip++)
107 pr("\n Empire Market Report\n ");
109 pr(" lot high bid/unit by time left owner item amount sector\n");
110 pr(" --- ------------- -- --------- ----- ---- ------ ------\n");
113 if (strcmp(arg, "all"))
117 /* Ok, just printing the lowest of all of them */
118 for (i = 0; i < I_MAX + 2; i++)
119 cheapest_items[i] = -1;
120 for (sellers = 0; getcomm(sellers, &comm); sellers++) {
121 if (comm.com_owner == 0)
123 for (i = 0, ip = &ichr[0]; ip && ip->i_mnem; ip++, i++)
124 if (ip->i_mnem == comm.com_type)
128 if (cheapest_items[i] != -1) {
129 getcomm(cheapest_items[i], &comm2);
130 if (comm.com_price < comm2.com_price) {
131 cheapest_items[i] = sellers;
134 cheapest_items[i] = sellers;
137 for (i = 0; i < I_MAX + 2; i++) {
138 if (cheapest_items[i] == -1)
140 getcomm(cheapest_items[i], &comm);
145 /* Ok, print them all, or all of this type */
146 for (sellers = 0; getcomm(sellers, &comm); sellers++) {
147 if (comm.com_owner == 0)
149 if (c && comm.com_type != c)
156 pr("\nHmmmm, the market seems to be empty today.\n");
158 pr("\nLooks just like Christmas at K-mart, doesn't it!\n");