ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/info.C
Revision: 1.5
Committed: Thu Sep 14 22:33:58 2006 UTC (17 years, 8 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.4: +1 -7 lines
Log Message:
indent

File Contents

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