#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; // List of items available at the store
toplist myToplist; // List of the top 10 players
-// 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();
-
-// 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
-
-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 **********/
-/********** 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);
-
-bool alphaNumeric(const char *str); // Returns true if all of the characters in str are alphanumeric non-special chars
-/********** 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(Player *from, aClient *to);
-void showBankBalance(const char *u);
-void end_turn(aClient *user);
#define WNA 16
}
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;
- }
+ do_shutdown(source);
}
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();
- }
+ do_save(source);
}
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 if (stricmp(cmd2, "SCRIPTS") == 0)
- {
- // Testing scripts for now
- script scr;
- notice(s_GameServ, source, "Loading scripts");
-
- if (scr.loadScript("test.txt"))
- scr.executeScript(user->stats);
- }
- else
- {
- display_help(source, cmd);
- }
- }
+ do_load(source);
}
#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);
- }
+ do_raw(source);
}
- 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
{
}
#ifndef P10
- source--; // Bring the ':' back so we don't leak memory
+ source--; // Bring the ':' back
#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;
-}
-
-
-
-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;
-}
-
-
-
-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;
-}
-#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;
- Player *p;
- 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;
- }
-
- if (cmd == NULL || stricmp(cmd, "TOP") == 0)
- {
- list<PlayerWrapper>::iterator iter;
- bool header = false;
-
- if (myToplist.empty())
- {
- notice(s_GameServ, u, "There are no players");
- return;
- }
- myToplist.sort();
- myToplist.reverse();
-
- iter = myToplist.begin();
-
- while (iter != myToplist.end())
- {
- if (!header)
- {
- notice(s_GameServ, u, "Top Players");
- header = true;
-
- }
- notice(s_GameServ, u, "Level: %2d Exp: %10d Name: %s",
- (*iter).getLevel(), (*iter).getExp(), (*iter).getName().c_str());
- iter++;
- }
- }
- else
- {
-
- list<Player*>::iterator iter;
- bool header = false;
-
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- iter = players[x].begin();
- if (!players[x].empty())
- {
- while(iter != players[x].end())
- {
- p = (*iter);
- if (cmd || is_playing(p->getClient()))
- {
- if (!header)
- {
- notice(s_GameServ, u, "Players:");
- header = true;
- }
- #ifdef P10
- notice(s_GameServ, u, "IRC: %s Game: %s", (p->getClient() ? p->getClient()->getRealNick() : "Not Playing"),
- p->getName().c_str());
- #else
- notice(s_GameServ, u, "IRC: %s Game: %s", (p->getClient() ? p->getClient()->getNick() : "Not Playing"),
- p->getName().c_str());
- #endif
- }
- iter++;
- }
- }
- }
- 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;
- Player *p;
- 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))
- {
-#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
-#endif
- return;
- }
- else if (!name || !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;
- }
- else if (!(p = findplayer(name)))
- {
- // Back the pointers up... they didn't send a name probably
- cmd2 = cmd;
- cmd = name;
- p = user->stats;
-
- if (!is_playing(user))
- {
- notice(s_GameServ, u, "You must be playing to set things for yourself!");
- return;
- }
- }
- else
- {
- cmd2 = strtok(NULL, " ");
- }
- if (!cmd2)
- {
- 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;
- }
-
- // 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 == p->getClient())
- {
- p->setPassword(cmd2);
- notice(s_GameServ, u, "Password successfully changed");
- }
- else if (user != p->getClient() && !isAdmin(user))
- {
- notice(s_GameServ, u, "You must be a <S admin to set other peoples' passwords.");
- return;
- }
- }
- else if (stricmp(cmd, "BANK") == 0 || stricmp(cmd, "BALANCE") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd, "BANK") == 0)
- {
- cmd2 = strtok(NULL, " "); // Need an extra parameter for set bank balance
- }
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] [BANK] BALANCE <NUMBER>");
- return;
- }
-
- p->setBank(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Bank balance changed to %ld!", p->getBank());
- }
- else if (stricmp(cmd, "PLAYER") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd2, "FIGHTS") != 0)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] PLAYER FIGHTS <NUMBER>");
- return;
- }
- else
- {
- cmd2 = strtok(NULL, " ");
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] PLAYER FIGHTS <NUMBER>");
- return;
- }
- p->setPlayerFights(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Player fights changed to %d!", p->getPlayerFights());
- }
- }
- else if (stricmp(cmd, "FOREST") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd2, "FIGHTS") != 0)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] FOREST FIGHTS <number>");
- return;
- }
- else
- {
- cmd2 = strtok(NULL, " ");
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] FOREST FIGHTS <NUMBER>");
- return;
- }
-
- p->setForestFights(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Forest fights changed to %d!", p->getForestFights());
- }
- }
- else if (stricmp(cmd, "GOLD") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] GOLD <NUMBER>");
- return;
- }
- p->setGold(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Gold set to %ld", p->getGold());
- return;
- }
- }
- else if (stricmp(cmd, "STRENGTH") == 0 && stricmp(cmd2, "POTIONS") != 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] STRENGTH <NUMBER>");
- return;
- }
-
- p->setStrength(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Strength set to %d", p->getStrength());
- return;
- }
- }
- else if (stricmp(cmd, "DEFENSE") == 0 && stricmp(cmd2, "POTIONS") != 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] DEFENSE <NUMBER>");
- return;
- }
-
- p->setDefense(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Defense set to %d", p->getDefense());
- return;
- }
- }
- else if (stricmp(cmd, "HP") == 0 && stricmp(cmd2, "POTIONS") != 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] HP <NUMBER>");
- return;
- }
-
- // Make sure it's easy for an admin to set the hp
- if (p->getMaxHP() < stringtoint(cmd2))
- p->setMaxHP(stringtoint(cmd2));
-
- p->setHP(stringtoint(cmd2));
-
- notice(s_GameServ, u, "HP set to %d", p->getHP());
- return;
- }
- }
- else if (stricmp(cmd, "MAXHP") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] MAXHP <NUMBER>");
- return;
- }
- p->setMaxHP(stringtoint(cmd2));
-
- notice(s_GameServ, u, "MaxHP set to %d", p->getMaxHP());
- return;
- }
- }
- else if (stricmp(cmd, "EXPERIENCE") == 0 || stricmp(cmd, "EXP") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] {EXPERIENCE|EXP} <NUMBER>");
- return;
- }
-
- p->setExp(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Exp set to %ld", p->getExp());
- return;
- }
- }
- else if (stricmp(cmd, "LEVEL") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] LEVEL <NUMBER>");
- return;
- }
- p->setLevel(stringtoint(cmd2));
-
- notice(s_GameServ, u, "Level set to %d", p->getLevel());
- return;
- }
- }
- else if (stricmp(cmd, "ALIVE") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else
- {
- if (!cmd2)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] ALIVE TRUE|FALSE");
- return;
- }
- else if (stricmp(cmd2, "TRUE") == 0)
- {
- notice(s_GameServ, u, "%s has been Resurrected!", p->getName().c_str());
- setAlive(p);
- }
- else
- {
- notice(s_GameServ, u, "%s is now dead!", p->getName().c_str());
- clearAlive(p);
- }
- }
- }
- else if (stricmp(cmd, "SEEN") == 0)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "Admins Only!");
- return;
- }
- else if (stricmp(cmd2, "MASTER") != 0)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S SET [NAME] SEEN MASTER {TRUE|FALSE}");
- return;
- }
- else
- {
- cmd2 = strtok(NULL, " ");
- if (!cmd2)
- {
- 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.", p->getName().c_str());
- p->addFlag(FLAG_MASTER);
- }
- else
- {
- notice(s_GameServ, u, "%s has not seen their master now.", p->getName().c_str());
- p->remFlag(FLAG_MASTER);
- }
- }
- }
- 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;
- Player *p;
- 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 (isIgnore(user))
- {
-#ifdef DEBUGMODE
- log("Ignoring %s.", user->getNick());
-#endif
- return;
- }
-
- if (name)
- {
- if (!isAdmin(user))
- {
- notice(s_GameServ, u, "You must be a <S admin to use this command!");
- }
- else if (!(p = findplayer(name)))
- {
- notice(s_GameServ, u, "Couldn't find a player named %s", name);
- }
- else
- {
- notice(s_GameServ, u, "Logging out %s", p->getName().c_str());
- logout(p->getClient());
- }
- }
- else if (!name)
- {
- if (!is_playing(user))
- {
- 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 (user != NULL)
- {
- if (user->stats != NULL)
- {
-
- list<Player*>::iterator iter;
- unsigned long hv = iHASH((unsigned char *) user->stats->getName().c_str());
- iter = find(players[hv].begin(), players[hv].end(), user->stats);
-
- if (iter == players[hv].end())
- {
- notice(s_GameServ, user->getNick(), "Fatal error. Contact "\
- "<S Admin. Cannot find you in the players list. This should NEVER happen");
- log("Error on logout(). Can't find %s in the players list",
-#ifdef P10
- user->getRealNick()
-#else
- user->getNick()
-#endif
- );
- user->stats = NULL;
-
- return;
- }
- user->stats->delMonster();
- user->stats->delMaster();
- user->stats->delBattle();
- clearDragonFight(user->stats);
- clearYourTurn(user->stats);
- clearPlaying(user);
-
- user->stats->setClient(NULL);
-
-
- if (player_fight(user))
- {
- clearYourTurn(user->stats->getBattle()->stats);
- user->stats->getBattle()->stats->delBattle();
- }
-
-#ifdef DEBUGMODE
- log("Logged out player %s",
-#ifdef P10
- user->getRealNick()
-#else
- user->getNick()
-#endif
- );
-#endif
- }
- }
- if (user)
- user->stats = NULL;
-}
-
-void do_register(char *u)
-{
- char *password, *name;
- aClient *user;
- Player *p;
- 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!");
- }
- else if (!password)
- {
- notice(s_GameServ, u, "SYNTAX: /msg <S REGISTER NAME PASSWORD");
- }
- else if (strlen(name) > maxnicklen)
- {
- notice(s_GameServ, u, "Name too long. Maximum length: %d", maxnicklen);
- }
- else if (!alphaNumeric(name))
- {
- notice(s_GameServ, u, "That is not a valid name. Please use only AlphaNumeric (A-Z, 0-9) characters!");
- }
- else if ((p = 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
- }
- else
- {
- if (!is_playing(user))
- {
- item *tempItem;
- unsigned long hv = iHASH((unsigned char *) name);
-
- // First create the Player
- user->stats = new Player();
-
- // Set the backwards pointer
- user->stats->setClient(user);
-
- // Set the player's password
- user->stats->setPassword(password);
-
- // Set the player's name
- user->stats->setName(name);
-
- // Make sure they have a proper time stamp
- updateTS(user->stats);
-
- // Update the last login time
- user->stats->lastlogin = time(NULL);
-
- // Send notification of success
- notice(s_GameServ, u, "Player %s registered with password %s.", user->stats->getName().c_str(), password);
- notice(s_GameServ, u, "Write this password down. If you lose it, there is no way to retrieve it!");
-
- // Log the new player
- log("Nickname %s registered player %s.", u, user->stats->getName().c_str());
-
- // Log the player in
- setPlaying(user);
-
- // Start the player at the beginning
- reset(user->stats);
-
- // Add the stick and clothes
- tempItem = findItemByID(3001);
- user->stats->inventory->addItem((*Items.begin()))->use(user->stats); // Add the stick
- user->stats->inventory->addItem(tempItem)->use(user->stats); // Add Clothes
-
- // Add the player to the list
- players[hv].push_back(user->stats);
-
- // Attempt to add the player to the top list
- // The class takes care of pruning the user out if they don't deserve to be in the list
- myToplist.insertPlayer(user->stats);
- }
- else
- {
- notice(s_GameServ, u, "Already registered. Contact a <S admin for help.");
- }
- }
-}
-
-void do_identify(char *u)
-{
- char *password, *name;
- aClient *user;
- Player *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)))
- {
- notice(s_GameServ, u, "Player %s not found", name);
- }
- else if (is_playing(user))
- {
- notice(s_GameServ, u, "You are already playing!");
- }
- else if (is_playing(p->getClient()) && !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
- {
- list<Player*>::iterator iter;
- unsigned long hv = iHASH((unsigned char *) p->getName().c_str());
-
- iter = find(players[hv].begin(), players[hv].end(), p);
-
- if (iter == players[hv].end())
- {
- notice(s_GameServ, u, "Fatal error. Contact <S Admin. Buf: %s",
- strtok(NULL, ""));
- return;
- }
- // Make sure the other user is logged out
- logout(p->getClient());
-
- user->stats = p;
- p->setClient(user);
- updateTS(p);
-
-
-#ifdef DEBUGMODE
- log("Player %s IRC: %s Identified", user->stats->getName().c_str(),
- user->getNick());
-#endif
- //Set the playing flag
- setPlaying(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
- {
- if (!is_fighting(user))
- updateTS(user->stats);
- showstats(u, user->stats->getName().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.clear();
-}
-
-
-
-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)
- {
- return false;
- }
- else if (!user->stats)
- {
- return false;
- }
- else if (!FL_is_playing(user))
- {
- return false;
- }
- else if (user->stats->getClient() != 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->getMonster() != 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 (is_playing(user->stats->getBattle()))
- {
- return true;
- }
- 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->getMaster() != 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));
-}
-
-bool alphaNumeric(const char *str)
-{
- int len = strlen(str);
- for (int x = 0; x < len; x++)
- {
- if (!((int(str[x]) >= 65 && int(str[x]) <= 90) || (int(str[x]) >= 97 && int(str[x]) <= 122) || (int(str[x]) >= 48 && int(str[x]) <= 57) || int(str[x]) == 95))
- return false;
- }
- return true;
-}
-
-void do_fight(char *u)
-{
- aClient *ni;
- Player *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->getPlayerFights() <= 0)
- {
- ni->stats->setPlayerFights(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->getClient()))
- {
- 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->getName().c_str(), battle->getName().c_str()) == 0)
- {
- notice(s_GameServ, u, "Are you trying to commit suicide!?");
- }
- else if (!isAlive(battle))
- {
- notice(s_GameServ, u, "They are dead. Cannot fight dead players!");
- }
- else if (player_fight(battle->getClient()))
- {
- notice(s_GameServ, u, "%s is fighting %s already!", battle->getName().c_str(), battle->getBattle()->stats->getName().c_str());
- }
- else if (master_fight(battle->getClient()))
- {
- notice(s_GameServ, u, "%s is fighting their master!", battle->getName().c_str());
- }
- else if (is_fighting(battle->getClient()))
- {
- notice(s_GameServ, u, "%s is fighting %s already!", battle->getName().c_str(), battle->getMonster()->name.c_str());
- }
- else if (!isAdmin(ni) && isFairFights() && (ni->stats->getStrength()/2 - battle->getDefense()) > battle->getHP())
- {
- notice(s_GameServ, u, "Fair fighting is enabled, and you're too strong for %s!", battle->getName().c_str());
- }
- else if (ni->stats->getLevel() - battle->getLevel() > 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->getName().c_str());
- }
- else if (battle->getLevel() - ni->stats->getLevel() > 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->getName().c_str());
- }
- else
- {
- // Set your battle pointer to the other player
- ni->stats->setBattle(battle->getClient());
-
- // Set the other player's battle pointer to you
- battle->setBattle(ni);
-
- // The initiator gets the first move (perhaps this should be 50/50)
- setYourTurn(ni->stats);
- clearYourTurn(battle);
-
- // Initiate Battle sequence!
- ni->stats->subtractPlayerFights(1);
-
- notice(s_GameServ, u, "You challenge %s to an online duel!", battle->getName().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->getName().c_str(), battle->getName().c_str()); /* DrLnet - Modified by Kain*/
-
- notice(s_GameServ, battle->getClient()->getNick(), "%s has challenged you to an online duel!", ni->stats->getName().c_str());
- notice(s_GameServ, battle->getClient()->getNick(), "%s gets to go first "\
- "because they initiated!", ni->stats->getName().c_str());
- notice(s_GameServ, battle->getClient()->getNick(), "Please wait while %s decides what to do.", ni->stats->getName().c_str());
- display_players(ni);
- }
-}
-
-void do_equip(char *u)
-{
- aClient *user;
- pouch *p;
- itemContainer *equip;
- int id;
-
- char *item = strtok(NULL, " ");
-
- 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))
- {
-#ifdef DEBUGMODE
- 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;
- }
- id = stringtoint(item);
- if (!is_fighting(user))
- 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->stats, 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, " ");
- char *numuse = strtok(NULL, " ");
- int id, num;
- itemContainer *used;
-
- if (!item || int(item[0]) < 48 || int(item[0]) > 57 || (numuse && (int(numuse[0]) < 48 || int(numuse[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;
- }
- id = stringtoint(item);
-
- if (!numuse)
- {
- num = 1;
- }
- else
- {
- num = stringtoint(numuse);
- }
-
- 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->stats, 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(s)
- if (num <= 1 || is_fighting(user))
- {
- 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);
- }
- else if (num > 1)
- {
- int count;
- const char *name = used->getItem()->getName().c_str();
- for (count = 0; count < num; count++)
- {
- if (!(used = p->Find(id)))
- {
- break;
- }
- else
- {
- used->use(user->stats);
- if (used->getUses() == 0)
- {
- p->deleteItem(used->getItem());
- }
- }
- }
- notice(s_GameServ, u, "You used %d %s's", count, name);
- }
- }
-}
-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());
-#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->getBattle())
- p2 = p->getBattle()->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) && !dragon_fight(user))
- {
- notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p->getMonster()->name.c_str());
- p->delMonster();
- }
- else if (player_fight(user) && isYourTurn(p))
- {
- notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p2->getName().c_str());
- notice(s_GameServ, p->getBattle()->getNick(), "\ 2%s\ 2 ran away from you like a little baby!", p->getName().c_str());
- addNews(todaysnews, "%s ran away from %s like a little baby!!", p->getName().c_str(), p2->getName().c_str()); /* DrLnet - edited by Kain */
- p2->delBattle();
- p->delBattle();
- }
- 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->getName().c_str());
- }
- else if (master_fight(user))
- {
- notice(s_GameServ, u, "You cannot run from \ 2%s\ 2! FIGHT!", p->getMaster()->name.c_str());
- }
- else if (dragon_fight(user))
- {
- notice(s_GameServ, u, "You cannot run from %s! FIGHT!", dragon.name.c_str());
- }
-}
-
-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->getMonster();
- else
- fight = user->stats->getMaster();
- battle = user->stats->getBattle();
-
- if (!player_fight(user))
- {
- // Opponent's Hit
- mhit = (fight->strength / 2) + (rand() % (fight->strength / 2)) - (user->stats->getDefense());
- }
- else
- {
- // Opponent's Hit
- mhit = (battle->stats->getStrength() / 2) + (rand() % (battle->stats->getStrength() / 2)) - user->stats->getDefense();
- }
- 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->getHP())
- {
- 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->setGold(0);
- user->stats->subtractExp((long int)(user->stats->getExp() * .10));
- user->stats->setHP(0);
- user->stats->delMonster();
- 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->getMaster()->name.c_str());
- user->stats->delMonster();
- user->stats->delMaster();
- goto endturn;
- }
- }
- else
- {
- if (mhit > 0)
- user->stats->subtractHP(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->getHP() >= ni->stats->getMaxHP())
- {
- notice(s_GameServ, u, "You don't need healing!");
- return;
- }
-
- updateTS(ni->stats);
- if (stricmp(amount, "ALL") == 0)
- {
- price = ni->stats->getLevel() * 3;
- if (ni->stats->getGold() < (ni->stats->getMaxHP() - ni->stats->getHP()) * price)
- {
- notice(s_GameServ, u, "Healing \ 2%d\ 2 points for \ 2%d\ 2 gold per point.",
- (long int)ni->stats->getGold()/price, price);
- ni->stats->addHP(ni->stats->getGold() / price);
- ni->stats->setGold(ni->stats->getGold() % 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->getMaxHP() - ni->stats->getHP()),
- (price * (ni->stats->getMaxHP() - ni->stats->getHP())) );
- ni->stats->subtractGold(price * (ni->stats->getMaxHP() - ni->stats->getHP()));
- ni->stats->healall();
- }
- }
- else if (isstringnum(amount))
- {
- num = stringtoint(amount);
- price = ni->stats->getLevel() * 3;
- if (ni->stats->getGold() < price * num)
- {
- notice(s_GameServ, u, "You only have enough gold to heal \ 2%d\ 2 points!",
- (long int)ni->stats->getGold()/price);
- }
- else if (num <= ni->stats->getMaxHP() - ni->stats->getHP())
- {
- notice(s_GameServ, u, "Healing \ 2%d\ 2 points at \ 2%d\ 2 gold per point.",
- num, price);
- ni->stats->addHP(num);
- ni->stats->subtractGold(num * price);
- }
- else if (num > ni->stats->getMaxHP() - ni->stats->getHP())
- {
- 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->getMaxHP() - ni->stats->getHP()));
- ni->stats->subtractGold(price * (ni->stats->getMaxHP() - ni->stats->getHP()));
- ni->stats->healall();
- }
- }
- 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()
-{
- list<Player*>::iterator iter;
- 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++)
- {
- for(iter = players[x].begin(); iter != players[x].end(); iter++)
- {
- it = (*iter);
- clearYourTurn(it);
- item *w, *a;
- w = it->getWeapon();
- a = it->getArmor();
-
- outfile << it->getName().c_str() << ' ' << it->getLevel() << ' ' << it->getExp() << ' ' << it->getGold() << ' ' << it->getBank() << ' '<< it->getHP() << ' ' << it->getMaxHP() << ' ' << it->getStrength() << ' ' << it->getDefense() << ' ' << it->getForestFights() << ' ' << it->getPlayerFights() << ' ' << it->getFlags() << ' ' << it->getPassword().c_str() << ' ' << 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;
- }
- }
- 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;
- 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++)
- {
- list<Player*>::iterator iter;
-
- for (iter = players[x].begin(); iter != players[x].end(); iter++)
- {
- logout((*iter)->getClient());
- delete (*iter);
- }
- players[x].clear();
- }
-
- while (infile.getline(buf, 100000, '\n'))
- {
- tempname = strtok(buf, " ");
- p = new Player(tempname);
-
- p->setLevel(stringtoint(strtok(NULL, " ")));
- p->setExp(stringtoint(strtok(NULL, " ")));
- p->setGold(stringtoint(strtok(NULL, " ")));
- p->setBank(stringtoint(strtok(NULL, " ")));
- tempnum = stringtoint(strtok(NULL, " "));
- p->setMaxHP(stringtoint(strtok(NULL, " ")));
- p->setHP(tempnum);
- p->setStrength(stringtoint(strtok(NULL, " ")));
- p->setDefense(stringtoint(strtok(NULL, " ")));
- p->setForestFights(stringtoint(strtok(NULL, " ")));
- p->setPlayerFights(stringtoint(strtok(NULL, " ")));
- p->setFlags(stringtoint(strtok(NULL, " ")));
-
-
-
- password = strtok(NULL, " ");
- p->setRawPassword(password);
- tempname = strtok(NULL, " ");
-
- if (tempname)
- p->lastlogin = stringtoint(tempname);
- else
- p->lastlogin = time(NULL);
-
- tempname = strtok(NULL, " ");
- tempnum = stringtoint(tempname);
- item *tempitem;
- if (tempnum != 0)
- {
- tempitem = findItemByID(tempnum);
- p->setWeapon(*tempitem);
- }
-
- tempname = strtok(NULL, " ");
- tempnum = stringtoint(tempname);
-
- if (tempnum != 0)
- {
- tempitem = findItemByID(tempnum);
- p->setArmor(*tempitem);
- }
-
-
- unsigned long hv = iHASH((unsigned char *) p->getName().c_str());
-
- p->setClient(NULL);
-
- 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();
- myToplist.insertPlayer(p);
- players[hv].push_back(p);
- }
-
- 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)
-{
- Player *p;
-
- if (!(p = findplayer(name)))
- return false;
- else
- {
- return passcmp(p->getPassword().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. %20s..........%ld",
- ((*item_iterator)->getID() < 10 ? " " : ""),
- (*item_iterator)->getID(), (*item_iterator)->getName().c_str(), (*item_iterator)->price());
- }
- }
- 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)
- {
- notice(s_GameServ, u, "%s%ld. %20s..........%d",
- ((*item_iterator)->getID() < 10 ? " " : ""),
- (*item_iterator)->getID(), (*item_iterator)->getName().c_str(),
- (*item_iterator)->price());
- }
- }
-
- 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->getGold() < tempItem->price())
- {
- notice(s_GameServ, u, "You can't afford to buy %s", tempItem->getName().c_str());
- return;
- }
- else if (p->inventory->addItem(tempItem))
- {
- notice(s_GameServ, u, "You have purchased %s! Thanks for the gold!", tempItem->getName().c_str());
- p->subtractGold(tempItem->price());
- notice(s_GameServ, u, "Don't forget to type /msg <S equip %ld", tempItem->getID());
- }
- else
- {
- notice(s_GameServ, u, "You can't carry any more!");
- }
- }
- 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->getGold() >= 2000000000)
- {
- notice(s_GameServ, u, "You have enough gold. Just hang on to it for now.");
- }
- else
- {
- tempItem = tempContainer->getItem();
-
- notice(s_GameServ, u, "Thank you for your business! We gave you %ld gold for %s!", (tempItem->price() / 2), tempItem->getName().c_str());
- p->addGold((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;
- }
- if (!is_fighting(user))
- updateTS(user->stats);
- showinventory(user->stats, user);
-}
-
-
-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)
- {
- int amt = 1;
- char *chid = strtok(NULL, " ");
- char *amount = strtok(NULL, " ");
-
- if (amount)
- amt = stringtoint(amount);
-
- if (!chid)
- {
- notice(s_GameServ, u, "SYNTAX: TAVERN BUY # [#]");
- notice(s_GameServ, u, "Example: /msg <S TAVERN BUY 6001");
- notice(s_GameServ, u, "Example: /msg <S TAVERN BUY 6001 10");
- return;
- }
- long id = stringtoint(chid);
- tavernItem *tempItem;
-
- if (!(tempItem = findTavernItemByID(id)) || user->stats->getLevel() < 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 (!amount && user->stats->getGold() < 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->getGold() < amt * 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 (amount)
- {
- int amt = stringtoint(amount);
- if (amt < 0 || amount[0] == '-')
- {
- notice(s_GameServ, u, "You trying to steal from me?");
- }
- else if (user->stats->inventory->addItem(tempItem->getItem(), amt) == NULL)
- {
- notice(s_GameServ, u, "You can't carry that many!");
- }
- else
- {
- notice(s_GameServ, u, "%d %s's coming right up!", amt, tempItem->getItem()->getName().c_str());
- user->stats->subtractGold(tempItem->getItem()->price() * amt);
- }
- }
- else
- {
- if (user->stats->inventory->addItem(tempItem->getItem()) == NULL)
- {
- notice(s_GameServ, u, "You can't carry any more!");
- }
- else
- {
- notice(s_GameServ, u, "One %s coming right up!", tempItem->getItem()->getName().c_str());
- user->stats->subtractGold(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->getBank() == 2000000000)
- {
- notice(s_GameServ, u, "Your bank account is full, sire!");
- return;
- }
- else if (stricmp(amount, "ALL") == 0)
- {
- if (2000000000 - p->getBank() < p->getGold())
- {
- 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->getBank()));
- p->subtractGold((2000000000 - p->getBank()));
- p->setBank(2000000000);
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Depositing %ld gold into your account!", p->getGold());
- p->addBank(p->getGold());
- p->setGold(0);
- showBankBalance(u);
- }
- }
- else if (stringtoint(amount) > p->getGold())
- {
- notice(s_GameServ, u, "Sire, you only have %ld gold!", p->getGold());
- showBankBalance(u);
- return;
- }
- else
- {
- if (2000000000 - p->getBank() < 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->getBank()));
- p->subtractGold((2000000000 - p->getBank()));
- p->setBank(2000000000);
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Depositing %d gold into your account!", stringtoint(amount));
- p->addBank(stringtoint(amount));
- p->subtractGold(stringtoint(amount));
- showBankBalance(u);
- }
- }
- }
- else if (stricmp(cmd, "WITHDRAW") == 0)
- {
- if (p->getGold() == 2000000000)
- {
- notice(s_GameServ, u, "You cannot carry any more gold, sire!");
- showBankBalance(u);
- return;
- }
- else if (stricmp(amount, "ALL") == 0)
- {
- if (2000000000 - p->getGold() < p->getBank())
- {
- 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->getGold()));
- p->subtractBank((2000000000 - p->getGold()));
- p->setGold(2000000000);
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Withdrawing %ld gold from your account!", p->getBank());
- p->addGold(p->getBank());
- p->setBank(0);
- showBankBalance(u);
- }
- }
- else if (stringtoint(amount) > p->getBank())
- {
- notice(s_GameServ, u, "Sire, you only have %ld gold in the bank!", p->getBank());
- showBankBalance(u);
- return;
- }
- else
- {
- if (2000000000 - p->getGold() < 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->getGold()));
- p->subtractBank((2000000000 - p->getGold()));
- p->setGold(2000000000);
- showBankBalance(u);
- }
- else
- {
- notice(s_GameServ, u, "Withdrawing %d gold from your account!", stringtoint(amount));
- p->addGold(stringtoint(amount));
- p->subtractBank(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->getLevel() < 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->setMonster(&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->getLevel())
- {
- 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->getExp() + 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->getExp() + 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->getExp() >= 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->getLevel() - 1].master.name.c_str(), (need - p->getExp()));
- return;
- }
- else if (stricmp(cmd, "QUESTION") == 0)
- {
- if (p->getExp() >= need)
- notice(s_GameServ, u, "%s looks you up and down and decides you are more ready than you will ever be.",
- levels[p->getLevel() - 1].master.name.c_str());
- else
- notice(s_GameServ, u, "You pathetic fool! You are no match for %s, %s!",
- levels[p->getLevel() - 1].master.name.c_str(), p->getName().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->setMyMaster(&levels[p->getLevel() - 1].master);
- p->setMonster(&levels[p->getLevel() - 1].master);
- display_monster(u); // Since master is the same structure, use this function
- }
-}
-
-void rolloverall()
-{
- list<Player*>::iterator iter;
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- for (iter = players[x].begin(); iter != players[x].end(); iter++)
- {
- rollover((*iter));
- }
- }
-}
-void refreshall()
-{
- list<Player*>::iterator iter;
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- for (iter = players[x].begin(); iter != players[x].end(); iter++)
- {
- refresh((*iter));
- }
- }
-}
-
-void rollover(Player *p)
-{
- if (!p)
- return;
-
- p->addForestFights(numrolloverfights);
-
- if (p->getForestFights() > maxforestfights)
- p->setForestFights(maxforestfights);
-}
-
-void refresh(Player *p)
-{
- if (!p)
- return;
-
- if (p->getHP() < p->getMaxHP())
- p->healall();
- if (p->getForestFights() < forestfights)
- {
- p->setForestFights(forestfights);
- }
-
- p->setPlayerFights(3);
- setAlive(p);
- clearMaster(p);
-}
-
-void do_refresh(char *u)
-{
- char *name = strtok(NULL, " ");
- aClient *user;
- Player *p;
-
- 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 (!name)
- {
- notice(s_GameServ, u, "SYNTAX: REFRESH {ALL | NICK}");
- return;
- }
- else if (stricmp(name, "ALL") == 0)
- {
- notice(s_GameServ, u, "Refreshing everyone's stats!");
- refreshall();
- }
- else if ((p = findplayer(name)))
- {
- notice(s_GameServ, u, "Refreshing %s.", p->getName().c_str());
- refresh(p);
- }
- else
- {
- notice(s_GameServ, u, "Player %s not found.", name);
- return;
- }
-}
-
-
-void resetall()
-{
- list<Player*>::iterator iter;
- for (unsigned long x = 0; x < U_TABLE_SIZE; x++)
- {
- for (iter = players[x].begin(); iter != players[x].end(); iter++)
- {
- reset((*iter));
- }
- }
-}
-
-void reset(Player *p)
-{
- item *tempItem;
-
- if (!p)
- return;
-
- p->reset();
- // Add the stick and clothes
- tempItem = findItemByID(3001);
- p->inventory->addItem((*Items.begin()))->use(p); // Add the stick
- p->inventory->addItem(tempItem)->use(p); // Add Clothes
-}
-
-void updateTS(Player *p)
-{
- if (!p)
- return;
-
-#ifdef DEBUGMODE
- log("Old timestamp for %s: %ld", p->getName().c_str(), p->lastcommand);
-#endif
- p->lastcommand = time(NULL);
-#ifdef DEBUGMODE
- log("New timestamp for %s: %ld", p->getName().c_str(), p->lastcommand);
-#endif
- PF_cleartimedout(p);
-
-}
-
-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)
-{
- if (!p || !is_playing(p->getClient())) // then they're not playing
- return;
-
- char *nick = p->getClient()->getNick();
-
- if (player_fight(p->getClient()) && isYourTurn(p))
- {
- // Check to see if they were the idler or if it was the other
- // person
- if (!PF_timedout(p->getBattle()->stats))
- {
- // 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->getBattle()->getNick(),
- "%s hesitated for too long. Your move.", p->getName().c_str());
- clearYourTurn(p);
- setYourTurn(p->getBattle()->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);
- PF_settimedout(p);
- display_players(p->getBattle());
- return;
- }
- else
- {
- notice(s_GameServ, p->getBattle()->getNick(),
- "You and %s timed out at the same time."\
- " Don't fight if you're just going to "\
- "sit there!", p->getName().c_str());
- notice(s_GameServ, p->getClient()->getNick(),
- "You and %s timed out at the same time."\
- " Don't fight if you're just going to "\
- "sit there!", p->getBattle()->stats->getName().c_str());
- logout(p->getBattle());
- logout(p->getClient());
- clearYourTurn(p);
- clearYourTurn(p->getBattle()->stats);
- return;
- }
- }
- else if (!player_fight(p->getClient()))
- {
- if (isAlive(p) && p->getGold() > 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)) * (p->getGold() / 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);
- p->subtractGold(stolen);
- }
- else if (randnum >= 50 && randnum < 75)
- {
- // 25-65% of your gold goes pffft - kain
- int stolen = (25 + (rand() % 41)) * (p->getGold() / 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);
- p->subtractGold(stolen);
- }
- else if (randnum >= 75)
- {
- // 25-75% of your gold goes pffft - kain
- int stolen = (25 + (rand() % 51)) * (p->getGold() / 100);
- GSN("Good grief! A gaggle of gooey green ghostlike "\
- "goblins grabbed your gold!");
- GSN2("They stole %d gold from you!", stolen);
- p->subtractGold(stolen);
- }
- }
-
- // Always log out the user
- logout(p->getClient());
- }
-}
-
-void do_reset(char *u)
-{
- char *nick = strtok(NULL, " ");
- aClient *user;
- Player *p;
-
- 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}");
- }
- else if (stricmp(nick, "ALL") == 0)
- {
- notice(s_GameServ, u, "Resetting everyone's stats!");
- resetall();
- }
- else if (!(p = findplayer(nick)))
- {
- notice(s_GameServ, u, "Nick %s not found.", nick);
- }
- else
- {
- notice(s_GameServ, u, "Resetting %s.", p->getName().c_str());
- reset(p);
- }
-}
-
-void do_help(char *u)
-{
- char *cmd = strtok(NULL, " ");
-
- display_help(u, cmd);
-}
-
-
-
-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)
- {
- delete []filename;
- 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);
- delete []filename;
- delete []buf;
- 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.push_back(temp);
-
- }
- delete [] filename;
- infile.close();
- }
- delete [] buf;
- return true;
-}
-
-
projects / irc / gameservirc.git / blobdiff