Initial revision

[irc/gameservirc.git] / gameserv / gameserv.cpp

#include "sockhelp.h"
#include "aClient.h"
#include "list.h"
#include "extern.h"
#include <cctype>
#include <fstream.h>

List<aClient> players;
Monster monsters[5][12];

// Database functions
int save_gs_dbase();
int load_gs_dbase();

// String functions
#undef strtok
char *strtok(char *str, const char *delim);
int stricmp(const char *s1, const char *s2);
int strnicmp(const char *s1, const char *s2, size_t len);
// String Functions

// GameServ Booleans
bool is_playing(char *u);
bool has_started(char *u);
bool is_fighting(char *u);
bool isnt_fighting(char *u);
bool player_fight(char *u);
bool master_fight(char *u);
// GameServ Booleans


void display_monster(char *u);
void display_players(char *u);
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 init_masters();
void refresh(aClient *ni);
void refreshall();
void reset(aClient *ni);
void init_monsters();

void do_list(char *u);
void do_register(char *u);
void do_identify(char *u);
void do_play(char *u);
void do_quitg(char *u);
void do_reset(char *u);
void do_fight(char *u);
void do_store(char *u);
void do_heal(char *u);
void do_bank(char *u);
void do_attack(char *u);
void do_run(char *u);
void do_visit(char *u);
void do_stats(char *u);
void see_mystic(char *u);

void showstats(const char *u, const char *nick);

#define WNA 16
char *weapons[WNA] = {  "Fists", "Stick", "Dagger", "Quarterstaff",  "Short Sword", 
                        "Long Sword", "Silver Spear", "Battle Axe", "The Ragnarok", 
                        "Chain Saw", "Poison Sword",  "Flame Sword", "Earth Hammer", 
                        "Light Saber", "Masamune", "Mystical Sword"};

char *armors[WNA] = { "Nothing", "Clothes", "Leather Vest", "Chain Mail", "Plate Armor", 
                      "Full Body Armor", "Magic Mail", "Graphite Suit", "Steel Suit", 
                      "Force Field", "Armor of Light", "Mythril Vest", "DemiGod Armor", 
                      "Hades' Cloak", "Dragon Scales", "Mystical Armor"};

int prices[WNA - 1] = {200, 1000, 3000, 10000, 30000, 100000, 150000, 200000, 400000, 
                        1000000, 4000000, 10000000, 40000000, 100000000, 400000000};
int webonus[WNA] = {0, 10, 15, 25, 35, 45, 65, 85, 125, 185, 255, 355, 505, 805, 1205, 1805};
int arbonus[WNA] = {0, 1, 3, 10, 15, 25, 35, 50, 75, 100, 150, 225, 300, 400, 600, 1000};

int hpbonus[11] = {10, 15, 20, 30, 50, 75, 125, 185, 250, 350, 550};
int strbonus[11] = {5, 7, 10, 12, 20, 35, 50, 75, 110, 150, 200};
int defbonus[11] = {2, 3, 5, 10, 15, 22, 35, 60, 80, 120, 150};


void gameserv(char *source, char *buf)
{
    char *cmd, input[1024];
    cmd = strtok(buf, " ");

    source++; // Get rid of that : at the beginning of a :Nick privmsg Gameserv :text
    cmd++;    // Get rid of that : at the beginning of the :text  (command)

    cout << "Source: " << source << "\ncmd: " << cmd << endl;
    if (strnicmp(cmd, ":\1PING", 6) == 0)
    {
        char *timestamp;
        timestamp = strtok(NULL, "\1");
        notice(s_GameServ, source, "\1PING %s\1", timestamp);
    } else if (stricmp(cmd, ":\1VERSION\1") == 0) {
        notice(s_GameServ, source, "\1VERSION GameServ v1.0b\1");
    } 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, "FIGHT") == 0) {
        do_fight(source);
    } else if (stricmp(cmd, "ATTACK") == 0) {
        do_attack(source);
    } else if (stricmp(cmd, "HEAL") == 0) {
        do_heal(source);
    } else if (stricmp(cmd, "PRINT") == 0) {
        cout << "Printing Clients List: " << endl;
        clients.print();
        cout << "Printing Player List: " << endl;
        players.print();
    } else if (stricmp(cmd, "LIST") == 0) {
        do_list(source);
    } else if (stricmp(cmd, "REGISTER") == 0) {
        do_register(source);
    } else if (stricmp(cmd, "IDENTIFY") == 0) {
        do_identify(source);
    } else if (stricmp(cmd, "HELP") == 0) {
    } else if (stricmp(cmd, "STATS") == 0) {
        do_stats(source);
    } else if (stricmp(cmd, "SHUTDOWN") == 0) {
        //save_gs_dbase();
        raw("SQUIT %s :leaving", servername);
    } else if (stricmp(cmd, "SAVE") == 0) {
        save_gs_dbase();
    } else if (stricmp(cmd, "LOAD") == 0) {
        load_gs_dbase();
    } else if (stricmp(cmd, "RAW") == 0) {
        char *rest = strtok(NULL, "");
        raw(rest);
    }

   source--;  // Bring the : back so we don't leak memory
   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;


    cout << "\n\nu: " << u << "\nnick: " << nick << endl;
    if (!(ni = findbynick(nick)))
    {
        notice(s_GameServ, u, "%s not found", nick);
    }
    else if (ni->stats)
    {

        notice(s_GameServ, sender->getNick(), "Stats for %s:", ni->stats->name);

        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(), "Health Points: %d of %d", ni->stats->hp,
                 ni->stats->maxhp);

        sprintf(buf, "Strength: %d", ni->stats->strength + webonus[ni->stats->weapon]);
        space = spaces(strlen(buf), " ");
        notice(s_GameServ, sender->getNick(), "%s%sDefense: %d",
                 buf, space, ni->stats->defense + arbonus[ni->stats->armor]);
        delete space;

        sprintf(buf, "Armor: %s", armors[ni->stats->armor]);
        space = spaces(strlen(buf), " ");
        notice(s_GameServ, sender->getNick(), "%s%sWeapon: %s", buf, space,
                 weapons[ni->stats->weapon]);
        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;
    }
    delete buf;

}

char *spaces(int len, char *seperator)
{
    char *final;
    final = new char[40];
    int y;
    strcpy(final, seperator);
    for (y = 0; y < 40 - 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);
        }

    }
    sprintf(input, "%s%s", input, "\r\n");
    cout << "input: " << input << flush;
    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, ...)
{
    va_list args;
    char *input;
    const char *t = fmt;
    input = new char[1024];
    va_start(args, fmt);
    if (dest[0] == ':')
    {
        dest++;
        sprintf(input, ":%s NOTICE %s :", source, dest);
        dest--;
    }
    else
        sprintf(input, ":%s NOTICE %s :", source, dest);

    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);
        }

    }
    sprintf(input, "%s%s", input, "\r\n");
    cout << "input: " << input << flush;
    sock_puts(sock, input);
    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;
}

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;
}

void do_list(char *u)
{
    ListNode<aClient> *temp;
    temp = players.First();
    if (!players.isEmpty())
    {
        notice(s_GameServ, u, "People Playing:");
        while(temp)
        {
            notice(s_GameServ, u, "IRC: %s     Game: %s", temp->getData()->getNick(), temp->getData()->stats->name);
            temp = temp->Next();
        }
        notice(s_GameServ, u, "End of List");
    }
    else
        notice(s_GameServ, u, "No one is playing");
}
void do_register(char *u)
{
    char *password;
    aClient *user;
    password = strtok(NULL, " ");

    if (!password)
    {
        notice(s_GameServ, u, "SYNTAX: /msg %S REGISTER PASSWORD");
    }
    else if (user = find(u))
    {
        if (!user->stats)
        {
            user->stats = new Player(user);
            user->stats->started = 1;
            user->stats->user = user; // Set the backwards pointer
            players.insertAtBack(user);
        }
        else
        {
            notice(s_GameServ, u, "Already registered. Contact a %S admin for help.");
        }
    }
}

void do_identify(char *u)
{
    char *password;
    aClient *user;
    password = strtok(NULL, " ");

    if (!password)
    {
        notice(s_GameServ, u, "SYNTAX: /msg %S IDENTIFY PASSWORD");
    }
    else if (stricmp(password, "TEST") != 0)
    {
        notice(s_GameServ, u, "Password incorrect");
    }
    else if (user = find(u)) 
    {
        if (!user->stats)
        {
            user->stats = new Player(user);
            user->stats->started = 1;
            players.insertAtBack(user);
            notice(s_GameServ, u, "Password Accepted. Identified.");
        }
        else
        {
            notice(s_GameServ, u, "Already identified. Contact a %S admin for help.");
        }
    }
}

void do_stats(char *u)
{
    char *nick;
    aClient *source;

    nick = strtok(NULL, " ");
    source = find(u);

    if (!nick)
        showstats(u, source->getNick());
    else
        showstats(u, nick);
}

void init_monsters()
{
    // Hard coded for now - Kain
    monsters[0][0].name = "Slime";
    monsters[0][0].weapon = "Acid Goo";
    monsters[0][0].strength = 6;
    monsters[0][0].gold = 50;
    monsters[0][0].exp = 3;
    monsters[0][0].maxhp = 9;
    monsters[0][0].death = "The slime oozes into nothing... you clean the acid goo off of your weapon";

    monsters[0][1].name = "Ghost";
    monsters[0][1].weapon = "Cold Breath";
    monsters[0][1].strength = 8;
    monsters[0][1].gold = 100;
    monsters[0][1].exp = 10;
    monsters[0][1].maxhp = 10;
    monsters[0][1].death = "You feel a chill as the spirit leaves the realm.";

    monsters[0][2].name = "Ugly Rodent";
    monsters[0][2].weapon = "Sharp Teeth";
    monsters[0][2].strength = 9;
    monsters[0][2].gold = 75;
    monsters[0][2].exp = 8;
    monsters[0][2].maxhp = 13;
    monsters[0][2].death = "You stomp on the Ugly Rodent's remains for a finishing blow.";

    monsters[0][3].name = "Whart Hog";
    monsters[0][3].weapon = "Tusks";
    monsters[0][3].strength = 10;
    monsters[0][3].gold = 80;
    monsters[0][3].exp = 6;
    monsters[0][3].maxhp = 10;
    monsters[0][3].death = "You cook and eat the hog for good measure!";

    monsters[0][4].name = "Pesky Kid";
    monsters[0][4].weapon = "Slingshot";
    monsters[0][4].strength = 8;
    monsters[0][4].gold = 30;
    monsters[0][4].exp = 4;
    monsters[0][4].maxhp = 6;
    monsters[0][4].death = "You take his slingshot and snap the band, sending the kid crying home to mom!";

    monsters[0][5].name = "Playground Bully";
    monsters[0][5].weapon = "Painful Noogie";
    monsters[0][5].strength = 11;
    monsters[0][5].gold = 44;
    monsters[0][5].exp = 6;
    monsters[0][5].maxhp = 10;
    monsters[0][5].death = "You give him an indian burn, and punt him across the schoolyard!";

    monsters[0][6].name = "Small Imp";
    monsters[0][6].weapon = "Dagger";
    monsters[0][6].strength = 6;
    monsters[0][6].gold = 64;
    monsters[0][6].exp = 10;
    monsters[0][6].maxhp = 10;
    monsters[0][6].death = "You can't help but laugh as he stumbles and falls onto his own dagger!";

    monsters[0][7].name = "Little Monkey";
    monsters[0][7].weapon = "Monkey Wrench";
    monsters[0][7].strength = 6;
    monsters[0][7].gold = 53;
    monsters[0][7].exp = 9;
    monsters[0][7].maxhp = 9;
    monsters[0][7].death = "You want to cook it, but you just can't think of eating something that looks so human!";

    monsters[0][8].name = "Grub Worm";
    monsters[0][8].weapon = "Minor Nudge";
    monsters[0][8].strength = 2;
    monsters[0][8].gold = 10;
    monsters[0][8].exp = 3;
    monsters[0][8].maxhp = 3;
    monsters[0][8].death = "You decide to save the poor little fella for your next fishing trip.";

    monsters[0][9].name = "Drakee";
    monsters[0][9].weapon = "Tail Slap";
    monsters[0][9].strength = 5;
    monsters[0][9].gold = 22;
    monsters[0][9].exp = 7;
    monsters[0][9].maxhp = 5;
    monsters[0][9].death = "You pull the little Drakee by its tale and slam it down on a dry stump!";

    monsters[0][10].name = "Fat Slob";
    monsters[0][10].weapon = "Smelly Breath";
    monsters[0][10].strength = 6;
    monsters[0][10].gold = 40;
    monsters[0][10].exp = 10;
    monsters[0][10].maxhp = 7;
    monsters[0][10].death = "You kick his stomach for fun, and are thrown back by the spring of it all!";

    monsters[0][11].name = "Lost Warrior";
    monsters[0][11].weapon = "Long Sword";
    monsters[0][11].strength = 10;
    monsters[0][11].gold = 250;
    monsters[0][11].exp = 19;
    monsters[0][11].maxhp = 15;
    monsters[0][11].death = "You give him a proper burial in respect for the dead warrior.";

    monsters[1][0].name = "Lost Warrior's Cousin Larry";
    monsters[1][0].weapon = "Wood Axe";
    monsters[1][0].strength = 19;
    monsters[1][0].gold = 134;
    monsters[1][0].exp = 24;
    monsters[1][0].maxhp = 30;
    monsters[1][0].death = "He was pretty pissed you killed his cousin, but he seems to have suffered the same fate!";

    monsters[1][1].name = "Sandman";
    monsters[1][1].weapon = "Sleeping Dust";
    monsters[1][1].strength = 25;
    monsters[1][1].gold = 80;
    monsters[1][1].exp = 6;
    monsters[1][1].maxhp = 27;
    monsters[1][1].death = "You put the sandman to his final sleep.";

    monsters[1][2].name = "Dirty Transvestite";
    monsters[1][2].weapon = "Stiletto Heel";
    monsters[1][2].strength = 21;
    monsters[1][2].gold = 160;
    monsters[1][2].exp = 12;
    monsters[1][2].maxhp = 25;
    monsters[1][2].death = "You shudder at the thought of ever mistaking this for a woman!";

    monsters[1][3].name = "Goblin Gardener";
    monsters[1][3].weapon = "Garden Spade";
    monsters[1][3].strength = 18;
    monsters[1][3].gold = 130;
    monsters[1][3].exp = 8;
    monsters[1][3].maxhp = 20;
    monsters[1][3].death = "You trample on his garden after slaying him... that felt good!";

    monsters[1][4].name = "Evil Elf";
    monsters[1][4].weapon = "Elvish Bow";
    monsters[1][4].strength = 23;
    monsters[1][4].gold = 136;
    monsters[1][4].exp = 13;
    monsters[1][4].maxhp = 24;
    monsters[1][4].death = "Elves are usually nice you thought... hmm.";

    monsters[1][5].name = "Viking Warrior";
    monsters[1][5].weapon = "Broad Sword";
    monsters[1][5].strength = 21;
    monsters[1][5].gold = 330;
    monsters[1][5].exp = 20;
    monsters[1][5].maxhp = 18;
    monsters[1][5].death = "You heard vikings were big, but not THAT big you thought.";

    monsters[1][6].name = "Wicked Witch";
    monsters[1][6].weapon = "Cackling Laugh";
    monsters[1][6].strength = 20;
    monsters[1][6].gold = 130;
    monsters[1][6].exp = 20;
    monsters[1][6].maxhp = 26;
    monsters[1][6].death = "Just for kicks, you splash some water on her and watch her melt.";

    monsters[1][7].name = "Vampire Bat";
    monsters[1][7].weapon = "Blood Sucking Fangs";
    monsters[1][7].strength = 18;
    monsters[1][7].gold = 125;
    monsters[1][7].exp = 21;
    monsters[1][7].maxhp = 29;
    monsters[1][7].death = "You fry up the bat and eat it... needs garlic.";

    monsters[1][8].name = "Thorn Bush";
    monsters[1][8].weapon = "101 Thorns";
    monsters[1][8].strength = 16;
    monsters[1][8].gold = 94;
    monsters[1][8].exp = 15;
    monsters[1][8].maxhp = 25;
    monsters[1][8].death = "You set the bush ablaze and roast some marshmallows.";

    monsters[1][9].name = "Barbarian";
    monsters[1][9].weapon = "Heavy Sword";
    monsters[1][9].strength = 29;
    monsters[1][9].gold = 250;
    monsters[1][9].exp = 25;
    monsters[1][9].maxhp = 30;
    monsters[1][9].death = "You listen to him moan as he falls over dead.";

    monsters[1][10].name = "Crypt Rat";
    monsters[1][10].weapon = "Stinging Bite";
    monsters[1][10].strength = 25;
    monsters[1][10].gold = 119;
    monsters[1][10].exp = 20;
    monsters[1][10].maxhp = 26;
    monsters[1][10].death = "You squash the little rodent for fear that it might not be dead.";

    monsters[1][11].name = "Small Orc";
    monsters[1][11].weapon = "blade";
    monsters[1][11].strength = 28;
    monsters[1][11].gold = 300;
    monsters[1][11].exp = 30;
    monsters[1][11].maxhp = 36;
    monsters[1][11].death = "It's an ugly one, and it would've grown up to be a terror...";

    monsters[2][0].name = "Teferi";
    monsters[2][0].weapon = "Puzzle Box";
    monsters[2][0].strength = 29;
    monsters[2][0].gold = 380;
    monsters[2][0].exp = 18;
    monsters[2][0].maxhp = 29;
    monsters[2][0].death = "It was a puzzling experience.";

    monsters[2][1].name = "Spineless Thug";
    monsters[2][1].weapon = "Spiked Bat";
    monsters[2][1].strength = 37;
    monsters[2][1].gold = 384;
    monsters[2][1].exp = 27;
    monsters[2][1].maxhp = 32;
    monsters[2][1].death = "See you at the crossroads!";

    monsters[2][2].name = "Pyromaniac";
    monsters[2][2].weapon = "Pyrotechnics";
    monsters[2][2].strength = 29;
    monsters[2][2].gold = 563;
    monsters[2][2].exp = 22;
    monsters[2][2].maxhp = 45;
    monsters[2][2].death = "He chants FIRE FIRE as he falls to the ground... a burning heap of flesh.";

    monsters[2][3].name = "Evil Enchantress";
    monsters[2][3].weapon = "Deadly Spell";
    monsters[2][3].strength = 50;
    monsters[2][3].gold = 830;
    monsters[2][3].exp = 35;
    monsters[2][3].maxhp = 35;
    monsters[2][3].death = "She looked just about as good as she fought.";

    monsters[2][4].name = "Killer Leprechaun";
    monsters[2][4].weapon = "Gold Rush";
    monsters[2][4].strength = 35;
    monsters[2][4].gold = 1300;
    monsters[2][4].exp = 30;
    monsters[2][4].maxhp = 37;
    monsters[2][4].death = "You steal his pot of gold... that's a lot of money!";

    monsters[2][5].name = "Avalanche Rider";
    monsters[2][5].weapon = "Huge Snowball";
    monsters[2][5].strength = 32;
    monsters[2][5].gold = 700;
    monsters[2][5].exp = 32;
    monsters[2][5].maxhp = 38;
    monsters[2][5].death = "You take his snowboard and snap it in two!";

    monsters[2][6].name = "Blundering Idiot";
    monsters[2][6].weapon = "Stupidity";
    monsters[2][6].strength = 14;
    monsters[2][6].gold = 700;
    monsters[2][6].exp = 20;
    monsters[2][6].maxhp = 29;
    monsters[2][6].death = "Now there's one person you don't feel sorry for killing!";

    monsters[2][7].name = "Militant Anarchist";
    monsters[2][7].weapon = "Molotov Cocktail";
    monsters[2][7].strength = 33;
    monsters[2][7].gold = 245;
    monsters[2][7].exp = 45;
    monsters[2][7].maxhp = 32;
    monsters[2][7].death = "Order has been restored for now...";

    monsters[2][8].name = "Scathe Zombies";
    monsters[2][8].weapon = "Death Grip";
    monsters[2][8].strength = 38;
    monsters[2][8].gold = 763;
    monsters[2][8].exp = 15;
    monsters[2][8].maxhp = 45;
    monsters[2][8].death = "That was perhaps the scariest experience of your life.";

    monsters[2][9].name = "Spitting Llama";
    monsters[2][9].weapon = "Spit Spray";
    monsters[2][9].strength = 48;
    monsters[2][9].gold = 638;
    monsters[2][9].exp = 28;
    monsters[2][9].maxhp = 34;
    monsters[2][9].death = "You wipe the spit off your face and fling it back at the Llama.";

    monsters[2][10].name = "Juggalo";
    monsters[2][10].weapon = "Clown Axe";
    monsters[2][10].strength = 60;
    monsters[2][10].gold = 650;
    monsters[2][10].exp = 30;
    monsters[2][10].maxhp = 29;
    monsters[2][10].death = "What is a Juggalo? I don't know!";

    monsters[2][11].name = "The Boogie Man";
    monsters[2][11].weapon = "Striking Fear";
    monsters[2][11].strength = 46;
    monsters[2][11].gold = 600;
    monsters[2][11].exp = 35;
    monsters[2][11].maxhp = 27;
    monsters[2][11].death = "He's scared you for the very last time!";

    monsters[3][0].name = "Living Fire";
    monsters[3][0].weapon = "Scorching Wind";
    monsters[3][0].strength = 55;
    monsters[3][0].gold = 1100;
    monsters[3][0].exp = 36;
    monsters[3][0].maxhp = 55;
    monsters[3][0].death = "You extinguish the Living Flame once and for all!";

    monsters[3][1].name = "Raging Orc";
    monsters[3][1].weapon = "Orcish Artillary";
    monsters[3][1].strength = 89;
    monsters[3][1].gold = 900;
    monsters[3][1].exp = 25;
    monsters[3][1].maxhp = 50;
    monsters[3][1].death = "This orc was a bit tougher than you remembered!";

    monsters[3][2].name = "Huge Tarantula";
    monsters[3][2].weapon = "Tangling Web";
    monsters[3][2].strength = 59;
    monsters[3][2].gold = 1000;
    monsters[3][2].exp = 35;
    monsters[3][2].maxhp = 60;
    monsters[3][2].death = "You're glad you overcame your arachniphobia so soon!";

    monsters[3][3].name = "Rabid Wolf";
    monsters[3][3].weapon = "Cujo Bite";
    monsters[3][3].strength = 40;
    monsters[3][3].gold = 1200;
    monsters[3][3].exp = 47;
    monsters[3][3].maxhp = 76;
    monsters[3][3].death = "The mutt falls over dead as white foam drips from its deadly canines...";

    monsters[3][4].name = "Goblin Fighter";
    monsters[3][4].weapon = "Morning Star";
    monsters[3][4].strength = 38;
    monsters[3][4].gold = 700;
    monsters[3][4].exp = 30;
    monsters[3][4].maxhp = 75;
    monsters[3][4].death = "He almost caught you with his chain mace, but you sliced off his head.";

    monsters[3][5].name = "Grizzly Bear";
    monsters[3][5].weapon = "Razor Claws";
    monsters[3][5].strength = 68;
    monsters[3][5].gold = 1747;
    monsters[3][5].exp = 81;
    monsters[3][5].maxhp = 51;
    monsters[3][5].death = "It almost got you this time... better be careful";

    monsters[3][6].name = "Skeleton Man";
    monsters[3][6].weapon = "Leg Bone";
    monsters[3][6].strength = 70;
    monsters[3][6].gold = 597;
    monsters[3][6].exp = 57;
    monsters[3][6].maxhp = 60;
    monsters[3][6].death = "As a finisher, you wind up with the broad side of your weapon and hit his skull off for a home run!";

    monsters[3][7].name = "Young Werewolf";
    monsters[3][7].weapon = "Howling Bites";
    monsters[3][7].strength = 75;
    monsters[3][7].gold = 1742;
    monsters[3][7].exp = 65;
    monsters[3][7].maxhp = 42;
    monsters[3][7].death = "You scatter the wolf's body parts in hopes he will stay dead!";

    monsters[3][8].name = "Dark Infantry";
    monsters[3][8].weapon = "Flesh Reaper";
    monsters[3][8].strength = 69;
    monsters[3][8].gold = 870;
    monsters[3][8].exp = 43;
    monsters[3][8].maxhp = 65;
    monsters[3][8].death = "Light has prevailed this time... but it's only so long before you meet again.";

    monsters[3][9].name = "Erie Spirit";
    monsters[3][9].weapon = "Deadly Grin";
    monsters[3][9].strength = 63;
    monsters[3][9].gold = 1300;
    monsters[3][9].exp = 32;
    monsters[3][9].maxhp = 50;
    monsters[3][9].death = "His cousin the ghost was a little bit easier.";

    monsters[3][10].name = "Gollum";
    monsters[3][10].weapon = "Precious Treasure";
    monsters[3][10].strength = 66;
    monsters[3][10].gold = 1492;
    monsters[3][10].exp = 73;
    monsters[3][10].maxhp = 54;
    monsters[3][10].death = "Gollum screams out \"MY PRECIOUS\" as his small body falls limp from your blow.";

    monsters[3][11].name = "Rock Fighter";
    monsters[3][11].weapon = "Small Boulders";
    monsters[3][11].strength = 87;
    monsters[3][11].gold = 1742;
    monsters[3][11].exp = 99;
    monsters[3][11].maxhp = 65;
    monsters[3][11].death = "You dodge his last rock, and counter with a low blow, cutting off his legs.";


    monsters[4][0].name = "Giant Sphinx";
    monsters[4][0].weapon = "Ancient Curse";
    monsters[4][0].strength = 120;
    monsters[4][0].gold = 1000;
    monsters[4][0].exp = 100;
    monsters[4][0].maxhp = 80;
    monsters[4][0].death = "You look in awe at the great wonder, collapsed at your feet!";

    monsters[4][1].name = "Giant Ogre";
    monsters[4][1].weapon = "Big Log";
    monsters[4][1].strength = 130;
    monsters[4][1].gold = 857;
    monsters[4][1].exp = 175;
    monsters[4][1].maxhp = 100;
    monsters[4][1].death = "Your witz outmatched the ogres brawn... big dumb thing.";

    monsters[4][2].name = "Massive Cockroach";
    monsters[4][2].weapon = "Piercing Hiss";
    monsters[4][2].strength = 125;
    monsters[4][2].gold = 700;
    monsters[4][2].exp = 150;
    monsters[4][2].maxhp = 112;
    monsters[4][2].death = "Where's the exterminator when you need one?";

    monsters[4][3].name = "Big Venomous Snake";
    monsters[4][3].weapon = "Poison Fangs";
    monsters[4][3].strength = 140;
    monsters[4][3].gold = 900;
    monsters[4][3].exp = 175;
    monsters[4][3].maxhp = 126;
    monsters[4][3].death = "After killing this beast you check for puncture marks... you find none, luckily.";

    monsters[4][4].name = "Lizard Man";
    monsters[4][4].weapon = "Deadly Jaws";
    monsters[4][4].strength = 145;
    monsters[4][4].gold = 1250;
    monsters[4][4].exp = 175;
    monsters[4][4].maxhp = 150;
    monsters[4][4].death = "His scales made for tough armor, and his jaws for a tougher opponent!";

    monsters[4][5].name = "Face Dancer";
    monsters[4][5].weapon = "Illusion Scyth";
    monsters[4][5].strength = 138;
    monsters[4][5].gold = 1603;
    monsters[4][5].exp = 198;
    monsters[4][5].maxhp = 173;
    monsters[4][5].death = "His carcus takes the shape of many things before it dies. His true form is so repulsive, you know why he changed faces so much!";

    monsters[4][6].name = "Darklord Longbow Archer";
    monsters[4][6].weapon = "Deadly Bow and Arrows";
    monsters[4][6].strength = 145;
    monsters[4][6].gold = 1569;
    monsters[4][6].exp = 243;
    monsters[4][6].maxhp = 170;
    monsters[4][6].death = "Your face turns white with horror after you realize you just met the devil's protector!";

    monsters[4][7].name = "Hell's Paladin";
    monsters[4][7].weapon = "Sword of Hellfire";
    monsters[4][7].strength = 200;
    monsters[4][7].gold = 2191;
    monsters[4][7].exp = 254;
    monsters[4][7].maxhp = 175;
    monsters[4][7].death = "This is starting to get tough you think. Do you really want to go to level 12?";

    monsters[4][8].name = "The Unknown Soldier";
    monsters[4][8].weapon = "Soul Torture";
    monsters[4][8].strength = 175;
    monsters[4][8].gold = 1890;
    monsters[4][8].exp = 200;
    monsters[4][8].maxhp = 180;
    monsters[4][8].death = "Who was that? Where was he from? And what was that weapon??";

    monsters[4][9].name = "Undead Cult Leader";
    monsters[4][9].weapon = "Lance of Deceit";
    monsters[4][9].strength = 180;
    monsters[4][9].gold = 1792;
    monsters[4][9].exp = 195;
    monsters[4][9].maxhp = 190;
    monsters[4][9].death = "His words fall on deaf ears... this is one cult you will NOT be part of!";

    monsters[4][10].name = "Water Serpent";
    monsters[4][10].weapon = "Forked Tongue";
    monsters[4][10].strength = 150;
    monsters[4][10].gold = 1500;
    monsters[4][10].exp = 176;
    monsters[4][10].maxhp = 220;
    monsters[4][10].death = "The serpent squeals as you cut off its head!";

    monsters[4][11].name = "Silverback Gorilla";
    monsters[4][11].weapon = "Deadly Banana Peel";
    monsters[4][11].strength = 160;
    monsters[4][11].gold = 1300;
    monsters[4][11].exp = 150;
    monsters[4][11].maxhp = 178;
    monsters[4][11].death = "Was that gorilla or guerilla?";
}

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, 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)
{
    if (is_playing(u))
    {
        aClient *ni = find(u);

        aClient *battle = ni->stats->battle;

        notice(s_GameServ, u, "Your Hitpoints: \ 2%d\ 2", ni->stats->hp);
        notice(s_GameServ, u, "%s's Hitpoints: \ 2%d\ 2", battle->getNick(), 
                                                        battle->stats->hp);

        notice(s_GameServ, u, "Here are your commands:");
        notice(s_GameServ, u, "/msg %s attack", s_GameServ);
        notice(s_GameServ, u, "/msg %s run", s_GameServ);
        notice(s_GameServ, u, "What will you do?");
    }
}


bool is_playing(char *u)
{
    aClient *user;
    if (!(user = find(u)))
    {
        return false;
    }
    else
    {
        return user->stats != NULL;
    }
}

bool is_fighting(char *u)
{
    aClient *user;

    if (!(user = find(u)))
    {
        return false;
    }
    else if (user->stats)
    {
        return user->stats->fight != NULL || user->stats->battle != NULL 
                || user->stats->master != NULL;
    }
    else
        return false;
}

bool player_fight(char *u)
{
    aClient *user;

    if (!(user = find(u)))
        return false;
    else if (user->stats)
        return user->stats->battle != NULL;
    else
        return false;
}

bool master_fight(char *u)
{
    aClient *user;

    if (!(user = find(u)))
        return false;
    else if (user->stats)
        return user->stats->master != NULL;
    else
        return false;
}

bool isnt_fighting(char *u)
{
    return !is_fighting(u);
}

void do_fight(char *u)
{
    aClient *ni, *battle;

    char *nick = strtok(NULL, " ");

    if (!nick)
    {
        notice(s_GameServ, u, "SYNTAX: /msg %S FIGHT PLAYER");
    }
    else if (!(ni = find(u)))
    {
        return;
    }
    else if (!(battle = find(nick)))
    {
        notice(s_GameServ, u, "You can't attack %s while they aren't playing!", nick);
    }
    else if (!is_playing(u))
    {
        notice(s_GameServ, u, "You are not playing!");
    }
/*
 * Offline fighting not implemented yet.
 *   else if (!(fight = finduser(nick)))
 *   {
 *       ni->stats->battle = battle;
 *       battle->battle = ni;
 *       ni->yourturn = 1;
 *       battle->yourturn = 0;
 *       notice(s_GameServ, u, "You decide to fight %s while they're not online!",
 *                battle->getNick());
 *       display_players(u);
 *   }
 */
    else if (is_playing(u) && is_playing(nick))
    {
        // Set your battle pointer to the other player
        ni->stats->battle = battle;

        // Set the other player's battle pointer to you
        battle->stats->battle = ni;

        // The initiator gets the first move (perhaps this should be 50/50)
        ni->stats->yourturn = 1;
        battle->stats->yourturn = 0;

        // Initiate Battle sequence!
        notice(s_GameServ, u, "You challenge %s to an online duel!", battle->getNick());
        notice(s_GameServ, battle->getNick(), "%s has challenged you to an online duel!", u);
        notice(s_GameServ, battle->getNick(), "%s gets to go first because he initiated!", u);
        notice(s_GameServ, battle->getNick(), "Please wait while %s decides what to do.", u);
        display_players(u);
    }
}

void do_attack(char *u)
{
    int hit, mhit;
    aClient *ni, *battle; // The player and perhaps the player they're fighting
    Monster *fight; // The monster they may be fighting

    if (!(ni = find(u)))
    {
        notice(s_GameServ, u, "You're not playing!");
        return;
    }
    else if (!ni->stats->fight && !ni->stats->battle && !ni->stats->master)
    {
        notice(s_GameServ, u, "You're not in battle!");
        return;
    }
    else
    {
        if (!ni->stats->master) // This is not a master fight
                fight = ni->stats->fight;       // Monster      Could be NULL
        else                    // This IS a master fight
                fight = ni->stats->master;      // Master       Could be NULL

        battle = ni->stats->battle;             // Player       Could be NULL

        // One has to be !NULL based on the previous else if
        // We wouldn't be here if they were all NULL
    }

    if (!player_fight(u))
    {
        // Player's Hit
        hit = ((ni->stats->strength + webonus[ni->stats->weapon]) / 2) +
              (rand() % ((ni->stats->strength + webonus[ni->stats->weapon]) / 2));

        // Opponent's Hit
        mhit = (fight->strength / 2) +
               (rand() % (fight->strength / 2) - (ni->stats->defense +
                arbonus[ni->stats->armor]));
    }
    else
    {
        // Opponent's Hit
        mhit = (((battle->stats->strength + webonus[battle->stats->weapon]) / 2) +
               (rand() % ((battle->stats->strength + webonus[battle->stats->weapon])) / 2) -
               (ni->stats->defense + arbonus[ni->stats->armor]));

        // Player's Hit
        hit = (((ni->stats->strength + webonus[ni->stats->weapon]) / 2) +
               (rand() % ((ni->stats->strength + webonus[ni->stats->weapon])) / 2) -
               (battle->stats->defense + arbonus[battle->stats->armor]));
    }

  if (!player_fight(u))
  {
    if (hit > 0)
        notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", fight->name, hit);
    else
        notice(s_GameServ, u, "You miss \1f%s\1f completely!", fight->name);

    if (hit >= fight->hp)
    {
        if (master_fight(u))
            notice(s_GameServ, u, "You have bested %s!", fight->name);
        else
            notice(s_GameServ, u, "You have killed \ 2%s\ 2!", fight->name);

        notice(s_GameServ, u, "%s", fight->death);
        notice(s_GameServ, u, "You recieve \ 2%d\ 2 experience and \ 2%d\ 2 gold!",
                 fight->exp, fight->gold);

        // If your new experience (or gold) will be greater than 2 billion,
        // then set your exp to 2bil. (2 billion max)... otherwise add them.
        // This could be a problem with overflowing out of the sign bit.
        // Unsigned long int maybe? Leave it for now.
        ni->stats->exp = ( (ni->stats->exp + fight->exp) > 2000000000 ? 2000000000 : 
                                ni->stats->exp + fight->exp);
        ni->stats->gold = (ni->stats->gold + fight->gold > 2000000000 ? 2000000000 : 
                                ni->stats->gold + fight->gold);
        ni->stats->fight = NULL; // They're dead so remove the pointer

        if (master_fight(u))
        {
            notice(s_GameServ, u, "You are now level %d!", ni->stats->level + 1);
            notice(s_GameServ, u, "You gain %d Strength, and %d Defense points!",
                     strbonus[ni->stats->level - 1], defbonus[ni->stats->level - 1]);

            // Increase your level
            ni->stats->level++;

            // Increase your maximum hit points
            ni->stats->maxhp += hpbonus[ni->stats->level - 1];

            // Heal the player by setting hp to their max
            ni->stats->hp = ni->stats->maxhp;

            // Add to your strength
            ni->stats->strength += strbonus[ni->stats->level - 1];

            // Add to your defensive power
            ni->stats->defense += defbonus[ni->stats->level - 1];

            // Clear the pointer for your master
            ni->stats->master = NULL;
        }
        return;
    }
    else
    {
        if (hit > 0)
            fight->hp -= hit;
        if (mhit > 0)
        {
            notice(s_GameServ, u, "\1f%s\1f hits you with their \1f%s\1f for \ 2%d\ 2 damage!",
                     fight->name, fight->weapon, mhit);
        }
        else if (mhit <= 0)
            notice(s_GameServ, u, "%s completely misses you!", fight->name);

        if (mhit >= ni->stats->hp)
        {
            if (!master_fight(u))
            {
                notice(s_GameServ, u, "You have been \ 2\1fkilled\1f\ 2 by %s!", fight->name);
                notice(s_GameServ, u, "You lose all gold on hand and lose 10 percent "\
                        "of your experience!");
                ni->stats->gold = 0;
                ni->stats->exp -= (long int)(ni->stats->exp * .10);
                ni->stats->fight = NULL;
                return;
            }
            else
            {
                notice(s_GameServ, u, "%s has bested you! You will have to wait "\
                        "until tomorrow to try again", ni->stats->master->name);
                ni->stats->fight = NULL;
                ni->stats->master = NULL;
                return;
            }
        }
        else
        {
            if (mhit > 0)
                ni->stats->hp -= mhit;
            display_monster(u);
            return;
        }
    }
  }
  else if (player_fight(u))
  {
/* Offline fighting not available yet
   if (!(online = finduser(ni->stats->battle->nick)) || !nick_identified(online))
   {
    if (hit > 0)
        notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", battle->nick, hit);
    else
        notice(s_GameServ, u, "You miss \1f%s\1f completely!", battle->nick);
    if (hit >= battle->stats->hp)
    {
        notice(s_GameServ, u, "You have killed \ 2%s\ 2!", battle->nick);
*        notice(s_GameServ, u, "You recieve \ 2%d\ 2 experience and \ 2%ld\ 2 gold!",
                (long int)(battle->stats->exp * .10), battle->stats->gold);
        if (2000000000 - ni->stats->exp > (long int)(battle->stats->exp * .10))
        {
            ni->stats->exp += (long int)(battle->stats->exp * .10);
            battle->stats->exp -= (long int)(battle->stats->exp * .10);
        }
*        else
        {
            battle->stats->exp -= (long int)(battle->stats->exp * .10);
            ni->stats->exp = 2000000000;
        }

        if (2000000000 - ni->stats->gold > battle->stats->gold)
        {
*            ni->stats->gold += battle->stats->gold;
            battle->stats->gold = 0;
        }
        else
        {
            battle->stats->gold = 2000000000 - ni->stats->gold;
            ni->stats->gold = 2000000000;
        }
*        ni->stats->battle->stats->alive = 0;
        ni->stats->battle->battle = NULL;
        ni->stats->battle = NULL;
        return;
    }
    else
    {
        if (hit > 0)
*            battle->stats->hp -= hit;
        if (mhit > 0)
        {
            notice(s_GameServ, u, "\1f%s\1f hits you with their \1f%s\1f for \ 2%d\ 2 damage!",
                     battle->nick, weapons[battle->stats->weapon], mhit);
        }
        else if (mhit <= 0)
            notice(s_GameServ, u, "%s completely misses you!", battle->nick);
*
        if (mhit >= ni->stats->hp)
        {
            notice(s_GameServ, u, "You have been \ 2\1fkilled\1f\ 2 by %s!", battle->nick);
            if (2000000000 - battle->stats->gold > ni->stats->gold)
            {
                notice(s_GameServ, u, "%s took all your gold!", battle->nick);
                battle->stats->gold += ni->stats->gold;
*                ni->stats->gold = 0;
            }
            else
            {
                notice(s_GameServ, u, "You're lucky, %s couldn't carry all your gold.",
                        battle->nick);
                ni->stats->gold -= (2000000000 - battle->stats->gold);
                notice(s_GameServ, u, "You were left dead with %d gold.",
*                         (long int)ni->stats->gold);
                battle->stats->gold = 2000000000;
            }
            ni->stats->battle->battle = NULL;
            ni->stats->battle = NULL;
            ni->stats->alive = 0;
            return;
        }
*        else
        {
            if (mhit > 0)
                ni->stats->hp -= mhit;
            display_players(u);
            return;
        }
    }
   }
* end offline fighting */

   if (is_playing(battle->getNick()))
   {
    if (ni->stats->yourturn == 0)
    {
        notice(s_GameServ, u, "Please wait until %s decides what to do!", 
                battle->getNick());
        return;
    }
    if (hit > 0)
    {
        notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", battle->getNick(), hit);

        notice(s_GameServ, battle->getNick(), "%s has hit you with their %s for "\
                                              "\ 2%d\ 2 damage!", u, weapons[ni->stats->weapon], 
                                              hit);
        ni->stats->yourturn = 0;
        battle->stats->yourturn = 1;
        display_players(battle->getNick());
    }
    else
    {
        notice(s_GameServ, u, "You miss \1f%s\1f completely!", battle->getNick());
        notice(s_GameServ, battle->getNick(), "%s misses you completely!", u);
        ni->stats->yourturn = 0;
        battle->stats->yourturn = 1;
        display_players(battle->getNick());
    }
    if (hit >= battle->stats->hp)
    {
        notice(s_GameServ, u, "You have killed \ 2%s\ 2!", battle->getNick());
        notice(s_GameServ, u, "You recieve \ 2%d\ 2 experience and \ 2%ld\ 2 gold!",
                (long int)(battle->stats->exp * .10), battle->stats->gold);
        notice(s_GameServ, battle->getNick(), "You have been killed by \ 2%s\ 2!", u);
        battle->stats->hp = 0;
        battle->stats->alive = 0;

        if (2000000000 - ni->stats->exp > (long int)(battle->stats->exp * .10))
        {
            ni->stats->exp += (long int)(battle->stats->exp * .10);
            battle->stats->exp -= (long int)(battle->stats->exp * .10);
        }
        else
        {
            battle->stats->exp -= (long int)(battle->stats->exp * .10);
            ni->stats->exp = 2000000000;
        }

        if (2000000000 - ni->stats->gold > battle->stats->gold)
        {
           notice(s_GameServ, battle->getNick(), "You lose ten percent of experience and "\
                                                 "all gold on hand!");
            ni->stats->gold += battle->stats->gold;
            battle->stats->gold = 0;
        }
        else
        {
            battle->stats->gold = 2000000000 - ni->stats->gold;
            notice(s_GameServ, battle->getNick(), "You lose ten percent of your experience!");

            notice(s_GameServ, battle->getNick(), "However, %s could not carry all of your "\
                        "gold.", u);

            notice(s_GameServ, battle->getNick(), "Luckily, you still have \ 2%ld\ 2 gold "\
                        "left. All is not lost!", battle->stats->gold);

            ni->stats->gold = 2000000000;
        }
        battle->stats->battle = NULL;
        ni->stats->battle = NULL;
        return;
    }
    else
    {
        if (hit > 0)
            battle->stats->hp -= hit;
        //display_players(battle->getNick());
        ni->stats->yourturn = 0;
        battle->stats->yourturn = 1;
        notice(s_GameServ, u, "Please wait while %s decides what to do!", 
                battle->getNick());

        return;
    }
   }
  }
}
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 | #}");
    }
    else if (!(ni = find(u)) || !ni->stats)
    {
        notice(s_GameServ, u, "You aren't playing!");
    }
    else if (is_fighting(u))
    {
        notice(s_GameServ, u, "You can't heal in battle!");
    }
    else if (ni->stats->hp >= ni->stats->maxhp)
    {
        notice(s_GameServ, u, "You don't need healing!");
    }
    else 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. 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 (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)
{
    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)
{
    long int x, len = strlen(number), sum = 0;
    if (len == 1)
        return chartoint(number[0]);
    sum += chartoint(number[len - 1]);
    for (x = len - 2; x >= 0; x--)
    {
        sum += chartoint(number[x]) * pow(10, abs(x - len + 1));
    }
    return sum;
}

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)
{
        switch(ch)
        {
            case '0':
                return 0;
               break;
            case '1':
                return 1;
            case '2':
                return 2;
            case '3':
                return 3;
            case '4':
                return 4;
            case '5':
                return 5;
            case '6':
                return 6;
            case '7':
                return 7;
            case '8':
                return 8;
            case '9':
                return 9;
            case '\n':
                break;
            default:
                return -1;
        }
return -1;
}

int save_gs_dbase()
{
    ListNode<aClient> *ptr = players.First();
    Player *it;
    ofstream outfile;

    outfile.open(playerdata);

    if (!outfile)
    {
        cerr << "Error opening " << playerdata << endl;
        return 0;
    }

    while(ptr)
    {
        it = ptr->getData()->stats;
        outfile << it->name << ' ' << it->level << ' ' << it->exp << ' ' << it->gold << ' ' << it->bank << ' '
                << it->hp << ' ' << it->maxhp << ' ' << it->strength << ' ' << it->defense << ' '
                << it->armor << ' ' << it->weapon << ' ' << (it->alive ? "alive" : "dead") << ' '
                << it->forest_fights << ' ' << it->player_fights << endl;
        ptr = ptr->Next();
    }
outfile.close();
}

int load_gs_dbase()
{
    ifstream infile;
    aClient *temp;
    Player *p;
    char *alive, *tempname, *buf;
    buf = new char[1023];

    infile.open(playerdata);

    if (infile.fail())
    {
        cerr << "Error opening " << playerdata << endl;
        return 0;
    }

    while (infile.getline(buf, 1024, '\n'))
    {
        temp = new aClient;
        tempname = strtok(buf, " ");
        temp->stats = new Player(tempname);
        p = temp->stats;

        //Kain 1 1 0 500 10 10 0 0 1 1 alive 100 3
        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->armor = stringtoint(strtok(NULL, " "));
        p->weapon = stringtoint(strtok(NULL, " "));
        alive = strtok(NULL, " ");
        p->alive = (stricmp(alive, "ALIVE") == 0 ? true : false);
        p->forest_fights = stringtoint(strtok(NULL, " "));
        p->player_fights = stringtoint(strtok(NULL, " "));
        temp->setNick("NULL");

        printf("%s %d %ld %ld %ld %d %d %d %d %d %d %s %d %d\n", p->name, p->level, p->exp, p->gold, p->bank, p->hp, p->maxhp, p->strength, p->defense, p->armor, p->weapon, alive, p->forest_fights, p->player_fights);
        players.insertAtBack(temp);
        delete temp;
    }
delete buf;
}