#include "player.h"
#include "pouch.h"
#include "flags.h"
-#include "list.h"
#include "level.h"
#include "sockhelp.h"
#include "item.h"
+#include "script.h"
+#include "toplist.h"
+#include <algorithm>
#include <cctype>
#include <fstream>
#include <stdlib.h>
#endif
-Monster dragon; // The current dragon
+
Level levels[LEVELS]; // The newest way to store monsters
list<item*> Items; // The master list of items
list<tavernItem> tavern; // The list of items available at the tavern
-list<item*> store; // The list of items available at the store
-
-// Database functions
-int save_gs_dbase();
-int load_gs_dbase();
-int load_items();
-int load_tavern();
-int load_store();
-int load_dragon();
-int save_dragon();
-
-item *findItemByID(int id);
-item *findStoreItemByID(int id);
-tavernItem *findTavernItemByID(int id);
-
-// String functions
-#ifndef HAVE_STRTOK
-char *strtok(char *str, const char *delim);
-#endif
-
-int stricmp(const char *s1, const char *s2);
-int strnicmp(const char *s1, const char *s2, size_t len);
-// String Functions
-
-/********** Password functions **********/
-
-bool passcmp(const char *encrypted, char *plaintext); // Compares an encrypted pass with a plain text one
+list<item*> store; // List of items available at the store
-bool check_password(char *name, char *plaintext); // Finds a password for the given name, and checks it with passcmp against the plaintext password given.
-
-/********** Password functions **********/
+toplist myToplist; // List of the top 10 players
-/********** GameServ Booleans **********/
bool shuttingdown;
-bool timedOut(Player *p);
-void updateTS(Player *p);
-void timeOutEvent(Player *p);
-
-bool is_playing(char *u); // True if the given nickname in the clients list is playing.
-bool is_playing(aClient *user);
-
-bool is_fighting(char *u); // True if the given nick in the clients list is fighting anything.
-bool is_fighting(aClient *user);
-
-bool player_fight(char *u); // True if the player is fighting another player.
-bool player_fight(aClient *user);
-
-bool master_fight(char *u); // True if the player is fighting their master.
-bool master_fight(aClient *user);
-
-bool dragon_fight(char *u); // True if the player is fighting the dragon.
-bool dragon_fight(aClient *user);
-
-/********** GameServ Booleans **********/
-
-void display_help(char *u, char *file = NULL);
-void display_monster(char *u);
-void display_players(char *u);
-void display_players(aClient *user);
-long int chartoint(char ch);
-int isstringnum(char *num);
-long int pow (int x, int y);
-long int stringtoint(char *number);
-
-char *spaces(int len, char *seperator);
-void refresh(Player *p);
-void refreshall();
-void rollover(Player *p);
-void rolloverall();
-
-void updateTS(Player *p);
-void reset(Player *p);
-bool load_masters();
-bool load_monsters();
-bool load_levels();
-void delete_monsters();
-
-void do_admin(char *u);
-void do_attack(char *u);
-void do_bank(char *u);
-void do_check(char *u);
-void do_equip(char *u);
-void do_fight(char *u);
-void do_heal(char *u);
-void do_help(char *u);
-void do_identify(char *u);
-void do_inventory(char *u);
-void do_refresh(char *u);
-void do_register(char *u);
-void do_list(char *u);
-void do_logout(char *u);
-void do_master(char *u);
-void do_dragon(char *u);
-void do_play(char *u);
-void do_quitg(char *u);
-void do_reset(char *u);
-void do_run(char *u);
-void do_set(char *u);
-void do_stats(char *u);
-void do_store(char *u);
-void do_tavern(char *u);
-void do_use(char *u);
-void see_master(char *u);
-
-void logout(aClient *user);
-void showstats(const char *u, const char *nick);
-void showTavern(aClient *user);
-void showinventory(aClient *from, aClient *to);
-void showBankBalance(const char *u);
-void end_turn(aClient *user);
#define WNA 16
void gameserv(char *source, char *buf)
{
- char *cmd, z;
- cmd = strtok(buf, " ");
-
- #ifndef P10
- source++; // Get rid of that : at the beginning of a :Nick privmsg Gameserv :text
- #endif
-
- z = cmd[0];
- if (z == ':')
- cmd++; // Get rid of that : at the beginning of the :text (command)
-
- #ifdef DEBUGMODE
- log("Source: %s Command: %s", source, cmd);
- #endif
-
- if (strnicmp(cmd, "\1PING", 6) == 0)
- {
- char *ts;
- ts = strtok(NULL, "\1");
- notice(s_GameServ, source, "\1PING %s\1", ts);
- } else if (stricmp(cmd, "\1VERSION\1") == 0) {
- notice(s_GameServ, source, "\1VERSION %s %s\1", PACKAGE, VERSION);
- } else if (stricmp(cmd, "SEARCH") == 0) {
- cmd = strtok(NULL, " ");
-
- if (!cmd)
- notice(s_GameServ, source, "SYNTAX: /msg %S SEARCH FOREST");
- else
- do_forest(source);
-
- } else if (stricmp(cmd, "ADMIN") == 0) {
- do_admin(source);
- } else if (stricmp(cmd, "ATTACK") == 0) {
- do_attack(source);
- } else if (stricmp(cmd, "BANK") == 0) {
- do_bank(source);
- } else if (stricmp(cmd, "CHECK") == 0) {
- do_check(source);
- } else if (stricmp(cmd, "DRAGON") == 0) {
- do_dragon(source);
- } else if (stricmp(cmd, "EQUIP") == 0) {
- do_equip(source);
- } else if (stricmp(cmd, "FIGHT") == 0) {
- do_fight(source);
- } else if (stricmp(cmd, "HEAL") == 0) {
- do_heal(source);
- } else if (stricmp(cmd, "HELP") == 0) {
- do_help(source);
- } else if (stricmp(cmd, "IDENTIFY") == 0) {
- do_identify(source);
- } else if (stricmp(cmd, "INVENTORY") == 0) {
- do_inventory(source);
- } else if (stricmp(cmd, "LIST") == 0) {
- do_list(source);
- } else if (stricmp(cmd, "LOGOUT") == 0) {
- do_logout(source);
- } else if (stricmp(cmd, "MASTER") == 0) {
- do_master(source);
- } else if (stricmp(cmd, "NEWS") == 0) {
- do_news(source);
- } else if (stricmp(cmd, "REGISTER") == 0) {
- do_register(source);
- } else if (stricmp(cmd, "REFRESH") == 0) {
- do_refresh(source);
- } else if (stricmp(cmd, "RESET") == 0) {
- do_reset(source);
- } else if (stricmp(cmd, "RUN") == 0) {
- do_run(source);
- } else if (stricmp(cmd, "SET") == 0) {
- do_set(source);
- } else if (stricmp(cmd, "STATS") == 0) {
- do_stats(source);
- } else if (stricmp(cmd, "STORE") == 0) {
- do_store(source);
- } else if (stricmp(cmd, "TAVERN") == 0) {
- do_tavern(source);
- } else if (stricmp(cmd, "USE") == 0) {
- do_use(source);
- } else if (stricmp(cmd, "SHUTDOWN") == 0) {
- aClient *user;
-
- if (!(user = find(source)))
- {
- notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
- log("Error: aClient not found: %s", source);
- }
- else if (!isAdmin(user))
- {
- notice(s_GameServ, source, "You must be a %S admin to use this command!");
- }
- else
- {
- save_gs_dbase();
- #ifdef P10
- raw("[] SQ %s 0 :leaving: %s used the Shutdown command.", servername, user->getRealNick());
- #else
- raw("SQUIT %s :leaving: %s used the Shutdown command.", servername, source);
- #endif
- shuttingdown = true;
- }
- } else if (stricmp(cmd, "SAVE") == 0) {
- aClient *user;
-
- if (!(user = find(source)))
- {
- notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
- log("Error: aClient not found: %s", source);
- }
- else if (!isAdmin(user))
- {
- notice(s_GameServ, source, "You must be a %S admin to use this command!");
- }
- else
- {
- save_gs_dbase();
- }
- } else if (stricmp(cmd, "LOAD") == 0) {
- aClient *user;
-
- if (!(user = find(source)))
- {
- notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
- log("Error: aClient not found: %s", source);
- }
- else if (!isAdmin(user))
- {
- notice(s_GameServ, source, "You must be a %S admin to use this command!");
- }
- else
- {
- char *cmd2 = strtok(NULL, " ");
- if (!cmd2)
- {
- notice(s_GameServ, source, "Loading player data from %s", playerdata);
- load_gs_dbase();
- }
- else if (stricmp(cmd2, "MONSTERS") == 0)
- {
- notice(s_GameServ, source, "Loading monster data");
- load_monsters();
- }
- else
- display_help(source, cmd);
- }
- #ifdef DEBUGMODE
- } else if (stricmp(cmd, "RAW") == 0) {
- aClient *user;
-
- if (!(user = find(source)))
- {
- notice(s_GameServ, source, "Error: aClient not found. Contact a %S admin");
- log("Error: aClient not found: %s", source);
- }
- else if (!isAdmin(user))
- {
- notice(s_GameServ, source, "You must be a %S admin to use this command!");
- }
- else
- {
- char *rest = strtok(NULL, "");
- raw("%s", rest);
- }
- } else if (stricmp(cmd, "PRINT") == 0) {
- for (int x = 0; x < LEVELS; x++)
- levels[x].monsters.print();
- } else if (stricmp(cmd, "RANDOM") == 0) {
- char *rstr = strtok(NULL, "");
- range trange;
- trange.setRange(rstr);
- notice(s_GameServ, source, "Random number in that range: %d", trange.random());
- #endif
- } else {
- aClient *user;
- if ((user = find(source)))
- {
- if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- }
- else
- {
- notice(s_GameServ, source, "Unknown command \002%s\002. Type /msg %S \002HELP\002 to get a list of commands.", cmd);
- }
- }
- }
-
- #ifndef P10
- source--; // Bring the ':' back so we don't leak memory
- #endif
- if (z == ':')
- cmd--; // Same thing :)
-}
-
-int stricmp(const char *s1, const char *s2)
-{
- register int c;
-
- while ((c = tolower(*s1)) == tolower(*s2)) {
- if (c == 0)
- return 0;
- s1++;
- s2++;
- }
- if (c < tolower(*s2))
- return -1;
- return 1;
-}
-
-void showstats(const char *u, const char *nick)
-{
- aClient *ni, *sender = find(u);
- char *buf;
- buf = new char[50];
- char *space;
-
-
- if (!(ni = findplayer(nick)))
- {
- notice(s_GameServ, u, "%s not found", nick);
- }
- else if (ni->stats)
- {
- notice(s_GameServ, sender->getNick(), "Stats for %s:", ni->stats->name.c_str());
-
- sprintf(buf, "Experience: %ld", ni->stats->exp);
- space = spaces(strlen(buf), " ");
- notice(s_GameServ, sender->getNick(), "%s%sLevel: %d", buf, space,
- ni->stats->level);
- delete [] space;
-
- sprintf(buf, "Gold: %ld", ni->stats->gold);
- space = spaces(strlen(buf), " ");
- notice(s_GameServ, sender->getNick(), "%s%sGold in Bank: %ld", buf, space, ni->stats->bank);
- delete [] space;
-
- notice(s_GameServ, sender->getNick(), "Hit Points: %d of %d", ni->stats->hp,
- ni->stats->maxhp);
-
- sprintf(buf, "Strength: %d", ni->stats->strength);
- space = spaces(strlen(buf), " ");
- notice(s_GameServ, sender->getNick(), "%s%sDefense: %d",
- buf, space, ni->stats->defense);
- delete [] space;
-
- sprintf(buf, "Armor: %s", (ni->stats->getArmor() ? ni->stats->getArmor()->getName().c_str() : "Nothing"));
- space = spaces(strlen(buf), " ");
- log("got here 1");
- notice(s_GameServ, sender->getNick(), "%s%sWeapon: %s", buf, space,
- (ni->stats->getWeapon() ? ni->stats->getWeapon()->getName().c_str() : "Fists"));
- log("got here 2");
- delete [] space;
-
- sprintf(buf, "Forest Fights: %d", ni->stats->forest_fights);
- space = spaces(strlen(buf), " ");
- notice(s_GameServ, sender->getNick(), "%s%sPlayer Fights: %d", buf, space, ni->stats->player_fights);
- delete [] space;
- showinventory(ni, ni);
- }
- else
- {
- notice(s_GameServ, u, "%s is not playing!", ni->stats->name.c_str());
- }
- delete [] buf;
-}
-
-char *spaces(int len, char *seperator)
-{
- char *final;
- final = new char[30];
- int y;
- strcpy(final, seperator);
- for (y = 0; y < 30 - len; y++)
- strcat(final, seperator);
- return final;
-}
-
-void raw(const char *fmt, ...)
-{
- va_list args;
- char *input;
- const char *t = fmt;
- input = new char[1024];
- va_start(args, fmt);
- memset(input, 0, sizeof(input)); // Initialize to NULL
- for (; *t; t++)
- {
- if (*t == '%')
- {
- switch(*++t) {
- case 'd': sprintf(input, "%s%d", input, va_arg(args, int)); break;
- case 's': sprintf(input, "%s%s", input, va_arg(args, char *)); break;
- case 'S': sprintf(input, "%s%s", input, s_GameServ); break;
- case 'l':
- if (*++t == 'd')
- sprintf(input, "%s%ld", input, va_arg(args, long int)); break;
- }
- }
- else
- {
- sprintf(input, "%s%c", input, *t);
- }
-
- }
- #ifdef DEBUGMODE
- log("Input: %s", input);
- #endif
-
- sprintf(input, "%s%s", input, "\r\n");
- sock_puts(sock, input);
- delete [] input;
- va_end(args);
-}
-/* Send a NOTICE from the given source to the given nick. */
-
-void notice(const char *source, const char *dest, const char *fmt, ...)
-{
- if (fmt[0] == '\0')
- return;
-
- char *commanduse;
- commanduse = new char[16];
-
- #ifdef P10
- if (isUsePrivmsg())
- strcpy(commanduse, "P");
- else
- strcpy(commanduse, "O");
- #else
-
- if (isUsePrivmsg())
- strcpy(commanduse, "PRIVMSG");
- else
- strcpy(commanduse, "NOTICE");
- #endif
-
- va_list args;
- char *input;
- const char *t = fmt;
- input = new char[1024];
- va_start(args, fmt);
- if (dest[0] == ':')
- {
- dest++;
-
- #if !defined(P10)
- sprintf(input, ":%s %s %s :", source, commanduse, dest);
- #else
- sprintf(input, "%s %s %s :", gsnum, commanduse, dest);
- #endif
-
- dest--;
- }
- else
- {
- #if !defined(P10)
- sprintf(input, ":%s %s %s :", source, commanduse, dest);
- #else
- sprintf(input, "%s %s %s :", gsnum, commanduse, dest);
- #endif
- }
-
- for (; *t; t++)
- {
- if (*t == '%')
- {
- switch(*++t) {
- case 'd': sprintf(input, "%s%d", input, va_arg(args, int)); break;
- case 's': sprintf(input, "%s%s", input, va_arg(args, char *)); break;
- case 'S': sprintf(input, "%s%s", input, s_GameServ); break;
- case 'c': sprintf(input, "%s%c", input, va_arg(args, int)); break;
- case 'l':
- if (*++t == 'd')
- sprintf(input, "%s%ld", input, va_arg(args, long int)); break;
- }
- }
- else
- {
- sprintf(input, "%s%c", input, *t);
- }
-
- }
- #ifdef DEBUGMODE
- log("Input: %s", input);
- #endif
- sprintf(input, "%s%s", input, "\r\n");
- sock_puts(sock, input);
- delete [] commanduse;
- delete [] input;
-va_end(args);
-}
-
-
-int strnicmp(const char *s1, const char *s2, size_t len)
-{
- register int c;
-
- if (!len)
- return 0;
- while ((c = tolower(*s1)) == tolower(*s2) && len > 0) {
- if (c == 0 || --len == 0)
- return 0;
- s1++;
- s2++;
- }
- if (c < tolower(*s2))
- return -1;
- return 1;
-}
-
-#ifndef HAVE_STRTOK
-char *strtok(char *str, const char *delim)
-{
- static char *current = NULL;
- char *ret;
-
- if (str)
- current = str;
- if (!current)
- return NULL;
- current += strspn(current, delim);
- ret = *current ? current : NULL;
- current += strcspn(current, delim);
- if (!*current)
- current = NULL;
- else
- *current++ = 0;
- return ret;
-}
+ char *cmd, z;
+ cmd = strtok(buf, " ");
+
+#ifndef P10
+ source++; // Get rid of that : at the beginning of a :Nick privmsg Gameserv :text
#endif
-
-void do_check(char *u)
-{
- int days, hours, minutes, seconds;
- long complete;
- complete = (lastrefresh + refreshperiod) - time(NULL);
- days = complete / 86400;
- hours = (complete % 86400) / 3600;
- minutes = (complete % 86400) % 3600 / 60;
- seconds = (complete % 86400) % 3600 % 60;
-
- notice(s_GameServ, u, "Time left to next refresh: %dd %dh %dm %ds",
- days, hours, minutes, seconds);
-
- if (isRolloverForestFights())
- {
- complete = (lastrollover + rolloverperiod) - time(NULL);
-
- days = complete / 86400;
- hours = (complete % 86400) / 3600;
- minutes = (complete % 86400) % 3600 / 60;
- seconds = (complete % 86400) % 3600 % 60;
-
- notice(s_GameServ, u, "Time left to next rollover: %dd %dh %dm %ds",
- days, hours, minutes, seconds);
- }
-}
-
-void do_list(char *u)
-{
- aClient *user;
- char *cmd = strtok(NULL, " ");
-
- if (!(user = find(u)))
- {
- log("Fatal Error: Couldn't find %s in the client list", u);
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s. Command LIST", user->getNick());
- #endif
- return;
- }
-
- ListNode<aClient> *temp;
- bool header = false;
-
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- temp = players[x].First();
- if (!players[x].isEmpty())
- {
- while(temp)
- {
- if (cmd || is_playing(temp->getData()))
- {
- if (!header)
- {
- notice(s_GameServ, u, "Players:");
- header = true;
- }
- #ifdef P10
- notice(s_GameServ, u, "IRC: %s Game: %s", temp->getData()->getRealNick(),
- temp->getData()->stats->name.c_str());
- #else
- notice(s_GameServ, u, "IRC: %s Game: %s", temp->getData()->getNick(),
- temp->getData()->stats->name.c_str());
- #endif
- }
-
- temp = temp->Next();
- }
- }
- }
- if (!header)
- notice(s_GameServ, u, "No one is playing");
- else
- notice(s_GameServ, u, "End of List");
-
-}
-void do_set(char *u)
-{
- aClient *user, *target;
- char *name = strtok(NULL, " ");
- char *cmd = strtok(NULL, " ");
- char *cmd2;
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Cannot find aClient. "\
- "Buf: %s LOGOUT", u);
- return;
- }
- else if (isIgnore(user))
- {
+ z = cmd[0];
+ if (z == ':')
+ cmd++; // Get rid of that : at the beginning of the :text (command)
+
#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
+ log("Source: %s Command: %s", source, cmd);
#endif
- return;
- }
- else if (!name)
+
+ if (strnicmp(cmd, "\1PING", 6) == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] {PASSWORD|BANK BALANCE|PLAYER FIGHTS|FOREST FIGHTS|GOLD|STRENGTH|DEFENSE|HP|MAXHP|EXP|LEVEL|ALIVE|SEEN MASTER} {STRING|NUMBER|TRUE|FALSE}");
- return;
+ char *ts;
+ ts = strtok(NULL, "\1");
+ notice(s_GameServ, source, "\1PING %s\1", ts);
}
- else if (!(target = findplayer(name)))
- {
- // Back the pointers up... they didn't send a name probably
- cmd2= cmd;
- cmd = name;
- target = user;
-
- if (!is_playing(user))
+ else if (stricmp(cmd, "\1VERSION\1") == 0)
{
- notice(s_GameServ, u, "You must be playing to set things for yourself!");
- return;
- }
+ notice(s_GameServ, source, "\1VERSION %s %s\1", PACKAGE, VERSION);
}
- else
- {
- cmd2 = strtok(NULL, " ");
+ else if (stricmp(cmd, "SEARCH") == 0)
+ {
+ cmd = strtok(NULL, " ");
+
+ if (!cmd)
+ notice(s_GameServ, source, "SYNTAX: /msg <S SEARCH FOREST");
+ else
+ do_forest(source);
+
}
-
- // Regardless of the previous if/else, if it got here, we know we have the cmd pointer at the right spot.
- if (stricmp(cmd, "PASSWORD") == 0)
- {
- // Person is looking to change their password
- // If they're an admin, or it's theirself, allow it
- // cmd2 is pointing to the password now
- if (isAdmin(user) || user == target)
+ else if (stricmp(cmd, "ADMIN") == 0)
{
- target->stats->setPassword(cmd2);
- notice(s_GameServ, u, "Password successfully changed");
- }
- else if (user != target && !isAdmin(user))
+ do_admin(source);
+ }
+ else if (stricmp(cmd, "ATTACK") == 0)
{
- notice(s_GameServ, u, "You must be a %S admin to set other peoples' passwords.");
- return;
- }
+ do_attack(source);
}
- else if (stricmp(cmd, "BANK") == 0 || stricmp(cmd, "BALANCE") == 0)
- {
- if (!isAdmin(user))
+ else if (stricmp(cmd, "BANK") == 0)
{
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd, "BANK") == 0)
+ do_bank(source);
+ }
+ else if (stricmp(cmd, "CHECK") == 0)
{
- cmd2 = strtok(NULL, " "); // Need an extra parameter for set bank balance
- }
- if (!cmd2)
+ do_check(source);
+ }
+ else if (stricmp(cmd, "DRAGON") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] [BANK] BALANCE <NUMBER>");
- return;
- }
-
- target->stats->bank = stringtoint(cmd2);
-
- // Cheap bounds checking
- if (target->stats->bank > 2000000000)
- target->stats->bank = 2000000000;
- else if (target->stats->bank < 0)
- target->stats->bank *= -1;
-
- notice(s_GameServ, u, "Bank balance changed to %ld!", target->stats->bank);
+ do_dragon(source);
}
- else if (stricmp(cmd, "PLAYER") == 0)
- {
- if (!isAdmin(user))
+ else if (stricmp(cmd, "EQUIP") == 0)
{
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd2, "FIGHTS") != 0)
+ do_equip(source);
+ }
+ else if (stricmp(cmd, "FIGHT") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] PLAYER FIGHTS <NUMBER>");
- return;
- }
- else
+ do_fight(source);
+ }
+ else if (stricmp(cmd, "HEAL") == 0)
{
- cmd2 = strtok(NULL, " ");
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] PLAYER FIGHTS <NUMBER>");
- return;
- }
- target->stats->player_fights = stringtoint(cmd2);
-
- if (target->stats->player_fights < 0)
- target->stats->player_fights *= -1;
-
- notice(s_GameServ, u, "Player fights changed to %d!", target->stats->player_fights);
- }
+ do_heal(source);
}
- else if (stricmp(cmd, "FOREST") == 0)
- {
- if (!isAdmin(user))
+ else if (stricmp(cmd, "HELP") == 0)
{
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd2, "FIGHTS") != 0)
+ do_help(source);
+ }
+ else if (stricmp(cmd, "IDENTIFY") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] FOREST FIGHTS <number>");
- return;
- }
- else
+ do_identify(source);
+ }
+ else if (stricmp(cmd, "INVENTORY") == 0)
{
- cmd2 = strtok(NULL, " ");
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] FOREST FIGHTS <NUMBER>");
- return;
- }
-
- target->stats->forest_fights = stringtoint(cmd2);
-
- if (target->stats->forest_fights < 0)
- target->stats->forest_fights *= -1;
-
- notice(s_GameServ, u, "Forest fights changed to %d!", target->stats->forest_fights);
- }
+ do_inventory(source);
}
- else if (stricmp(cmd, "GOLD") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ else if (stricmp(cmd, "LIST") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] GOLD <NUMBER>");
- return;
- }
- target->stats->gold = stringtoint(cmd2);
-
- if (target->stats->gold > 2000000000)
- target->stats->gold = 2000000000;
- else if (target->stats->gold < 0)
- target->stats->gold *= -1;
-
- notice(s_GameServ, u, "Gold set to %ld", target->stats->gold);
- return;
- }
- }
- else if (stricmp(cmd, "STRENGTH") == 0 && stricmp(cmd2, "POTIONS") != 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ do_list(source);
+ }
+ else if (stricmp(cmd, "LOGOUT") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] STRENGTH <NUMBER>");
- return;
- }
-
- target->stats->strength = stringtoint(cmd2);
-
- if (target->stats->strength < 0)
- target->stats->strength *= -1;
-
- notice(s_GameServ, u, "Strength set to %d", target->stats->strength);
- return;
- }
- }
- else if (stricmp(cmd, "DEFENSE") == 0 && stricmp(cmd2, "POTIONS") != 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ do_logout(source);
+ }
+ else if (stricmp(cmd, "MASTER") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] DEFENSE <NUMBER>");
- return;
- }
-
- target->stats->defense = stringtoint(cmd2);
-
- if (target->stats->defense < 0)
- target->stats->defense *= -1;
-
- notice(s_GameServ, u, "Defense set to %d", target->stats->defense);
- return;
- }
- }
- else if (stricmp(cmd, "HP") == 0 && stricmp(cmd2, "POTIONS") != 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ do_master(source);
+ }
+ else if (stricmp(cmd, "NEWS") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] HP <NUMBER>");
- return;
- }
- target->stats->hp = stringtoint(cmd2);
-
- if (target->stats->hp < 0)
- target->stats->hp *= -1;
-
- notice(s_GameServ, u, "HP set to %d", target->stats->hp);
- return;
- }
- }
- else if (stricmp(cmd, "MAXHP") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ do_news(source);
+ }
+ else if (stricmp(cmd, "REGISTER") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] MAXHP <NUMBER>");
- return;
- }
- target->stats->maxhp = stringtoint(cmd2);
-
- if (target->stats->maxhp < 0)
- target->stats->maxhp *= -1;
-
- notice(s_GameServ, u, "MaxHP set to %d", target->stats->maxhp);
- return;
- }
- }
- else if (stricmp(cmd, "EXPERIENCE") == 0 || stricmp(cmd, "EXP") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ do_register(source);
+ }
+ else if (stricmp(cmd, "REFRESH") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] {EXPERIENCE|EXP} <NUMBER>");
- return;
- }
-
- target->stats->exp = stringtoint(cmd2);
-
- if (target->stats->exp > 2000000000)
- target->stats->exp = 2000000000;
- else if (target->stats->exp < 0)
- target->stats->exp *= -1;
-
- notice(s_GameServ, u, "Exp set to %ld", target->stats->exp);
- return;
- }
- }
- else if (stricmp(cmd, "LEVEL") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
+ do_refresh(source);
+ }
+ else if (stricmp(cmd, "RESET") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] LEVEL <NUMBER>");
- return;
- }
- target->stats->level = stringtoint(cmd2);
-
- if (target->stats->level < 0)
- target->stats->level = 1;
- else if (target->stats->level > REALLEVELS)
- target->stats->level = REALLEVELS;
-
- notice(s_GameServ, u, "Level set to %d", target->stats->level);
- return;
- }
- }
- else if (stricmp(cmd, "ALIVE") == 0)
- {
- if (!isAdmin(user))
+ do_reset(source);
+ }
+ else if (stricmp(cmd, "RUN") == 0)
{
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
+ do_run(source);
+ }
+ else if (stricmp(cmd, "SET") == 0)
{
- cmd2 = strtok(NULL, " ");
- if (!cmd2 || (stricmp(cmd2, "TRUE") != 0 && stricmp(cmd2, "FALSE") != 0))
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S SET ALIVE TRUE|FALSE");
- return;
- }
- else if (stricmp(cmd2, "TRUE") == 0)
- {
- notice(s_GameServ, u, "%s has been Resurrected!", target->stats->name.c_str());
- setAlive(target->stats);
- }
- else
- {
- notice(s_GameServ, u, "%s is now dead!", target->stats->name.c_str());
- clearAlive(target->stats);
- }
- }
- }
- else if (stricmp(cmd, "SEEN") == 0)
- {
- if (!isAdmin(user))
+ do_set(source);
+ }
+ else if (stricmp(cmd, "STATS") == 0)
{
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd2, "MASTER") != 0)
+ do_stats(source);
+ }
+ else if (stricmp(cmd, "STORE") == 0)
{
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] SEEN MASTER {TRUE|FALSE}");
- return;
- }
- else
+ do_store(source);
+ }
+ else if (stricmp(cmd, "TAVERN") == 0)
{
- cmd2 = strtok(NULL, " ");
- if (!cmd2 || (stricmp(cmd2, "TRUE") != 0 && stricmp(cmd2, "FALSE") != 0))
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NICK] SEEN MASTER {TRUE|FALSE}");
- return;
- }
- else if (stricmp(cmd2, "TRUE") == 0)
- {
- notice(s_GameServ, u, "%s has seen their master now.", target->stats->name.c_str());
- target->addFlag(FLAG_MASTER);
- }
- else
- {
- notice(s_GameServ, u, "%s has not seen their master now.", target->stats->name.c_str());
- target->remFlag(FLAG_MASTER);
- }
- }
+ do_tavern(source);
}
- else
- {
- notice(s_GameServ, u, "Unknown command: SET %s", cmd);
- notice(s_GameServ, u, "SYNTAX: /msg %S SET [NAME] {PASSWORD|BANK BALANCE|PLAYER FIGHTS|FOREST FIGHTS|GOLD|STRENGTH|DEFENSE|HP|MAXHP|EXP|LEVEL|ALIVE|SEEN MASTER} {STRING|NUMBER|TRUE|FALSE}");
- return;
- }
-}
-
-void do_logout(char *u)
-{
- aClient *user;
- char *name = strtok(NULL, " ");
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Cannot find aClient. "\
- "Buf: %s LOGOUT", u);
- log("Could not find aClient Buf: %s LOGOUT",
- u);
- return;
+ else if (stricmp(cmd, "USE") == 0)
+ {
+ do_use(source);
}
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
+ else if (stricmp(cmd, "SHUTDOWN") == 0)
+ {
+ do_shutdown(source);
}
-
- if (name)
- {
- if (!isAdmin(user))
+ else if (stricmp(cmd, "SAVE") == 0)
{
- notice(s_GameServ, u, "You must be a %S admin to use this command!");
- }
- else if (!(user = findplayer(name)))
+ do_save(source);
+ }
+ else if (stricmp(cmd, "LOAD") == 0)
{
- notice(s_GameServ, u, "Couldn't find a player named %s", name);
+ do_load(source);
}
- else
+#ifdef DEBUGMODE
+ else if (stricmp(cmd, "RAW") == 0)
{
- notice(s_GameServ, u, "Logging out %s", user->stats->name.c_str());
- logout(user);
- }
+ do_raw(source);
}
- else if (!name)
- {
- if (!is_playing(user))
+#endif
+ else
{
- notice(s_GameServ, u, "You're not logged in!");
- }
- else if (is_fighting(user))
- {
- notice(s_GameServ, u, "You can't logout while fighting!");
- }
- else
- {
- notice(s_GameServ, u, "You have left the fields. You have lived to kill another day!");
- logout(user);
- }
- }
-}
-
-void logout(aClient *user)
-{
- if (is_playing(user))
- {
- ListNode<aClient> *it;
- aClient *temp;
- unsigned long hv = iHASH((unsigned char *) user->stats->name.c_str());
- it = players[hv].Find(user);
-
- if (!it)
- {
- notice(s_GameServ, user->getNick(), "Fatal error. Contact "\
- "%S Admin. Cannot find you in the players list.");
- log("Error on logout(). Can't find %s in the players list",
- #ifdef P10
- user->getRealNick()
- #else
- user->getNick()
- #endif
- );
- return;
- }
-
- temp = new aClient;
- temp->stats = new Player;
- temp->stats->setData(user->stats);
- user->stats->client = NULL;
-
- if (player_fight(user))
- user->stats->battle->stats->battle = NULL;
-
- delete user->stats;
- user->stats = NULL;
- temp->stats->client = NULL;
- #ifdef P10
- temp->setRealNick("Not Playing");
- #endif
- temp->setNick("Not Playing");
-
- it->setNewPtr(temp);
- #ifdef DEBUGMODE
- log("Logged out player %s",
- #ifdef P10
- user->getRealNick()
- #else
- user->getNick()
- #endif
- );
- #endif
- }
- clearPlaying(user);
-}
-
-void do_register(char *u)
-{
- char *password, *name;
- aClient *user;
- name = strtok(NULL, " ");
- password = strtok(NULL, " ");
-
- if (!name)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S REGISTER NAME PASSWORD");
- }
- else if (stricmp(name, s_GameServ) == 0)
- {
- notice(s_GameServ, u, "You can't use %S as a name!");
- return;
- }
- else if (!password)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S REGISTER NAME PASSWORD");
- }
- else if ((user = findplayer(name)))
- {
- notice(s_GameServ, u, "%s is already registered!", name);
- notice(s_GameServ, u, "Choose another name!");
- }
- else if (!(user = find(u)))
- {
- log("Fatal Error: Couldn't find %s in the clients list", u);
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else
- {
- if (!is_playing(user))
- {
- ListNode<aClient> *temp;
- item *tempItem;
- user->stats = new Player();
- user->stats->client = user; // Set the backwards pointer
- user->stats->reset(); // set the user up
- user->stats->setPassword(password);
- user->stats->name = name;
- unsigned long hv = iHASH((unsigned char *) name);
- updateTS(user->stats);
- temp = players[hv].insertAtBack_RLN(user);
- temp->setPtr(user); // This is an extra step, but necessary for now
-
- // Update the last login time
- user->stats->lastlogin = time(NULL);
-
- notice(s_GameServ, u, "Player %s registered with password %s.", user->stats->name.c_str(), password);
- notice(s_GameServ, u, "Write this password down. If you lose it, there is no way to retrieve it!");
- log("Nickname %s registered player %s.", u, user->stats->name.c_str());
- setPlaying(user); // set the playing flag
- tempItem = findItemByID(3001);
- user->stats->inventory->addItem((*Items.begin())); // Add the stick
- user->stats->inventory->addItem(tempItem); // Add Clothes
- }
- else
- {
- notice(s_GameServ, u, "Already registered. Contact a %S admin for help.");
- }
- }
-}
-
-void do_identify(char *u)
-{
- char *password, *name;
- aClient *user, *p;
- name = strtok(NULL, " ");
- password = strtok(NULL, " ");
- if (!password || !name)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S IDENTIFY NAME PASSWORD");
- }
- else if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Cannot find aClient. Buf: %s", strtok(NULL, ""));
- log("Error: aClient not found: %s", u);
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!(p = findplayer(name)) || !p->stats)
- notice(s_GameServ, u, "Player %s not found", name);
- else if (is_playing(user))
- {
- notice(s_GameServ, u, "You are already playing!");
- }
- else if (p->stats->client != NULL && !isAdmin(user))
- {
- notice(s_GameServ, u, "That player has already identified.");
- }
- else if (!check_password(name, password) && !isAdmin(user))
- {
- notice(s_GameServ, u, "Password incorrect");
- }
- else {
- ListNode<aClient> *temp;
- unsigned long hv = iHASH((unsigned char *) p->stats->name.c_str());
- temp = players[hv].Find(p);
- if (!temp)
- {
- notice(s_GameServ, u, "Fatal error. Contact %S Admin. Buf: %s",
- strtok(NULL, ""));
- return;
- }
- user->stats = new Player(p->stats->name);
- #ifdef DEBUGMODE
- log("Setting data for identified");
- #endif
- user->stats->setData(p->stats);
- user->stats->client = user;
- updateTS(user->stats);
-
-
- #ifdef DEBUGMODE
- log("Player %s IRC: %s Identified", user->stats->name.c_str(),
- user->getNick());
- #endif
-
- setPlaying(user); // set the playing flag
-
- temp->setPtr(user);
-
- // Update the last login time
- user->stats->lastlogin = time(NULL);
-
- notice(s_GameServ, u, "Password Accepted. Identified.");
- showNews(u, todaysnews);
- }
-}
-
-void do_stats(char *u)
-{
- char *nick;
- aClient *user;
-
- nick = strtok(NULL, " ");
-
- if (!(user = find(u)))
- {
- log("Fatal Error: %s not found in client list", u);
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!nick)
- {
- if (!is_playing(user))
- {
- notice(s_GameServ, u, "You're not playing, so you have no stats!");
- return;
- }
- else
- {
- updateTS(user->stats);
- showstats(u, user->stats->name.c_str());
- }
- }
- else
- showstats(u, nick);
-}
-
-bool load_masters()
-{
- ifstream infile(masterdata);
- char *buf;
- int l = 0;
- buf = new char[1024];
-
- if (infile.fail())
- {
- log("Error opening %s", masterdata);
- return false;
- }
-
- #ifdef DEBUGMODE
- log("Loading masters from %s", masterdata);
- #endif
-
- for (l = 0; l < LEVELS - 1; l++)
- {
- infile.getline(buf, 1024, '\n');
-
- log("%s", buf);
- if (buf[0] == '#' || buf[0] == '\n' || buf[0] == '\r')
- {
- l--;
- continue;
- }
- else if (buf[0] == '^')
- break;
-
- Monster *master = &levels[l].master;
-
- char *name, *weapon, *strength, *gold, *exp, *maxhp, *death;
-
-
- name = strtok(buf, "~");
- weapon = strtok(NULL, "~");
- strength = strtok(NULL, "~");
- gold = strtok(NULL, "~");
- exp = strtok(NULL, "~");
- maxhp = strtok(NULL, "~");
- death = strtok(NULL, "~");
-
- master->name = name;
- master->weapon = weapon;
- master->strength = stringtoint(strength);
- master->gold = stringtoint(gold);
- master->exp = stringtoint(exp);
- master->maxhp = stringtoint(maxhp);
- master->hp = master->maxhp;
- master->death = death;
- }
-
- delete []buf;
-
- if (l < LEVELS - 1) // We didn't load a master for every level - check data/masters.dat
- return false;
- else
- return true;
-}
-
-void delete_monsters()
-{
- for (int x = 0; x < LEVELS; x++)
- levels[x].monsters.deleteNodes();
-}
-
-void display_monster(char *u)
-{
- if (is_playing(u))
- {
- aClient *user = find(u);
- Player *ni = user->stats;
-
- notice(s_GameServ, u, "Your Hitpoints: \ 2%d\ 2", ni->hp);
- notice(s_GameServ, u, "%s's Hitpoints: \ 2%d\ 2", ni->fight->name.c_str(), ni->fight->hp);
- notice(s_GameServ, u, "Here are your commands:");
- notice(s_GameServ, u, "/msg %S attack");
- notice(s_GameServ, u, "/msg %S run");
- notice(s_GameServ, u, "What will you do?");
- }
-}
-
-void display_players(char *u)
-{
- aClient *user;
- if (!(user = find(u)))
- {
- log("Fatal error in display_players(): Couldn't find %s", u);
- }
- else
- display_players(user);
-}
-
-void display_players(aClient *user)
-{
- char *u = user->getNick();
- if (is_playing(user) && player_fight(user))
- {
- aClient *battle = user->stats->battle;
- notice(s_GameServ, u, "Your Hitpoints: \ 2%d\ 2", user->stats->hp);
- notice(s_GameServ, u, "%s's Hitpoints: \ 2%d\ 2", battle->stats->name.c_str(), battle->stats->hp);
- notice(s_GameServ, u, "Here are your commands:");
- notice(s_GameServ, u, "/msg %S attack");
- notice(s_GameServ, u, "/msg %S run");
- notice(s_GameServ, u, "What will you do?");
- }
-}
-
-
-bool is_playing(char *u)
-{
- aClient *user;
- if (!(user = find(u)))
- return false;
- else
- return is_playing(user);
-}
-
-bool is_playing(aClient *user)
-{
- if (user->stats == NULL)
- {
- return false;
- }
- else if (user->stats->client == NULL)
- {
- return false;
- }
- else if (!FL_is_playing(user))
- {
- return false;
- }
- else
- return true;
-}
-
-bool is_fighting(char *u)
-{
- aClient *user;
-
- if (!(user = find(u)))
- return false;
- else
- return is_fighting(user);
-}
-
-bool is_fighting(aClient *user)
-{
- if (!is_playing(user))
- return false;
- else
- return player_fight(user) || master_fight(user) || user->stats->fight != NULL;
-}
-
-bool player_fight(char *u)
-{
- aClient *user;
-
- if (!(user = find(u)))
- return false;
- else
- return player_fight(user);
-}
-
-bool player_fight(aClient *user)
-{
- if (!is_playing(user))
- return false;
- else if (user->stats->battle != NULL && is_playing(user->stats->battle))
- {
- return user->stats->battle->stats != NULL;
- }
- return false;
-}
-
-bool master_fight(char *u)
-{
- aClient *user;
-
- if (!(user = find(u)))
- return false;
- else
- return master_fight(user);
-}
-
-bool master_fight(aClient *user)
-{
- if (!is_playing(user))
- return false;
- else
- return user->stats->master != NULL;
-}
-
-bool dragon_fight(char *u)
-{
- aClient *user;
- if (!(user = find(u)))
- return false;
- else
- return dragon_fight(user);
-}
-
-bool dragon_fight(aClient *user)
-{
- if (!is_playing(user))
- return false;
- else
- return (isDragonFight(user->stats));
-}
-void do_fight(char *u)
-{
- aClient *ni, *battle;
-
- char *nick = strtok(NULL, " ");
-
- if (!nick)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S FIGHT PLAYER");
- return;
- }
- else if (!(ni = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
- return;
- }
- else if (isIgnore(ni))
- {
-#ifdef DEBUGMODE
- log("Ignoring %s.", ni->getNick());
-#endif
- return;
- }
- else if (!is_playing(ni))
- {
- notice(s_GameServ, u, "You are not playing!");
- return;
- }
-
- updateTS(ni->stats);
-
- if (ni->stats->player_fights <= 0)
- {
- ni->stats->player_fights = 0; // just to be safe
- notice(s_GameServ, u, "You are out of player fights for the "\
- "day. You have to wait until tomorrow!");
- }
- else if (!(battle = findplayer(nick)))
- {
- notice(s_GameServ, u, "Player %s not found!", nick);
- }
- else if (!isAlive(ni->stats))
- {
- notice(s_GameServ, u, "You are dead. Wait until tomorrow to fight others!");
- }
- else if (!is_playing(battle))
- {
- notice(s_GameServ, u, "You can't attack %s while they aren't playing!", nick);
- }
-
- /* offline fighting not available yet
- else if (!(fight = finduser(nick)))
- {
- ni->stats->battle = battle;
- battle->battle = ni;
- setYourTurn(ni->stats);
- clearYourTurn(battle->stats);
-
- notice(s_GameServ, u, "You decide to fight %s while they're "\
- "not in the realm!",
- battle->stats->name.c_str());
- display_players(u);
- }
- */
- else if (stricmp(ni->stats->name.c_str(), battle->stats->name.c_str()) == 0)
- {
- notice(s_GameServ, u, "Are you trying to commit suicide!?");
- }
- else if (!isAlive(battle->stats))
- {
- notice(s_GameServ, u, "They are dead. Cannot fight dead players!");
- }
- else if (player_fight(battle))
- {
- notice(s_GameServ, u, "%s is fighting %s already!", battle->stats->name.c_str(), battle->stats->battle->stats->name.c_str());
- }
- else if (master_fight(battle))
- {
- notice(s_GameServ, u, "%s is fighting their master!", battle->stats->name.c_str());
- }
- else if (is_fighting(battle))
- {
- notice(s_GameServ, u, "%s is fighting %s already!", battle->stats->name.c_str(), battle->stats->fight->name.c_str());
- }
- else if (ni->stats->level - battle->stats->level > maxbfightdistance)
- {
- // You can't fight someone below you by more than X level(s)
- // level 12 can fight level (12 - X) but not < (12 - X)
- notice(s_GameServ, u, "You may not fight %s. You're too strong!",
- battle->stats->name.c_str());
- }
- else if (battle->stats->level - ni->stats->level > maxafightdistance)
- {
- // You can't fight someone above you by more than X level(S)
- // level 1 can fight level (1 + X), but not > (1 + X)
- notice(s_GameServ, u, "%s, do you really have a death wish? Try the forest you "\
- "weakling!", ni->stats->name.c_str());
- }
- else
- {
- // Set your battle pointer to the other player
- ni->stats->battle = battle;
-
- // Set the other player's battle pointer to you
- ni->stats->battle->stats->battle = ni;
-
- // The initiator gets the first move (perhaps this should be 50/50)
- setYourTurn(ni->stats);
- clearYourTurn(battle->stats);
-
- // Initiate Battle sequence!
- ni->stats->player_fights -= 1;
-
- notice(s_GameServ, u, "You challenge %s to an online duel!", battle->stats->name.c_str());
- notice(s_GameServ, c_Forest, "%s walks up and hits %s in the face! Let's see who will bite the dust.",
- ni->stats->name.c_str(), battle->stats->name.c_str()); /* DrLnet - Modified by Kain*/
-
- notice(s_GameServ, battle->getNick(), "%s has challenged you to an online duel!", ni->stats->name.c_str());
- notice(s_GameServ, battle->getNick(), "%s gets to go first "\
- "because they initiated!", ni->stats->name.c_str());
- notice(s_GameServ, battle->getNick(), "Please wait while %s decides what to do.", ni->stats->name.c_str());
- display_players(ni);
- }
-}
-
-void do_equip(char *u)
-{
- aClient *user;
- pouch *p;
- itemContainer *equip;
-
- char *item = strtok(NULL, " ");
- int id = stringtoint(item);
-
- if (!item || int(item[0]) < 48 || int(item[0] > 57))
- {
- notice(s_GameServ, u, "SYNTAX: EQUIP ####");
- notice(s_GameServ, u, "Type /msg %S HELP EQUIP for more information.");
- return;
- }
- else if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error in do_equip. Contact a(n) %S Admin");
- return;
- }
- else if (isIgnore(user))
- {
+ aClient *user;
+ if ((user = find(source)))
+ {
+ if (isIgnore(user))
+ {
#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
+ log("Ignoring %s.", user->getNick());
#endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to equip weapons and armor!");
- return;
- }
- updateTS(user->stats);
- p = user->stats->inventory;
-
-
- if (!(equip = p->Find(id)))
- {
- if (!p->isEmpty())
- {
- notice(s_GameServ, u, "You aren't carrying that item!");
- }
- showinventory(user, user);
- }
- else if (equip->getItem()->getType() != ARMOR && equip->getItem()->getType() != WEAPON)
- {
- notice(s_GameServ, u, "You can't use %s like that. Try /msg %S use", equip->getItem()->getName().c_str());
- }
- else
- {
- // Use the item
- notice(s_GameServ, u, "You equip %s.", equip->getItem()->getName().c_str());
- equip->use(user->stats);
- }
-}
-void do_use(char *u)
-{
- aClient *user;
- pouch *p;
-
- char *item = strtok(NULL, " ");
- int id;
- itemContainer *used;
-
- if (!item || int(item[0]) < 48 || int(item[0]) > 57)
- {
- notice(s_GameServ, u, "SYNTAX: USE ####");
- notice(s_GameServ, u, "Type /msg %S HELP USE for more information.");
- return;
- }
- else if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal Error in do_use. Contact a(n) %S Admin");
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to use items!");
- return;
+ }
+ else
+ {
+ notice(s_GameServ, source, "Unknown command \002%s\002. Type /msg <S \002HELP\002 to get a list of commands.", cmd);
+ }
+ }
}
- id = stringtoint(item);
- updateTS(user->stats);
- p = user->stats->inventory;
-
- if (!(used = p->Find(id)))
- {
- if (!p->isEmpty())
- {
- notice(s_GameServ, u, "You aren't carrying that item!");
- }
- showinventory(user, user);
- }
- else if (used->getItem()->getType() != POTION)
- {
- notice(s_GameServ, u, "You can't use %s like that. Try /msg %S equip", used->getItem()->getName().c_str());
- }
- else
- {
- // Use the item
- notice(s_GameServ, u, "You used %s.", used->getItem()->getName().c_str());
- used->use(user->stats);
- if (used->getUses() == 0)
- {
- p->deleteItem(used->getItem());
- }
- end_turn(user);
- }
-
-}
-void do_run(char *u)
-{
- aClient *user;
- Player *p, *p2 = NULL;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Couldn't find you. Error. Contact a %S admin");
- return;
- }
- else if (isIgnore(user))
- {
-#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
+#ifndef P10
+ source--; // Bring the ':' back
#endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to run!");
- return;
- }
-
- updateTS(user->stats);
- p = user->stats;
-
- if (p->battle)
- p2 = p->battle->stats;
-
- if (!is_fighting(user))
- notice(s_GameServ, u, "You run in place... try fighting next time.");
- else if (!player_fight(user) && !master_fight(user))
- {
- notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p->fight->name.c_str());
- delete p->fight;
- p->fight = NULL;
- }
- else if (player_fight(user) && isYourTurn(p))
- {
- notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p2->name.c_str());
- notice(s_GameServ, p->battle->getNick(), "\ 2%s\ 2 ran away from you like a little baby!", p->name.c_str());
- addNews(todaysnews, "%s ran away from %s like a little baby!!", p->name.c_str(), p2->name.c_str()); /* DrLnet - edited by Kain */
- p2->battle = NULL;
- }
- else if (player_fight(user) && !isYourTurn(p))
- {
- notice(s_GameServ, u, "It is not your turn. Please wait until \ 2%s\ 2 decides what to do.", p2->name.c_str());
- }
- else if (master_fight(user))
- {
- notice(s_GameServ, u, "You cannot run from \ 2%s\ 2! FIGHT!", p->master->name.c_str());
- }
- p->battle = NULL;
+ if (z == ':')
+ cmd--; // Same thing :)
}
-void end_turn(aClient *user)
-{
- char *nick, *u = user->getNick();
- Monster *fight;
- aClient *battle;
- int mhit;
-
- nick = new char[strlen(user->getNick()) + 1];
-
- if (!user || !is_playing(user) || !is_fighting(user))
- goto endturn;
-
- if (!player_fight(user) && !master_fight(user))
- fight = user->stats->fight;
- else
- fight = user->stats->master;
- battle = user->stats->battle;
-
- if (!player_fight(user))
- {
- // Opponent's Hit
- mhit = (fight->strength / 2) + (rand() % (fight->strength / 2)) - (user->stats->defense);
- }
- else
- {
- // Opponent's Hit
- mhit = (battle->stats->strength / 2) + (rand() % (battle->stats->strength / 2)) - user->stats->defense;
- }
- if (!player_fight(user))
- {
-
- if (mhit > 0)
- {
- notice(s_GameServ, u, "\1f%s\1f attacks with their \1f%s\1f for \ 2%d\ 2 damage!",
- fight->name.c_str(), fight->weapon.c_str(), mhit);
- }
- else if (mhit <= 0)
- notice(s_GameServ, u, "%s completely misses you!", fight->name.c_str());
-
- if (mhit >= user->stats->hp)
- {
- if (!master_fight(user))
- {
- notice(s_GameServ, u, "You have been \ 2\1fkilled\1f\ 2 by %s!", fight->name.c_str());
- notice(s_GameServ, u, "You lose all gold on hand and lose 10 percent "\
- "of your experience!");
- user->stats->gold = 0;
- user->stats->exp -= (long int)(user->stats->exp * .10);
- user->stats->hp = 0;
- user->stats->fight = NULL;
- clearAlive(user->stats);
- goto endturn;
- }
- else
- {
- notice(s_GameServ, u, "%s has bested you! You will have to wait "\
- "until tomorrow to try again", user->stats->master->name.c_str());
- user->stats->fight = NULL;
- user->stats->master = NULL;
- goto endturn;
- }
- }
- else
- {
- if (mhit > 0)
- user->stats->hp -= mhit;
- display_monster(u);
- goto endturn;
- }
- }
- else
- {
- clearYourTurn(user->stats);
- setYourTurn(battle->stats);
- display_players(battle);
- }
-endturn:
- delete nick;
-}
-
-void do_heal(char *u)
-{
- aClient *ni;
- char *amount = strtok(NULL, " ");
- int price, num;
-
- if (!amount)
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S HEAL {ALL | #}");
- return;
- }
- else if (!(ni = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
- return;
- }
- else if (isIgnore(ni))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", ni->getNick());
- #endif
- return;
- }
- else if (!is_playing(ni))
- {
- notice(s_GameServ, u, "You aren't playing!");
- return;
- }
- else if (!isAlive(ni->stats))
- {
- notice(s_GameServ, u, "You are dead. Wait until tomorrow for healing.");
- return;
- }
- else if (is_fighting(ni))
- {
- notice(s_GameServ, u, "You can't heal in battle!");
- return;
- }
- else if (ni->stats->hp >= ni->stats->maxhp)
- {
- notice(s_GameServ, u, "You don't need healing!");
- return;
- }
-
- updateTS(ni->stats);
- if (stricmp(amount, "ALL") == 0)
- {
- price = ni->stats->level * 3;
- if (ni->stats->gold < (ni->stats->maxhp - ni->stats->hp) * price)
- {
- notice(s_GameServ, u, "Healing \ 2%d\ 2 points for \ 2%d\ 2 gold per point.",
- (long int)ni->stats->gold/price, price);
- ni->stats->hp += ni->stats->gold / price;
- ni->stats->gold %= price;
- }
- else
- {
- notice(s_GameServ, u, "Healing all possible points at \ 2%d\ 2 gold "\
- "per point.", price);
- notice(s_GameServ, u, "\ 2%d\ 2 points healed for \ 2%ld\ 2 gold. HP at MAX!",
- (ni->stats->maxhp - ni->stats->hp),
- (price * (ni->stats->maxhp - ni->stats->hp)) );
- ni->stats->gold -= price * (ni->stats->maxhp - ni->stats->hp);
- ni->stats->hp = ni->stats->maxhp;
- }
- }
- else if (isstringnum(amount))
- {
- num = stringtoint(amount);
- price = ni->stats->level * 3;
- if (ni->stats->gold < price * num)
- {
- notice(s_GameServ, u, "You only have enough gold to heal \ 2%d\ 2 points!",
- (long int)ni->stats->gold/price);
- }
- else if (num <= ni->stats->maxhp - ni->stats->hp)
- {
- notice(s_GameServ, u, "Healing \ 2%d\ 2 points at \ 2%d\ 2 gold per point.",
- num, price);
- ni->stats->hp += num;
- ni->stats->gold -= num * price;
- }
- else if (num > ni->stats->maxhp - ni->stats->hp)
- {
- notice(s_GameServ, u, "Healing all possible points at \ 2%d\ 2 gold "\
- "per point.", price);
- notice(s_GameServ, u, "\ 2%d\ 2 points healed. HP at MAX!",
- (ni->stats->maxhp - ni->stats->hp));
- ni->stats->gold -= price * (ni->stats->maxhp - ni->stats->hp);
- ni->stats->hp = ni->stats->maxhp;
- }
- }
- else if (amount[0] == '-')
- notice(s_GameServ, u, "You trying to cheat?");
- else
- notice(s_GameServ, u, "SYNTAX: /msg %S HEAL {ALL | #}");
-}
-
-int isstringnum(char *num)
-{
- unsigned int x;
- for (x = 0; x < strlen(num); x++)
- {
- if ((int)num[x] < 48 || (int)num[x] > 57)
- return 0;
- }
-return 1;
-}
-
-long int stringtoint(char *number)
-{
- return atol(number);
-}
-
-long int pow(int x, int y)
-{
- long int value = 0;
- int count = 0;
- value += x;
-
- if (x != 0 && y != 0)
- {
- for (count = 1; count <= y - 1; count++)
- value *= x;
- }
- else
- return 1;
-return value;
-}
-
-long int chartoint(char ch)
-{
- if (int(ch) >= 48 && int(ch) <= 57)
- return int(ch) - 48;
- else
- return 0;
-}
-
-int save_gs_dbase()
-{
- ListNode<aClient> *ptr;
- Player *it;
- ofstream outfile;
-
- outfile.open(playerdata);
-
- if (!outfile)
- {
- log("Error opening %s", playerdata);
- return 0;
- }
-
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- ptr = players[x].First();
- while(ptr)
- {
- it = ptr->getData()->stats;
- clearYourTurn(it);
- item *w, *a;
- w = it->getWeapon();
- a = it->getArmor();
-
- outfile << it->name.c_str() << ' ' << it->level << ' ' << it->exp << ' ' << it->gold << ' ' << it->bank << ' '<< it->hp << ' ' << it->maxhp << ' ' << it->strength << ' ' << it->defense << ' ' << it->forest_fights << ' ' << it->player_fights << ' ' << it->getFlags() << ' ' << it->password << ' ' << it->lastlogin << ' ' << (w ? w->getID() : 0) << ' ' << (a ? a->getID() : 0);
-
- // Traverse the list and write out each item ID and how many uses are left
- if (!it->inventory->isEmpty())
- {
- list<itemContainer> *myitems;
- list<itemContainer>::iterator item_iter;
- myitems = it->inventory->getItems();
-
- for(item_iter = myitems->begin();item_iter != myitems->end();item_iter++)
- {
- outfile << ' ' << (*item_iter).getItem()->getID() << ' ' << (*item_iter).getUses();
- }
- }
- outfile << endl;
- ptr = ptr->Next();
- }
- }
-outfile.close();
-return 1;
-}
-
-int load_dragon()
-{
- ifstream infile;
- char *buf;
-
- infile.open(dragondata);
-
- if (infile.fail())
- {
- infile.clear();
- log ("Error opening %s. Trying initialdragon.dat", dragondata);
- infile.open("data/initialdragon.dat");
- if (infile.fail())
- {
- log ("Error opening data/initialdragon.dat");
- return 0;
- }
- }
-
- buf = new char[1024];
-
- infile.getline(buf, 1024, '\n');
- infile.close(); // Done with the file... we have what we want
-
- dragon.name = strtok(buf, "~");
- dragon.weapon = strtok(NULL, "~");
- dragon.gold = 0;
- dragon.exp = 0;
- dragon.strength = stringtoint(strtok(NULL, "~"));
- dragon.hp = stringtoint(strtok(NULL, "~"));
- dragon.defense = stringtoint(strtok(NULL, "~"));
- dragon.death = strtok(NULL, "");
-
- log ("loaded dragon: %s", dragon.name.c_str());
-
- delete []buf;
-
-return save_dragon(); // Save the dragon file and return the status code :)
-}
-
-int save_dragon()
-{
- ofstream outfile;
-
- outfile.open(dragondata);
-
- if (outfile.fail())
- {
- log ("Error opening %s. Exiting.", dragondata);
- return 0;
- }
-
- outfile << dragon.name.c_str() << '~' << dragon.weapon.c_str() << '~'
- << dragon.strength << '~' << dragon.hp << '~'
- << dragon.defense << '~' << dragon.death.c_str() << "\n^"
- << endl;
-
-outfile.close();
-
-return 1;
-}
-
-int load_store()
-{
- ifstream infile;
- char *buf;
- item *tempItem;
- buf = new char[1024];
- long id;
-
- infile.open(storeitemdata);
-
- if (infile.fail())
- {
- log("Error opening %s", storeitemdata);
- return 0;
- }
-
- while (infile.getline(buf, 1024, '\n'))
- {
- try
- {
- if (buf[0] != '#' && buf[0] != '\n' && buf[0] != '\0')
- {
- item *tempItem2;
- id = stringtoint(strtok(buf, ""));
- tempItem2 = findItemByID(id);
- if (tempItem2 == NULL)
- {
- log("Invalid ID in %s", storeitemdata);
- return 0;
- }
-
- tempItem = tempItem2;
- store.push_back(tempItem);
- }
- }
- catch (char *str)
- {
- log("Exception loading store: %s", str);
- delete []buf;
- return 0;
- }
- }
- delete []buf;
- return 1;
-}
-int load_tavern()
-{
- ifstream infile;
- char *buf;
- tavernItem tempItem;
- buf = new char[1024];
- long id, level;
-
- infile.open(tavernitemdata);
- if (infile.fail())
- {
- log("Error opening %s", tavernitemdata);
- return 0;
- }
-
- while (infile.getline(buf, 1024, '\n'))
- {
- try
- {
- if (buf[0] != '#' && buf[0] != '\n' && buf[0] != '\0')
- {
- item *tempItem2;
- id = stringtoint(strtok(buf, "~"));
- level = stringtoint(strtok(NULL, ""));
- tempItem2 = findItemByID(id);
- if (tempItem2 == NULL)
- {
- log("Invalid ID in %s", tavernitemdata);
- return 0;
- }
- tempItem.setItem(tempItem2);
- tempItem.setLevel(level);
- tavern.push_back(tempItem);
- }
- }
- catch (char *str)
- {
- log("Exception loading tavern: %s", str);
- delete []buf;
- return 0;
- }
- }
- delete []buf;
- return 1;
-}
-int load_items()
-{
- ifstream infile;
- char *buf;
- item *tempItem;
-
-
- buf = new char[1024];
-
- infile.open(itemdata);
-
- if (infile.fail())
- {
- log("Error opening %s", itemdata);
- return 0;
- }
-
- while (infile.getline(buf, 1024, '\n'))
- {
- if (buf[0] == '^')
- break;
- try
- {
- if (buf[0] != '#' && buf[0] != '\n' && buf[0] != '\0')
- {
- switch(buf[0])
- {
- case '1':
- tempItem = new weapon();
- break;
- case '2':
- tempItem = new armor();
- break;
- case '3':
- tempItem = new potion();
- break;
- default:
- log("Invalid Item Type %c in %s", buf[0], itemdata);
- delete []buf;
- return 0;
- break;
- }
- if(tempItem->setData(buf))
- {
- Items.push_back(tempItem);
- }
- }
- }
- catch (char *str)
- {
- log("Exception loading items: %s", str);
- delete []buf;
- return 0;
- }
- }
- delete []buf;
- return 1;
-}
-int load_gs_dbase()
-{
- ifstream infile;
- aClient *temp;
- Player *p;
- char *tempname, *buf, *password;
- int tempnum;
- buf = new char[100000];
-
- infile.open(playerdata);
-
- if (infile.fail())
- {
- log("Error opening %s", playerdata);
- return 0;
- }
-
- for (int x = 0; x < U_TABLE_SIZE; x++)
- {
- ListNode<aClient> *tempNode;
- tempNode = players[x].First();
- while (tempNode)
- {
- if (tempNode->getData()->stats->client)
- logout(tempNode->getData()->stats->client);
- tempNode = tempNode->Next();
- }
- players[x].deleteNodes();
- }
-
- while (infile.getline(buf, 100000, '\n'))
- {
- temp = new aClient;
- tempname = strtok(buf, " ");
- temp->stats = new Player(tempname);
- p = temp->stats;
-
- p->level = stringtoint(strtok(NULL, " "));
- p->exp = stringtoint(strtok(NULL, " "));
- p->gold = stringtoint(strtok(NULL, " "));
- p->bank = stringtoint(strtok(NULL, " "));
- p->hp = stringtoint(strtok(NULL, " "));
- p->maxhp = stringtoint(strtok(NULL, " "));
- p->strength = stringtoint(strtok(NULL, " "));
- p->defense = stringtoint(strtok(NULL, " "));
- p->forest_fights = stringtoint(strtok(NULL, " "));
- p->player_fights = stringtoint(strtok(NULL, " "));
- p->setFlags(stringtoint(strtok(NULL, " ")));
-
-
-
- password = strtok(NULL, " ");
- p->password = password;
- temp->setNick("Not Playing");
-#ifdef P10
- temp->setRealNick("Not Playing");
-#endif
- tempname = strtok(NULL, " ");
- if (tempname)
- p->lastlogin = stringtoint(tempname);
- else
- p->lastlogin = time(NULL);
-
- tempname = strtok(NULL, " ");
- tempnum = stringtoint(tempname);
- if (tempnum != 0)
- {
- p->setWeapon(*findItemByID(tempnum));
- }
-
- tempname = strtok(NULL, " ");
- tempnum = stringtoint(tempname);
-
- if (tempnum != 0)
- {
- p->setArmor(*findItemByID(tempnum));
- }
-
-
- for (tempname = strtok(NULL, " "); tempname != NULL; tempname = strtok(NULL, " "))
- {
- long int id, uses;
- list<item*>::iterator item_iter;
- id = stringtoint(tempname);
- tempname = strtok(NULL, " ");
- uses = stringtoint(tempname);
-
- item_iter = Items.begin();
- while (item_iter != Items.end())
- {
- if ((*item_iter)->getID() == id)
- {
- // Don't sort every time you add an item or it eats CPU
- p->inventory->addItemNoChecks((*item_iter))->setUses(uses);
- }
- item_iter++;
- }
- }
- p->inventory->sort();
-
- unsigned long hv = iHASH((unsigned char *) temp->stats->name.c_str());
-
- temp->stats->client = NULL;
- players[hv].insertAtBack(temp);
- delete temp;
- }
- delete [] buf;
- infile.close();
- return 1;
-}
-
-bool passcmp(const char *encrypted, char *plaintext)
-{
- char salt[3];
- char *plaintext2, *plainToencrypt;
- bool same = false;
-
- plaintext2 = new char[strlen(encrypted) + strlen(plaintext)]; // Extra
- strcpy(plaintext2, plaintext);
-
- salt[0] = encrypted[0];
- salt[1] = encrypted[1];
- salt[3] = '\0';
-
- plainToencrypt = crypt(plaintext2, salt);
-
- same = (strcmp((const char *)encrypted, plainToencrypt) == 0 ? true : false);
-
- delete []plaintext2;
-
- return same;
-}
-
-bool check_password(char *name, char *plaintext)
-{
- aClient *client;
-
- if (!(client = findplayer(name)))
- return false;
- else
- {
- return passcmp(client->stats->password.c_str(), plaintext);
- }
-}
-
-void do_store(char *u)
-{
- list<item*>::iterator item_iterator;
- item *tempItem;
- char *cmd = strtok(NULL, " ");
- char *num = strtok(NULL, " ");
- char *space;
- int id;
- aClient *user;
- Player *p;
-
-
- if (!cmd || !num)
- {
- notice(s_GameServ, u, "SYNTAX: STORE LIST {ARMOR | WEAPONS}");
- notice(s_GameServ, u, " \ 2STORE SELL NUMBER\ 2");
- notice(s_GameServ, u, " \ 2STORE BUY \1fNUMBER\1f\ 2");
- return;
- }
- else if (!(user = find(u)))
- {
- log("Fatal Error: could not find %s in client list", u);
- return;
- }
- else if (isIgnore(user))
- {
-#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
-#endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to use the store!");
- return;
- }
- else if (is_fighting(user))
- {
- notice(s_GameServ, u, "You can't go to the store while fighting!");
- return;
- }
- else if (!isAlive(user->stats))
- {
- notice(s_GameServ, u, "You are dead. Wait until tomorrow to purchase weapons and armor!");
- return;
- }
- updateTS(user->stats);
-
- if (stricmp(cmd, "LIST") == 0)
- {
- if (stricmp(num, "WEAPONS") == 0)
- {
- notice(s_GameServ, u, "Welcome to Kain's Armory");
- notice(s_GameServ, u, "Here are the weapons we have available for the killing, sire:");
- for (item_iterator = store.begin(); item_iterator != store.end(); ++item_iterator)
- {
- if ((*item_iterator)->getType() == WEAPON)
- {
- space = spaces(strlen((*item_iterator)->getName().c_str()), ".");
- notice(s_GameServ, u, "%s%ld. %s%s%ld", ((*item_iterator)->getID() < 10 ? " " : ""), (*item_iterator)->getID(), (*item_iterator)->getName().c_str(), space, (*item_iterator)->price());
- free(space);
- }
- }
- notice(s_GameServ, u, "To purchase a weapon, type /msg %S STORE BUY \ 2#\ 2.");
- notice(s_GameServ, u, "Where # is the weapon number from the menu above.");
-
- }
- else if (stricmp(num, "ARMOR") == 0)
- {
- notice(s_GameServ, u, "Welcome to Kain's Armory");
- notice(s_GameServ, u, "I hope you enjoy the fine armor we have available for your protection:");
- for (item_iterator = store.begin(); item_iterator != store.end(); ++item_iterator)
- {
- if ((*item_iterator)->getType() == ARMOR)
- {
- space = spaces(strlen((*item_iterator)->getName().c_str()), ".");
- notice(s_GameServ, u, "%s%ld. %s%s%d",((*item_iterator)->getID() < 10 ? " " : ""), (*item_iterator)->getID(), (*item_iterator)->getName().c_str(), space, (*item_iterator)->price());
- free(space);
- }
- }
-
- notice(s_GameServ, u, "To purchase armor, type /msg %S store buy #");
- notice(s_GameServ, u, "Where # is the armor number from the menu above.");
- }
-
- }
- else if (stricmp(cmd, "BUY") == 0)
- {
- p = user->stats;
- if (!num)
- {
- notice(s_GameServ, u, "SYNTAX: \ 2STORE BUY \1f#\1f\ 2");
- return;
- }
- else
- {
- id = stringtoint(num);
- }
-
- if (!isstringnum(num))
- {
- notice(s_GameServ, u, "SYNTAX: \ 2STORE BUY \1f#\1f\ 2");
- return;
- }
- else if (!(tempItem = findStoreItemByID(id)))
- {
- notice(s_GameServ, u, "Sorry, we don't carry that item!");
- return;
- }
- else if (p->gold < tempItem->price())
- {
- notice(s_GameServ, u, "You can't afford to buy %s", tempItem->getName().c_str());
- return;
- }
- else
- {
- notice(s_GameServ, u, "You have purchased %s! Thanks for the gold!", tempItem->getName().c_str());
- p->gold -= tempItem->price();
- p->inventory->addItem(tempItem);
- notice(s_GameServ, u, "Don't forget to type /msg %S equip %ld", tempItem->getID());
- }
- }
- else if (stricmp(cmd, "SELL" ) == 0)
- {
- itemContainer *tempContainer;
- p = user->stats;
- id = stringtoint(num);
- if (!isstringnum(num))
- {
- notice(s_GameServ, u, "SYNTAX: /msg %S store sell #");
- return;
- }
- else if (!(tempContainer = p->inventory->Find(id)))
- {
- notice(s_GameServ, u, "You're not carrying that!");
- return;
- }
- else if (p->gold >= 2000000000)
- {
- notice(s_GameServ, u, "You have enough gold. Just hang on to it for now.");
- }
- else
- {
- tempItem = tempContainer->getItem();
- if (2000000000 - p->gold < (tempItem->price() / 2))
- {
- notice(s_GameServ, u, "Thank you for your business! You now have as much gold as you can carry.");
- p->gold = 2000000000;
- }
- else
- {
- notice(s_GameServ, u, "Thank you for your business! We gave you %ld gold for %s!", (tempItem->price() / 2), tempItem->getName().c_str());
- p->gold += (tempItem->price() / 2);
- }
- p->inventory->deleteItem(tempItem);
- if (tempItem == p->getWeapon())
- {
- notice(s_GameServ, u, "Since you equipped %s, you're going to have to reequip something", tempItem->getName().c_str());
- tempItem->undo(p);
- p->clearWeapon();
- }
- else if (tempItem == p->getArmor())
- {
- tempItem->undo(p);
- notice(s_GameServ, u, "Since you equipped %s, you're going to have to reequip something", tempItem->getName().c_str());
- p->clearArmor();
- }
- }
- }
- else
- {
- notice(s_GameServ, u, "SYNTAX: STORE LIST {ARMOR | WEAPONS}");
- notice(s_GameServ, u, " \ 2STORE SELL #\ 2");
- notice(s_GameServ, u, " \ 2STORE BUY \1f#\1f\ 2");
- return;
- }
-}
-void do_inventory(char *u)
-{
- aClient *user;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal Error. Contact a %S admin!");
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to check your inventory!");
- return;
- }
- updateTS(user->stats);
- showinventory(user, user);
-}
-
-void showinventory(aClient *from, aClient *to)
-{
- char *nick;
- if (!to)
- to = from;
-
- nick = to->getNick();
-
- if (is_playing(from))
- {
- if (from->stats->inventory->isEmpty())
- {
- notice(s_GameServ, nick, "You aren't carrying anything");
- return;
- }
-
- list <itemContainer> *items;
- items = from->stats->inventory->getItems();
-
- list <itemContainer>::iterator item_iter, item_iter2;
- item_iter = items->begin();
-
- notice(s_GameServ, nick, "Inventory for %s:", from->stats->name.c_str());
- long count;
- while (item_iter != items->end())
- {
- // Display a list of counted items so as not to show an extra line for duplicate items
- count = 0;
- item_iter2 = item_iter;
- while (item_iter != items->end() && (*item_iter) == (*item_iter2))
- {
- if ((*item_iter) == (*item_iter2))
- {
- ++count;
- }
- else
- {
- break;
- }
- ++item_iter;
- }
- notice(s_GameServ, nick, "%ld.) %s (%ld)", (*item_iter2).getItem()->getID(), (*item_iter2).getItem()->getName().c_str(), count);
- }
- }
-
-}
-void do_tavern(char *u)
-{
- char *cmd = strtok(NULL, " ");
- aClient *user;
- Player *p;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal Error. See a %S admin for help");
- return;
- }
- else if (isIgnore(user))
- {
-#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
-#endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to go to the Tavern");
- return;
- }
- else if (is_fighting(user))
- {
- notice(s_GameServ, u, "You cannot go to the Tavern during a fight!");
- return;
- }
-
- updateTS(user->stats);
- p = user->stats;
-
- if (!cmd)
- {
- notice(s_GameServ, u, "Welcome to Boot Liquors Mystic Apothecary and General Store");
- notice(s_GameServ, u, "Your commands:");
- notice(s_GameServ, u, "/msg %S TAVERN {LIST | BUY} [NUMBER]");
- notice(s_GameServ, u, "What'll it be?");
- }
- else if (stricmp(cmd, "LIST") == 0)
- {
- notice(s_GameServ, u, "Here is a list of what we have to offer:");
- showTavern(user);
- notice(s_GameServ, u, "To buy an item, type /msg %S TAVERN BUY #");
- }
- else if (stricmp(cmd, "BUY") == 0)
- {
- char *chid = strtok(NULL, " ");
-
- if (!chid)
- {
- notice(s_GameServ, u, "SYNTAX: TAVERN BUY #");
- notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 6001");
- return;
- }
- long id = stringtoint(chid);
- tavernItem *tempItem;
-
- if (!(tempItem = findTavernItemByID(id)) || user->stats->level < tempItem->getLevel())
- {
- notice(s_GameServ, u, "Invalid Choice!");
- notice(s_GameServ, u, "Here is a list of what we have to offer:");
- showTavern(user);
- notice(s_GameServ, u, "To buy an item, type /msg %S TAVERN BUY #");
- return;
- }
- else if (user->stats->gold < tempItem->getItem()->price())
- {
- notice(s_GameServ, u, "You don't have enough gold!");
- notice(s_GameServ, u, "Here is a list of what we have to offer:");
- showTavern(user);
- notice(s_GameServ, u, "To buy an item, type /msg %S TAVERN BUY #");
- }
- else
- {
- if (user->stats->inventory->addItem(tempItem->getItem()) == NULL)
- {
- notice(s_GameServ, u, "You can't carry any more!");
- return;
- }
- notice(s_GameServ, u, "One %s coming right up!", tempItem->getItem()->getName().c_str());
- user->stats->gold -= tempItem->getItem()->price();
- }
- }
- else
- {
- notice(s_GameServ, u, "Improper Syntax.");
- notice(s_GameServ, u, "Type /msg %S HELP TAVERN for help");
- }
- return;
-}
-
-void do_bank(char *u)
-{
- char *cmd = strtok(NULL, " ");
- char *amount = strtok(NULL, " ");
- char *nick = strtok(NULL, " ");
-
- aClient *user;
- Player *p;
-
- if (!cmd || (!amount && stricmp(cmd, "BALANCE") != 0) || (stricmp(cmd, "TRANSFER") == 0 && !nick))
- {
- notice(s_GameServ, u, "BANK {WITHDRAW | DEPOSIT} {ALL | AMOUNT}");
- notice (s_GameServ, u, "BANK BALANCE");
- return;
- }
- else if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal Error. Couldn't find your aClient. Contact a(n) %S "\
- " admin for help");
- log("Fatal Error. Couldn't find %s while executing do_bank()", u);
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to use the bank!");
- return;
- }
- else if (is_fighting(user))
- {
- notice(s_GameServ, u, "You can't go to the bank during a fight!");
- return;
- }
- updateTS(user->stats);
- if (stricmp(cmd, "BALANCE") == 0)
- {
- showBankBalance(u);
- return;
- }
- else if (!isAlive(user->stats))
- {
- notice(s_GameServ, u, "You are dead. We don't accept gold from dead folk! Wait 'til tomorrow!");
- return;
- }
- else if (!isstringnum(amount) && stricmp(amount, "ALL") != 0)
- {
- notice(s_GameServ, u, "I don't know how to convert alphabet letters into currency, sire!");
- return;
- }
- if (stringtoint(amount) < 0)
- {
- notice(s_GameServ, u, "Sorry. This bank is not licensed "\
- "to handle such sums of cash, noble Lord.");
- return;
- }
- p = user->stats;
-
- if (stricmp(cmd, "DEPOSIT") == 0)
- {
- if (p->bank == 2000000000)
- {
- notice(s_GameServ, u, "Your bank account is full, sire!");
- return;
- }
- else if (stricmp(amount, "ALL") == 0)
- {
- if (2000000000 - p->bank < p->gold)
- {
- notice(s_GameServ, u, "You don't have enough room for all of your gold.");
- notice(s_GameServ, u, "Depositing %ld gold into your account", (2000000000 - p->bank));
- p->gold -= (2000000000 - p->bank);
- p->bank = 2000000000;
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Depositing %ld gold into your account!", p->gold);
- p->bank += p->gold;
- p->gold = 0;
- showBankBalance(u);
- }
- }
- else if (stringtoint(amount) > p->gold)
- {
- notice(s_GameServ, u, "Sire, you only have %ld gold!", p->gold);
- showBankBalance(u);
- return;
- }
- else
- {
- if (2000000000 - p->bank < stringtoint(amount))
- {
- notice(s_GameServ, u, "You don't have room in your account for that much.");
- notice(s_GameServ, u, "Capping off your account with %ld gold!", (2000000000 - p->bank));
- p->gold -= (2000000000 - p->bank);
- p->bank = 2000000000;
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Depositing %d gold into your account!", stringtoint(amount));
- p->bank += stringtoint(amount);
- p->gold -= stringtoint(amount);
- showBankBalance(u);
- }
- }
- }
- else if (stricmp(cmd, "WITHDRAW") == 0)
- {
- if (p->gold == 2000000000)
- {
- notice(s_GameServ, u, "You cannot carry any more gold, sire!");
- showBankBalance(u);
- return;
- }
- else if (stricmp(amount, "ALL") == 0)
- {
- if (2000000000 - p->gold < p->bank)
- {
- notice(s_GameServ, u, "You don't have enough room to carry all that gold.");
- notice(s_GameServ, u, "Withdrawing %ld gold from your account", (2000000000 - p->gold));
- p->bank -= (2000000000 - p->gold);
- p->gold = 2000000000;
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Withdrawing %ld gold from your account!", p->bank);
- p->gold += p->bank;
- p->bank = 0;
- showBankBalance(u);
- }
- }
- else if (stringtoint(amount) > p->bank)
- {
- notice(s_GameServ, u, "Sire, you only have %ld gold in the bank!", p->bank);
- showBankBalance(u);
- return;
- }
- else
- {
- if (2000000000 - p->gold < stringtoint(amount))
- {
- notice(s_GameServ, u, "You don't enough have room to carry that much gold!");
- notice(s_GameServ, u, "You fill your pockets with %ld gold!",
- (2000000000 - p->gold));
- p->bank -= (2000000000 - p->gold);
- p->gold = 2000000000;
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Withdrawing %d gold from your account!", stringtoint(amount));
- p->gold += stringtoint(amount);
- p->bank -= stringtoint(amount);
- showBankBalance(u);
- }
- }
- }
-
-}
-
-void do_dragon(char *u)
-{
- aClient *user;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to fight the dragon!");
- return;
- }
- else if (is_fighting(user))
- {
- notice(s_GameServ, u, "You are already in a fight. How will you fight the almighty dragon!?");
- return;
- }
- else if (!isAlive(user->stats))
- {
- notice(s_GameServ, u, "You're dead. Wait until tomorrow to see your master!");
- return;
- }
- else if (user->stats->level < LEVELS)
- {
- notice(s_GameServ, u, "You fool! Only those strong enough "\
- "to vanquish any foe should DARE fight the dragon!");
- notice(s_GameServ, u, "To put it in terms you can understand: "\
- "You are too weak. You must be Level %d!", REALLEVELS);
- return;
- }
-
- updateTS(user->stats);
-
- Player *p = user->stats;
- setMaster(p);
- notice(s_GameServ, u, "You approach the dragon's lair cautiously.");
- notice(s_GameServ, u, "The stench of sulfer fills the air as a "\
- "deep, red fog rolls in. The air is filled with the "\
- "heated mist of deadly fire from beyond the cave "\
- "entrance.");
- notice(s_GameServ, u, "You adjust your %s, tighten your grip on "\
- "your %s, and venture into the hot, dark cave. "\
- "You are surprised at the angle of descent as you climb "\
- "lower and lower, deeper into the dragon's den.",
- (p->getArmor() ? p->getArmor()->getName().c_str() : "Fists"), (p->getWeapon() ? p->getWeapon()->getName().c_str() : "Birthday Suit"));
- notice(s_GameServ, u, "You come to the end of the cave to find "\
- "a tooth. It is a large tooth... bigger than your torso."\
- " Suddenly the darkness lifts from the gleam of an eye "\
- " staring into your soul! The eye is large... HUGE!");
- notice(s_GameServ, u, "Just then you notice the eye begin to "\
- "glare orange! The tooth is moving... but it is still too "\
- "dark for you to make out.... THE DRAGON! You see it!");
- p->fight = new Monster(dragon);
- setDragonFight(p);
- display_monster(u);
-}
-
-void do_master(char *u)
-{
- aClient *user;
-
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to see your master!");
- return;
- }
- else if (is_fighting(user))
- {
- notice(s_GameServ, u, "You're in the middle of a fight! Pay attention!");
- return;
- }
- else if (!isAlive(user->stats))
- {
- notice(s_GameServ, u, "You're dead. Wait until tomorrow to see your master!");
- return;
- }
-
- updateTS(user->stats);
-
- char *cmd = strtok(NULL, " ");
- Player *p = user->stats;
- long int need = 0;
-
- if (seenMaster(p))
- {
- notice(s_GameServ, u, "You have already seen your master today. Wait until tomorrow to try again");
- return;
- }
-
- if (cmd != NULL)
- {
- switch(p->level)
- {
- case 1:
- need = 200;
- break;
- case 2:
- need = 800;
- break;
- case 3:
- need = 2000;
- break;
- case 4:
- need = 8000;
- break;
- case 5:
- need = 20000;
- break;
- case 6:
- need = 80000;
- break;
- case 7:
- need = 200000;
- break;
- case 8:
- need = 800000;
- break;
- case 9:
- need = 2000000;
- break;
- case 10:
- need = 8000000;
- break;
- case 11:
- need = 20000000;
- break;
-
- case REALLEVELS:
- need = p->exp + 1;
- notice(s_GameServ, u, "You are at level %d. You are the master. What's left? The DRAGON!", REALLEVELS);
- return;
- break;
- default:
- need = p->exp + 1; // Unknown level... don't let them fight a fake master!
- break;
- }
- }
- else
- {
- notice(s_GameServ, u, "SYNTAX: MASTER {FIGHT | QUESTION}");
- return;
- }
-
- if (stricmp(cmd, "FIGHT") == 0)
- {
- if (p->exp >= need)
- {
- setMaster(p);
- see_master(u);
- }
- else
- notice(s_GameServ, u, "You are not worthy of fighting %s! You need %ld more experience.",
- levels[p->level - 1].master.name.c_str(), (need - p->exp));
- return;
- }
- else if (stricmp(cmd, "QUESTION") == 0)
- {
- if (p->exp >= need)
- notice(s_GameServ, u, "%s looks you up and down and decides you are more ready than you will ever be.",
- levels[p->level - 1].master.name.c_str());
- else
- notice(s_GameServ, u, "You pathetic fool! You are no match for %s, %s!",
- levels[p->level - 1].master.name.c_str(), p->name.c_str());
-
- return;
- }
- else
- {
- notice(s_GameServ, u, "SYNTAX: MASTER {FIGHT | QUESTION}");
- }
-}
-
-void see_master(char *u)
-{
- aClient *user;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
- return;
- }
-
- if (!is_fighting(user) && is_playing(user))
- {
- Player *p = user->stats;
- p->master = new Monster(&levels[p->level - 1].master);
- p->fight = p->master;
- display_monster(u); // Since master is the same structure, use this function
- }
-}
-
-void showTavern(aClient *user)
-{
- Player *p;
- list<tavernItem>::iterator item_iterator;
- item *tempItem;
-
- p = user->stats;
-
- if (!p)
- return;
-
- item_iterator = tavern.begin();
- if (tavern.empty())
- {
- notice(s_GameServ, user->getNick(), "Tavern is empty");
- return;
- }
-
- while (item_iterator != tavern.end())
- {
- if (p->level < (*item_iterator).getLevel())
- {
- item_iterator++;
- continue;
- }
- tempItem = (*item_iterator).getItem();
- notice(s_GameServ, user->getNick(), "%d. %s for %ld gold", tempItem->getID(), tempItem->getName().c_str(), tempItem->price());
- item_iterator++;
- }
-}
-
-void showBankBalance(const char *u)
-{
- aClient *user;
- Player *p;
-
- if (!(user = find(u)))
- return;
-
- p = user->stats;
-
- if (!p)
- return;
-
- notice(s_GameServ, u, "Account Balance: %ld Gold On hand: %ld", p->bank, p->gold);
-
-}
-
-void rolloverall()
-{
- ListNode <aClient> *it;
- Player *p;
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- it = players[x].First();
- while (it)
- {
- p = it->getData()->stats;
- rollover(p);
- it = it->Next();
- }
- }
-}
-void refreshall()
-{
- ListNode <aClient> *it;
- Player *p;
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- it = players[x].First();
-
- while (it)
- {
- p = it->getData()->stats;
- refresh(p);
- it = it->Next();
- }
- }
-}
-
-void rollover(Player *p)
-{
- if (!p)
- return;
-
- p->forest_fights += numrolloverfights;
-
- if (p->forest_fights > maxforestfights)
- p->forest_fights = maxforestfights;
-}
-
-void refresh(Player *p)
-{
- if (!p)
- return;
-
- if (p->hp < p->maxhp)
- p->hp = p->maxhp;
- if (p->forest_fights < forestfights)
- {
- p->forest_fights = forestfights;
- }
-
- p->player_fights = 3;
- setAlive(p);
- clearMaster(p);
-}
-
-void do_refresh(char *u)
-{
- char *nick = strtok(NULL, " ");
- aClient *user;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Error: aClient not found. Contact a %S admin");
- log("Error: aClient not found: %s", u);
- return;
- }
- else if (isIgnore(user))
- {
- #ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
- #endif
- return;
- }
- else if (!isAdmin(user))
- {
- notice(s_GameServ, u, "You must be a %S admin to use this command!");
- return;
- }
- if (!nick)
- {
- notice(s_GameServ, u, "SYNTAX: REFRESH {ALL | NICK}");
- return;
- }
- else if (stricmp(nick, "ALL") == 0)
- {
- notice(s_GameServ, u, "Refreshing everyone's stats!");
- refreshall();
- }
- else if ((user = findplayer(nick)))
- {
- if (is_playing(user))
- {
- #ifdef P10
- notice(s_GameServ, u, "Refreshing %s.", user->getRealNick());
- #else
- notice(s_GameServ, u, "Refreshing %s.", user->getNick());
- #endif
- refresh(user->stats);
- }
- else
- {
- #ifdef P10
- notice(s_GameServ, u, "%s is not playing.", user->getRealNick());
- #else
- notice(s_GameServ, u, "%s is not playing.", user->getNick());
- #endif
- }
- }
- else
- {
- notice(s_GameServ, u, "Nick %s not found.", nick);
- return;
- }
-}
-
-
-void resetall()
-{
- ListNode <aClient> *it;
- Player *p;
-
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- it = players[x].First();
-
- while (it)
- {
- p = it->getData()->stats;
- reset(p);
- it = it->Next();
- }
- }
-}
-
-void reset(Player *p)
-{
- string *myname;
-
- if (!p)
- return;
-
- myname = new string(p->name);
-
- p->reset();
- p->name = *myname;
- delete myname;
-}
-
-void updateTS(Player *p)
-{
- if (!p)
- return;
-
- #ifdef DEBUGMODE
- log("Old timestamp for %s: %ld", p->name.c_str(), p->lastcommand);
- #endif
- p->lastcommand = time(NULL);
- #ifdef DEBUGMODE
- log("New timestamp for %s: %ld", p->name.c_str(), p->lastcommand);
- #endif
-
-}
-
-bool timedOut(Player *p)
-{
- if (!p)
- return false;
- else if (p->lastcommand == 0)
- return false;
- else
- {
- if ((time(NULL) - p->lastcommand) >= maxidletime)
- return true;
-
- return false;
- }
-}
-
-void timeOutEvent(Player *p)
-{
- aClient *user = findplayer(p->name.c_str());
-
- if (!user || !p->client) // then they're not playing
- return;
-
- char *nick = user->getNick();
-
- if (player_fight(user) && isYourTurn(p))
- {
- // Check to see if they were the idler or if it was the other
- // person
- if (p->lastcommand != p->battle->stats->lastcommand)
- {
- // This person's last command was given earlier,
- // so this person is the idler
- notice(s_GameServ, nick, "You timed out "\
- "during a fight. You lose your turn!");
- notice(s_GameServ, p->battle->getNick(),
- "%s hesitated for too long. Your move.", p->name.c_str());
- clearYourTurn(p);
- setYourTurn(p->battle->stats);
-
- // Update the TS for both players to give them another
- // Chance to wake up, but if the other player doesn't
- // Attack now, they both get logged out.
- updateTS(p);
- p->battle->stats->lastcommand = p->lastcommand;
- display_players(p->battle);
- return;
- }
- else
- {
- notice(s_GameServ, p->battle->getNick(),
- "You and %s timed out at the same time."\
- " Don't fight if you're just going to "\
- "sit there!", p->name.c_str());
- notice(s_GameServ, user->getNick(),
- "You and %s timed out at the same time."\
- " Don't fight if you're just going to "\
- "sit there!", p->battle->stats->name.c_str());
- logout(p->battle);
- logout(user);
- return;
- }
- }
- else if (!player_fight(user))
- {
- if (isAlive(user->stats) && user->stats->gold > 0)
- {
- // Place fun stuff here :)
- int randnum = 1 + rand() % 100; // 1-100
- #define GSN(s) notice(s_GameServ, nick, s)
- #define GSN2(s, f) notice(s_GameServ, nick, s, f)
-
- if (randnum < 50)
- {
- // 35-100% of your gold goes pffft - kain
- int stolen = (35 + (rand() % 66)) * (user->stats->gold / 100);
-
- GSN("You stop for a moment to rest on the "\
- "street corner. All of a sudden, you "\
- "are ambushed from all sides by a hoarde "\
- "of knife wielding thugs.");
- GSN2("The thugs beat you into utter submission "\
- "and steal %ld gold from you!", stolen);
- user->stats->gold -= stolen;
- }
- else if (randnum >= 50 && randnum < 75)
- {
- // 25-65% of your gold goes pffft - kain
- int stolen = (25 + (rand() % 41)) * (user->stats->gold / 100);
- GSN("While dilly dallying around, you lose "\
- "your sense of time. Little did you know, "\
- "but thieves lifted your gold while you "\
- "weren't watching.");
- GSN2("Better luck next time... you lose %d gold", stolen);
- user->stats->gold -= stolen;
- }
- else if (randnum >= 75)
- {
- // 25-75% of your gold goes pffft - kain
- int stolen = (25 + (rand() % 51)) * (user->stats->gold / 100);
- GSN("Good grief! A gaggle of gooey green ghostlike "\
- "goblins grabbed your gold!");
- GSN2("They stole %d gold from you!", stolen);
- user->stats->gold -= stolen;
- }
- }
-
- // Always log out the user
- logout(user);
- }
-}
-
-void do_reset(char *u)
-{
- char *nick = strtok(NULL, " ");
- aClient *user;
-
- if (!(user = find(u)))
- {
- notice(s_GameServ, u, "Error: aClient not found. Contact a %S admin");
- log("Error: aClient not found: %s", u);
- return;
- }
- else if (!isAdmin(user))
- {
- notice(s_GameServ, u, "You must be a %S admin to use this command!");
- return;
- }
-
- if (!nick)
- {
- notice(s_GameServ, u, "SYNTAX: RESET {ALL | NICK}");
- return;
- }
- else if (stricmp(nick, "ALL") == 0)
- {
- notice(s_GameServ, u, "Resetting everyone's stats!");
- resetall();
- }
- else if ((user = findplayer(nick)))
- {
- if (is_playing(user))
- {
- #ifdef P10
- notice(s_GameServ, u, "Resetting %s.", user->getRealNick());
- #else
- notice(s_GameServ, u, "Resetting %s.", user->getNick());
- #endif
- reset(user->stats);
- }
- else
- {
- notice(s_GameServ, u, "Resetting %s", user->stats->name.c_str());
- reset(user->stats);
- }
- }
- else
- {
- notice(s_GameServ, u, "Nick %s not found.", nick);
- return;
- }
-}
-
-void do_help(char *u)
-{
- char *cmd = strtok(NULL, " ");
-
- display_help(u, cmd);
-}
-
-void display_help(char *u, char *file)
-{
- ifstream infile;
- char *buf;
-
- if (!file)
- {
- infile.open("helpfiles/help");
- if (infile.fail())
- {
- log("Error opening helpfiles/help");
- notice(s_GameServ, u, "Error opening helpfiles/help");
- return;
- }
- buf = new char[1024];
- while(infile.getline(buf, 1024))
- {
- // Written this way, it will process %S in the helpfiles
- // Instead of notice(s_GameServ, u, "%s", buf);
- notice(s_GameServ, u, buf);
- }
-
- // Minor recursion
- aClient *user = find(u);
- if (user && isAdmin(user))
- display_help(u, "admin_commands");
- }
- else
- {
- char *filename;
- filename = new char[strlen(file) + 11];
- strcpy(filename, "helpfiles/");
- strcat(filename, file);
-
- for (unsigned int x = 10; x < strlen(filename); x++)
- filename[x] = tolower(filename[x]);
-
- infile.open(filename);
- delete [] filename;
- if (infile.fail())
- {
- notice(s_GameServ, u, "No help for \ 2%s\ 2", file);
- return;
- }
- buf = new char[1024];
- while(infile.getline(buf, 1024))
- {
- // Written this way, it will process %S in the helpfiles
- // Instead of notice(s_GameServ, u, "%s", buf);
- notice(s_GameServ, u, buf);
- }
- }
- infile.close();
- delete [] buf;
-}
-
-void do_admin(char *u)
-{
- aClient *user;
- char *pass = strtok(NULL, " ");
-
- if (!(user = find(u)))
- {
- log("Error: aClient not found: %s", u);
- notice(s_GameServ, u, "Error: aClient not found. Contact %S admin.");
- return;
- }
-
- if (!pass)
- {
- notice(s_GameServ, u, "SYNTAX: \ 2ADMIN\ 2 \ 2\1fpassword\1f\ 2");
- return;
- }
-
- if (isAdmin(user))
- {
- notice(s_GameServ, u, "You already have administrator privledges.");
- return;
- }
- else if (strcmp(pass, adminpass) == 0)
- {
- notice(s_GameServ, u, "Password accepted. You now have administrator privledges.");
- setAdmin(user);
- #ifdef P10
- log("%s became an administrator.", user->getRealNick());
- #else
- log("%s became an administrator.", user->getNick());
- #endif
- }
- else
- {
- notice(s_GameServ, u, "Invalid password. Remember: case sensitive");
- return;
- }
-}
-
-bool load_levels()
-{
- char *filename;
- filename = new char[256];
-
- for (int x = 1; x <= LEVELS; x++)
- {
- sprintf(filename, "data/levels/level%d.dat", x);
- if (levels[x - 1].loadLevel(filename) == false)
- return false;
- }
-
- delete []filename;
- return true;
-}
-bool load_monsters()
-{
- char *filename;
- ifstream infile;
- char *buf;
- buf = new char[2048];
-
- for (int level = 1; level <= LEVELS; level++)
- {
- filename = new char[256];
- sprintf(filename, "data/monsters/level%d.dat", level);
- infile.open(filename);
-
- if (!infile)
- {
- log("Error opening %s", filename);
- return false;
- }
-
- #ifdef DEBUGMODE
- log("Loading monsters from %s", filename);
- #endif
-
- while (infile.getline(buf, 2048))
- {
- if (buf[0] == '^')
- break;
- if (buf[0] == '\n' || buf[0] == '\0' || buf[0] == '#')
- continue;
- Monster *temp;
- temp = new Monster;
-
- temp->name = strtok(buf, "~");
- temp->weapon = strtok(NULL, "~");
- temp->death = strtok(NULL, "~");
-
- levels[level - 1].monsters.insertAtBack_RLN(temp);
- delete temp;
- }
- delete [] filename;
- infile.close();
- }
- delete [] buf;
-return true;
-}
-
-item *findItemByID(int id)
-{
- list<item*>::iterator item_iterator;
-
- item_iterator = Items.begin();
-
- while (item_iterator != Items.end())
- {
- if ((*item_iterator)->getID() == id)
- {
- return (*item_iterator);
- }
- item_iterator++;
- }
- return NULL;
-}
-
-item *findStoreItemByID(int id)
-{
- list<item*>::iterator item_iterator;
-
- item_iterator = store.begin();
-
- while (item_iterator != store.end())
- {
- if ((*item_iterator)->getID() == id)
- {
- return (*item_iterator);
- }
- item_iterator++;
- }
- return NULL;
-}
-
-tavernItem *findTavernItemByID(int id)
-{
- list<tavernItem>::iterator item_iterator;
-
- item_iterator = tavern.begin();
-
- while (item_iterator != tavern.end())
- {
- if ((*item_iterator).getItem()->getID() == id)
- {
- return &(*item_iterator);
- }
- item_iterator++;
- }
- return NULL;
-}