ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/server/c_party.C
(Generate patch)

Comparing deliantra/server/server/c_party.C (file contents):
Revision 1.11 by root, Tue Dec 26 08:54:59 2006 UTC vs.
Revision 1.42 by root, Sat Nov 17 23:40:03 2018 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 3 *
4 * Copyright (©) 2017,2018 Marc Alexander Lehmann / the Deliantra team
5 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 6 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 7 * Copyright (©) 1992 Frank Tore Johansen
6 8 *
7 This program is free software; you can redistribute it and/or modify 9 * Deliantra is free software: you can redistribute it and/or modify it under
8 it under the terms of the GNU General Public License as published by 10 * the terms of the Affero GNU General Public License as published by the
9 the Free Software Foundation; either version 2 of the License, or 11 * Free Software Foundation, either version 3 of the License, or (at your
10 (at your option) any later version. 12 * option) any later version.
11 13 *
12 This program is distributed in the hope that it will be useful, 14 * This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details. 17 * GNU General Public License for more details.
16 18 *
17 You should have received a copy of the GNU General Public License 19 * You should have received a copy of the Affero GNU General Public License
18 along with this program; if not, write to the Free Software 20 * and the GNU General Public License along with this program. If not, see
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 21 * <http://www.gnu.org/licenses/>.
20 22 *
21 The authors can be reached via e-mail at <crossfire@schmorp.de> 23 * The authors can be reached via e-mail to <support@deliantra.net>
22*/ 24 */
23 25
24#include <global.h> 26#include <global.h>
25#include <sproto.h> 27#include <sproto.h>
26#include <spells.h> 28#include <spells.h>
27 29
28#ifdef COZY_SERVER 30static partylist *firstparty;
29// used for pet monster logic etc.
30int
31same_party (partylist *a, partylist *b)
32{
33 return a == b && a;
34}
35#endif
36
37static partylist *firstparty = NULL; /* Keeps track of first party in list */
38static partylist *lastparty = NULL; /*Keeps track of last party in list */
39 31
40partylist * 32partylist *
41get_firstparty (void) 33get_firstparty ()
42{ 34{
43 return firstparty; 35 return firstparty;
44} 36}
45 37
46void remove_party (partylist *target_party); 38static void
47
48/* Forms the party struct for a party called 'params'. it is the responsibility
49 * of the caller to ensure that the name is unique, and that it is placed in the
50 * main party list correctly */
51static partylist *
52form_party (object *op, const char *params)
53{
54 partylist *newparty;
55
56 newparty = (partylist *) malloc (sizeof (partylist));
57 newparty->partyname = strdup (params);
58 newparty->total_exp = 0;
59 newparty->kills = 0;
60 newparty->passwd[0] = '\0';
61 newparty->next = NULL;
62 newparty->partyleader = strdup (op->name);
63 new_draw_info_format (NDI_UNIQUE, 0, op, "You have formed party: %s", newparty->partyname);
64 op->contr->party = newparty;
65
66 return newparty;
67}
68
69void
70remove_party (partylist *target_party) 39remove_party (partylist *target_party)
71{ 40{
72 partylist *tmpparty;
73 partylist *previousparty;
74 partylist *nextparty;
75 player *pl;
76
77 if (firstparty == NULL) 41 if (firstparty == NULL)
78 { 42 {
79 LOG (llevError, "remove_party(): I was asked to remove party %s, but no parties are defined", target_party->partyname); 43 LOG (llevError, "remove_party(): I was asked to remove party %s, but no parties are defined", target_party->partyname);
80 return; 44 return;
81 } 45 }
82 46
83 for_all_players (pl) 47 for_all_players (pl)
84 if (pl->party == target_party) 48 if (pl->party == target_party)
85 pl->party = NULL; 49 pl->party = NULL;
86 50
87 /* special case-ism for parties at the beginning and end of the list */ 51 partylist **prevlink = &firstparty;
88 if (target_party == firstparty)
89 {
90 firstparty = firstparty->next;
91 52
92 if (target_party->partyleader) 53 for (partylist *p = firstparty; p; p = p->next)
93 free (target_party->partyleader);
94
95 if (target_party->partyname)
96 free (target_party->partyname);
97
98 free (target_party);
99 return;
100 }
101 else if (target_party == lastparty)
102 {
103 for (tmpparty = firstparty; tmpparty->next != NULL; tmpparty = tmpparty->next)
104 {
105 if (tmpparty->next == target_party)
106 {
107 lastparty = tmpparty;
108
109 if (target_party->partyleader)
110 free (target_party->partyleader);
111
112 if (target_party->partyname)
113 free (target_party->partyname);
114
115 free (target_party);
116 lastparty->next = NULL;
117 return;
118 }
119 }
120 }
121 for (tmpparty = firstparty; tmpparty->next != NULL; tmpparty = tmpparty->next)
122 if (tmpparty->next == target_party) 54 if (p->next == target_party)
123 { 55 {
124 previousparty = tmpparty; 56 prevlink = &p->next;
125 nextparty = tmpparty->next->next;
126 /* this should be safe, because we already dealt with the lastparty case */
127
128 previousparty->next = nextparty;
129 if (target_party->partyleader)
130 free (target_party->partyleader);
131 if (target_party->partyname)
132 free (target_party->partyname);
133 free (target_party);
134 return; 57 break;
135 } 58 }
59
60 *prevlink = target_party->next;
61
62 free (target_party->partyleader);
63 free (target_party->partyname);
64 sfree (target_party);
136} 65}
137 66
138/* Remove unused parties, this could be made to scale a lot better. */ 67/* Remove unused parties, this could be made to scale a lot better. */
139void 68void
140obsolete_parties (void) 69obsolete_parties ()
141{ 70{
142 int player_count; 71 int player_count;
143 player *pl;
144 partylist *party; 72 partylist *party;
145 partylist *next = NULL; 73 partylist *next = NULL;
146 74
147 if (!firstparty) 75 if (!firstparty)
148 return; /* we can't obsolete parties if there aren't any */ 76 return; /* we can't obsolete parties if there aren't any */
77
149 for (party = firstparty; party != NULL; party = next) 78 for (party = firstparty; party != NULL; party = next)
150 { 79 {
151 next = party->next; 80 next = party->next;
152 player_count = 0; 81 player_count = 0;
153 for_all_players (pl) 82 for_all_players (pl)
… …
156 if (player_count == 0) 85 if (player_count == 0)
157 remove_party (party); 86 remove_party (party);
158 } 87 }
159} 88}
160 89
161#ifdef PARTY_KILL_LOG
162void 90void
163add_kill_to_party (partylist *party, char *killer, char *dead, long exp) 91add_kill_to_party (partylist *party, const char *killer, const char *dead, long exp)
164{ 92{
165 int i, pos; 93 int i, pos;
166 94
167 if (party == NULL) 95 if (party == NULL)
168 return; 96 return;
97
169 if (party->kills >= PARTY_KILL_LOG) 98 if (party->kills >= PARTY_KILL_LOG)
170 { 99 {
171 pos = PARTY_KILL_LOG - 1; 100 pos = PARTY_KILL_LOG - 1;
172 for (i = 0; i < PARTY_KILL_LOG - 1; i++) 101 for (i = 0; i < PARTY_KILL_LOG - 1; i++)
173 party->party_kills[i] = party->party_kills[i + 1]; 102 party->party_kills[i] = party->party_kills[i + 1];
174 } 103 }
175 else 104 else
176 pos = party->kills; 105 pos = party->kills;
106
177 party->kills++; 107 party->kills++;
178 party->total_exp += exp; 108 party->total_exp += exp;
179 party->party_kills[pos].exp = exp; 109 party->party_kills[pos].exp = exp;
180 assign (party->party_kills[pos].killer, killer); 110 assign (party->party_kills[pos].killer, killer);
181 assign (party->party_kills[pos].dead, dead); 111 assign (party->party_kills[pos].dead, dead);
182 party->party_kills[pos].killer[MAX_NAME] = 0; 112 party->party_kills[pos].killer[MAX_NAME] = 0;
183 party->party_kills[pos].dead[MAX_NAME] = 0; 113 party->party_kills[pos].dead[MAX_NAME] = 0;
184} 114}
185#endif
186 115
187int 116static int
188confirm_party_password (object *op) 117confirm_party_password (object *op)
189{ 118{
190 partylist *tmppartylist; 119 partylist *tmppartylist;
191 120
192 for (tmppartylist = firstparty; tmppartylist != NULL; tmppartylist = tmppartylist->next) 121 for (tmppartylist = firstparty; tmppartylist != NULL; tmppartylist = tmppartylist->next)
… …
198 else 127 else
199 return 1; 128 return 1;
200 } 129 }
201 } 130 }
202 return 1; 131 return 1;
132}
133
134static void
135send_party_message (object *op, const char *msg)
136{
137 for_all_players (pl)
138 if (pl->ob->contr->party == op->contr->party && pl->ob != op)
139 pl->send_msg (NDI_UNIQUE, MSG_CHANNEL ("party"), msg);
203} 140}
204 141
205void 142void
206receive_party_password (object *op, char k) 143receive_party_password (object *op, char k)
207{ 144{
… …
226 op->contr->ns->state = ST_PLAYING; 163 op->contr->ns->state = ST_PLAYING;
227 return; 164 return;
228 } 165 }
229} 166}
230 167
231void
232send_party_message (object *op, char *msg)
233{
234 player *pl;
235
236 for_all_players (pl)
237 if (pl->ob->contr->party == op->contr->party && pl->ob != op)
238 new_draw_info (NDI_WHITE, 0, pl->ob, msg);
239}
240
241int 168int
242command_gsay (object *op, char *params) 169command_gsay (object *op, char *params)
243{ 170{
244 char party_params[MAX_BUF];
245
246 if (!params) 171 if (!params)
247 return 0; 172 return 0;
248 strcpy (party_params, "say "); 173
249 strcat (party_params, params);
250 command_party (op, party_params); 174 command_party (op, format ("say %s", params));
175
251 return 0; 176 return 0;
252} 177}
253
254 178
255int 179int
256command_party (object *op, char *params) 180command_party (object *op, char *params)
257{ 181{
258 char buf[MAX_BUF]; 182 dynbuf_text &buf = msg_dynbuf; buf.clear ();
259 partylist *tmpparty, *oldparty; /* For iterating over linked list */
260 char *currentparty; /* For iterating over linked list */
261 183
262 if (params == NULL) 184 partylist *party = op->contr->party;
263 {
264 if (op->contr->party == NULL)
265 {
266 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
267 new_draw_info (NDI_UNIQUE, 0, op, "For help try: party help");
268 }
269 else
270 {
271 currentparty = op->contr->party->partyname;
272 new_draw_info_format (NDI_UNIQUE, 0, op, "You are a member of party %s.", currentparty);
273 }
274 return 1;
275 }
276 185
186 if (!params)
187 params = (char *)"";
188
277 if (strcmp (params, "help") == 0) 189 if (!strcmp (params, "help"))
278 { 190 buf << "\n"
279 new_draw_info (NDI_UNIQUE, 0, op, "To form a party type: party form <partyname>"); 191 " - To form a party type: C<party form> <partyname>\n"
280 new_draw_info (NDI_UNIQUE, 0, op, "To join a party type: party join <partyname>"); 192 " - To join a party type: C<party join> <partyname>\n"
281 new_draw_info (NDI_UNIQUE, 0, op, "If the party has a passwd, it will you prompt you for it."); 193 " - If the party has a passwd, it will you prompt you for it.\n"
282 new_draw_info (NDI_UNIQUE, 0, op, "For a list of current parties type: party list"); 194 " - For a list of current parties type: C<party list>\n"
283 new_draw_info (NDI_UNIQUE, 0, op, "To leave a party type: party leave"); 195 " - To leave a party type: C<party leave>\n"
284 new_draw_info (NDI_UNIQUE, 0, op, "To change a passwd for a party type: party passwd <password>"); 196 " - To change a passwd for a party type: C<party passwd> <password>\n"
285 new_draw_info (NDI_UNIQUE, 0, op, "There is an 8 character max"); 197 " - There is an 8 character max\n"
286 new_draw_info (NDI_UNIQUE, 0, op, "To talk to party members type: party say <msg>"); 198 " - To talk to party members type: C<party say> <msg>\n"
287 new_draw_info (NDI_UNIQUE, 0, op, "To see who is in your party: party who"); 199 " - To see who is in your party: C<party who>\n"
288#ifdef PARTY_KILL_LOG 200 " - To see what you've killed, type: C<party kills>\n";
289 new_draw_info (NDI_UNIQUE, 0, op, "To see what you've killed, type: party kills");
290#endif
291 return 1;
292 }
293
294#ifdef PARTY_KILL_LOG
295 if (!strncmp (params, "kills", 5))
296 {
297 int i, max;
298 char chr;
299 char buffer[80];
300 float exp;
301
302 if (op->contr->party == NULL)
303 {
304 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
305 return 1;
306 }
307 tmpparty = op->contr->party;
308 if (!tmpparty->kills)
309 {
310 new_draw_info (NDI_UNIQUE, 0, op, "You haven't killed anything yet.");
311 return 1;
312 }
313 max = tmpparty->kills - 1;
314 if (max > PARTY_KILL_LOG - 1)
315 max = PARTY_KILL_LOG - 1;
316 new_draw_info (NDI_UNIQUE, 0, op, "Killed | Killer| Exp");
317 new_draw_info (NDI_UNIQUE, 0, op, "----------------+----------------+--------");
318 for (i = 0; i <= max; i++)
319 {
320 exp = tmpparty->party_kills[i].exp;
321 chr = ' ';
322 if (exp > 1000000)
323 {
324 exp /= 1000000;
325 chr = 'M';
326 }
327 else if (exp > 1000)
328 {
329 exp /= 1000;
330 chr = 'k';
331 }
332 sprintf (buffer, "%16s|%16s|%6.1f%c", tmpparty->party_kills[i].dead, tmpparty->party_kills[i].killer, exp, chr);
333 new_draw_info (NDI_UNIQUE, 0, op, buffer);
334 }
335 exp = tmpparty->total_exp;
336 chr = ' ';
337 if (exp > 1000000)
338 {
339 exp /= 1000000;
340 chr = 'M';
341 }
342 else if (exp > 1000)
343 {
344 exp /= 1000;
345 chr = 'k';
346 }
347 new_draw_info (NDI_UNIQUE, 0, op, "----------------+----------------+--------");
348 sprintf (buffer, "Totals: %d kills, %.1f%c exp", tmpparty->kills, exp, chr);
349 new_draw_info (NDI_UNIQUE, 0, op, buffer);
350 return 1;
351 }
352#endif /* PARTY_KILL_LOG */
353
354 if (strncmp (params, "say ", 4) == 0)
355 {
356 if (op->contr->party == NULL)
357 {
358 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
359 return 1;
360 }
361 params += 4;
362 currentparty = op->contr->party->partyname;
363 snprintf (buf, MAX_BUF - 1, "[%s] %s says: %s", currentparty, &op->name, params);
364 send_party_message (op, buf);
365 new_draw_info_format (NDI_LT_GREEN | NDI_UNIQUE, 0, op, "[%s] You say: %s", currentparty, params);
366 return 1;
367 }
368
369 if (strncmp (params, "form ", 5) == 0) 201 else if (strncmp (params, "form ", 5) == 0)
370 { 202 {
371 int player_count;
372 player *pl;
373
374 params += 5; 203 params += 5;
375 if (op->contr->party)
376 oldparty = op->contr->party;
377 else
378 oldparty = NULL;
379 204
380 if (firstparty) 205 if (party)
206 buf << "You are already a member of party " << party->partyname << ". You must leave it first.";
207 else
381 { 208 {
382 for (tmpparty = firstparty; tmpparty != NULL; tmpparty = tmpparty->next) 209 for (partylist *tmpparty = firstparty; tmpparty; tmpparty = tmpparty->next)
383 { 210 {
384 if (!strcmp (tmpparty->partyname, params)) 211 if (!strcmp (tmpparty->partyname, params))
385 { 212 {
386 new_draw_info_format (NDI_UNIQUE, 0, op, "The party %s already exists, pick another name", params); 213 buf << "The party " << tmpparty->partyname << " already exists, pick another name";
387 return 1; 214 goto reply;
388 } 215 }
389 } 216 }
390 lastparty->next = form_party (op, params); 217
391 lastparty = lastparty->next; 218 /* Forms the party struct for a party called 'params'. it is the responsibility
392 } 219 * of the caller to ensure that the name is unique, and that it is placed in the
393 else 220 * main party list correctly */
221
222 party = salloc0<partylist> ();
223 party->partyname = strdup (params);
224 party->total_exp = 0;
225 party->kills = 0;
226 party->passwd[0] = '\0';
227 party->next = NULL;
228 party->partyleader = strdup (op->name);
229
230 buf << "You have formed party: " << party->partyname << ".";
231
232 party->next = firstparty;
233 op->contr->party = firstparty = party;
394 { 234 }
395 firstparty = form_party (op, params); 235 }
396 lastparty = firstparty; 236 else if (strcmp (params, "list") == 0)
237 {
238 if (!firstparty)
239 buf << "There are no parties active right now";
240 else
397 } 241 {
398 /* 242 buf << "Party name Leader\n\n"
399 * The player might have previously been a member of a party, if so, he will be leaving 243 "---------- ------\n\n";
400 * it, so check if there are any other members and if not, delete the party 244
401 */ 245 for (partylist *p = firstparty; p; p = p->next)
402 player_count = 0; 246 buf.printf ("%-32s %s\n\n", p->partyname, p->partyleader);
403 if (oldparty)
404 { 247 }
405 for (pl = first_player; pl->next != NULL; pl = pl->next) 248 }
249 else if (strncmp (params, "join ", 5) == 0)
250 {
251 params += 5;
252
253 /* Can't join a party cause non exist */
254 if (!firstparty)
255 buf << "Party: " << params << " does not exist. You must form it first.";
256 else if (party)
257 buf << "You are already a member of party " << party->partyname << ". You must leave it first.";
258 else
259 for (partylist *p = firstparty; p; p = p->next)
260 if (!strcmp (p->partyname, params))
406 { 261 {
407 if (pl->party == oldparty) 262 if (!*p->passwd)
408 player_count++;
409 }
410 if (player_count == 0)
411 remove_party (oldparty);
412 }
413 return 0;
414 } /* form */
415
416 if (strcmp (params, "leave") == 0)
417 {
418 if (op->contr->party == NULL)
419 {
420 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
421 return 1;
422 }
423 currentparty = op->contr->party->partyname;
424 new_draw_info_format (NDI_UNIQUE, 0, op, "You leave party %s.", currentparty);
425 sprintf (buf, "%s leaves party %s.", &op->name, currentparty);
426 send_party_message (op, buf);
427 op->contr->party = NULL;
428 return 1;
429 }
430
431 if (strcmp (params, "who") == 0)
432 {
433 player *pl;
434
435 tmpparty = op->contr->party;
436 if (op->contr->party == NULL)
437 {
438 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of any party.");
439 return 1;
440 }
441 new_draw_info_format (NDI_UNIQUE, 0, op, "Members of party: %s.", op->contr->party->partyname);
442 for_all_players (pl)
443 if (pl->ob->contr->party == op->contr->party)
444 {
445 if (settings.set_title == TRUE)
446 { 263 {
447 if (pl->ob->contr->own_title[0] != '\0') 264 op->contr->party = p;
448 sprintf (buf, "%3d %s the %s", pl->ob->level, &pl->ob->name, pl->ob->contr->own_title);
449 else
450 sprintf (buf, "%3d %s the %s", pl->ob->level, &pl->ob->name, pl->ob->contr->title);
451 }
452 else
453 sprintf (buf, "%3d %s the %s", pl->ob->level, &pl->ob->name, pl->ob->contr->title);
454 new_draw_info (NDI_UNIQUE, 0, op, buf);
455 }
456 return 1;
457 } /* leave */
458 265
459 if (strncmp (params, "passwd ", 7) == 0) 266 buf << op->name << " joins party " << p->partyname << ".";
460 {
461 partylist *tmplist;
462
463 params += 7;
464
465 if (op->contr->party == NULL)
466 {
467 new_draw_info (NDI_UNIQUE, 0, op, "You are not a member of a party");
468 return 1;
469 }
470
471 if (strlen (params) > 8)
472 {
473 new_draw_info (NDI_UNIQUE, 0, op, "The password must not exceed 8 characters");
474 return 1;
475 }
476
477 tmplist = firstparty;
478 while (tmplist != NULL)
479 {
480 if (tmplist == op->contr->party)
481 {
482 strcpy (tmplist->passwd, params);
483 new_draw_info_format (NDI_UNIQUE, 0, op, "The password for party %s is %s", tmplist->partyname, tmplist->passwd);
484 snprintf (buf, MAX_BUF, "Password for party %s is now %s, changed by %s", tmplist->partyname, tmplist->passwd, &op->name);
485 send_party_message (op, buf); 267 send_party_message (op, buf);
486 return 0; 268 buf.clear ();
269
270 buf << "You have joined party: " << p->partyname << ".";
487 } 271 }
488 tmplist = tmplist->next;
489 }
490 return 0;
491 } /* passwd */
492
493 if (strcmp (params, "list") == 0)
494 {
495 partylist *tmplist;
496
497 tmplist = firstparty;
498
499 if (firstparty == NULL)
500 {
501 new_draw_info (NDI_UNIQUE, 0, op, "There are no parties active right now");
502 return 1;
503 }
504
505 new_draw_info (NDI_UNIQUE, 0, op, "Party name Leader");
506 new_draw_info (NDI_UNIQUE, 0, op, "---------- ------");
507
508 while (tmplist != NULL)
509 {
510 new_draw_info_format (NDI_UNIQUE, 0, op, "%-32s %s", tmplist->partyname, tmplist->partyleader);
511 tmplist = tmplist->next;
512 }
513 return 0;
514 } /* list */
515
516 if (strncmp (params, "join ", 5) == 0)
517 {
518
519 params += 5;
520
521 /* Can't join a party cause non exist */
522 if (firstparty == NULL)
523 {
524 new_draw_info_format (NDI_UNIQUE, 0, op, "Party: %s does not exist. You must form it first", params);
525 return 1;
526 }
527
528 /* Special case if thier is only one party */
529 if (firstparty->next == NULL)
530 {
531 if (strcmp (firstparty->partyname, params) != 0)
532 { 272 else
533 new_draw_info_format (NDI_UNIQUE, 0, op, "Party: %s does not exist. You must form it first", params); 273 get_party_password (op, p);
534 return 1; 274
275 goto reply;
535 } 276 }
536 else 277 else
278 buf << "Party " << params << " does not exist. You must form it first.";
279 }
280 else if (!party)
281 buf << "You are not a member of any party.\n\n"
282 "For help try: C<party help>";
283 else if (!*params)
284 buf << "You are a member of party " << party->partyname << ".";
285 else if (!strncmp (params, "kills", 5))
286 {
287 if (!party->kills)
288 buf << "You haven't killed anything yet.";
289 else
290 {
291 int max = min (party->kills - 1, PARTY_KILL_LOG - 1);
292
293 buf << " Killed | Killer| Exp\n"
294 << " ----------------+----------------+--------\n";
295
296 for (int i = 0; i <= max; i++)
537 { 297 {
538 if (op->contr->party == firstparty) 298 sint64 exp = party->party_kills[i].exp;
299 char suffix = ' ';
300 if (exp > 1000000)
539 { 301 {
540 new_draw_info_format (NDI_UNIQUE, 0, op, "You are already in party: %s", firstparty->partyname); 302 exp /= 1000000;
541 return 1; 303 suffix = 'M';
542 } 304 }
543 /* found party player wants to join */ 305 else if (exp > 1000)
544 if (firstparty->passwd[0] == '\0')
545 { 306 {
546 op->contr->party = firstparty; 307 exp /= 1000;
547 new_draw_info_format (NDI_UNIQUE, 0, op, "You have joined party: %s", firstparty->partyname); 308 suffix = 'k';
548 snprintf (buf, MAX_BUF, "%s joins party %s", &op->name, firstparty->partyname);
549 send_party_message (op, buf);
550 return 0;
551 } 309 }
552 else 310
553 { 311 buf.printf (" %16s|%16s|%6.1f%c\n", party->party_kills[i].dead, party->party_kills[i].killer, (double)exp, suffix);
554 get_party_password (op, firstparty);
555 return 0;
556 }
557 } 312 }
558 }
559 313
560 tmpparty = firstparty; 314 buf << " ----------------+----------------+--------\n";
561 while (tmpparty != NULL) 315
562 {
563 if (strcmp (tmpparty->partyname, params) == 0)
564 { 316 {
565 if (op->contr->party == tmpparty) 317 sint64 exp = party->total_exp;
318 char suffix = ' ';
319
320 if (exp > 1000000)
566 { 321 {
567 new_draw_info_format (NDI_UNIQUE, 0, op, "You are already a member of party: %s", tmpparty->partyname); 322 exp /= 1000000;
568 return 1; 323 suffix = 'M';
569 } 324 }
570 else 325 else if (exp > 1000)
571 { 326 {
572 if (tmpparty->passwd[0] == '\0') 327 exp /= 1000;
573 { 328 suffix = 'k';
574 new_draw_info_format (NDI_UNIQUE, 0, op, "You have joined party: %s", tmpparty->partyname);
575 op->contr->party = tmpparty;
576 snprintf (buf, MAX_BUF, "%s joins party %s", &op->name, tmpparty->partyname);
577 send_party_message (op, buf);
578 return 0;
579 }
580 else
581 {
582 get_party_password (op, tmpparty);
583 return 0;
584 }
585 } 329 }
330
331 buf.printf (" Totals: %d kills, %.1f%c exp", party->kills, (double)exp, suffix);
586 } 332 }
333 }
334 }
335 else if (strncmp (params, "say ", 4) == 0)
336 {
337 params += 4;
338
339 buf << "[" << party->partyname << "] " << op->name << " says: " << params;
340 send_party_message (op, buf);
341 buf.clear ();
342
343 buf << "[" << party->partyname << "] You say: " << params;
344 }
345 else if (strcmp (params, "leave") == 0)
346 {
347 buf << op->name << " leaves party " << party->partyname << ".";
348 send_party_message (op, buf);
349 buf.clear ();
350
351 buf << "You leave party " << party->partyname << ".";
352
353 op->contr->party = 0;
354 obsolete_parties ();
355 }
356 else if (strcmp (params, "who") == 0)
357 {
358 buf << "Members of party " << party->partyname << ".\n";
359
360 for_all_players (pl)
361 if (pl->ob->contr->party == party)
362 buf.printf (" - %s/%d %s\n\n", &pl->ob->name, pl->ob->level,
363 *pl->ob->contr->own_title ? pl->ob->contr->own_title : pl->ob->contr->title);
364 }
365 else if (strncmp (params, "passwd ", 7) == 0)
366 {
367 params += 7;
368
369 if (strlen (params) > 8)
370 buf << "The password must not exceed 8 characters";
587 else 371 else
588 tmpparty = tmpparty->next;
589 } 372 {
373 strcpy (party->passwd, params);
374 buf << "The password for party " << party->partyname << " is set to B<" << params << "> by " << &op->name;
375 }
376 }
377 else
378 buf << "I did not understand your command. For help try: C<party help>";
590 379
591 new_draw_info_format (NDI_UNIQUE, 0, op, "Party %s does not exist. You must form it first.", params); 380reply:
592 return 1; 381 op->contr->send_msg (NDI_UNIQUE | NDI_REPLY, MSG_CHANNEL ("party"), buf);
593 } /* join */
594 382
595 new_draw_info (NDI_UNIQUE, 0, op, "To form a party type: party form <partyname>");
596 new_draw_info (NDI_UNIQUE, 0, op, "To join a party type: party join <partyname>");
597 new_draw_info (NDI_UNIQUE, 0, op, "If the party has a passwd, it will you prompt you for it.");
598 new_draw_info (NDI_UNIQUE, 0, op, "For a list of current parties type: party list");
599 new_draw_info (NDI_UNIQUE, 0, op, "To leave a party type: party leave");
600 new_draw_info (NDI_UNIQUE, 0, op, "To change a passwd for a party type: party passwd <password>");
601 new_draw_info (NDI_UNIQUE, 0, op, "There is an 8 character max");
602 new_draw_info (NDI_UNIQUE, 0, op, "To talk to party members type: party say <msg>");
603 new_draw_info (NDI_UNIQUE, 0, op, "To see who is in your party: party who");
604#ifdef PARTY_KILL_LOG
605 new_draw_info (NDI_UNIQUE, 0, op, "To see what you've killed, type: party kills");
606#endif
607 return 1; 383 return 1;
608} 384}

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines