2 * Empire - A multi-player, client/server Internet based war game.
3 * Copyright (C) 1986-2015, Dave Pare, Jeff Bailey, Thomas Ruschak,
4 * Ken Stevens, Steve McClure, Markus Armbruster
6 * Empire 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 3 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, see <http://www.gnu.org/licenses/>.
21 * See files README, COPYING and CREDITS in the root of the source
22 * tree for related information and legal notices. It is expected
23 * that future projects/authors will amend these files as needed.
27 * mark.c: Display report for commodities
29 * Known contributors to this file:
33 * Markus Armbruster, 2004-2013
39 #include "commodity.h"
51 pr("The market is disabled.\n");
55 if (player->argp[1]) {
56 p = getstarg(player->argp[1], "What commodity (or 'all')? ", buf);
59 if (!strcmp(p, "all"))
60 return display_mark(I_NONE, 0);
65 return display_mark(ip->i_uid, 0);
68 return display_mark(I_NONE, 1);
72 pr_mark(struct comstr *comm)
77 tleft = comm->com_markettime + MARK_DELAY - now;
80 pr(" %3d $%12.2f %2d %5.2f hrs (%3d) %c %6d ",
81 comm->com_uid, comm->com_price, comm->com_maxbidder, tleft / 3600.0,
82 comm->com_owner, ichr[comm->com_type].i_mnem, comm->com_amount);
83 if (comm->com_owner == player->cnum || player->god)
84 pr("%s", xyas(comm->sell_x, comm->sell_y, player->cnum));
89 display_mark(i_type only_itype, int only_cheapest)
95 int cheapest_items[I_MAX + 1];
98 /* Execute trades so report lists only lots that are still available. */
102 pr("\n Empire Market Report\n ");
104 pr(" lot high bid/unit by time left owner item amount sector\n");
105 pr(" --- ------------- -- --------- ----- ---- ------ ------\n");
108 for (i = I_NONE + 1; i <= I_MAX; i++)
109 cheapest_items[i] = -1;
110 for (sellers = 0; getcomm(sellers, &comm); sellers++) {
111 if (comm.com_owner == 0)
113 if (CANT_HAPPEN(comm.com_type <= I_NONE || comm.com_type > I_MAX))
115 if (cheapest_items[comm.com_type] != -1) {
116 getcomm(cheapest_items[comm.com_type], &comm2);
117 if (comm.com_price < comm2.com_price) {
118 cheapest_items[comm.com_type] = sellers;
121 cheapest_items[comm.com_type] = sellers;
124 CANT_HAPPEN(only_itype != I_NONE); /* not implemented */
125 for (i = I_NONE + 1; i <= I_MAX; i++) {
126 if (cheapest_items[i] == -1)
128 getcomm(cheapest_items[i], &comm);
133 for (sellers = 0; getcomm(sellers, &comm); sellers++) {
134 if (comm.com_owner == 0)
136 if (only_itype != I_NONE && comm.com_type != only_itype)
143 pr("\nHmmmm, the market seems to be empty today.\n");
145 pr("\nLooks just like Christmas at K-mart, doesn't it!\n");