ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/info.C
Revision: 1.11
Committed: Mon Jan 15 21:06:18 2007 UTC (17 years, 4 months ago) by pippijn
Content type: text/plain
Branch: MAIN
CVS Tags: rel-2_0
Changes since 1.10: +22 -22 lines
Log Message:
comments

File Contents

# Content
1 /*
2 * CrossFire, A Multiplayer game for X-windows
3 *
4 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
5 * Copyright (C) 2002 Mark Wedel & Crossfire Development Team
6 * Copyright (C) 1992 Frank Tore Johansen
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 *
22 * The authors can be reached via e-mail at <crossfire@schmorp.de>
23 */
24
25 #include <global.h>
26
27 /*
28 * The functions in this file are purely mean to generate information
29 * in differently formatted output, mainly about monsters.
30 */
31
32 /*
33 * Dump to standard out the abilities of all monsters.
34 */
35
36 void
37 dump_abilities (void)
38 {
39 archetype *at;
40
41 for (at = first_archetype; at; at = at->next)
42 {
43 char *ch;
44 const char *gen_name = "";
45 archetype *gen;
46
47 if (!QUERY_FLAG (&at->clone, FLAG_MONSTER))
48 continue;
49
50 /* Get rid of e.g. multiple black puddings */
51 if (QUERY_FLAG (&at->clone, FLAG_CHANGING))
52 continue;
53
54 for (gen = first_archetype; gen; gen = gen->next)
55 {
56 if (gen->clone.other_arch && gen->clone.other_arch == at)
57 {
58 gen_name = gen->name;
59 break;
60 }
61 }
62
63 ch = describe_item (&at->clone, NULL);
64 printf ("%-16s|%6lld|%4d|%3d|%s|%s|%s\n", &at->clone.name, (long long) at->clone.stats.exp,
65 at->clone.stats.hp, at->clone.stats.ac, ch, &at->name, gen_name);
66 }
67 }
68
69 /*
70 * As dump_abilities(), but with an alternative way of output.
71 */
72
73 void
74 print_monsters (void)
75 {
76 archetype *at;
77 object *op;
78 char attbuf[34];
79 int i;
80
81 printf
82 (" | | | | | attack | resistances |\n");
83 printf
84 ("monster | hp |dam| ac | wc |pmf ecw adw gpd ptf|phy mag fir ele cld cfs acd drn wmg ght poi slo par tud fer cnc dep dth chs csp gpw hwd bln int | exp | new exp |\n");
85 printf
86 ("---------------------------------------------------------------------------------------------------------------------------------------------------\n");
87 for (at = first_archetype; at != NULL; at = at->next)
88 {
89 op = arch_to_object (at);
90
91 if (QUERY_FLAG (op, FLAG_MONSTER))
92 {
93 bitstostring ((long) op->attacktype, NROFATTACKS, attbuf);
94 printf ("%-15s|%5d|%3d|%4d|%4d|%s|", &op->arch->name, op->stats.maxhp, op->stats.dam, op->stats.ac, op->stats.wc, attbuf);
95 for (i = 0; i < NROFATTACKS; i++)
96 printf ("%4d", op->resist[i]);
97 printf ("|%8lld|%9d|\n", (long long) op->stats.exp, new_exp (op));
98 }
99
100 op->destroy ();
101 }
102 }
103
104 /*
105 * Writes <num> ones and zeros to the given string based on the
106 * <bits> variable.
107 */
108
109 void
110 bitstostring (long bits, int num, char *str)
111 {
112 int i, j = 0;
113
114 if (num > 32)
115 num = 32;
116
117 for (i = 0; i < num; i++)
118 {
119 if (i && (i % 3) == 0)
120 {
121 str[i + j] = ' ';
122 j++;
123 }
124
125 if (bits & 1)
126 str[i + j] = '1';
127 else
128 str[i + j] = '0';
129
130 bits >>= 1;
131 }
132
133 str[i + j] = '\0';
134 }