]> jfr.im git - irc/gameservirc.git/blame - gameserv/gameserv.cpp
projects / irc / gameservirc.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Changed USE HEALTH to USE HEALING
[irc/gameservirc.git] / gameserv / gameserv.cpp
CommitLineData
96f71fee 1#include "aClient.h"
c1068b6e 2#include "config.h"
3#include "extern.h"
96f71fee 4#include "flags.h"
85ce9d3e 5#include "list.h"
96f71fee 6#include "sockhelp.h"
7
85ce9d3e 8#include <cctype>
fb37ecc7 9#include <fstream>
10
11using std::ifstream;
12using std::ofstream;
85bcf836 13using std::ios;
c1068b6e 14
15#if defined(HAVE_CRYPT_H)
16
e3c5fe46 17#include <crypt.h>
85ce9d3e 18
c1068b6e 19#elif defined(HAVE_UNISTD_H)
20
21#include <unistd.h>
22
23#endif
c8ada07e 24
7996e5fd 25// this will be hash.cpp start
26// thank you wcampbel
448a1531 27unsigned long sHASH(const unsigned char *name);
28unsigned long iHASH(const unsigned char *name);
7996e5fd 29List<aClient> players[U_TABLE_SIZE];
30// this will be hash.cpp end
31
fc9d2643 32
c8ada07e 33Monster *monsters[LEVELS][MONSTERS]; // Monsters per level. Total = MONSTERS * LEVELS
7031d99e 34Monster boss; // The boss monster
c8ada07e 35
36Monster *masters[LEVELS]; // A master for each level
85ce9d3e 37
a8fb9757 38// Database functions
85ce9d3e 39int save_gs_dbase();
40int load_gs_dbase();
41
42// String functions
653c4f62 43#ifndef HAVE_STRTOK
85ce9d3e 44char *strtok(char *str, const char *delim);
653c4f62 45#endif
46
85ce9d3e 47int stricmp(const char *s1, const char *s2);
48int strnicmp(const char *s1, const char *s2, size_t len);
49// String Functions
50
e3c5fe46 51/********** Password functions **********/
52
53bool passcmp(char *encrypted, char *plaintext); // Compares an encrypted pass with a plain text one
54
55bool check_password(char *name, char *plaintext); // Finds a password for the given name, and checks it with passcmp against the plaintext password given.
56
57/********** Password functions **********/
58
59
60/********** GameServ Booleans **********/
61
05c527e6 62bool shuttingdown;
40251952 63bool timedOut(Player *p);
64void updateTS(Player *p);
65void timeOutEvent(Player *p);
66
e3c5fe46 67bool is_playing(char *u); // True if the given nickname in the clients list is playing.
1af35752 68bool is_playing(aClient *user);
69
e3c5fe46 70bool is_fighting(char *u); // True if the given nick in the clients list is fighting anything.
1af35752 71bool is_fighting(aClient *user);
72
e3c5fe46 73bool player_fight(char *u); // True if the player is fighting another player.
1af35752 74bool player_fight(aClient *user);
75
e3c5fe46 76bool master_fight(char *u); // True if the player is fighting their master.
1af35752 77bool master_fight(aClient *user);
e3c5fe46 78
79/********** GameServ Booleans **********/
85ce9d3e 80
c7340cbd 81void display_help(char *u, char *file = NULL);
85ce9d3e 82void display_monster(char *u);
83void display_players(char *u);
83cf716f 84void display_players(aClient *user);
85ce9d3e 85long int chartoint(char ch);
86int isstringnum(char *num);
87long int pow (int x, int y);
88long int stringtoint(char *number);
89
90char *spaces(int len, char *seperator);
44ea29f7 91void refresh(Player *p);
85ce9d3e 92void refreshall();
40251952 93void updateTS(Player *p);
ee38284f 94void reset(Player *p);
c8ada07e 95void init_masters();
85ce9d3e 96void init_monsters();
4dde2ed9 97bool load_monsters();
c8ada07e 98void delete_monsters();
99void delete_masters();
85ce9d3e 100
96f71fee 101void do_admin(char *u);
c7340cbd 102void do_attack(char *u);
103void do_bank(char *u);
104void do_fight(char *u);
105void do_heal(char *u);
106void do_help(char *u);
85ce9d3e 107void do_identify(char *u);
9cda831c 108void do_inventory(char *u);
c7340cbd 109void do_refresh(char *u);
110void do_register(char *u);
111void do_list(char *u);
b0359af9 112void do_logout(char *u);
c7340cbd 113void do_master(char *u);
fcca861d 114void do_dragon(char *u);
85ce9d3e 115void do_play(char *u);
116void do_quitg(char *u);
117void do_reset(char *u);
85ce9d3e 118void do_run(char *u);
85ce9d3e 119void do_stats(char *u);
c7340cbd 120void do_store(char *u);
f5c25639 121void do_tavern(char *u);
83cf716f 122void do_use(char *u);
c7340cbd 123void see_master(char *u);
85ce9d3e 124
b0359af9 125void logout(aClient *user);
85ce9d3e 126void showstats(const char *u, const char *nick);
c62d75be 127void showinventory(aClient *from, aClient *to);
e282e9d2 128void showBankBalance(const char *u);
83cf716f 129void end_turn(aClient *user);
85ce9d3e 130
131#define WNA 16
132char *weapons[WNA] = { "Fists", "Stick", "Dagger", "Quarterstaff", "Short Sword",
133 "Long Sword", "Silver Spear", "Battle Axe", "The Ragnarok",
134 "Chain Saw", "Poison Sword", "Flame Sword", "Earth Hammer",
135 "Light Saber", "Masamune", "Mystical Sword"};
136
b410b364 137char *armors[WNA] = { "Birthday Suit", "Clothes", "Leather Vest", "Chain Mail", "Plate Armor",
85ce9d3e 138 "Full Body Armor", "Magic Mail", "Graphite Suit", "Steel Suit",
139 "Force Field", "Armor of Light", "Mythril Vest", "DemiGod Armor",
e7a0d0ab 140 "Hades' Cloak", "Dragon Scales", "Adamantium"};
85ce9d3e 141
142int prices[WNA - 1] = {200, 1000, 3000, 10000, 30000, 100000, 150000, 200000, 400000,
143 1000000, 4000000, 10000000, 40000000, 100000000, 400000000};
b410b364 144int webonus[WNA] = {2, 10, 15, 25, 35, 45, 65, 85, 125, 185, 255, 355, 505, 805, 1205, 1805};
145int arbonus[WNA] = {2, 3, 5, 10, 15, 25, 35, 50, 75, 100, 150, 225, 300, 400, 600, 1000};
85ce9d3e 146
147int hpbonus[11] = {10, 15, 20, 30, 50, 75, 125, 185, 250, 350, 550};
148int strbonus[11] = {5, 7, 10, 12, 20, 35, 50, 75, 110, 150, 200};
149int defbonus[11] = {2, 3, 5, 10, 15, 22, 35, 60, 80, 120, 150};
150
85ce9d3e 151void gameserv(char *source, char *buf)
152{
448a1531 153 char *cmd, z;
85ce9d3e 154 cmd = strtok(buf, " ");
155
fc9d2643 156 #ifndef P10
157 source++; // Get rid of that : at the beginning of a :Nick privmsg Gameserv :text
158 #endif
159
448a1531 160 z = cmd[0];
161 if (z == ':')
fc9d2643 162 cmd++; // Get rid of that : at the beginning of the :text (command)
85ce9d3e 163
9f8c2acc 164 #ifdef DEBUGMODE
165 log("Source: %s Command: %s", source, cmd);
166 #endif
167
abbfcdb9 168 struct tm *tm;
169 time_t ti;
170 time(&ti);
171 tm = localtime(&ti);
44ea29f7 172
abbfcdb9 173 int curday = tm->tm_mday;
174
175 if (curday != day)
44ea29f7 176 {
177 refreshall();
abbfcdb9 178 day = curday;
8450c018 179 save_day(); // here i come to save the day!
44ea29f7 180 }
181
0eeaca4c 182 if (strnicmp(cmd, "\1PING", 6) == 0)
85ce9d3e 183 {
44ea29f7 184 char *ts;
185 ts = strtok(NULL, "\1");
186 notice(s_GameServ, source, "\1PING %s\1", ts);
0eeaca4c 187 } else if (stricmp(cmd, "\1VERSION\1") == 0) {
a3017ab1 188 notice(s_GameServ, source, "\1VERSION %s %s\1", PACKAGE, VERSION);
85ce9d3e 189 } else if (stricmp(cmd, "SEARCH") == 0) {
190 cmd = strtok(NULL, " ");
191
192 if (!cmd)
193 notice(s_GameServ, source, "SYNTAX: /msg %S SEARCH FOREST");
194 else
195 do_forest(source);
1af35752 196
85ce9d3e 197 } else if (stricmp(cmd, "FIGHT") == 0) {
198 do_fight(source);
199 } else if (stricmp(cmd, "ATTACK") == 0) {
200 do_attack(source);
c8ada07e 201 } else if (stricmp(cmd, "RUN") == 0) {
202 do_run(source);
83cf716f 203 } else if (stricmp(cmd, "USE") == 0) {
204 do_use(source);
85ce9d3e 205 } else if (stricmp(cmd, "HEAL") == 0) {
206 do_heal(source);
9cda831c 207 } else if (stricmp(cmd, "INVENTORY") == 0) {
208 do_inventory(source);
ab4f4ec0 209 } else if (stricmp(cmd, "MASTER") == 0) {
210 do_master(source);
fcca861d 211 } else if (stricmp(cmd, "DRAGON") == 0) {
212 do_dragon(source);
ad7dfaa0 213 } else if (stricmp(cmd, "STORE") == 0) {
214 do_store(source);
8c126acc 215 } else if (stricmp(cmd, "BANK") == 0) {
216 do_bank(source);
96f71fee 217 } else if (stricmp(cmd, "ADMIN") == 0) {
218 do_admin(source);
c7340cbd 219 } else if (stricmp(cmd, "REFRESH") == 0) {
96f71fee 220 do_refresh(source);
ee38284f 221 } else if (stricmp(cmd, "RESET") == 0) {
222 do_reset(source);
f5c25639 223 } else if (stricmp(cmd, "TAVERN") == 0) {
224 do_tavern(source);
85ce9d3e 225 } else if (stricmp(cmd, "LIST") == 0) {
226 do_list(source);
b0359af9 227 } else if (stricmp(cmd, "LOGOUT") == 0) {
228 do_logout(source);
85ce9d3e 229 } else if (stricmp(cmd, "REGISTER") == 0) {
230 do_register(source);
231 } else if (stricmp(cmd, "IDENTIFY") == 0) {
232 do_identify(source);
233 } else if (stricmp(cmd, "HELP") == 0) {
c7340cbd 234 do_help(source);
85ce9d3e 235 } else if (stricmp(cmd, "STATS") == 0) {
236 do_stats(source);
237 } else if (stricmp(cmd, "SHUTDOWN") == 0) {
96f71fee 238 aClient *user;
239
240 if (!(user = find(source)))
45a84400 241 {
96f71fee 242 notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
9f8c2acc 243 log("Error: aClient not found: %s", source);
96f71fee 244 }
245 else if (!isAdmin(user))
246 {
247 notice(s_GameServ, source, "You must be a %S admin to use this command!");
45a84400 248 }
249 else
250 {
96f71fee 251 save_gs_dbase();
23ec3ff4 252 #ifdef P10
ce61cdfa 253 raw("[] SQ %s 0 :leaving: %s used the Shutdown command.", servername, user->getRealNick());
23ec3ff4 254 #else
4e5760fd 255 raw("SQUIT %s :leaving: %s used the Shutdown command.", servername, source);
23ec3ff4 256 #endif
05c527e6 257 shuttingdown = true;
45a84400 258 }
85ce9d3e 259 } else if (stricmp(cmd, "SAVE") == 0) {
96f71fee 260 aClient *user;
261
262 if (!(user = find(source)))
263 {
264 notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
9f8c2acc 265 log("Error: aClient not found: %s", source);
96f71fee 266 }
267 else if (!isAdmin(user))
268 {
269 notice(s_GameServ, source, "You must be a %S admin to use this command!");
270 }
271 else
45a84400 272 {
273 save_gs_dbase();
274 }
85ce9d3e 275 } else if (stricmp(cmd, "LOAD") == 0) {
96f71fee 276 aClient *user;
277
278 if (!(user = find(source)))
279 {
280 notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
5d04eb42 281 log("Error: aClient not found: %s", source);
96f71fee 282 }
283 else if (!isAdmin(user))
284 {
285 notice(s_GameServ, source, "You must be a %S admin to use this command!");
286 }
287 else
45a84400 288 {
4dde2ed9 289 char *cmd2 = strtok(NULL, " ");
290 if (!cmd2)
291 {
292 notice(s_GameServ, source, "Loading player data from %s", playerdata);
293 load_gs_dbase();
294 }
295 else if (stricmp(cmd2, "MONSTERS") == 0)
296 {
297 notice(s_GameServ, source, "Loading monster data from %s", monsterdata);
298 load_monsters();
299 }
300 else
301 display_help(source, cmd);
45a84400 302 }
8450c018 303 #ifdef DEBUGMODE
85ce9d3e 304 } else if (stricmp(cmd, "RAW") == 0) {
96f71fee 305 aClient *user;
306
307 if (!(user = find(source)))
308 {
309 notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
9f8c2acc 310 log("Error: aClient not found: %s", source);
96f71fee 311 }
312 else if (!isAdmin(user))
313 {
314 notice(s_GameServ, source, "You must be a %S admin to use this command!");
315 }
316 else
45a84400 317 {
318 char *rest = strtok(NULL, "");
319 raw("%s", rest);
320 }
8450c018 321 #endif
42ec1800 322 } else {
448a1531 323 aClient *user;
324 if ((user = find(source)))
325 {
326 if (isIgnore(user))
327 {
328 #ifdef DEBUGMODE
329 log("Ignoring %s.", user->getNick());
330 #endif
331 }
332 else
333 {
334 notice(s_GameServ, source, "Unknown command \002%s\002. Type /msg %S \002HELP\002 to get a list of commands.", cmd);
335 }
336 }
c7340cbd 337 }
85ce9d3e 338
448a1531 339 #ifndef P10
340 source--; // Bring the ':' back so we don't leak memory
341 #endif
342 if (z == ':')
343 cmd--; // Same thing :)
85ce9d3e 344}
345
346int stricmp(const char *s1, const char *s2)
347{
348 register int c;
349
350 while ((c = tolower(*s1)) == tolower(*s2)) {
351 if (c == 0)
352 return 0;
353 s1++;
354 s2++;
355 }
356 if (c < tolower(*s2))
357 return -1;
358 return 1;
359}
360
361void showstats(const char *u, const char *nick)
362{
363 aClient *ni, *sender = find(u);
364 char *buf;
365 buf = new char[50];
366 char *space;
367
368
73c71976 369 if (!(ni = findplayer(nick)))
85ce9d3e 370 {
371 notice(s_GameServ, u, "%s not found", nick);
372 }
373 else if (ni->stats)
374 {
85ce9d3e 375 notice(s_GameServ, sender->getNick(), "Stats for %s:", ni->stats->name);
376
377 sprintf(buf, "Experience: %ld", ni->stats->exp);
378 space = spaces(strlen(buf), " ");
379 notice(s_GameServ, sender->getNick(), "%s%sLevel: %d", buf, space,
380 ni->stats->level);
1cf88153 381 delete [] space;
85ce9d3e 382
383 sprintf(buf, "Gold: %ld", ni->stats->gold);
384 space = spaces(strlen(buf), " ");
385 notice(s_GameServ, sender->getNick(), "%s%sGold in Bank: %ld", buf, space, ni->stats->bank);
1cf88153 386 delete [] space;
85ce9d3e 387
c7340cbd 388 notice(s_GameServ, sender->getNick(), "Hit Points: %d of %d", ni->stats->hp,
85ce9d3e 389 ni->stats->maxhp);
390
391 sprintf(buf, "Strength: %d", ni->stats->strength + webonus[ni->stats->weapon]);
392 space = spaces(strlen(buf), " ");
393 notice(s_GameServ, sender->getNick(), "%s%sDefense: %d",
394 buf, space, ni->stats->defense + arbonus[ni->stats->armor]);
1cf88153 395 delete [] space;
85ce9d3e 396
397 sprintf(buf, "Armor: %s", armors[ni->stats->armor]);
398 space = spaces(strlen(buf), " ");
399 notice(s_GameServ, sender->getNick(), "%s%sWeapon: %s", buf, space,
400 weapons[ni->stats->weapon]);
1cf88153 401 delete [] space;
85ce9d3e 402
403 sprintf(buf, "Forest Fights: %d", ni->stats->forest_fights);
404 space = spaces(strlen(buf), " ");
405 notice(s_GameServ, sender->getNick(), "%s%sPlayer Fights: %d", buf, space, ni->stats->player_fights);
1cf88153 406 delete [] space;
35cba3f5 407 Pouch *inv = &ni->stats->inventory;
408
409 notice(s_GameServ, u, "Potions");
410 sprintf(buf, "Healing: %d", inv->Healing());
411 space = spaces(strlen(buf), " ");
412 notice(s_GameServ, sender->getNick(), "%s%sHP: %d", buf,
413 space, inv->HP());
414 delete [] space;
415
416 sprintf(buf, "Strength: %d", inv->Strength());
417 space = spaces(strlen(buf), " ");
418 notice(s_GameServ, sender->getNick(), "%s%sDefense: %d", buf,
419 space, inv->Defense());
420 delete [] space;
85ce9d3e 421 }
73c71976 422 else
423 {
424 notice(s_GameServ, u, "%s is not playing!", ni->stats->name);
425 }
1cf88153 426 delete [] buf;
85ce9d3e 427}
428
429char *spaces(int len, char *seperator)
430{
431 char *final;
42ec1800 432 final = new char[30];
85ce9d3e 433 int y;
434 strcpy(final, seperator);
42ec1800 435 for (y = 0; y < 30 - len; y++)
85ce9d3e 436 strcat(final, seperator);
437 return final;
438}
439
440void raw(const char *fmt, ...)
441{
442 va_list args;
443 char *input;
444 const char *t = fmt;
445 input = new char[1024];
446 va_start(args, fmt);
447 memset(input, 0, sizeof(input)); // Initialize to NULL
448 for (; *t; t++)
449 {
450 if (*t == '%')
451 {
452 switch(*++t) {
453 case 'd': sprintf(input, "%s%d", input, va_arg(args, int)); break;
454 case 's': sprintf(input, "%s%s", input, va_arg(args, char *)); break;
455 case 'S': sprintf(input, "%s%s", input, s_GameServ); break;
456 case 'l':
457 if (*++t == 'd')
458 sprintf(input, "%s%ld", input, va_arg(args, long int)); break;
459 }
460 }
461 else
462 {
463 sprintf(input, "%s%c", input, *t);
464 }
465
466 }
9f8c2acc 467 #ifdef DEBUGMODE
468 log("Input: %s", input);
469 #endif
470
85ce9d3e 471 sprintf(input, "%s%s", input, "\r\n");
85ce9d3e 472 sock_puts(sock, input);
1cf88153 473 delete [] input;
85ce9d3e 474 va_end(args);
475}
476/* Send a NOTICE from the given source to the given nick. */
477
478void notice(const char *source, const char *dest, const char *fmt, ...)
479{
c7340cbd 480 if (fmt[0] == '\0')
481 return;
482
9bafc40d 483 char *commanduse;
484 commanduse = new char[16];
485
486 #ifdef P10
6f727d4c 487 if (isUsePrivmsg())
488 strcpy(commanduse, "P");
9bafc40d 489 else
a51121e0 490 strcpy(commanduse, "O");
9bafc40d 491 #else
492
6f727d4c 493 if (isUsePrivmsg())
494 strcpy(commanduse, "PRIVMSG");
9bafc40d 495 else
6f727d4c 496 strcpy(commanduse, "NOTICE");
9bafc40d 497 #endif
498
85ce9d3e 499 va_list args;
500 char *input;
501 const char *t = fmt;
502 input = new char[1024];
503 va_start(args, fmt);
504 if (dest[0] == ':')
505 {
506 dest++;
ba2a880f 507
508 #if !defined(P10)
9bafc40d 509 sprintf(input, ":%s %s %s :", source, commanduse, dest);
ba2a880f 510 #else
9bafc40d 511 sprintf(input, "%s %s %s :", gsnum, commanduse, dest);
ba2a880f 512 #endif
513
85ce9d3e 514 dest--;
515 }
516 else
ba2a880f 517 {
518 #if !defined(P10)
9bafc40d 519 sprintf(input, ":%s %s %s :", source, commanduse, dest);
ba2a880f 520 #else
9bafc40d 521 sprintf(input, "%s %s %s :", gsnum, commanduse, dest);
ba2a880f 522 #endif
523 }
85ce9d3e 524
525 for (; *t; t++)
526 {
527 if (*t == '%')
528 {
529 switch(*++t) {
530 case 'd': sprintf(input, "%s%d", input, va_arg(args, int)); break;
531 case 's': sprintf(input, "%s%s", input, va_arg(args, char *)); break;
532 case 'S': sprintf(input, "%s%s", input, s_GameServ); break;
533 case 'l':
534 if (*++t == 'd')
535 sprintf(input, "%s%ld", input, va_arg(args, long int)); break;
536 }
537 }
538 else
539 {
540 sprintf(input, "%s%c", input, *t);
541 }
542
543 }
9f8c2acc 544 #ifdef DEBUGMODE
545 log("Input: %s", input);
546 #endif
85ce9d3e 547 sprintf(input, "%s%s", input, "\r\n");
85ce9d3e 548 sock_puts(sock, input);
9bafc40d 549 delete [] commanduse;
1cf88153 550 delete [] input;
85ce9d3e 551va_end(args);
552}
553
554
555int strnicmp(const char *s1, const char *s2, size_t len)
556{
557 register int c;
558
559 if (!len)
560 return 0;
561 while ((c = tolower(*s1)) == tolower(*s2) && len > 0) {
562 if (c == 0 || --len == 0)
563 return 0;
564 s1++;
565 s2++;
566 }
567 if (c < tolower(*s2))
568 return -1;
569 return 1;
570}
571
653c4f62 572#ifndef HAVE_STRTOK
85ce9d3e 573char *strtok(char *str, const char *delim)
574{
575 static char *current = NULL;
576 char *ret;
577
578 if (str)
579 current = str;
580 if (!current)
581 return NULL;
582 current += strspn(current, delim);
583 ret = *current ? current : NULL;
584 current += strcspn(current, delim);
585 if (!*current)
586 current = NULL;
587 else
588 *current++ = 0;
589 return ret;
590}
653c4f62 591#endif
85ce9d3e 592
593void do_list(char *u)
594{
448a1531 595 aClient *user;
9cb6f227 596 char *cmd = strtok(NULL, " ");
597
448a1531 598 if (!(user = find(u)))
599 {
600 log("Fatal Error: Couldn't find %s in the client list", u);
601 return;
602 }
603 else if (isIgnore(user))
604 {
605 #ifdef DEBUGMODE
606 log("Ignoring %s. Command LIST", user->getNick());
607 #endif
608 return;
609 }
610
85ce9d3e 611 ListNode<aClient> *temp;
7996e5fd 612 bool header = false;
9cb6f227 613
7996e5fd 614 for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
615 {
616 temp = players[x].First();
617 if (!players[x].isEmpty())
85ce9d3e 618 {
85ce9d3e 619 while(temp)
620 {
9cb6f227 621 if (!cmd || is_playing(temp->getData()))
622 {
623 if (!header)
624 {
625 notice(s_GameServ, u, "Players:");
626 header = true;
627 }
628 #ifdef P10
629 notice(s_GameServ, u, "IRC: %s Game: %s", temp->getData()->getRealNick(),
630 temp->getData()->stats->name);
631 #else
632 notice(s_GameServ, u, "IRC: %s Game: %s", temp->getData()->getNick(),
633 temp->getData()->stats->name);
634 #endif
635 }
ce61cdfa 636
85ce9d3e 637 temp = temp->Next();
638 }
85ce9d3e 639 }
7996e5fd 640 }
641 if (!header)
85ce9d3e 642 notice(s_GameServ, u, "No one is playing");
7996e5fd 643 else
644 notice(s_GameServ, u, "End of List");
645
85ce9d3e 646}
1af35752 647
b0359af9 648void do_logout(char *u)
649{
650 aClient *user;
18b84d11 651 char *name = strtok(NULL, " ");
652
b0359af9 653 if (!(user = find(u)))
654 {
655 notice(s_GameServ, u, "Fatal error. Cannot find aClient. "\
656 "Buf: %s LOGOUT", u);
657 log("Could not find aClient Buf: %s LOGOUT",
658 u);
18b84d11 659 return;
b0359af9 660 }
448a1531 661 else if (isIgnore(user))
662 {
663 #ifdef DEBUGMODE
664 log("Ignoring %s.", user->getNick());
665 #endif
666 return;
667 }
18b84d11 668
669 if (name)
6e8ec003 670 {
18b84d11 671 if (!isAdmin(user))
672 {
673 notice(s_GameServ, u, "You must be a %S admin to use this command!");
674 }
675 else if (!(user = findplayer(name)))
676 {
677 notice(s_GameServ, u, "Couldn't find a player named %s", name);
678 }
679 else
680 {
681 notice(s_GameServ, u, "Logging out %s", user->stats->name);
682 logout(user);
683 }
6e8ec003 684 }
18b84d11 685 else if (!name)
b0359af9 686 {
18b84d11 687 if (!is_playing(user))
688 {
689 notice(s_GameServ, u, "You're not logged in!");
690 }
691 else if (is_fighting(user))
692 {
693 notice(s_GameServ, u, "You can't logout while fighting!");
694 }
695 else
696 {
697 notice(s_GameServ, u, "You have left the fields. You have lived to kill another day!");
698 logout(user);
699 }
b0359af9 700 }
701}
3f243b0b 702
b0359af9 703void logout(aClient *user)
704{
705 if (is_playing(user))
706 {
707 ListNode<aClient> *it;
708 aClient *temp;
448a1531 709 unsigned long hv = iHASH((unsigned char *) user->stats->name);
7996e5fd 710 it = players[hv].Find(user);
448a1531 711
b0359af9 712 if (!it)
713 {
714 notice(s_GameServ, user->getNick(), "Fatal error. Contact "\
715 "%S Admin. Cannot find you in the players list.");
716 log("Error on logout(). Can't find %s in the players list",
717 #ifdef P10
718 user->getRealNick()
719 #else
720 user->getNick()
721 #endif
722 );
723 return;
724 }
725
726 temp = new aClient;
727 temp->stats = new Player;
728 temp->stats->setData(user->stats);
85bcf836 729 user->stats->client = NULL;
6e8ec003 730
731 if (player_fight(user))
732 user->stats->battle->stats->battle = NULL;
733
b0359af9 734 delete user->stats;
735 user->stats = NULL;
85bcf836 736 temp->stats->client = NULL;
b0359af9 737 #ifdef P10
448a1531 738 temp->setRealNick("Not Playing");
b0359af9 739 #endif
448a1531 740 temp->setNick("Not Playing");
b0359af9 741
742 it->setNewPtr(temp);
743 #ifdef DEBUGMODE
744 log("Logged out player %s",
745 #ifdef P10
746 user->getRealNick()
747 #else
748 user->getNick()
749 #endif
750 );
751 #endif
752 }
3f243b0b 753 clearPlaying(user);
b0359af9 754}
3f243b0b 755
85ce9d3e 756void do_register(char *u)
757{
e1c41a84 758 char *password, *name;
40251952 759 aClient *user;
e1c41a84 760 name = strtok(NULL, " ");
85ce9d3e 761 password = strtok(NULL, " ");
762
e3c5fe46 763 static char saltChars[] = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789./";
764 static char salt[3];
765
766 salt[0] = saltChars[rand() % strlen(saltChars)];
767 salt[1] = saltChars[rand() % strlen(saltChars)];
f27a378f 768 salt[2] = '\0';
e3c5fe46 769
e1c41a84 770 if (!name)
771 {
772 notice(s_GameServ, u, "SYNTAX: /msg %S REGISTER NAME PASSWORD");
773 }
774 else if (!password)
85ce9d3e 775 {
e1c41a84 776 notice(s_GameServ, u, "SYNTAX: /msg %S REGISTER NAME PASSWORD");
85ce9d3e 777 }
03e0a9d8 778 else if ((user = findplayer(name)))
779 {
780 notice(s_GameServ, u, "%s is already registered!", name);
781 notice(s_GameServ, u, "Choose another name!");
782 }
448a1531 783 else if (!(user = find(u)))
784 {
785 log("Fatal Error: Couldn't find %s in the clients list", u);
786 }
787 else if (isIgnore(user))
788 {
789 #ifdef DEBUGMODE
790 log("Ignoring %s.", user->getNick());
791 #endif
792 return;
793 }
794 else
85ce9d3e 795 {
3f243b0b 796 if (!is_playing(user))
85ce9d3e 797 {
ae2685f6 798 ListNode<aClient> *temp;
85ce9d3e 799 user->stats = new Player(user);
85bcf836 800 user->stats->client = user; // Set the backwards pointer
ae2685f6 801 user->stats->reset(); // set the user up
802 strncpy(user->stats->password, crypt(password, salt), 255);
803 strncpy(user->stats->name, name, 255);
448a1531 804 unsigned long hv = iHASH((unsigned char *) name);
40251952 805 updateTS(user->stats);
ae2685f6 806 temp = players[hv].insertAtBack_RLN(user);
807 temp->setPtr(user); // This is an extra step, but necessary for now
808
c7340cbd 809 notice(s_GameServ, u, "Player %s registered with password %s.", user->stats->name, password);
810 notice(s_GameServ, u, "Write this password down. If you lose it, there is no way to retrieve it!");
5d04eb42 811 log("Nickname %s registered player %s.", u, user->stats->name);
3f243b0b 812 setPlaying(user); // set the playing flag
85ce9d3e 813 }
814 else
815 {
816 notice(s_GameServ, u, "Already registered. Contact a %S admin for help.");
817 }
818 }
819}
820
821void do_identify(char *u)
822{
0a1518fa 823 char *password, *name;
824 aClient *user, *p;
825 name = strtok(NULL, " ");
85ce9d3e 826 password = strtok(NULL, " ");
0a1518fa 827 if (!password || !name)
85ce9d3e 828 {
0a1518fa 829 notice(s_GameServ, u, "SYNTAX: /msg %S IDENTIFY NAME PASSWORD");
85ce9d3e 830 }
448a1531 831 else if (!(user = find(u)))
5d04eb42 832 {
833 notice(s_GameServ, u, "Fatal error. Cannot find aClient. Buf: %s", strtok(NULL, ""));
834 log("Error: aClient not found: %s", u);
835 }
448a1531 836 else if (isIgnore(user))
837 {
838 #ifdef DEBUGMODE
839 log("Ignoring %s.", user->getNick());
840 #endif
841 return;
842 }
0a1518fa 843 else if (!(p = findplayer(name)) || !p->stats)
844 notice(s_GameServ, u, "Player %s not found", name);
b0359af9 845 else if (is_playing(user))
846 {
847 notice(s_GameServ, u, "You are already playing!");
848 }
85bcf836 849 else if (p->stats->client != NULL && !isAdmin(user))
1579dfa2 850 {
851 notice(s_GameServ, u, "That player has already identified.");
1579dfa2 852 }
20d5d721 853 else if (!check_password(name, password) && !isAdmin(user))
85ce9d3e 854 {
0a1518fa 855 notice(s_GameServ, u, "Password incorrect");
85ce9d3e 856 }
1579dfa2 857 else {
b0359af9 858 ListNode<aClient> *temp;
448a1531 859 unsigned long hv = iHASH((unsigned char *) p->stats->name);
7996e5fd 860 temp = players[hv].Find(p);
b0359af9 861 if (!temp)
85ce9d3e 862 {
b0359af9 863 notice(s_GameServ, u, "Fatal error. Contact %S Admin. Buf: %s",
864 strtok(NULL, ""));
865 return;
85ce9d3e 866 }
b0359af9 867 user->stats = new Player(p->stats->name);
868 #ifdef DEBUGMODE
869 log("Setting data for identified");
870 #endif
0b6098d5 871 user->stats->setData(p->stats);
448a1531 872 user->stats->client = user;
40251952 873 updateTS(user->stats);
874
b0359af9 875
876 #ifdef DEBUGMODE
448a1531 877 log("Player %s IRC: %s Identified", user->stats->name,
878 user->getNick());
b0359af9 879 #endif
880
3f243b0b 881 setPlaying(user); // set the playing flag
882
b0359af9 883 temp->setPtr(user);
884 notice(s_GameServ, u, "Password Accepted. Identified.");
85ce9d3e 885 }
886}
887
888void do_stats(char *u)
889{
890 char *nick;
73c71976 891 aClient *user;
85ce9d3e 892
893 nick = strtok(NULL, " ");
85ce9d3e 894
448a1531 895 if (!(user = find(u)))
73c71976 896 {
448a1531 897 log("Fatal Error: %s not found in client list", u);
898 return;
899 }
900 else if (isIgnore(user))
901 {
902 #ifdef DEBUGMODE
903 log("Ignoring %s.", user->getNick());
904 #endif
905 return;
906 }
907 else if (!nick)
908 {
909 if (!is_playing(user))
73c71976 910 {
911 notice(s_GameServ, u, "You're not playing, so you have no stats!");
912 return;
913 }
914 else
40251952 915 {
916 updateTS(user->stats);
73c71976 917 showstats(u, user->stats->name);
40251952 918 }
73c71976 919 }
85ce9d3e 920 else
921 showstats(u, nick);
922}
448a1531 923
ad7dfaa0 924void init_masters()
925{
5d04eb42 926 #ifdef DEBUGMODE
927 log("Calling delete_masters()");
928 #endif
929
ab4f4ec0 930 delete_masters();
c8ada07e 931
5d04eb42 932 #ifdef DEBUGMODE
933 log("Initializing masters");
934 #endif
935
c8ada07e 936 for (int x = 0; x < LEVELS; x++)
937 masters[x] = new Monster;
938
939 strcpy(masters[0]->name, "Old Bones");
940 strcpy(masters[0]->weapon, "Dull Sword Cane");
6d053d90 941 masters[0]->strength = 30;
c8ada07e 942 masters[0]->gold = 0;
943 masters[0]->exp = 0;
6d053d90 944 masters[0]->maxhp = 35;
945 masters[0]->hp = 35;
c8ada07e 946 strcpy(masters[0]->death, "You have done well my student, but the road is long. Use your new strength with humility and honor as you progress in levels!");
e282e9d2 947
c8ada07e 948 strcpy(masters[1]->name, "Master Chang");
949 strcpy(masters[1]->weapon, "Nanchaku");
6d053d90 950 masters[1]->strength = 45;
c8ada07e 951 masters[1]->gold = 0;
952 masters[1]->exp = 0;
6d053d90 953 masters[1]->maxhp = 51;
954 masters[1]->hp = 51;
c8ada07e 955 strcpy(masters[1]->death, "You try to make out what Master Chang is saying, but the only thing you catch is something about a grasshopper.");
956
957 strcpy(masters[2]->name, "Chuck Norris");
958 strcpy(masters[2]->weapon, "Ranger Kick");
6d053d90 959 masters[2]->strength = 83;
c8ada07e 960 masters[2]->gold = 0;
961 masters[2]->exp = 0;
6d053d90 962 masters[2]->maxhp = 100;
963 masters[2]->hp = 100;
c8ada07e 964 strcpy(masters[2]->death, "Be strong, and keep your goals in site. Drink milk, and don't do drugs. One day you may be fighting next to me as a Texas Ranger YEEHAW!");
965
966
967 strcpy(masters[3]->name, "Mr. Miagi");
968 strcpy(masters[3]->weapon, "Petrified Bonsai");
6d053d90 969 masters[3]->strength = 159;
c8ada07e 970 masters[3]->gold = 0;
971 masters[3]->exp = 0;
6d053d90 972 masters[3]->maxhp = 165;
973 masters[3]->hp = 165;
c8ada07e 974 strcpy(masters[3]->death, "Skill comes from repeating the correct but seemingly mundane actions. Wax ON, wax OFF!");
975
976 strcpy(masters[4]->name, "Jackie Chan");
e282e9d2 977 strcpy(masters[4]->weapon, "Kung Fu Kick");
6d053d90 978 masters[4]->strength = 260;
c8ada07e 979 masters[4]->gold = 0;
980 masters[4]->exp = 0;
6d053d90 981 masters[4]->maxhp = 232;
982 masters[4]->hp = 232;
c8ada07e 983 strcpy(masters[4]->death, "I like to let people talk who like to talk... it's easier to find out how full of it they really are!");
984
985 strcpy(masters[5]->name, "Jet Li");
986 strcpy(masters[5]->weapon, "Motorcycle");
6d053d90 987 masters[5]->strength = 325;
c8ada07e 988 masters[5]->gold = 0;
989 masters[5]->exp = 0;
6d053d90 990 masters[5]->maxhp = 504;
991 masters[5]->hp = 504;
c8ada07e 992 strcpy(masters[5]->death, "Failure is a fuel for excuses. It's the doing the do, that makes the making.");
993
994
995 strcpy(masters[6]->name, "Muhammad Ali");
996 strcpy(masters[6]->weapon, "Quick Jab");
6d053d90 997 masters[6]->strength = 380;
c8ada07e 998 masters[6]->gold = 0;
999 masters[6]->exp = 0;
6d053d90 1000 masters[6]->maxhp = 1078;
1001 masters[6]->hp = 1078;
c8ada07e 1002 strcpy(masters[6]->death, "It's just a job. Grass grows, birds fly, waves pound the sand. I beat people up.");
1003
1004 strcpy(masters[7]->name, "Li Mu Bai");
1005 strcpy(masters[7]->weapon, "Green Destiny");
6d053d90 1006 masters[7]->strength = 462;
c8ada07e 1007 masters[7]->gold = 0;
1008 masters[7]->exp = 0;
6d053d90 1009 masters[7]->maxhp = 2207;
1010 masters[7]->hp = 2207;
c8ada07e 1011 strcpy(masters[7]->death, "No growth without resistance. No action without reaction. No desire without restraint.");
1012
1013
1014 strcpy(masters[8]->name, "Jimmy Wang Yu");
1015 strcpy(masters[8]->weapon, "Flying Guillotine");
6d053d90 1016 masters[8]->strength = 511;
c8ada07e 1017 masters[8]->gold = 0;
1018 masters[8]->exp = 0;
6d053d90 1019 masters[8]->maxhp = 2780;
1020 masters[8]->hp = 2780;
c8ada07e 1021 strcpy(masters[8]->death, "You have beaten the one armed boxer. Proceed with caution!");
1022
1023 strcpy(masters[9]->name, "Wong Fei Hung");
1024 strcpy(masters[9]->weapon, "Drunken Boxing");
6d053d90 1025 masters[9]->strength = 618;
c8ada07e 1026 masters[9]->gold = 0;
1027 masters[9]->exp = 0;
6d053d90 1028 masters[9]->maxhp = 3046;
1029 masters[9]->hp = 3046;
e282e9d2 1030 strcpy(masters[9]->death, "Hiccup! Monkey drinks master's wine!");
c8ada07e 1031
1032 strcpy(masters[10]->name, "Bruce Lee");
1033 strcpy(masters[10]->weapon, "Fists of fury");
6d053d90 1034 masters[10]->strength = 725;
c8ada07e 1035 masters[10]->gold = 0;
1036 masters[10]->exp = 0;
6d053d90 1037 masters[10]->maxhp = 3988;
1038 masters[10]->hp = 3988;
c8ada07e 1039 strcpy(masters[10]->death, "You must learn to concentrate. It is like a finger pointing away to the moon... DONT concentrate on the finger, or you will miss all the heavenly glory.");
ad7dfaa0 1040}
85ce9d3e 1041
1042void init_monsters()
1043{
5d04eb42 1044 #ifdef DEBUGMODE
1045 log("Calling delete_monsters");
1046 #endif
1047
c8ada07e 1048 delete_monsters();
5d04eb42 1049
c8ada07e 1050 for (int x = 0; x < LEVELS; x++)
1051 for (int y = 0; y < MONSTERS; y++)
1052 monsters[x][y] = new Monster();
c8ada07e 1053}
1054
1055void delete_monsters()
1056{
1057 for (int x = 0; x < LEVELS; x++)
1058 for (int y = 0; y < MONSTERS; y++)
1059 if (monsters[x][y])
1060 delete monsters[x][y];
1061}
1062
1063void delete_masters()
1064{
1065 for (int x = 0; x < LEVELS; x++)
1066 if (masters[x])
1067 delete masters[x];
85ce9d3e 1068}
1069
1070void display_monster(char *u)
1071{
1072 if (is_playing(u))
1073 {
1074 aClient *user = find(u);
1075 Player *ni = user->stats;
1076
1077 notice(s_GameServ, u, "Your Hitpoints: \ 2%d\ 2", ni->hp);
1078 notice(s_GameServ, u, "%s's Hitpoints: \ 2%d\ 2", ni->fight->name, ni->fight->hp);
1079 notice(s_GameServ, u, "Here are your commands:");
1080 notice(s_GameServ, u, "/msg %S attack");
1081 notice(s_GameServ, u, "/msg %S run");
1082 notice(s_GameServ, u, "What will you do?");
1083 }
1084}
1085
1086void display_players(char *u)
1087{
85bcf836 1088 aClient *user;
1089 if (!(user = find(u)))
85ce9d3e 1090 {
85bcf836 1091 log("Fatal error in display_players(): Couldn't find %s", u);
83cf716f 1092 }
85bcf836 1093 else
1094 display_players(user);
83cf716f 1095}
85bcf836 1096
83cf716f 1097void display_players(aClient *user)
1098{
1099 char *u = user->getNick();
1100 if (is_playing(user) && player_fight(user))
1101 {
1102 aClient *battle = user->stats->battle;
1103 notice(s_GameServ, u, "Your Hitpoints: \ 2%d\ 2", user->stats->hp);
ce61cdfa 1104 notice(s_GameServ, u, "%s's Hitpoints: \ 2%d\ 2", battle->stats->name, battle->stats->hp);
83cf716f 1105 notice(s_GameServ, u, "Here are your commands:");
1106 notice(s_GameServ, u, "/msg %S attack");
1107 notice(s_GameServ, u, "/msg %S run");
85ce9d3e 1108 notice(s_GameServ, u, "What will you do?");
1109 }
1110}
1111
1112
1113bool is_playing(char *u)
1114{
1115 aClient *user;
1116 if (!(user = find(u)))
85ce9d3e 1117 return false;
85ce9d3e 1118 else
40251952 1119 return is_playing(user);
85ce9d3e 1120}
1121
1af35752 1122bool is_playing(aClient *user)
1123{
03a4bdbb 1124 if (user->stats == NULL)
f1ab3b7c 1125 {
03a4bdbb 1126 return false;
f1ab3b7c 1127 }
03a4bdbb 1128 else if (user->stats->client == NULL)
f1ab3b7c 1129 {
03a4bdbb 1130 return false;
f1ab3b7c 1131 }
3f243b0b 1132 else if (!FL_is_playing(user))
1133 {
1134 return false;
1135 }
03a4bdbb 1136 else
1137 return true;
1af35752 1138}
1139
85ce9d3e 1140bool is_fighting(char *u)
1141{
1142 aClient *user;
1143
1144 if (!(user = find(u)))
85ce9d3e 1145 return false;
85ce9d3e 1146 else
40251952 1147 return is_fighting(user);
85ce9d3e 1148}
40251952 1149
1af35752 1150bool is_fighting(aClient *user)
1151{
1152 if (!is_playing(user))
1153 return false;
1154 else
448a1531 1155 return player_fight(user) || master_fight(user) || user->stats->fight != NULL;
1af35752 1156}
85ce9d3e 1157
1158bool player_fight(char *u)
1159{
1160 aClient *user;
1161
1162 if (!(user = find(u)))
1163 return false;
40251952 1164 else
1165 return player_fight(user);
85ce9d3e 1166}
448a1531 1167
1af35752 1168bool player_fight(aClient *user)
1169{
448a1531 1170 if (!is_playing(user))
1af35752 1171 return false;
a51f0dcd 1172 else if (user->stats->battle != NULL)
1173 {
1174 return user->stats->battle->stats != NULL;
1175 }
1176 return false;
1af35752 1177}
85ce9d3e 1178
1179bool master_fight(char *u)
1180{
1181 aClient *user;
1182
1183 if (!(user = find(u)))
1184 return false;
85ce9d3e 1185 else
40251952 1186 return master_fight(user);
85ce9d3e 1187}
40251952 1188
1af35752 1189bool master_fight(aClient *user)
85ce9d3e 1190{
1af35752 1191 if (!is_playing(user))
1192 return false;
1193 else
1194 return user->stats->master != NULL;
85ce9d3e 1195}
1196
1197void do_fight(char *u)
1198{
1199 aClient *ni, *battle;
1200
1201 char *nick = strtok(NULL, " ");
1202
1203 if (!nick)
1204 {
1205 notice(s_GameServ, u, "SYNTAX: /msg %S FIGHT PLAYER");
40251952 1206 return;
85ce9d3e 1207 }
1208 else if (!(ni = find(u)))
1209 {
1af35752 1210 notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
40251952 1211 return;
85ce9d3e 1212 }
448a1531 1213 else if (isIgnore(ni))
1214 {
1215 #ifdef DEBUGMODE
1216 log("Ignoring %s.", ni->getNick());
1217 #endif
1218 return;
1219 }
71098075 1220 else if (!is_playing(ni))
85ce9d3e 1221 {
71098075 1222 notice(s_GameServ, u, "You are not playing!");
40251952 1223 return;
85ce9d3e 1224 }
40251952 1225
1226 updateTS(ni->stats);
1227
1228 if (ni->stats->player_fights <= 0)
3348c24e 1229 {
1230 ni->stats->player_fights = 0; // just to be safe
1231 notice(s_GameServ, u, "You are out of player fights for the "\
1232 "day. You have to wait until tomorrow!");
1233 }
71098075 1234 else if (!(battle = findplayer(nick)))
b0359af9 1235 {
1236 notice(s_GameServ, u, "Player %s not found!", nick);
1237 }
448a1531 1238 else if (!isAlive(ni->stats))
1239 {
1240 notice(s_GameServ, u, "You are dead. Wait until tomorrow to fight others!");
1241 }
b0359af9 1242 else if (!is_playing(battle))
85ce9d3e 1243 {
71098075 1244 notice(s_GameServ, u, "You can't attack %s while they aren't playing!", nick);
85ce9d3e 1245 }
b478c0df 1246
1247/* offline fighting not available yet
1248 else if (!(fight = finduser(nick)))
1249 {
1250 ni->stats->battle = battle;
1251 battle->battle = ni;
1252 setYourTurn(ni->stats);
1253 clearYourTurn(battle->stats);
1254
1255 notice(s_GameServ, u, "You decide to fight %s while they're "\
1256 "not in the realm!",
1257 battle->stats->name);
1258 display_players(u);
1259 }
1260*/
b0359af9 1261 else if (stricmp(ni->stats->name, battle->stats->name) == 0)
1262 {
1263 notice(s_GameServ, u, "Are you trying to commit suicide!?");
1af35752 1264 }
da5cf17a 1265 else if (!isAlive(battle->stats))
1266 {
1267 notice(s_GameServ, u, "They are dead. Cannot fight dead players!");
da5cf17a 1268 }
1902338e 1269 else if (player_fight(battle))
1270 {
1271 notice(s_GameServ, u, "%s is fighting %s already!", battle->stats->name, battle->stats->battle->stats->name);
1902338e 1272 }
448a1531 1273 else if (master_fight(battle))
1274 {
1275 notice(s_GameServ, u, "%s is fighting their master!", battle->stats->name);
1276 }
1902338e 1277 else if (is_fighting(battle))
1278 {
1279 notice(s_GameServ, u, "%s is fighting %s already!", battle->stats->name, battle->stats->fight->name);
1902338e 1280 }
8450c018 1281 else if (ni->stats->level - battle->stats->level > maxbfightdistance)
1282 {
1283 // You can't fight someone below you by more than X level(s)
1284 // level 12 can fight level (12 - X) but not < (12 - X)
1285 notice(s_GameServ, u, "You may not fight %s. You're too strong!",
ae2685f6 1286 battle->stats->name);
8450c018 1287 }
1288 else if (battle->stats->level - ni->stats->level > maxafightdistance)
1289 {
1290 // You can't fight someone above you by more than X level(S)
1291 // level 1 can fight level (1 + X), but not > (1 + X)
1292 notice(s_GameServ, u, "%s, do you really have a death wish? Try the forest you "\
1293 "weakling!", ni->stats->name);
8450c018 1294 }
b0359af9 1295 else
85ce9d3e 1296 {
1297 // Set your battle pointer to the other player
1298 ni->stats->battle = battle;
1299
1300 // Set the other player's battle pointer to you
448a1531 1301 ni->stats->battle->stats->battle = ni;
85ce9d3e 1302
1303 // The initiator gets the first move (perhaps this should be 50/50)
ee38284f 1304 setYourTurn(ni->stats);
1305 clearYourTurn(battle->stats);
85ce9d3e 1306
1307 // Initiate Battle sequence!
b0359af9 1308 ni->stats->player_fights -= 1;
f2072f1a 1309
ce61cdfa 1310 notice(s_GameServ, u, "You challenge %s to an online duel!", battle->stats->name);
1311 notice(s_GameServ, battle->getNick(), "%s has challenged you to an online duel!", ni->stats->name);
71098075 1312 notice(s_GameServ, battle->getNick(), "%s gets to go first "\
1313 "because they initiated!", ni->stats->name);
ce61cdfa 1314 notice(s_GameServ, battle->getNick(), "Please wait while %s decides what to do.", ni->stats->name);
85bcf836 1315 display_players(ni);
85ce9d3e 1316 }
1317}
40251952 1318
83cf716f 1319void do_use(char *u)
1320{
1321 aClient *user;
1322 Pouch *p;
1323
1324 char *item = strtok(NULL, " ");
1325
1326 if (!item)
1327 {
1328 notice(s_GameServ, u, "SYNTAX: USE ITEM");
1329 notice(s_GameServ, u, "Type /msg %S HELP USE for more information.");
1330 return;
1331 }
1332 else if (!(user = find(u)))
1333 {
1334 notice(s_GameServ, u, "Fatal Error in do_use. Contact a(n) %S Admin");
1335 return;
1336 }
448a1531 1337 else if (isIgnore(user))
1338 {
1339 #ifdef DEBUGMODE
1340 log("Ignoring %s.", user->getNick());
1341 #endif
1342 return;
1343 }
83cf716f 1344 else if (!is_playing(user))
1345 {
1346 notice(s_GameServ, u, "You must be playing to use items!");
1347 return;
1348 }
1349
40251952 1350 updateTS(user->stats);
1351
83cf716f 1352 p = &user->stats->inventory;
1353
35cba3f5 1354 if (stricmp(item, "HEALING") == 0)
83cf716f 1355 {
1356 if (p->Healing() <= 0)
1357 {
35cba3f5 1358 notice(s_GameServ, u, "You are out of Healing Potions!");
83cf716f 1359 return;
1360 }
35cba3f5 1361 int oldhealing = user->stats->hp;
83cf716f 1362 notice(s_GameServ, u, "You hastiliy gulp down the flask of cool life-giving waters.");
1363 notice(s_GameServ, u, "Rejuvination spreads throughout your body.");
1364 user->stats->hp += (10 * user->stats->level) + (rand() % 10) * user->stats->level;
35cba3f5 1365 notice(s_GameServ, u, "You gain %d HP!", user->stats->hp - oldhealing);
83cf716f 1366 p->decHealing();
35cba3f5 1367 if (player_fight(user))
1368 {
1369 notice(s_GameServ, user->stats->battle->getNick(),
1370 "%s has used a healing potion!");
1371 }
83cf716f 1372 }
1373 else if (stricmp(item, "STRENGTH") == 0)
1374 {
1375 if (p->Strength() <= 0)
1376 {
1377 notice(s_GameServ, u, "You are out of Strength Potions!");
1378 return;
1379 }
1380 int oldstrength = user->stats->strength;
1381 notice(s_GameServ, u, "As you grip the flask containing pure power, you feel adrenaline coarse through your veins!");
1382 notice(s_GameServ, u, "In one swallow you drink the potion and feel your muscle fibers bulging andgrowing!");
ae2685f6 1383 user->stats->strength += 1 + (rand() % 10 >= 8 ? 1 : 0); // 1-2
83cf716f 1384 notice(s_GameServ, u, "You gain %d Strength points!", user->stats->strength - oldstrength);
1385 p->decStrength();
35cba3f5 1386 if (player_fight(user))
1387 {
1388 notice(s_GameServ, user->stats->battle->getNick(),
1389 "%s has used a strength potion!");
1390 }
83cf716f 1391 }
1392 else if (stricmp(item, "DEFENSE") == 0)
1393 {
1394 if (p->Defense() <= 0)
1395 {
1396 notice(s_GameServ, u, "You are out of Defense Potions!");
1397 return;
1398 }
8c734eb9 1399 int olddefense = user->stats->defense;
83cf716f 1400 notice(s_GameServ, u, "You drink the foul tasting viscous liquid while pinching your nose in disgust.");
1401 notice(s_GameServ, u, "It tasted bad, but you feel like you are unbeatable!");
ae2685f6 1402 user->stats->defense += 1 + (rand() % 10 >= 8 ? 1 : 0); // 1-2
83cf716f 1403 notice(s_GameServ, u, "You gain %d Defense points!", user->stats->defense - olddefense);
1404 p->decDefense();
35cba3f5 1405 if (player_fight(user))
1406 {
1407 notice(s_GameServ, user->stats->battle->getNick(),
1408 "%s has used a defense potion!");
1409 }
83cf716f 1410 }
8c734eb9 1411 else if (stricmp(item, "HP") == 0)
1412 {
1413 if (p->HP() <= 0)
1414 {
1415 notice(s_GameServ, u, "You are out of HP Potions!");
1416 return;
1417 }
1418 int oldHP = user->stats->maxhp;
1419 notice(s_GameServ, u, "You feel your life growing longer as you drink the green glowing liquid.");
4e64da60 1420 user->stats->maxhp += 2 +
1421 (rand() % 100 > 70 ? (rand() % 7) : (rand() % 2) );
ae2685f6 1422
8c734eb9 1423 notice(s_GameServ, u, "You gain %d Maximum hit points!", user->stats->maxhp - oldHP);
1424 p->decHP();
35cba3f5 1425 if (player_fight(user))
1426 {
1427 notice(s_GameServ, user->stats->battle->getNick(),
1428 "%s has used a HP potion!");
1429 }
8c734eb9 1430 }
ee38284f 1431 else
1432 {
35cba3f5 1433 notice(s_GameServ, u, "SYNTAX: /msg %S USE {HEALING | STRENGTH | DEFENSE | HP}");
ee38284f 1434 return;
1435 }
83cf716f 1436
1437 end_turn(user); // If they're fighting, end their turn
1438}
c8ada07e 1439void do_run(char *u)
1440{
1441 aClient *user;
28f552b8 1442 Player *p, *p2 = NULL;
85ce9d3e 1443
c8ada07e 1444 if (!(user = find(u)))
1445 {
1446 notice(s_GameServ, u, "Couldn't find you. Error. Contact a %S admin");
1447 return;
1448 }
448a1531 1449 else if (isIgnore(user))
1450 {
1451 #ifdef DEBUGMODE
1452 log("Ignoring %s.", user->getNick());
1453 #endif
1454 return;
1455 }
bb668fcf 1456 else if (!is_playing(user))
1457 {
adaf4cdb 1458 notice(s_GameServ, u, "You must be playing to run!");
bb668fcf 1459 return;
1460 }
1461
40251952 1462 updateTS(user->stats);
c8ada07e 1463 p = user->stats;
1464
1465 if (p->battle)
1466 p2 = p->battle->stats;
1467
1af35752 1468 if (!is_fighting(user))
c8ada07e 1469 notice(s_GameServ, u, "You run in place... try fighting next time.");
1af35752 1470 else if (!player_fight(user) && !master_fight(user))
c8ada07e 1471 {
1472 notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p->fight->name);
1473 delete p->fight;
1474 p->fight = NULL;
1475 }
ee38284f 1476 else if (player_fight(user) && isYourTurn(p))
c8ada07e 1477 {
1478 notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p2->name);
1479 notice(s_GameServ, p->battle->getNick(), "\ 2%s\ 2 ran away from you like a little baby!", p->name);
1480 p2->battle = NULL;
1481 }
ee38284f 1482 else if (player_fight(user) && !isYourTurn(p))
c8ada07e 1483 {
1484 notice(s_GameServ, u, "It is not your turn. Please wait until \ 2%s\ 2 decides what to do.", p2->name);
1485 }
1af35752 1486 else if (master_fight(user))
c8ada07e 1487 {
1488 notice(s_GameServ, u, "You cannot run from \ 2%s\ 2! FIGHT!", p->master->name);
1489 }
1490 p->battle = NULL;
1491}
83cf716f 1492
1493void end_turn(aClient *user)
1494{
1495 char *nick, *u = user->getNick();
1496 Monster *fight;
1497 aClient *battle;
1498 int mhit;
1499
1500 nick = new char[strlen(user->getNick()) + 1];
1501
1502 if (!user || !is_playing(user) || !is_fighting(user))
1503 goto endturn;
1504
1505 if (!player_fight(user) && !master_fight(user))
1506 fight = user->stats->fight;
1507 else
1508 fight = user->stats->master;
1509 battle = user->stats->battle;
1510
1511 if (!player_fight(user))
1512 {
1513 // Opponent's Hit
1514 mhit = (fight->strength / 2) +
1515 (rand() % (fight->strength / 2) - (user->stats->defense +
1516 arbonus[user->stats->armor]));
1517 }
1518 else
1519 {
1520 // Opponent's Hit
1521 mhit = (((battle->stats->strength + webonus[battle->stats->weapon]) / 2) +
1522 (rand() % ((battle->stats->strength + webonus[battle->stats->weapon])) / 2) -
1523 (user->stats->defense + arbonus[user->stats->armor]));
1524 }
1525 if (!player_fight(user))
1526 {
1527
1528 if (mhit > 0)
1529 {
1530 notice(s_GameServ, u, "\1f%s\1f attacks with their \1f%s\1f for \ 2%d\ 2 damage!",
1531 fight->name, fight->weapon, mhit);
1532 }
1533 else if (mhit <= 0)
1534 notice(s_GameServ, u, "%s completely misses you!", fight->name);
1535
1536 if (mhit >= user->stats->hp)
1537 {
1538 if (!master_fight(user))
1539 {
1540 notice(s_GameServ, u, "You have been \ 2\1fkilled\1f\ 2 by %s!", fight->name);
1541 notice(s_GameServ, u, "You lose all gold on hand and lose 10 percent "\
1542 "of your experience!");
1543 user->stats->gold = 0;
1544 user->stats->exp -= (long int)(user->stats->exp * .10);
b478c0df 1545 user->stats->hp = 0;
83cf716f 1546 user->stats->fight = NULL;
ee38284f 1547 clearAlive(user->stats);
83cf716f 1548 goto endturn;
1549 }
1550 else
1551 {
1552 notice(s_GameServ, u, "%s has bested you! You will have to wait "\
1553 "until tomorrow to try again", user->stats->master->name);
1554 user->stats->fight = NULL;
1555 user->stats->master = NULL;
1556 goto endturn;
1557 }
1558 }
1559 else
1560 {
1561 if (mhit > 0)
1562 user->stats->hp -= mhit;
1563 display_monster(u);
1564 goto endturn;
1565 }
1566 }
1567 else
1568 {
ee38284f 1569 clearYourTurn(user->stats);
1570 setYourTurn(battle->stats);
83cf716f 1571 display_players(battle);
1572 }
1573endturn:
1574 delete nick;
1575}
1576
85ce9d3e 1577void do_attack(char *u)
1578{
1579 int hit, mhit;
1580 aClient *ni, *battle; // The player and perhaps the player they're fighting
1581 Monster *fight; // The monster they may be fighting
1582
1583 if (!(ni = find(u)))
83cf716f 1584 {
1585 notice(s_GameServ, u, "Fatal error in do_attack. Contact a(n) %S admin for help.");
1586 return;
1587 }
448a1531 1588 else if (isIgnore(ni))
1589 {
1590 #ifdef DEBUGMODE
1591 log("Ignoring %s.", ni->getNick());
1592 #endif
1593 return;
1594 }
83cf716f 1595 else if (!is_playing(ni))
85ce9d3e 1596 {
1597 notice(s_GameServ, u, "You're not playing!");
1598 return;
1599 }
83cf716f 1600 else if (!is_fighting(ni))
85ce9d3e 1601 {
1602 notice(s_GameServ, u, "You're not in battle!");
1603 return;
1604 }
1605 else
1606 {
1607 if (!ni->stats->master) // This is not a master fight
1608 fight = ni->stats->fight; // Monster Could be NULL
1609 else // This IS a master fight
1610 fight = ni->stats->master; // Master Could be NULL
1611
1612 battle = ni->stats->battle; // Player Could be NULL
1613
1614 // One has to be !NULL based on the previous else if
1615 // We wouldn't be here if they were all NULL
1616 }
40251952 1617 updateTS(ni->stats);
85ce9d3e 1618
1af35752 1619 if (!player_fight(ni))
85ce9d3e 1620 {
1621 // Player's Hit
1622 hit = ((ni->stats->strength + webonus[ni->stats->weapon]) / 2) +
1623 (rand() % ((ni->stats->strength + webonus[ni->stats->weapon]) / 2));
1624
1625 // Opponent's Hit
1626 mhit = (fight->strength / 2) +
1627 (rand() % (fight->strength / 2) - (ni->stats->defense +
1628 arbonus[ni->stats->armor]));
1629 }
1630 else
1631 {
1632 // Opponent's Hit
1633 mhit = (((battle->stats->strength + webonus[battle->stats->weapon]) / 2) +
1634 (rand() % ((battle->stats->strength + webonus[battle->stats->weapon])) / 2) -
1635 (ni->stats->defense + arbonus[ni->stats->armor]));
1636
1637 // Player's Hit
1638 hit = (((ni->stats->strength + webonus[ni->stats->weapon]) / 2) +
1639 (rand() % ((ni->stats->strength + webonus[ni->stats->weapon])) / 2) -
1640 (battle->stats->defense + arbonus[battle->stats->armor]));
1641 }
1642
1af35752 1643 if (!player_fight(ni))
85ce9d3e 1644 {
1645 if (hit > 0)
1646 notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", fight->name, hit);
1647 else
1648 notice(s_GameServ, u, "You miss \1f%s\1f completely!", fight->name);
1649
1650 if (hit >= fight->hp)
1651 {
1af35752 1652 if (master_fight(ni))
85ce9d3e 1653 notice(s_GameServ, u, "You have bested %s!", fight->name);
1654 else
1655 notice(s_GameServ, u, "You have killed \ 2%s\ 2!", fight->name);
1656
1657 notice(s_GameServ, u, "%s", fight->death);
1658 notice(s_GameServ, u, "You recieve \ 2%d\ 2 experience and \ 2%d\ 2 gold!",
1659 fight->exp, fight->gold);
1660
1661 // If your new experience (or gold) will be greater than 2 billion,
1662 // then set your exp to 2bil. (2 billion max)... otherwise add them.
1663 // This could be a problem with overflowing out of the sign bit.
1664 // Unsigned long int maybe? Leave it for now.
1665 ni->stats->exp = ( (ni->stats->exp + fight->exp) > 2000000000 ? 2000000000 :
1666 ni->stats->exp + fight->exp);
ee38284f 1667
85ce9d3e 1668 ni->stats->gold = (ni->stats->gold + fight->gold > 2000000000 ? 2000000000 :
1669 ni->stats->gold + fight->gold);
c8ada07e 1670
85ce9d3e 1671
1af35752 1672 if (master_fight(ni))
85ce9d3e 1673 {
1674 notice(s_GameServ, u, "You are now level %d!", ni->stats->level + 1);
1675 notice(s_GameServ, u, "You gain %d Strength, and %d Defense points!",
1676 strbonus[ni->stats->level - 1], defbonus[ni->stats->level - 1]);
1677
1678 // Increase your level
1679 ni->stats->level++;
1680
1681 // Increase your maximum hit points
1682 ni->stats->maxhp += hpbonus[ni->stats->level - 1];
1683
1684 // Heal the player by setting hp to their max
1685 ni->stats->hp = ni->stats->maxhp;
1686
1687 // Add to your strength
1688 ni->stats->strength += strbonus[ni->stats->level - 1];
1689
1690 // Add to your defensive power
1691 ni->stats->defense += defbonus[ni->stats->level - 1];
1692
1693 // Clear the pointer for your master
1694 ni->stats->master = NULL;
1695 }
ab4f4ec0 1696
1697 // They're dead so remove the pointer
1698 delete ni->stats->fight;
1699 ni->stats->fight = NULL;
1700 ni->stats->master = NULL;
1701
85ce9d3e 1702 return;
1703 }
1704 else
1705 {
1706 if (hit > 0)
1707 fight->hp -= hit;
1708 if (mhit > 0)
1709 {
e282e9d2 1710 notice(s_GameServ, u, "\1f%s\1f attacks with their \1f%s\1f for \ 2%d\ 2 damage!",
85ce9d3e 1711 fight->name, fight->weapon, mhit);
1712 }
1713 else if (mhit <= 0)
1714 notice(s_GameServ, u, "%s completely misses you!", fight->name);
1715
1716 if (mhit >= ni->stats->hp)
1717 {
1af35752 1718 if (!master_fight(ni))
85ce9d3e 1719 {
1720 notice(s_GameServ, u, "You have been \ 2\1fkilled\1f\ 2 by %s!", fight->name);
1721 notice(s_GameServ, u, "You lose all gold on hand and lose 10 percent "\
1722 "of your experience!");
1723 ni->stats->gold = 0;
1724 ni->stats->exp -= (long int)(ni->stats->exp * .10);
b478c0df 1725 ni->stats->hp = 0;
85ce9d3e 1726 ni->stats->fight = NULL;
ee38284f 1727 clearAlive(ni->stats);
85ce9d3e 1728 return;
1729 }
1730 else
1731 {
1732 notice(s_GameServ, u, "%s has bested you! You will have to wait "\
1733 "until tomorrow to try again", ni->stats->master->name);
1734 ni->stats->fight = NULL;
1735 ni->stats->master = NULL;
1736 return;
1737 }
1738 }
1739 else
1740 {
1741 if (mhit > 0)
1742 ni->stats->hp -= mhit;
1743 display_monster(u);
1744 return;
1745 }
1746 }
1747 }
1af35752 1748 else if (player_fight(ni))
85ce9d3e 1749 {
1750/* Offline fighting not available yet
1751 if (!(online = finduser(ni->stats->battle->nick)) || !nick_identified(online))
1752 {
1753 if (hit > 0)
1754 notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", battle->nick, hit);
1755 else
1756 notice(s_GameServ, u, "You miss \1f%s\1f completely!", battle->nick);
1757 if (hit >= battle->stats->hp)
1758 {
1759 notice(s_GameServ, u, "You have killed \ 2%s\ 2!", battle->nick);
1760* notice(s_GameServ, u, "You recieve \ 2%d\ 2 experience and \ 2%ld\ 2 gold!",
1761 (long int)(battle->stats->exp * .10), battle->stats->gold);
1762 if (2000000000 - ni->stats->exp > (long int)(battle->stats->exp * .10))
1763 {
1764 ni->stats->exp += (long int)(battle->stats->exp * .10);
1765 battle->stats->exp -= (long int)(battle->stats->exp * .10);
1766 }
1767* else
1768 {
1769 battle->stats->exp -= (long int)(battle->stats->exp * .10);
1770 ni->stats->exp = 2000000000;
1771 }
1772
1773 if (2000000000 - ni->stats->gold > battle->stats->gold)
1774 {
1775* ni->stats->gold += battle->stats->gold;
1776 battle->stats->gold = 0;
1777 }
1778 else
1779 {
1780 battle->stats->gold = 2000000000 - ni->stats->gold;
1781 ni->stats->gold = 2000000000;
1782 }
1783* ni->stats->battle->stats->alive = 0;
1784 ni->stats->battle->battle = NULL;
1785 ni->stats->battle = NULL;
1786 return;
1787 }
1788 else
1789 {
1790 if (hit > 0)
1791* battle->stats->hp -= hit;
1792 if (mhit > 0)
1793 {
1794 notice(s_GameServ, u, "\1f%s\1f hits you with their \1f%s\1f for \ 2%d\ 2 damage!",
1795 battle->nick, weapons[battle->stats->weapon], mhit);
1796 }
1797 else if (mhit <= 0)
1798 notice(s_GameServ, u, "%s completely misses you!", battle->nick);
1799*
1800 if (mhit >= ni->stats->hp)
1801 {
1802 notice(s_GameServ, u, "You have been \ 2\1fkilled\1f\ 2 by %s!", battle->nick);
1803 if (2000000000 - battle->stats->gold > ni->stats->gold)
1804 {
1805 notice(s_GameServ, u, "%s took all your gold!", battle->nick);
1806 battle->stats->gold += ni->stats->gold;
1807* ni->stats->gold = 0;
1808 }
1809 else
1810 {
1811 notice(s_GameServ, u, "You're lucky, %s couldn't carry all your gold.",
1812 battle->nick);
1813 ni->stats->gold -= (2000000000 - battle->stats->gold);
1814 notice(s_GameServ, u, "You were left dead with %d gold.",
1815* (long int)ni->stats->gold);
1816 battle->stats->gold = 2000000000;
1817 }
1818 ni->stats->battle->battle = NULL;
1819 ni->stats->battle = NULL;
1820 ni->stats->alive = 0;
1821 return;
1822 }
1823* else
1824 {
1825 if (mhit > 0)
1826 ni->stats->hp -= mhit;
1827 display_players(u);
1828 return;
1829 }
1830 }
1831 }
1832* end offline fighting */
1833
ce61cdfa 1834 if (is_playing(battle))
85ce9d3e 1835 {
ee38284f 1836 if (!isYourTurn(ni->stats))
85ce9d3e 1837 {
1838 notice(s_GameServ, u, "Please wait until %s decides what to do!",
ce61cdfa 1839 battle->stats->name);
85ce9d3e 1840 return;
1841 }
1842 if (hit > 0)
1843 {
ce61cdfa 1844 notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", battle->stats->name, hit);
85ce9d3e 1845
1846 notice(s_GameServ, battle->getNick(), "%s has hit you with their %s for "\
ce61cdfa 1847 "\ 2%d\ 2 damage!", ni->stats->name,
1848 weapons[ni->stats->weapon], hit);
ee38284f 1849 clearYourTurn(ni->stats);
1850 setYourTurn(battle->stats);
85bcf836 1851 display_players(battle);
85ce9d3e 1852 }
1853 else
1854 {
ce61cdfa 1855 notice(s_GameServ, u, "You miss \1f%s\1f completely!", battle->stats->name);
1856 notice(s_GameServ, battle->getNick(), "%s misses you completely!", ni->stats->name);
ee38284f 1857 clearYourTurn(ni->stats);
1858 setYourTurn(battle->stats);
85bcf836 1859 display_players(battle);
85ce9d3e 1860 }
1861 if (hit >= battle->stats->hp)
1862 {
ce61cdfa 1863 notice(s_GameServ, u, "You have killed \ 2%s\ 2!", battle->stats->name);
85ce9d3e 1864 notice(s_GameServ, u, "You recieve \ 2%d\ 2 experience and \ 2%ld\ 2 gold!",
1865 (long int)(battle->stats->exp * .10), battle->stats->gold);
ce61cdfa 1866 notice(s_GameServ, battle->getNick(), "You have been killed by \ 2%s\ 2!",
1867 ni->stats->name);
85ce9d3e 1868 battle->stats->hp = 0;
ee38284f 1869 clearAlive(battle->stats);
85ce9d3e 1870
1871 if (2000000000 - ni->stats->exp > (long int)(battle->stats->exp * .10))
1872 {
1873 ni->stats->exp += (long int)(battle->stats->exp * .10);
1874 battle->stats->exp -= (long int)(battle->stats->exp * .10);
1875 }
1876 else
1877 {
1878 battle->stats->exp -= (long int)(battle->stats->exp * .10);
1879 ni->stats->exp = 2000000000;
1880 }
1881
1882 if (2000000000 - ni->stats->gold > battle->stats->gold)
1883 {
1884 notice(s_GameServ, battle->getNick(), "You lose ten percent of experience and "\
1885 "all gold on hand!");
1886 ni->stats->gold += battle->stats->gold;
1887 battle->stats->gold = 0;
1888 }
1889 else
1890 {
1891 battle->stats->gold = 2000000000 - ni->stats->gold;
1892 notice(s_GameServ, battle->getNick(), "You lose ten percent of your experience!");
1893
1894 notice(s_GameServ, battle->getNick(), "However, %s could not carry all of your "\
ce61cdfa 1895 "gold.", ni->stats->name);
85ce9d3e 1896
1897 notice(s_GameServ, battle->getNick(), "Luckily, you still have \ 2%ld\ 2 gold "\
1898 "left. All is not lost!", battle->stats->gold);
1899
1900 ni->stats->gold = 2000000000;
1901 }
1902 battle->stats->battle = NULL;
1903 ni->stats->battle = NULL;
1904 return;
1905 }
1906 else
1907 {
1908 if (hit > 0)
1909 battle->stats->hp -= hit;
ee38284f 1910 clearYourTurn(ni->stats);
1911 setYourTurn(battle->stats);
85ce9d3e 1912 notice(s_GameServ, u, "Please wait while %s decides what to do!",
ce61cdfa 1913 battle->stats->name);
85ce9d3e 1914
1915 return;
1916 }
1917 }
1918 }
1919}
ce61cdfa 1920
85ce9d3e 1921void do_heal(char *u)
1922{
1923 aClient *ni;
1924 char *amount = strtok(NULL, " ");
1925 int price, num;
1926
1927 if (!amount)
1928 {
1929 notice(s_GameServ, u, "SYNTAX: /msg %S HEAL {ALL | #}");
40251952 1930 return;
85ce9d3e 1931 }
1af35752 1932 else if (!(ni = find(u)))
1933 {
1934 notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
1935 return;
1936 }
448a1531 1937 else if (isIgnore(ni))
1938 {
1939 #ifdef DEBUGMODE
1940 log("Ignoring %s.", ni->getNick());
1941 #endif
1942 return;
1943 }
1af35752 1944 else if (!is_playing(ni))
85ce9d3e 1945 {
1946 notice(s_GameServ, u, "You aren't playing!");
1af35752 1947 return;
1948 }
ee38284f 1949 else if (!isAlive(ni->stats))
1af35752 1950 {
1951 notice(s_GameServ, u, "You are dead. Wait until tomorrow for healing.");
1952 return;
85ce9d3e 1953 }
1af35752 1954 else if (is_fighting(ni))
85ce9d3e 1955 {
1956 notice(s_GameServ, u, "You can't heal in battle!");
40251952 1957 return;
85ce9d3e 1958 }
1959 else if (ni->stats->hp >= ni->stats->maxhp)
1960 {
1961 notice(s_GameServ, u, "You don't need healing!");
40251952 1962 return;
85ce9d3e 1963 }
40251952 1964
1965 updateTS(ni->stats);
1966 if (stricmp(amount, "ALL") == 0)
85ce9d3e 1967 {
1968 price = ni->stats->level * 3;
1969 if (ni->stats->gold < (ni->stats->maxhp - ni->stats->hp) * price)
1970 {
1971 notice(s_GameServ, u, "Healing \ 2%d\ 2 points for \ 2%d\ 2 gold per point.",
1972 (long int)ni->stats->gold/price, price);
1973 ni->stats->hp += ni->stats->gold / price;
1974 ni->stats->gold %= price;
1975 }
1976 else
1977 {
1978 notice(s_GameServ, u, "Healing all possible points at \ 2%d\ 2 gold "\
1979 "per point.", price);
ad7dfaa0 1980 notice(s_GameServ, u, "\ 2%d\ 2 points healed for \ 2%ld\ 2 gold. HP at MAX!",
1981 (ni->stats->maxhp - ni->stats->hp),
1982 (price * (ni->stats->maxhp - ni->stats->hp)) );
85ce9d3e 1983 ni->stats->gold -= price * (ni->stats->maxhp - ni->stats->hp);
1984 ni->stats->hp = ni->stats->maxhp;
1985 }
1986 }
1987 else if (isstringnum(amount))
1988 {
1989 num = stringtoint(amount);
1990 price = ni->stats->level * 3;
1991 if (ni->stats->gold < price * num)
1992 {
1993 notice(s_GameServ, u, "You only have enough gold to heal \ 2%d\ 2 points!",
1994 (long int)ni->stats->gold/price);
1995 }
1996 else if (num <= ni->stats->maxhp - ni->stats->hp)
1997 {
1998 notice(s_GameServ, u, "Healing \ 2%d\ 2 points at \ 2%d\ 2 gold per point.",
1999 num, price);
2000 ni->stats->hp += num;
2001 ni->stats->gold -= num * price;
2002 }
2003 else if (num > ni->stats->maxhp - ni->stats->hp)
2004 {
2005 notice(s_GameServ, u, "Healing all possible points at \ 2%d\ 2 gold "\
2006 "per point.", price);
2007 notice(s_GameServ, u, "\ 2%d\ 2 points healed. HP at MAX!",
2008 (ni->stats->maxhp - ni->stats->hp));
2009 ni->stats->gold -= price * (ni->stats->maxhp - ni->stats->hp);
2010 ni->stats->hp = ni->stats->maxhp;
2011 }
2012 }
2013 else if (amount[0] == '-')
2014 notice(s_GameServ, u, "You trying to cheat?");
2015 else
2016 notice(s_GameServ, u, "SYNTAX: /msg %S HEAL {ALL | #}");
2017}
2018
2019int isstringnum(char *num)
2020{
28f552b8 2021 unsigned int x;
85ce9d3e 2022 for (x = 0; x < strlen(num); x++)
2023 {
2024 if ((int)num[x] < 48 || (int)num[x] > 57)
2025 return 0;
2026 }
2027return 1;
2028}
2029
2030long int stringtoint(char *number)
2031{
2032 long int x, len = strlen(number), sum = 0;
2033 if (len == 1)
2034 return chartoint(number[0]);
2035 sum += chartoint(number[len - 1]);
2036 for (x = len - 2; x >= 0; x--)
85ce9d3e 2037 sum += chartoint(number[x]) * pow(10, abs(x - len + 1));
85ce9d3e 2038 return sum;
2039}
2040
2041long int pow(int x, int y)
2042{
2043 long int value = 0;
2044 int count = 0;
2045 value += x;
2046
2047 if (x != 0 && y != 0)
2048 {
2049 for (count = 1; count <= y - 1; count++)
2050 value *= x;
2051 }
2052 else
2053 return 1;
2054return value;
2055}
2056
2057long int chartoint(char ch)
2058{
8c126acc 2059 if (int(ch) >= 48 && int(ch) <= 57)
2060 return int(ch) - 48;
2061 else
2062 return 0;
85ce9d3e 2063}
2064
2065int save_gs_dbase()
2066{
7996e5fd 2067 ListNode<aClient> *ptr;
85ce9d3e 2068 Player *it;
2069 ofstream outfile;
2070
2071 outfile.open(playerdata);
2072
2073 if (!outfile)
2074 {
fb37ecc7 2075 log("Error opening %s", playerdata);
85ce9d3e 2076 return 0;
2077 }
2078
7996e5fd 2079 for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
2080 {
2081 ptr = players[x].First();
85ce9d3e 2082 while(ptr)
2083 {
2084 it = ptr->getData()->stats;
ae2685f6 2085 clearYourTurn(it);
85ce9d3e 2086 outfile << it->name << ' ' << it->level << ' ' << it->exp << ' ' << it->gold << ' ' << it->bank << ' '
2087 << it->hp << ' ' << it->maxhp << ' ' << it->strength << ' ' << it->defense << ' '
ee38284f 2088 << it->armor << ' ' << it->weapon << ' '
e3c5fe46 2089 << it->forest_fights << ' ' << it->player_fights << ' '
266608f6 2090 << it->getFlags() << ' ' << it->password << ' ' << it->inventory.Healing()
9d3b1d42 2091 << ' ' << it->inventory.Strength() << ' ' << it->inventory.Defense() << ' ' << it->inventory.HP() << endl;
85ce9d3e 2092 ptr = ptr->Next();
2093 }
7996e5fd 2094 }
85ce9d3e 2095outfile.close();
28f552b8 2096return 1;
85ce9d3e 2097}
2098
2099int load_gs_dbase()
2100{
2101 ifstream infile;
2102 aClient *temp;
2103 Player *p;
ee38284f 2104 char *tempname, *buf, *password;
85ce9d3e 2105 buf = new char[1023];
2106
2107 infile.open(playerdata);
2108
2109 if (infile.fail())
2110 {
fb37ecc7 2111 log("Error opening %s", playerdata);
85ce9d3e 2112 return 0;
2113 }
2114
2115 while (infile.getline(buf, 1024, '\n'))
2116 {
2117 temp = new aClient;
2118 tempname = strtok(buf, " ");
2119 temp->stats = new Player(tempname);
2120 p = temp->stats;
2121
85ce9d3e 2122 p->level = stringtoint(strtok(NULL, " "));
2123 p->exp = stringtoint(strtok(NULL, " "));
2124 p->gold = stringtoint(strtok(NULL, " "));
2125 p->bank = stringtoint(strtok(NULL, " "));
2126 p->hp = stringtoint(strtok(NULL, " "));
2127 p->maxhp = stringtoint(strtok(NULL, " "));
2128 p->strength = stringtoint(strtok(NULL, " "));
2129 p->defense = stringtoint(strtok(NULL, " "));
2130 p->armor = stringtoint(strtok(NULL, " "));
2131 p->weapon = stringtoint(strtok(NULL, " "));
85ce9d3e 2132 p->forest_fights = stringtoint(strtok(NULL, " "));
2133 p->player_fights = stringtoint(strtok(NULL, " "));
1af35752 2134 p->setFlags(stringtoint(strtok(NULL, " ")));
ee38284f 2135
e3c5fe46 2136 password = strtok(NULL, " ");
2137 strcpy(p->password, password);
448a1531 2138 temp->setNick("Not Playing");
ce61cdfa 2139 #ifdef P10
448a1531 2140 temp->setRealNick("Not Playing");
ce61cdfa 2141 #endif
85ce9d3e 2142
9d3b1d42 2143 p->inventory.reset(); // Set inventory to all 0s
ee38284f 2144 // Old player databases didn't have these three extra values
2145 // If they come up null, leave them to 0 as the default.
2146 // On the next gameserv database save, it will save the values.
266608f6 2147 tempname = strtok(NULL, " ");
9d3b1d42 2148 if (tempname)
2149 p->inventory.setHealing(stringtoint(tempname));
2150
2151 tempname = strtok(NULL, " ");
2152 if (tempname)
2153 p->inventory.setStrength(stringtoint(tempname));
2154
2155 tempname = strtok(NULL, " ");
2156 if (tempname)
2157 p->inventory.setDefense(stringtoint(tempname));
2158
2159 tempname = strtok(NULL, " ");
2160 if (tempname)
2161 p->inventory.setHP(stringtoint(tempname));
448a1531 2162 unsigned long hv = iHASH((unsigned char *) temp->stats->name);
85bcf836 2163
2164 temp->stats->client = NULL;
7996e5fd 2165 players[hv].insertAtBack(temp);
85ce9d3e 2166 delete temp;
2167 }
1cf88153 2168delete [] buf;
28f552b8 2169infile.close();
2170return 1;
85ce9d3e 2171}
2172
e3c5fe46 2173bool passcmp(char *encrypted, char *plaintext)
2174{
2175 char salt[3];
cdc9a6db 2176 char *plaintext2, *plainToencrypt;
2177 bool same = false;
2178
2179 plaintext2 = new char[strlen(encrypted) + strlen(plaintext)]; // Extra
2180 strcpy(plaintext2, plaintext);
2181
e3c5fe46 2182 salt[0] = encrypted[0];
2183 salt[1] = encrypted[1];
2184 salt[3] = '\0';
cdc9a6db 2185
2186 plainToencrypt = crypt(plaintext2, salt);
2187
2188 same = (strcmp((const char *)encrypted, plainToencrypt) == 0 ? true : false);
2189
2190 delete []plaintext2;
2191
2192 return same;
e3c5fe46 2193}
2194
2195bool check_password(char *name, char *plaintext)
2196{
0a1518fa 2197 aClient *client;
e3c5fe46 2198
0a1518fa 2199 if (!(client = findplayer(name)))
2200 return false;
2201 else
e3c5fe46 2202 {
0a1518fa 2203 return passcmp(client->stats->password, plaintext);
e3c5fe46 2204 }
e3c5fe46 2205}
1cf88153 2206
ad7dfaa0 2207void do_store(char *u)
2208{
2209 char *cmd = strtok(NULL, " ");
2210 char *item = strtok(NULL, " ");
2211 char *num = strtok(NULL, " ");
2212 char *space;
8c126acc 2213 int wep;
2214 aClient *user;
2215 Player *p;
ad7dfaa0 2216
1af35752 2217 if (!cmd || !item)
ad7dfaa0 2218 {
2219 notice(s_GameServ, u, "SYNTAX: STORE LIST {ARMOR | WEAPONS}");
2220 notice(s_GameServ, u, " \ 2STORE SELL {ARMOR | WEAPON}\ 2");
2221 notice(s_GameServ, u, " \ 2STORE BUY {ARMOR | WEAPON} \1fNUMBER\1f\ 2");
40251952 2222 return;
ad7dfaa0 2223 }
448a1531 2224 else if (!(user = find(u)))
2225 {
2226 log("Fatal Error: could not find %s in client list", u);
2227 return;
2228 }
2229 else if (isIgnore(user))
2230 {
2231 #ifdef DEBUGMODE
2232 log("Ignoring %s.", user->getNick());
2233 #endif
2234 return;
2235 }
2236 else if (!is_playing(user))
40251952 2237 {
1af35752 2238 notice(s_GameServ, u, "You must be playing to use the store!");
40251952 2239 return;
2240 }
ee38284f 2241 else if (!isAlive(user->stats))
1af35752 2242 {
2243 notice(s_GameServ, u, "You are dead. Wait until tomorrow to purchase weapons and armor!");
2244 return;
2245 }
40251952 2246 updateTS(user->stats);
2247
2248 if (stricmp(cmd, "LIST") == 0)
ad7dfaa0 2249 {
2250 if (stricmp(item, "WEAPONS") == 0)
2251 {
2252 notice(s_GameServ, u, "Welcome to Kain's Armory");
2253 notice(s_GameServ, u, "Here are the weapons we have available for the killing, sire:");
2254 for (int x = 1; x < WNA; x++)
2255 {
2256 space = spaces(strlen(weapons[x]), ".");
2257 notice(s_GameServ, u, "%s%d. %s%s%d",(x < 10 ? " " : ""), x, weapons[x], space, prices[x - 1]);
2258 free(space);
2259 }
2260 notice(s_GameServ, u, "To purchase a weapon, type /msg %S STORE BUY \ 2NUM\ 2.");
2261 notice(s_GameServ, u, "Where num. is the weapon number from the menu above.");
2262
2263 }
2264 else if (stricmp(item, "ARMOR") == 0)
2265 {
2266 notice(s_GameServ, u, "Welcome to Kain's Armory");
2267 notice(s_GameServ, u, "I hope you enjoy the fine armor we have available for your protection:");
2268 for (int x = 1; x < WNA; x++)
2269 {
2270 space = spaces(strlen(armors[x]), ".");
2271 notice(s_GameServ, u, "%s%d. %s%s%d",(x < 10 ? " " : ""), x, armors[x], space, prices[x - 1]);
2272 free(space);
2273 }
2274 notice(s_GameServ, u, "To purchase armor, type /msg %S store buy armor num.");
2275 notice(s_GameServ, u, "Where num. is the armor number from the menu above.");
2276
2277
2278 }
2279 } else if (stricmp(cmd, "BUY") == 0) {
8c126acc 2280 if (!num)
2281 {
2282 notice(s_GameServ, u, "SYNTAX: \ 2STORE BUY {ARMOR | WEAPON} \1fNUMBER\1f\ 2");
2283 return;
2284 }
2285 else if (!isstringnum(num))
2286 {
2287 notice(s_GameServ, u, "You must specify a number between 1 and %d. Not %s!", WNA - 1, num);
2288 return;
2289 }
2290 if (stricmp(item, "WEAPON") == 0)
2291 {
2292 wep = stringtoint(num);
2293 if (wep >= WNA || wep < 1)
2294 {
2295 notice(s_GameServ, u, "The number %d is out of range. The number you provide must be between 1 and %d.", wep, WNA - 1);
2296 return;
2297 }
2298
2299 p = user->stats;
2300
2301 if (p->weapon != 0)
2302 notice(s_GameServ, u, "You have to sell your %s first!", weapons[p->weapon]);
2303 else if (p->gold < prices[wep - 1])
2304 notice(s_GameServ, u, "You don't have enough gold for %s!", weapons[wep]);
2305 else
2306 {
2307 notice(s_GameServ, u, "You have purchased %s! Thanks for the gold!", weapons[wep]);
2308 p->weapon = wep;
2309 p->gold -= prices[wep - 1];
2310 }
2311 }
2312 else if (stricmp(item, "ARMOR") == 0)
2313 {
2314 wep = stringtoint(num);
2315 if (wep >= WNA || wep < 1)
2316 {
2317 notice(s_GameServ, u, "The number %d is out of range. The number you provide must be between 1 and %d.", wep, WNA - 1);
2318 return;
2319 }
2320
2321 p = user->stats;
2322
2323 if (p->armor != 0)
2324 notice(s_GameServ, u, "You have to sell your %s first!", armors[p->armor]);
2325 else if (p->gold < prices[wep - 1])
2326 notice(s_GameServ, u, "You don't have enough gold for %s!", armors[wep]);
2327 else
2328 {
2329 notice(s_GameServ, u, "You have purchased %s! Thanks for the gold!", armors[wep]);
2330 p->armor = wep;
2331 p->gold -= prices[wep - 1];
2332 }
2333 }
2334 }
2335 else if (stricmp(cmd, "SELL" ) == 0)
2336 {
2337 p = user->stats;
2338
2339 if (stricmp(item, "WEAPON") == 0)
2340 {
2341 if (p->weapon == 0)
2342 {
2343 notice(s_GameServ, u, "You want me to chop off your hands?");
2344 return;
2345 }
2346 else if (p->gold == 2000000000)
2347 {
2348 notice(s_GameServ, u, "You have enough gold. I'll just take that off your hands, sire.");
2349 p->weapon = 0;
2350 }
2351 else if (2000000000 - p->gold < (prices[p->weapon - 1] / 2))
2352 {
2353 notice(s_GameServ, u, "Thank you for your business! You now have as much gold as you can carry.");
2354 notice(s_GameServ, u, "However, you have no weapon... can I interest you in the %s?", weapons[WNA - 1]);
2355 p->gold = 2000000000;
2356 p->weapon = 0;
2357 }
2358 else
2359 {
2360 notice(s_GameServ, u, "Thank you for your business! You now have %d more gold but no weapon!", (prices[p->weapon - 1] / 2));
2361 p->gold += (prices[p->weapon - 1] / 2);
2362 p->weapon = 0;
2363 }
2364 }
2365 else if (stricmp(item, "ARMOR") == 0)
2366 {
2367 p = user->stats;
2368
2369 if (p->armor == 0)
2370 {
2371 notice(s_GameServ, u, "I don't think you can be any more naked...");
2372 return;
2373 }
2374 if (p->gold == 2000000000)
2375 {
2376 notice(s_GameServ, u, "You have enough gold. I'll just take that off your hands, sire.");
2377 p->armor = 0;
2378 }
2379 else if (2000000000 - p->gold < (prices[p->armor - 1] / 2))
2380 {
2381 notice(s_GameServ, u, "Thank you for your business! You now have as much gold as you can carry.");
2382 notice(s_GameServ, u, "However, you have no armor... can I interest you in %s?", armors[WNA - 1]);
2383 p->gold = 2000000000;
2384 p->armor = 0;
2385 }
2386 else
2387 {
2388 notice(s_GameServ, u, "Thank you for your business! You now have %d more gold but no armor!",
2389 (prices[p->armor - 1] / 2));
2390
2391 p->gold += (prices[p->armor - 1] / 2);
2392 p->armor = 0;
2393 }
2394 }
2395 else
2396 {
2397 notice(s_GameServ, u, "SYNTAX: STORE LIST {ARMOR | WEAPONS}");
2398 notice(s_GameServ, u, " \ 2STORE SELL {ARMOR | WEAPON}\ 2");
2399 notice(s_GameServ, u, " \ 2STORE BUY {ARMOR | WEAPON} \1fNUMBER\1f\ 2");
2400 }
2401 }
6d053d90 2402 else
2403 {
2404 notice(s_GameServ, u, "SYNTAX: STORE LIST {ARMOR | WEAPONS}");
2405 notice(s_GameServ, u, " \ 2STORE SELL {ARMOR | WEAPON}\ 2");
2406 notice(s_GameServ, u, " \ 2STORE BUY {ARMOR | WEAPON} \1fNUMBER\1f\ 2");
2407 return;
2408 }
8c126acc 2409}
9cda831c 2410void do_inventory(char *u)
2411{
2412 aClient *user;
2413
2414 if (!(user = find(u)))
2415 {
2416 notice(s_GameServ, u, "Fatal Error. Contact a %S admin!");
2417 return;
2418 }
448a1531 2419 else if (isIgnore(user))
2420 {
2421 #ifdef DEBUGMODE
2422 log("Ignoring %s.", user->getNick());
2423 #endif
2424 return;
2425 }
9cda831c 2426 else if (!is_playing(user))
2427 {
2428 notice(s_GameServ, u, "You must be playing to check your inventory!");
2429 return;
2430 }
40251952 2431 updateTS(user->stats);
9cda831c 2432 showinventory(user, user);
2433}
2434void showinventory(aClient *from, aClient *to)
2435{
2436 char *nick = to->getNick();
8c126acc 2437
9cda831c 2438 if (!to)
2439 to = from;
2440 if (is_playing(from))
2441 {
2442 Pouch *p = &from->stats->inventory;
ce61cdfa 2443 notice(s_GameServ, nick, "Inventory for %s:", from->stats->name);
9cda831c 2444 notice(s_GameServ, nick, " Healing Potions: %d", p->Healing());
2445 notice(s_GameServ, nick, "Strength Potions: %d", p->Strength());
2446 notice(s_GameServ, nick, " Defense Potions: %d", p->Defense());
9d3b1d42 2447 notice(s_GameServ, nick, " HP Potions: %d", p->HP());
9cda831c 2448 }
2449}
f5c25639 2450void do_tavern(char *u)
2451{
2452 char *cmd = strtok(NULL, " ");
2453 long int price;
2454
2455 aClient *user;
2456 Player *p;
2457 if (!(user = find(u)))
2458 {
2459 notice(s_GameServ, u, "Fatal Error. See a %S admin for help");
2460 return;
2461 }
448a1531 2462 else if (isIgnore(user))
2463 {
2464 #ifdef DEBUGMODE
2465 log("Ignoring %s.", user->getNick());
2466 #endif
2467 return;
2468 }
f5c25639 2469 else if (!is_playing(user))
2470 {
2471 notice(s_GameServ, u, "You must be playing to go to the Tavern");
2472 return;
2473 }
9cda831c 2474 else if (is_fighting(user))
2475 {
2476 notice(s_GameServ, u, "You cannot go to the Tavern during a fight!");
2477 return;
2478 }
40251952 2479
2480 updateTS(user->stats);
f5c25639 2481 p = user->stats;
40251952 2482
f5c25639 2483 if (!cmd)
2484 {
2485 notice(s_GameServ, u, "Welcome to Boot Liquors Mystic Apothecary");
2486 notice(s_GameServ, u, "Your commands:");
2487 notice(s_GameServ, u, "/msg %S TAVERN {LIST | BUY} [NUMBER]");
2488 notice(s_GameServ, u, "What'll it be?");
2489 }
2490 else if (stricmp(cmd, "LIST") == 0)
2491 {
2492 notice(s_GameServ, u, "Here is a list of what we have to offer:");
ae2685f6 2493 notice(s_GameServ, u, "1. Healing Potions for %ld Gold", 100 * p->level + (p->exp / 10));
2494 notice(s_GameServ, u, "2. Strength Potions for %ld Gold", 205 * p->level + (p->exp / 10));
2495 notice(s_GameServ, u, "3. Defense Potions for %ld Gold", 200 * p->level + (p->exp / 10));
2496 notice(s_GameServ, u, "4. HP Potions for %ld Gold", 230 * p->level + (p->exp / 10));
f5c25639 2497 notice(s_GameServ, u, "To buy a potion, type /msg %S TAVERN BUY #");
2498 notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 1 buys a healing potion!");
2499 notice(s_GameServ, u, "By something will ya!");
2500 }
2501 else if (stricmp(cmd, "BUY") == 0)
2502 {
2503 char *chnum = strtok(NULL, " ");
2504 int num = stringtoint(chnum);
2505
2506 if (!chnum)
2507 {
2508 notice(s_GameServ, u, "SYNTAX: TAVERN BUY #");
2509 notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 1");
2510 return;
2511 }
8c734eb9 2512 if (num < 1 || num > 4)
f5c25639 2513 {
2514 notice(s_GameServ, u, "Invalid Choice!");
2515 notice(s_GameServ, u, "Here is a list of what we have to offer:");
ae2685f6 2516 notice(s_GameServ, u, "1. Healing Potions for %ld Gold", 100 * p->level + (p->exp / 10));
2517 notice(s_GameServ, u, "2. Strength Potions for %ld Gold", 205 * p->level + (p->exp / 10));
2518 notice(s_GameServ, u, "3. Defense Potions for %ld Gold", 200 * p->level + (p->exp / 10));
2519 notice(s_GameServ, u, "4. HP Potions for %ld Gold", 230 * p->level + (p->exp / 10));
f5c25639 2520 notice(s_GameServ, u, "To buy a potion, type /msg %S TAVERN BUY #");
2521 notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 1 buys a healing potion!");
ee38284f 2522 return;
f5c25639 2523 }
2524 switch(num)
2525 {
2526 case 1:
ae2685f6 2527 price = (100 * p->level) + (p->exp / 10);
f5c25639 2528 if (p->gold >= price)
2529 {
2530 notice(s_GameServ, u, "One healing potion coming right up!");
2531 p->inventory.incHealing();
ee38284f 2532 p->gold -= price;
f5c25639 2533 }
2534 else
2535 notice(s_GameServ, u, "You don't have enough gold!");
2536 break;
2537 case 2:
ae2685f6 2538 price = (205 * p->level) + (p->exp / 10);
f5c25639 2539 if (p->gold >= price)
2540 {
2541 notice(s_GameServ, u, "One strength boost coming right up!");
2542 p->inventory.incStrength();
ee38284f 2543 p->gold -= price;
f5c25639 2544 }
2545 else
2546 notice(s_GameServ, u, "You don't have enough gold!");
2547 break;
2548 case 3:
ae2685f6 2549 price = (200 * p->level) + (p->exp / 10);
f5c25639 2550 if (p->gold >= price)
2551 {
2552 notice(s_GameServ, u, "One defense boost coming right up!");
2553 p->inventory.incDefense();
ee38284f 2554 p->gold -= price;
f5c25639 2555 }
2556 else
2557 notice(s_GameServ, u, "You don't have enough gold!");
2558 break;
8c734eb9 2559 case 4:
ae2685f6 2560 price = (230 * p->level) + (p->exp / 10);
8c734eb9 2561 if (p->gold >= price)
2562 {
2563 notice(s_GameServ, u, "One HP Potion coming right up!");
2564 p->inventory.incHP();
2565 p->gold -= price;
2566 }
2567 else
2568 notice(s_GameServ, u, "You don't have enough gold!");
2569 break;
f5c25639 2570 default:
2571 notice(s_GameServ, u, "Logical Error. See a %S admin for help!");
2572 break;
2573 }
2574 }
9cda831c 2575 else
2576 {
2577 notice(s_GameServ, u, "Improper Syntax.");
2578 notice(s_GameServ, u, "Type /msg %S HELP TAVERN for help");
2579 }
f5c25639 2580}
2581
8c126acc 2582void do_bank(char *u)
2583{
2584 char *cmd = strtok(NULL, " ");
2585 char *amount = strtok(NULL, " ");
2586 char *nick = strtok(NULL, " ");
2587
2588 aClient *user;
2589 Player *p;
2590
8c734eb9 2591 if (!cmd || (!amount && stricmp(cmd, "BALANCE") != 0) || (stricmp(cmd, "TRANSFER") == 0 && !nick))
8c126acc 2592 {
2593 notice(s_GameServ, u, "BANK {WITHDRAW | DEPOSIT} {ALL | AMOUNT}");
e282e9d2 2594 notice (s_GameServ, u, "BANK BALANCE");
8c126acc 2595 return;
2596 }
40251952 2597 else if (!(user = find(u)))
2598 {
2599 notice(s_GameServ, u, "Fatal Error. Couldn't find your aClient. Contact a(n) %S "\
2600 " admin for help");
2601 log("Fatal Error. Couldn't find %s while executing do_bank()", u);
2602 return;
2603 }
448a1531 2604 else if (isIgnore(user))
2605 {
2606 #ifdef DEBUGMODE
2607 log("Ignoring %s.", user->getNick());
2608 #endif
2609 return;
2610 }
40251952 2611 else if (!is_playing(user))
8c126acc 2612 {
2613 notice(s_GameServ, u, "You must be playing to use the bank!");
2614 return;
ad7dfaa0 2615 }
2158299e 2616 else if (is_fighting(user))
2617 {
2618 notice(s_GameServ, u, "You can't go to the bank during a fight!");
2619 return;
2620 }
40251952 2621 updateTS(user->stats);
2622 if (stricmp(cmd, "BALANCE") == 0)
fa376453 2623 {
2624 showBankBalance(u);
2625 return;
2626 }
ee38284f 2627 else if (!isAlive(user->stats))
1af35752 2628 {
2629 notice(s_GameServ, u, "You are dead. We don't accept gold from dead folk! Wait 'til tomorrow!");
2630 return;
2631 }
8c126acc 2632 else if (!isstringnum(amount) && stricmp(amount, "ALL") != 0)
2633 {
2634 notice(s_GameServ, u, "I don't know how to convert alphabet letters into currency, sire!");
2635 return;
2636 }
2637
2638 p = user->stats;
2639
fa376453 2640 if (stricmp(cmd, "DEPOSIT") == 0)
8c126acc 2641 {
2642 if (p->bank == 2000000000)
2643 {
2644 notice(s_GameServ, u, "Your bank account is full, sire!");
2645 return;
2646 }
2647 else if (stricmp(amount, "ALL") == 0)
2648 {
2649 if (2000000000 - p->bank < p->gold)
2650 {
2651 notice(s_GameServ, u, "You don't have enough room for all of your gold.");
2652 notice(s_GameServ, u, "Depositing %ld gold into your account", (2000000000 - p->bank));
2653 p->gold -= (2000000000 - p->bank);
2654 p->bank = 2000000000;
e282e9d2 2655 showBankBalance(u);
8c126acc 2656 }
2657 else
2658 {
2659 notice(s_GameServ, u, "Depositing %ld gold into your account!", p->gold);
2660 p->bank += p->gold;
2661 p->gold = 0;
e282e9d2 2662 showBankBalance(u);
8c126acc 2663 }
2664 }
2665 else if (stringtoint(amount) > p->gold)
2666 {
2667 notice(s_GameServ, u, "Sire, you only have %ld gold!", p->gold);
e282e9d2 2668 showBankBalance(u);
8c126acc 2669 return;
2670 }
2671 else
2672 {
2673 if (2000000000 - p->bank < stringtoint(amount))
2674 {
2675 notice(s_GameServ, u, "You don't have room in your account for that much.");
2676 notice(s_GameServ, u, "Capping off your account with %ld gold!", (2000000000 - p->bank));
2677 p->gold -= (2000000000 - p->bank);
2678 p->bank = 2000000000;
e282e9d2 2679 showBankBalance(u);
8c126acc 2680 }
2681 else
2682 {
2683 notice(s_GameServ, u, "Depositing %d gold into your account!", stringtoint(amount));
2684 p->bank += stringtoint(amount);
2685 p->gold -= stringtoint(amount);
e282e9d2 2686 showBankBalance(u);
8c126acc 2687 }
2688 }
2689 }
2690 else if (stricmp(cmd, "WITHDRAW") == 0)
2691 {
2692 if (p->gold == 2000000000)
2693 {
2694 notice(s_GameServ, u, "You cannot carry any more gold, sire!");
e282e9d2 2695 showBankBalance(u);
8c126acc 2696 return;
2697 }
2698 else if (stricmp(amount, "ALL") == 0)
2699 {
2700 if (2000000000 - p->gold < p->bank)
2701 {
2702 notice(s_GameServ, u, "You don't have enough room to carry all that gold.");
2703 notice(s_GameServ, u, "Withdrawing %ld gold from your account", (2000000000 - p->gold));
2704 p->bank -= (2000000000 - p->gold);
2705 p->gold = 2000000000;
e282e9d2 2706 showBankBalance(u);
8c126acc 2707 }
2708 else
2709 {
2710 notice(s_GameServ, u, "Withdrawing %ld gold from your account!", p->bank);
2711 p->gold += p->bank;
2712 p->bank = 0;
e282e9d2 2713 showBankBalance(u);
8c126acc 2714 }
2715 }
2716 else if (stringtoint(amount) > p->bank)
2717 {
2718 notice(s_GameServ, u, "Sire, you only have %ld gold in the bank!", p->bank);
e282e9d2 2719 showBankBalance(u);
8c126acc 2720 return;
2721 }
2722 else
2723 {
2724 if (2000000000 - p->gold < stringtoint(amount))
2725 {
2726 notice(s_GameServ, u, "You don't enough have room to carry that much gold!");
2727 notice(s_GameServ, u, "You fill your pockets with %ld gold!",
2728 (2000000000 - p->gold));
2729 p->bank -= (2000000000 - p->gold);
2730 p->gold = 2000000000;
e282e9d2 2731 showBankBalance(u);
8c126acc 2732 }
2733 else
2734 {
2735 notice(s_GameServ, u, "Withdrawing %d gold from your account!", stringtoint(amount));
2736 p->gold += stringtoint(amount);
2737 p->bank -= stringtoint(amount);
e282e9d2 2738 showBankBalance(u);
8c126acc 2739 }
2740 }
2741 }
2742
ad7dfaa0 2743}
ab4f4ec0 2744
fcca861d 2745void do_dragon(char *u)
2746{
2747 aClient *user;
2748
2749 if (!(user = find(u)))
2750 {
2751 notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
2752 return;
2753 }
2754 else if (isIgnore(user))
2755 {
2756 #ifdef DEBUGMODE
2757 log("Ignoring %s.", user->getNick());
2758 #endif
2759 return;
2760 }
2761 else if (!is_playing(user))
2762 {
2763 notice(s_GameServ, u, "You must be playing to fight the dragon!");
2764 return;
2765 }
2766 else if (is_fighting(user))
2767 {
2768 notice(s_GameServ, u, "You are already in a fight. How will you fight the almighty dragon!?");
2769 return;
2770 }
2771 else if (!isAlive(user->stats))
2772 {
2773 notice(s_GameServ, u, "You're dead. Wait until tomorrow to see your master!");
2774 return;
2775 }
016a160f 2776 else if (user->stats->level < REALLEVELS)
fcca861d 2777 {
2778 notice(s_GameServ, u, "You fool! Only those strong enough "\
2779 "to vanquish any foe should DARE fight the dragon!");
2780 notice(s_GameServ, u, "To put it in terms you can understand: "\
016a160f 2781 "You are too weak. You must be Level %d!", REALLEVELS);
68379f96 2782 return;
fcca861d 2783 }
2784
2785 updateTS(user->stats);
2786
fcca861d 2787 Player *p = user->stats;
2788 p->fight = new Monster(boss);
2789 notice(s_GameServ, u, "You approach the dragon's lair cautiously.");
2790 notice(s_GameServ, u, "The stench of sulfer fills the air as a "\
2791 "deep, red fog rolls in. The air is filled with the "\
2792 "heated mist of deadly fire from beyond the cave "\
2793 "entrance.");
9cb6f227 2794 notice(s_GameServ, u, "You adjust your %s, tighten your grip on "\
fcca861d 2795 "your %s, and venture into the hot, dark cave. "\
2796 "You are surprised at the angle of descent as you climb "\
2797 "lower and lower, deeper into the dragon's den.");
2798 notice(s_GameServ, u, "You come to the end of the cave to find "\
2799 "a tooth. It is a large tooth... bigger than your torso."\
2800 " Suddenly the darkness lifts from the gleam of an eye "\
2801 " staring into your soul! The eye is large... HUGE!");
2802 notice(s_GameServ, u, "Just then you notice the eye begin to "\
2803 "glare orange! The tooth is moving... but it is still too "\
2804 "dark for you to make out.... THE DRAGON! You see it!");
9cb6f227 2805 display_monster(u);
fcca861d 2806}
2807
ab4f4ec0 2808void do_master(char *u)
2809{
2810 aClient *user;
1af35752 2811
448a1531 2812
2813 if (!(user = find(u)))
ab4f4ec0 2814 {
2815 notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
2816 return;
2817 }
448a1531 2818 else if (isIgnore(user))
2819 {
2820 #ifdef DEBUGMODE
2821 log("Ignoring %s.", user->getNick());
2822 #endif
2823 return;
2824 }
c047f947 2825 else if (!is_playing(user))
2826 {
2827 notice(s_GameServ, u, "You must be playing to see your master!");
2828 return;
2829 }
1af35752 2830 else if (is_fighting(user))
ab4f4ec0 2831 {
2832 notice(s_GameServ, u, "You're in the middle of a fight! Pay attention!");
2833 return;
2834 }
ee38284f 2835 else if (!isAlive(user->stats))
1af35752 2836 {
2837 notice(s_GameServ, u, "You're dead. Wait until tomorrow to see your master!");
2838 return;
2839 }
40251952 2840
2841 updateTS(user->stats);
c047f947 2842
c7340cbd 2843 char *cmd = strtok(NULL, " ");
2844 Player *p = user->stats;
2845 long int need = 0;
2846
1af35752 2847 if (seenMaster(p))
2848 {
2849 notice(s_GameServ, u, "You have already seen your master today. Wait until tomorrow to try again");
2850 return;
2851 }
2852
c7340cbd 2853 if (cmd != NULL)
ab4f4ec0 2854 {
ab4f4ec0 2855 switch(p->level)
2856 {
2857 case 1:
fcca861d 2858 need = 200;
ab4f4ec0 2859 break;
2860 case 2:
fcca861d 2861 need = 800;
ab4f4ec0 2862 break;
2863 case 3:
fcca861d 2864 need = 2000;
ab4f4ec0 2865 break;
2866 case 4:
fcca861d 2867 need = 8000;
ab4f4ec0 2868 break;
2869 case 5:
fcca861d 2870 need = 20000;
ab4f4ec0 2871 break;
2872 case 6:
fcca861d 2873 need = 80000;
ab4f4ec0 2874 break;
2875 case 7:
fcca861d 2876 need = 200000;
ab4f4ec0 2877 break;
2878 case 8:
fcca861d 2879 need = 800000;
ab4f4ec0 2880 break;
2881 case 9:
fcca861d 2882 need = 2000000;
ab4f4ec0 2883 break;
2884 case 10:
fcca861d 2885 need = 8000000;
ab4f4ec0 2886 break;
2887 case 11:
fcca861d 2888 need = 20000000;
ab4f4ec0 2889 break;
016a160f 2890
2891 case REALLEVELS:
ab4f4ec0 2892 need = p->exp + 1;
016a160f 2893 notice(s_GameServ, u, "You are at level %d. You are the master. What's left? The DRAGON!", REALLEVELS);
fcca861d 2894 return;
ab4f4ec0 2895 break;
2896 default:
2897 need = p->exp + 1; // Unknown level... don't let them fight a fake master!
2898 break;
c7340cbd 2899 }
2900 }
2901 else
2902 {
2903 notice(s_GameServ, u, "SYNTAX: MASTER {FIGHT | QUESTION}");
2904 return;
2905 }
2906
2907 if (stricmp(cmd, "FIGHT") == 0)
2908 {
ab4f4ec0 2909 if (p->exp >= need)
1af35752 2910 {
2911 setMaster(p);
ab4f4ec0 2912 see_master(u);
1af35752 2913 }
ab4f4ec0 2914 else
2915 notice(s_GameServ, u, "You are not worthy of fighting %s! You need %ld more experience.", masters[p->level - 1]->name, (need - p->exp));
c7340cbd 2916 return;
2917 }
2918 else if (stricmp(cmd, "QUESTION") == 0)
2919 {
2920 if (p->exp >= need)
2921 notice(s_GameServ, u, "%s looks you up and down and decides you are more ready than you will ever be.", masters[p->level - 1]->name);
2922 else
2923 notice(s_GameServ, u, "You pathetic fool! You are no match for %s, %s!", masters[p->level - 1]->name, p->name);
2924
2925 return;
2926 }
2927 else
2928 {
2929 notice(s_GameServ, u, "SYNTAX: MASTER {FIGHT | QUESTION}");
ab4f4ec0 2930 }
2931}
2932
2933void see_master(char *u)
2934{
2935 aClient *user;
1af35752 2936
ab4f4ec0 2937 if (!(user = find(u)))
2938 {
2939 notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
2940 return;
2941 }
2942
1af35752 2943 if (!is_fighting(user) && is_playing(user))
ab4f4ec0 2944 {
2945 Player *p = user->stats;
2946 p->master = new Monster(masters[p->level - 1]);
2947 p->fight = p->master;
2948 display_monster(u); // Since master is the same structure, use this function
2949 }
2950}
e282e9d2 2951
2952void showBankBalance(const char *u)
2953{
2954 aClient *user;
2955 Player *p;
1af35752 2956
e282e9d2 2957 if (!(user = find(u)))
2958 return;
2959
2960 p = user->stats;
2961
2962 if (!p)
2963 return;
2964
2965 notice(s_GameServ, u, "Account Balance: %ld Gold On hand: %ld", p->bank, p->gold);
2966
2967}
44ea29f7 2968
2969void refreshall()
2970{
2971 ListNode <aClient> *it;
2972 Player *p;
7996e5fd 2973 for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
2974 {
2975 it = players[x].First();
44ea29f7 2976
2977 while (it)
2978 {
2979 p = it->getData()->stats;
2980 refresh(p);
2981 it = it->Next();
2982 }
7996e5fd 2983 }
44ea29f7 2984}
2985
2986void refresh(Player *p)
2987{
2988 if (!p)
2989 return;
2990
ee38284f 2991 if (p->hp < p->maxhp)
2992 p->hp = p->maxhp;
20d5d721 2993 p->forest_fights = forestfights;
44ea29f7 2994 p->player_fights = 3;
ee38284f 2995 setAlive(p);
1af35752 2996 clearMaster(p);
44ea29f7 2997}
c7340cbd 2998
2999void do_refresh(char *u)
3000{
3001 char *nick = strtok(NULL, " ");
3002 aClient *user;
3003
96f71fee 3004 if (!(user = find(u)))
3005 {
3006 notice(s_GameServ, u, "Error: aClient not found. Contact a %S admin");
5d04eb42 3007 log("Error: aClient not found: %s", u);
96f71fee 3008 return;
3009 }
448a1531 3010 else if (isIgnore(user))
3011 {
3012 #ifdef DEBUGMODE
3013 log("Ignoring %s.", user->getNick());
3014 #endif
3015 return;
3016 }
96f71fee 3017 else if (!isAdmin(user))
3018 {
3019 notice(s_GameServ, u, "You must be a %S admin to use this command!");
3020 return;
3021 }
c7340cbd 3022 if (!nick)
3023 {
96f71fee 3024 notice(s_GameServ, u, "SYNTAX: REFRESH {ALL | NICK}");
c7340cbd 3025 return;
3026 }
3027 else if (stricmp(nick, "ALL") == 0)
3028 {
3029 notice(s_GameServ, u, "Refreshing everyone's stats!");
3030 refreshall();
3031 }
ae2685f6 3032 else if ((user = findplayer(nick)))
c7340cbd 3033 {
1af35752 3034 if (is_playing(user))
c7340cbd 3035 {
ce61cdfa 3036 #ifdef P10
3037 notice(s_GameServ, u, "Refreshing %s.", user->getRealNick());
3038 #else
c7340cbd 3039 notice(s_GameServ, u, "Refreshing %s.", user->getNick());
ce61cdfa 3040 #endif
c7340cbd 3041 refresh(user->stats);
3042 }
3043 else
3044 {
ce61cdfa 3045 #ifdef P10
3046 notice(s_GameServ, u, "%s is not playing.", user->getRealNick());
3047 #else
c7340cbd 3048 notice(s_GameServ, u, "%s is not playing.", user->getNick());
ce61cdfa 3049 #endif
c7340cbd 3050 }
3051 }
3052 else
3053 {
3054 notice(s_GameServ, u, "Nick %s not found.", nick);
3055 return;
3056 }
3057}
3058
ee38284f 3059
3060void resetall()
3061{
3062 ListNode <aClient> *it;
3063 Player *p;
3064
7996e5fd 3065 for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
3066 {
3067 it = players[x].First();
ee38284f 3068
3069 while (it)
3070 {
3071 p = it->getData()->stats;
3072 reset(p);
3073 it = it->Next();
3074 }
7996e5fd 3075 }
ee38284f 3076}
3077
3078void reset(Player *p)
3079{
3080 if (!p)
3081 return;
3082
3083 p->reset();
3084}
3085
40251952 3086void updateTS(Player *p)
3087{
3088 if (!p)
3089 return;
0b6098d5 3090
3091 #ifdef DEBUGMODE
3092 log("Old timestamp for %s: %ld", p->name, p->lastcommand);
3093 #endif
40251952 3094 p->lastcommand = time(NULL);
0b6098d5 3095 #ifdef DEBUGMODE
3096 log("New timestamp for %s: %ld", p->name, p->lastcommand);
3097 #endif
3098
40251952 3099}
3100
3101bool timedOut(Player *p)
3102{
3103 if (!p)
3104 return false;
0b6098d5 3105 else if (p->lastcommand == 0)
3106 return false;
40251952 3107 else
0b6098d5 3108 {
3109 if ((time(NULL) - p->lastcommand) >= maxidletime)
3110 return true;
3111
3112 return false;
3113 }
40251952 3114}
3115
3116void timeOutEvent(Player *p)
3117{
0b6098d5 3118 aClient *user = findplayer(p->name);
40251952 3119
ae2685f6 3120 if (!user || !p->client) // then they're not playing
40251952 3121 return;
3122
3123 char *nick = user->getNick();
3124
0b6098d5 3125 if (player_fight(user) && isYourTurn(p))
3126 {
3127 // Check to see if they were the idler or if it was the other
3128 // person
3129 if (p->lastcommand != p->battle->stats->lastcommand)
3130 {
3131 // This person's last command was given earlier,
3132 // so this person is the idler
3133 notice(s_GameServ, nick, "You timed out "\
3134 "during a fight. You lose your turn!");
3135 notice(s_GameServ, p->battle->getNick(),
3136 "%s hesitated for too long. Your move.", p->name);
3137 clearYourTurn(p);
3138 setYourTurn(p->battle->stats);
3139
3140 // Update the TS for both players to give them another
3141 // Chance to wake up, but if the other player doesn't
3142 // Attack now, they both get logged out.
3143 updateTS(p);
3144 p->battle->stats->lastcommand = p->lastcommand;
3145 display_players(p->battle);
3146 return;
3147 }
3148 else
3149 {
3150 notice(s_GameServ, p->battle->getNick(),
3151 "You and %s timed out at the same time."\
3152 " Don't fight if you're just going to "\
3153 "sit there!", p->name);
3154 notice(s_GameServ, user->getNick(),
3155 "You and %s timed out at the same time."\
3156 " Don't fight if you're just going to "\
3157 "sit there!", p->battle->stats->name);
3158 logout(p->battle);
3159 logout(user);
3160 return;
3161 }
3162 }
3163 else if (!player_fight(user))
eb7608de 3164 {
c047f947 3165 if (isAlive(user->stats) && user->stats->gold > 0)
903cd861 3166 {
eb7608de 3167 // Place fun stuff here :)
3168 int randnum = 1 + rand() % 100; // 1-100
0b259dff 3169 #define GSN(s) notice(s_GameServ, nick, s)
3170 #define GSN2(s, f) notice(s_GameServ, nick, s, f)
eb7608de 3171
3172 if (randnum < 50)
3173 {
0b259dff 3174 // 35-100% of your gold goes pffft - kain
3175 int stolen = (35 + (rand() % 66)) * user->stats->gold / 100;
3176
eb7608de 3177 GSN("You stop for a moment to rest on the "\
3178 "street corner. All of a sudden, you "\
3179 "are ambushed from all sides by a hoarde "\
3180 "of knife wielding thugs.");
3181 GSN2("The thugs beat you into utter submission "\
3182 "and steal %d gold from you!", stolen);
3183 user->stats->gold -= stolen;
3184 }
0b259dff 3185 else if (randnum >= 50 && randnum < 75)
3186 {
3187 // 25-65% of your gold goes pffft - kain
3188 int stolen = (25 + (rand() % 41)) * user->stats->gold / 100;
3189 GSN("While dilly dallying around, you lose "\
3190 "your sense of time. Little did you know, "\
3191 "but thieves lifted your gold while you "\
3192 "weren't watching.");
3193 GSN2("Better luck next time... you lose %d gold", stolen);
3194 user->stats->gold -= stolen;
3195 }
3196 else if (randnum >= 75)
3197 {
3198 // 25-75% of your gold goes pffft - kain
3199 int stolen = (25 + (rand() % 51)) * user->stats->gold / 100;
3200 GSN("Good grief! A gaggle of gooey green ghostlike "\
3201 "goblins grabbed your gold!");
3202 GSN2("They stole %d gold from you!", stolen);
3203 user->stats->gold -= stolen;
3204 }
903cd861 3205 }
eb7608de 3206
3207 // Always log out the user
0b6098d5 3208 logout(user);
eb7608de 3209 }
40251952 3210}
3211
ee38284f 3212void do_reset(char *u)
3213{
3214 char *nick = strtok(NULL, " ");
3215 aClient *user;
3216
3217 if (!(user = find(u)))
3218 {
3219 notice(s_GameServ, u, "Error: aClient not found. Contact a %S admin");
5d04eb42 3220 log("Error: aClient not found: %s", u);
ee38284f 3221 return;
3222 }
3223 else if (!isAdmin(user))
3224 {
3225 notice(s_GameServ, u, "You must be a %S admin to use this command!");
3226 return;
3227 }
448a1531 3228
ee38284f 3229 if (!nick)
3230 {
3231 notice(s_GameServ, u, "SYNTAX: RESET {ALL | NICK}");
3232 return;
3233 }
3234 else if (stricmp(nick, "ALL") == 0)
3235 {
3236 notice(s_GameServ, u, "Resetting everyone's stats!");
3237 resetall();
3238 }
ce61cdfa 3239 else if ((user = findbyrealnick(nick)))
ee38284f 3240 {
3241 if (is_playing(user))
3242 {
ce61cdfa 3243 #ifdef P10
3244 notice(s_GameServ, u, "Resetting %s.", user->getRealNick());
3245 #else
ee38284f 3246 notice(s_GameServ, u, "Resetting %s.", user->getNick());
ce61cdfa 3247 #endif
ee38284f 3248 reset(user->stats);
3249 }
3250 else
3251 {
ce61cdfa 3252 #ifdef P10
3253 notice(s_GameServ, u, "%s is not playing.", user->getRealNick());
3254 #else
ee38284f 3255 notice(s_GameServ, u, "%s is not playing.", user->getNick());
ce61cdfa 3256 #endif
ee38284f 3257 }
3258 }
3259 else
3260 {
3261 notice(s_GameServ, u, "Nick %s not found.", nick);
3262 return;
3263 }
3264}
3265
c7340cbd 3266void do_help(char *u)
3267{
3268 char *cmd = strtok(NULL, " ");
3269
c7340cbd 3270 display_help(u, cmd);
3271}
3272
3273void display_help(char *u, char *file)
3274{
3275 ifstream infile;
3276 char *buf;
3277
3278 if (!file)
3279 {
3280 infile.open("helpfiles/help");
3281 if (infile.fail())
3282 {
fb37ecc7 3283 log("Error opening helpfiles/help");
c7340cbd 3284 notice(s_GameServ, u, "Error opening helpfiles/help");
3285 return;
3286 }
3287 buf = new char[1024];
3288 while(infile.getline(buf, 1024))
3289 {
3290 // Written this way, it will process %S in the helpfiles
3291 // Instead of notice(s_GameServ, u, "%s", buf);
3292 notice(s_GameServ, u, buf);
3293 }
3294
3295 // Minor recursion
96f71fee 3296 aClient *user = find(u);
3297 if (user && isAdmin(user))
3298 display_help(u, "admin_commands");
c7340cbd 3299 }
3300 else
3301 {
3302 char *filename;
f27a378f 3303 filename = new char[strlen(file) + 11];
3304 strcpy(filename, "helpfiles/");
3305 strcat(filename, file);
4dde2ed9 3306
f27a378f 3307 for (unsigned int x = 10; x < strlen(filename); x++)
3308 filename[x] = tolower(filename[x]);
4dde2ed9 3309
c7340cbd 3310 infile.open(filename);
3311 delete [] filename;
3312 if (infile.fail())
3313 {
3314 notice(s_GameServ, u, "No help for \ 2%s\ 2", file);
3315 return;
3316 }
3317 buf = new char[1024];
3318 while(infile.getline(buf, 1024))
3319 {
3320 // Written this way, it will process %S in the helpfiles
3321 // Instead of notice(s_GameServ, u, "%s", buf);
3322 notice(s_GameServ, u, buf);
3323 }
3324 }
3325 infile.close();
3326 delete [] buf;
3327}
96f71fee 3328
3329void do_admin(char *u)
3330{
3331 aClient *user;
3332 char *pass = strtok(NULL, " ");
3333
3334 if (!(user = find(u)))
3335 {
5d04eb42 3336 log("Error: aClient not found: %s", u);
96f71fee 3337 notice(s_GameServ, u, "Error: aClient not found. Contact %S admin.");
3338 return;
3339 }
448a1531 3340
96f71fee 3341 if (!pass)
3342 {
3343 notice(s_GameServ, u, "SYNTAX: \ 2ADMIN\ 2 \ 2\1fpassword\1f\ 2");
3344 return;
3345 }
3346
1af35752 3347 if (isAdmin(user))
3348 {
3349 notice(s_GameServ, u, "You already have administrator privledges.");
3350 return;
3351 }
3352 else if (strcmp(pass, adminpass) == 0)
96f71fee 3353 {
3354 notice(s_GameServ, u, "Password accepted. You now have administrator privledges.");
3355 setAdmin(user);
ce61cdfa 3356 #ifdef P10
3357 log("%s became an administrator.", user->getRealNick());
3358 #else
5d04eb42 3359 log("%s became an administrator.", user->getNick());
ce61cdfa 3360 #endif
96f71fee 3361 }
3362 else
3363 {
3364 notice(s_GameServ, u, "Invalid password. Remember: case sensitive");
3365 return;
3366 }
3367}
1af35752 3368
4dde2ed9 3369bool load_monsters()
3370{
3371 ifstream infile;
3372 infile.open("monsters.dat");
3373
3374 char *buf;
3375
3376 if (infile.fail())
3377 {
fb37ecc7 3378 log("Error opening monsters.dat");
4dde2ed9 3379 return false;
3380 }
3381 init_monsters();
3382 buf = new char[2048];
3383
5d04eb42 3384 #ifdef DEBUGMODE
3385 log("Loading monsters from monsters.dat");
3386 #endif
3387
4dde2ed9 3388 for (int l = 0; l < REALLEVELS; l++)
3389 {
3390 for (int m = 0; m < MONSTERS;)
3391 {
3392 infile.getline(buf, 2048);
3393 if (buf[0] == '\n' || buf[0] == '\0' || buf[0] == '#')
3394 continue;
3395 else
3396 {
3397 strcpy(monsters[l][m]->name, strtok(buf, "~"));
3398 strcpy(monsters[l][m]->weapon, strtok(NULL, "~"));
3399 monsters[l][m]->strength = stringtoint(strtok(NULL, "~"));
3400 monsters[l][m]->gold = stringtoint(strtok(NULL, "~"));
3401 monsters[l][m]->exp = stringtoint(strtok(NULL, "~"));
3402 monsters[l][m]->maxhp = stringtoint(strtok(NULL, "~"));
ee38284f 3403 monsters[l][m]->hp = monsters[l][m]->maxhp;
4dde2ed9 3404 strcpy(monsters[l][m]->death, strtok(NULL, ""));
3405 m++;
3406 }
3407 }
3408 }
3409 delete [] buf;
3410return true;
3411}
7996e5fd 3412
3413// this will be hash.cpp start
3414// thank you wcampbel
448a1531 3415unsigned long sHASH(const unsigned char *name)
7996e5fd 3416{
3417 unsigned long h = 0, g;
3418
3419 while (*name)
3420 {
448a1531 3421 h = (h << 4) + (*name++); // Case sensitive for numerics
3422 if ((g = (h & 0xF0000000)))
3423 h ^= g >> 24;
3424 h &= ~g;
3425 }
3426 return h % U_TABLE_SIZE;
3427}
3428
3429unsigned long iHASH(const unsigned char *name)
3430{
3431 unsigned long h = 0, g;
3432
3433 while (*name)
3434 {
3435 h = (h << 4) + tolower(*name++);
7996e5fd 3436 if ((g = (h & 0xF0000000)))
3437 h ^= g >> 24;
3438 h &= ~g;
3439 }
448a1531 3440 return h % U_TABLE_SIZE;
7996e5fd 3441}
3442
3443// this will be hash.cpp end
Unnamed repository; edit this file 'description' to name the repository.