]> jfr.im git - irc/gameservirc.git/blobdiff - gameserv/gameserv.cpp
Added a tavern where you can buy potions for later use.
[irc/gameservirc.git] / gameserv / gameserv.cpp
index 90379fa3c5ac8e70917e1ae1e57db4a2ff2bbf1c..c569cdc834cd77790338bf67dfced3bd35b73b5a 100644 (file)
@@ -49,11 +49,19 @@ bool check_password(char *name, char *plaintext); // Finds a password for the gi
 /********** GameServ Booleans **********/
 
 bool is_playing(char *u); // True if the given nickname in the clients list is playing.
-bool has_started(char *u); // True if the given nickname in the clients list has started playing.
+bool is_playing(aClient *user);
+
 bool is_fighting(char *u); // True if the given nick in the clients list is fighting anything.
-bool isnt_fighting(char *u); // True if the given nick isn't fighting. Same as !is_fighting(u).
+bool is_fighting(aClient *user);
+
+bool is_alive(char *u); // True if the given nick is playing and is alive
+bool is_alive(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);
 
 /********** GameServ Booleans **********/
 
@@ -71,6 +79,7 @@ void refreshall();
 void reset(aClient *ni);
 void init_masters();
 void init_monsters();
+bool load_monsters();
 void delete_monsters();
 void delete_masters();
 
@@ -91,6 +100,7 @@ void do_reset(char *u);
 void do_run(char *u);
 void do_stats(char *u);
 void do_store(char *u);
+void do_tavern(char *u);
 void see_master(char *u);
 
 void showstats(const char *u, const char *nick);
@@ -140,7 +150,7 @@ void gameserv(char *source, char *buf)
        ts = strtok(NULL, "\1");
         notice(s_GameServ, source, "\1PING %s\1", ts);
     } else if (stricmp(cmd, "\1VERSION\1") == 0) {
-       notice(s_GameServ, source, "\1VERSION GameServ v1.0.1 +devel\1");
+       notice(s_GameServ, source, "\1VERSION %s %s +devel\1", PACKAGE, VERSION);
     } else if (stricmp(cmd, "SEARCH") == 0) {
        cmd = strtok(NULL, " ");
 
@@ -148,6 +158,7 @@ void gameserv(char *source, char *buf)
            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) {
@@ -166,6 +177,8 @@ void gameserv(char *source, char *buf)
        do_admin(source);
     } else if (stricmp(cmd, "REFRESH") == 0) {
        do_refresh(source);
+    } else if (stricmp(cmd, "TAVERN") == 0) {
+       do_tavern(source);
     } else if (stricmp(cmd, "PRINT") == 0) {
        cout << "Printing Clients List: " << endl;
        clients.print();
@@ -228,7 +241,19 @@ void gameserv(char *source, char *buf)
        }
        else
         {
-           load_gs_dbase();
+           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 from %s", monsterdata);
+               load_monsters();
+           }
+           else
+               display_help(source, cmd);
        }
     } else if (stricmp(cmd, "RAW") == 0) {
        aClient *user;
@@ -247,6 +272,8 @@ void gameserv(char *source, char *buf)
            char *rest = strtok(NULL, "");
            raw("%s", rest);
        }
+    } else {
+       notice(s_GameServ, source, "Unknown command \002%s\002. Type /msg %S \002HELP\002 to get a list of commands.", cmd);
     } 
 
    source--;  // Bring the ':' back so we don't leak memory
@@ -324,10 +351,10 @@ void showstats(const char *u, const char *nick)
 char *spaces(int len, char *seperator)
 {
     char *final;
-    final = new char[40];
+    final = new char[30];
     int y;
     strcpy(final, seperator);
-    for (y = 0; y < 40 - len; y++)
+    for (y = 0; y < 30 - len; y++)
         strcat(final, seperator);
     return final;
 }
@@ -468,6 +495,7 @@ void do_list(char *u)
     else
        notice(s_GameServ, u, "No one is playing");
 }
+
 void do_register(char *u)
 {
     char *password;
@@ -490,7 +518,6 @@ void do_register(char *u)
         if (!user->stats)
         {
            user->stats = new Player(user);
-           user->stats->started = 1;
            user->stats->user = user; // Set the backwards pointer
            strcpy(user->stats->password, crypt(password, salt));
            players.insertAtBack(user);
@@ -510,19 +537,26 @@ void do_identify(char *u)
     aClient *user, *p;
     name = strtok(NULL, " ");
     password = strtok(NULL, " ");
-
+    user = find(u);
     if (!password || !name)
     {
        notice(s_GameServ, u, "SYNTAX: /msg %S IDENTIFY NAME PASSWORD");
     }
+    else if (!user)
+           notice(s_GameServ, u, "Fatal error. Cannot find aClient. Buf: %s", strtok(NULL, ""));
     else if (!(p = findplayer(name)) || !p->stats)
            notice(s_GameServ, u, "Player %s not found", name);
-    else if (!check_password(name, password))
+    else if (!check_password(name, password) && !isAdmin(user))
     {
            notice(s_GameServ, u, "Password incorrect");
     }
-    else if ((user = find(u)))
+    else
     {
+       if (p->stats->user && !isAdmin(user))
+       {
+           notice(s_GameServ, u, "That player has already identified.");
+           return;
+       }
         if (!user->stats)
         {
            ListNode<aClient> *temp;
@@ -681,6 +715,7 @@ void init_monsters()
            monsters[x][y] = new Monster();
 
     // Hard coded for now - Kain
+/*
 
     strcpy(monsters[0][0]->name, "Slime");
     strcpy(monsters[0][0]->weapon, "Acid Goo");
@@ -1834,6 +1869,8 @@ void init_monsters()
                monsters[11][11]->exp = 1;
                monsters[11][11]->maxhp = 1;
     strcpy(    monsters[11][11]->death, "");
+
+*/
 }
 
 void delete_monsters()
@@ -1900,6 +1937,30 @@ bool is_playing(char *u)
     }
 }
 
+bool is_playing(aClient *user)
+{
+    return user->stats != NULL;
+}
+
+bool is_alive(char *u)
+{
+    aClient *user;
+    if (!(user = find(u)))
+       return false;
+    else if (user->stats == NULL)
+       return false;
+    else
+       return user->stats->alive;
+}
+
+bool is_alive(aClient *user)
+{
+    if (user->stats == NULL)
+       return false;
+    else
+       return user->stats->alive;
+}
+       
 bool is_fighting(char *u)
 {
     aClient *user;
@@ -1916,6 +1977,13 @@ bool is_fighting(char *u)
     else
        return false;
 }
+bool is_fighting(aClient *user)
+{
+    if (!is_playing(user))
+       return false;
+    else
+       return (user->stats->fight != NULL || user->stats->battle != NULL || user->stats->master != NULL);
+}
 
 bool player_fight(char *u)
 {
@@ -1928,6 +1996,13 @@ bool player_fight(char *u)
     else
        return false;
 }
+bool player_fight(aClient *user)
+{
+    if (!is_fighting(user))
+       return false;
+    else
+       return user->stats->battle != NULL;
+}
 
 bool master_fight(char *u)
 {
@@ -1940,10 +2015,12 @@ bool master_fight(char *u)
     else
        return false;
 }
-
-bool isnt_fighting(char *u)
+bool master_fight(aClient *user)
 {
-    return !is_fighting(u);
+    if (!is_playing(user))
+       return false;
+    else
+       return user->stats->master != NULL;
 }
 
 void do_fight(char *u)
@@ -1958,13 +2035,14 @@ void do_fight(char *u)
     }
     else if (!(ni = find(u)))
     {
+       notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
        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))
+    else if (!is_playing(ni))
     {
        notice(s_GameServ, u, "You are not playing!");
     }
@@ -1981,7 +2059,12 @@ void do_fight(char *u)
  *       display_players(u);
  *   }
  */
-    else if (is_playing(u) && is_playing(nick) && stricmp(ni->stats->name, battle->stats->name) != 0)
+    else if (!is_alive(ni))
+    {
+       notice(s_GameServ, u, "You are dead. Wait until tomorrow to fight others!");
+       return;
+    }
+    else if (is_playing(ni) && is_playing(battle) && stricmp(ni->stats->name, battle->stats->name) != 0)
     {
        // Set your battle pointer to the other player
         ni->stats->battle = battle;
@@ -2017,25 +2100,25 @@ void do_run(char *u)
     if (p->battle)
        p2 = p->battle->stats;
 
-    if (!is_fighting(u))
+    if (!is_fighting(user))
        notice(s_GameServ, u, "You run in place... try fighting next time.");
-    else if (!player_fight(u) && !master_fight(u))
+    else if (!player_fight(user) && !master_fight(user))
     {
        notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p->fight->name);
        delete p->fight;
        p->fight = NULL;
     }
-    else if (player_fight(u) && p->yourturn)
+    else if (player_fight(user) && p->yourturn)
     {
        notice(s_GameServ, u, "You run away from \ 2%s\ 2 like a little baby!", p2->name);
        notice(s_GameServ, p->battle->getNick(), "\ 2%s\ 2 ran away from you like a little baby!", p->name);
        p2->battle = NULL;
     }
-    else if (player_fight(u) && !p->yourturn)
+    else if (player_fight(user) && !p->yourturn)
     {
        notice(s_GameServ, u, "It is not your turn. Please wait until \ 2%s\ 2 decides what to do.", p2->name);
     }
-    else if (master_fight(u))
+    else if (master_fight(user))
     {
        notice(s_GameServ, u, "You cannot run from \ 2%s\ 2! FIGHT!", p->master->name);
     }
@@ -2070,7 +2153,7 @@ void do_attack(char *u)
        // We wouldn't be here if they were all NULL
     }
 
-    if (!player_fight(u))
+    if (!player_fight(ni))
     {
        // Player's Hit
         hit = ((ni->stats->strength + webonus[ni->stats->weapon]) / 2) +
@@ -2094,7 +2177,7 @@ void do_attack(char *u)
                (battle->stats->defense + arbonus[battle->stats->armor]));
     }
 
-  if (!player_fight(u))
+  if (!player_fight(ni))
   {
     if (hit > 0)
         notice(s_GameServ, u, "You attack \1f%s\1f for \ 2%d\ 2 points!", fight->name, hit);
@@ -2103,7 +2186,7 @@ void do_attack(char *u)
 
     if (hit >= fight->hp)
     {
-        if (master_fight(u))
+        if (master_fight(ni))
             notice(s_GameServ, u, "You have bested %s!", fight->name);
         else
             notice(s_GameServ, u, "You have killed \ 2%s\ 2!", fight->name);
@@ -2122,7 +2205,7 @@ void do_attack(char *u)
                                ni->stats->gold + fight->gold);
 
 
-        if (master_fight(u))
+        if (master_fight(ni))
         {
             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!",
@@ -2168,7 +2251,7 @@ void do_attack(char *u)
 
         if (mhit >= ni->stats->hp)
         {
-            if (!master_fight(u))
+            if (!master_fight(ni))
             {
                 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 "\
@@ -2176,6 +2259,7 @@ void do_attack(char *u)
                 ni->stats->gold = 0;
                 ni->stats->exp -= (long int)(ni->stats->exp * .10);
                 ni->stats->fight = NULL;
+               ni->stats->alive = false;
                 return;
             }
             else
@@ -2196,7 +2280,7 @@ void do_attack(char *u)
         }
     }
   }
-  else if (player_fight(u))
+  else if (player_fight(ni))
   {
 /* Offline fighting not available yet
    if (!(online = finduser(ni->stats->battle->nick)) || !nick_identified(online))
@@ -2316,7 +2400,7 @@ void do_attack(char *u)
                 (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;
+        battle->stats->alive = false;
 
         if (2000000000 - ni->stats->exp > (long int)(battle->stats->exp * .10))
         {
@@ -2378,11 +2462,22 @@ void do_heal(char *u)
     {
        notice(s_GameServ, u, "SYNTAX: /msg %S HEAL {ALL | #}");
     }
-    else if (!(ni = find(u)) || !ni->stats)
+    else if (!(ni = find(u)))
+    {
+       notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
+       return;
+    }
+    else if (!is_playing(ni))
     {
        notice(s_GameServ, u, "You aren't playing!");
+       return;
+    }
+    else if (!is_alive(ni))
+    {
+       notice(s_GameServ, u, "You are dead. Wait until tomorrow for healing.");
+       return;
     }
-    else if (is_fighting(u))
+    else if (is_fighting(ni))
     {
        notice(s_GameServ, u, "You can't heal in battle!");
     }
@@ -2510,7 +2605,7 @@ int save_gs_dbase()
                << it->hp << ' ' << it->maxhp << ' ' << it->strength << ' ' << it->defense << ' '
                << it->armor << ' ' << it->weapon << ' ' << (it->alive ? "alive" : "dead") << ' '
                << it->forest_fights << ' ' << it->player_fights <<  ' ' 
-               << it->password << endl;
+               << it->getFlags() << ' ' << it->password << endl;
        ptr = ptr->Next();
     }
 outfile.close();
@@ -2554,6 +2649,7 @@ int load_gs_dbase()
        p->alive = (stricmp(alive, "ALIVE") == 0 ? true : false);
        p->forest_fights = stringtoint(strtok(NULL, " "));
        p->player_fights = stringtoint(strtok(NULL, " "));
+       p->setFlags(stringtoint(strtok(NULL, " ")));
        password = strtok(NULL, " ");
        strcpy(p->password, password);
        temp->setNick("NULL");
@@ -2614,14 +2710,19 @@ void do_store(char *u)
     aClient *user;
     Player *p;
 
-    if (!is_playing(u) || !(user = find(u)))
-       notice(s_GameServ, u, "You must be playing to use the store!");
-    else if (!cmd || !item)
+    if (!cmd || !item)
     {
        notice(s_GameServ, u, "SYNTAX: STORE LIST {ARMOR | WEAPONS}");
        notice(s_GameServ, u, "        \ 2STORE SELL {ARMOR | WEAPON}\ 2");
        notice(s_GameServ, u, "        \ 2STORE BUY {ARMOR | WEAPON} \1fNUMBER\1f\ 2");
     }
+    else if (!(user = find(u)) || !is_playing(user))
+       notice(s_GameServ, u, "You must be playing to use the store!");
+    else if (!is_alive(user))
+    {
+       notice(s_GameServ, u, "You are dead. Wait until tomorrow to purchase weapons and armor!");
+       return;
+    }
     else if (stricmp(cmd, "LIST") == 0)
     {
        if (stricmp(item, "WEAPONS") == 0)
@@ -2778,6 +2879,101 @@ void do_store(char *u)
     }
 }
 
+void do_tavern(char *u)
+{
+    char *cmd = strtok(NULL, " ");
+    long int price;
+
+    aClient *user;
+    Player *p;
+    if (!(user = find(u)))
+    {
+       notice(s_GameServ, u, "Fatal Error. See a %S admin for help");
+       return;
+    }
+    else if (!is_playing(user))
+    {
+       notice(s_GameServ, u, "You must be playing to go to the Tavern");
+       return;
+    }
+    p = user->stats;
+    if (!cmd)
+    {
+       notice(s_GameServ, u, "Welcome to Boot Liquors Mystic Apothecary");
+       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:");
+       notice(s_GameServ, u, "1. Healing Potions for %ld Gold", 1000 * p->level + (p->exp / 10));
+       notice(s_GameServ, u, "2. Strength Potions for %ld Gold", 2050 * p->level + (p->exp / 10));
+       notice(s_GameServ, u, "3. Defense Potions for %ld Gold", 2000 * p->level + (p->exp / 10));
+       notice(s_GameServ, u, "To buy a potion, type /msg %S TAVERN BUY #");
+       notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 1 buys a healing potion!");
+       notice(s_GameServ, u, "By something will ya!");
+    }
+    else if (stricmp(cmd, "BUY") == 0)
+    {
+       char *chnum = strtok(NULL, " ");
+       int num = stringtoint(chnum);
+
+       if (!chnum)
+       {
+           notice(s_GameServ, u, "SYNTAX: TAVERN BUY #");
+           notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 1");
+           return;
+       }
+       if (num < 1 || num > 3)
+       {
+           notice(s_GameServ, u, "Invalid Choice!");
+           notice(s_GameServ, u, "Here is a list of what we have to offer:");
+           notice(s_GameServ, u, "1. Healing Potions for %ld Gold", 1000 * p->level + (p->exp / 10));
+           notice(s_GameServ, u, "2. Strength Potions for %ld Gold", 2050 * p->level + (p->exp / 10));
+           notice(s_GameServ, u, "3. Defense Potions for %ld Gold", 2000 * p->level + (p->exp / 10));
+           notice(s_GameServ, u, "To buy a potion, type /msg %S TAVERN BUY #");
+           notice(s_GameServ, u, "Example: /msg %S TAVERN BUY 1 buys a healing potion!");
+       }
+       switch(num)
+       {
+           case 1:
+               price = (1000 * p->level) + (p->exp / 10);
+               if (p->gold >= price)
+               {
+                   notice(s_GameServ, u, "One healing potion coming right up!");
+                   p->inventory.incHealing();
+               } 
+               else
+                   notice(s_GameServ, u, "You don't have enough gold!");
+               break;
+           case 2:
+               price = (2050 * p->level) + (p->exp / 10);
+               if (p->gold >= price)
+               {
+                   notice(s_GameServ, u, "One strength boost coming right up!");
+                   p->inventory.incStrength();
+               }
+               else
+                   notice(s_GameServ, u, "You don't have enough gold!");
+               break;
+           case 3:
+               price = (2000 * p->level) + (p->exp / 10);
+               if (p->gold >= price)
+               {
+                   notice(s_GameServ, u, "One defense boost coming right up!");
+                   p->inventory.incDefense();
+               }
+               else
+                   notice(s_GameServ, u, "You don't have enough gold!");
+               break;
+           default:
+               notice(s_GameServ, u, "Logical Error. See a %S admin for help!");
+               break;
+       }
+    }
+}
+
 void do_bank(char *u)
 {
     char *cmd = strtok(NULL, " ");
@@ -2793,11 +2989,18 @@ void do_bank(char *u)
        notice (s_GameServ, u, "BANK BALANCE");
        return;
     }
-    else if (!is_playing(u) || !(user = find(u)))
+
+    user = find(u);
+    if (!is_playing(user))
     {
        notice(s_GameServ, u, "You must be playing to use the bank!");
        return;
     }
+    else if (!is_alive(user))
+    {
+       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!");
@@ -2918,18 +3121,24 @@ void do_bank(char *u)
 void do_master(char *u)
 {
     aClient *user;
-    if (!(user = find(u)))
+    user = find(u);
+
+    if (!user)
     {
        notice(s_GameServ, u, "Fatal error. Contact a(n) %S admin. buf: %s", strtok(NULL, ""));
        return;
     }
-
-    if (is_fighting(u))
+    else if (is_fighting(user))
     {
        notice(s_GameServ, u, "You're in the middle of a fight! Pay attention!");
        return;
     }
-    else if (!is_playing(u))
+    else if (!is_alive(user))
+    {
+       notice(s_GameServ, u, "You're dead. Wait until tomorrow to see your master!");
+       return;
+    }
+    else if (!is_playing(user))
     {
        notice(s_GameServ, u, "You must be playing to see your master!");
        return;
@@ -2939,6 +3148,12 @@ void do_master(char *u)
     Player *p = user->stats;
     long int need = 0;
 
+    if (seenMaster(p))
+    {
+       notice(s_GameServ, u, "You have already seen your master today. Wait until tomorrow to try again");
+       return;
+    }
+
     if (cmd != NULL)
     {
        switch(p->level)
@@ -2994,7 +3209,10 @@ void do_master(char *u)
     if (stricmp(cmd, "FIGHT") == 0)
     {
        if (p->exp >= need)
+       {
+           setMaster(p);
            see_master(u);
+       }
        else
            notice(s_GameServ, u, "You are not worthy of fighting %s! You need %ld more experience.", masters[p->level - 1]->name, (need - p->exp));
        return;
@@ -3017,13 +3235,14 @@ void do_master(char *u)
 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(u) && is_playing(u))
+    if (!is_fighting(user) && is_playing(user))
     {
        Player *p = user->stats;
        p->master = new Monster(masters[p->level - 1]);
@@ -3036,6 +3255,7 @@ void showBankBalance(const char *u)
 {
     aClient *user;
     Player *p;
+
     if (!(user = find(u)))
         return;
 
@@ -3069,9 +3289,10 @@ void refresh(Player *p)
        return;
 
     p->hp = p->maxhp;
-    p->forest_fights = 100;
+    p->forest_fights = forestfights;
     p->player_fights = 3;
     p->alive = true;
+    clearMaster(p);
 }
 
 void do_refresh(char *u)
@@ -3102,7 +3323,7 @@ void do_refresh(char *u)
     }
     else if ((user = find(nick)))
     {
-       if (user->stats)
+       if (is_playing(user))
        {
            notice(s_GameServ, u, "Refreshing %s.", user->getNick());
            refresh(user->stats);
@@ -3123,9 +3344,6 @@ void do_help(char *u)
 {
     char *cmd = strtok(NULL, " ");
 
-    if (cmd)
-       for (unsigned int x = 0; x < strlen(cmd); x++)
-           cmd[x] = tolower(cmd[x]);
     display_help(u, cmd);
 }
 
@@ -3159,6 +3377,10 @@ void display_help(char *u, char *file)
     else
     {
        char *filename;
+
+       for (unsigned int x = 0; x < strlen(file); x++)
+           file[x] = tolower(file[x]);
+
        filename = new char[strlen(file) + 12];
        sprintf(filename, "helpfiles/%s", file);
        infile.open(filename);
@@ -3197,7 +3419,12 @@ void do_admin(char *u)
        return;
     }
 
-    if (strcmp(pass, adminpass) == 0)
+    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);
@@ -3208,3 +3435,42 @@ void do_admin(char *u)
        return;
     }
 }
+
+bool load_monsters()
+{
+    ifstream infile;
+    infile.open("monsters.dat");
+
+    char *buf;
+
+    if (infile.fail())
+    {
+       cout << "Error opening monsters.dat" << endl;
+       return false;
+    }
+    init_monsters();
+    buf = new char[2048];
+
+  for (int l = 0; l < REALLEVELS; l++)
+  {
+    for (int m = 0; m < MONSTERS;)
+    {
+       infile.getline(buf, 2048);
+       if (buf[0] == '\n' || buf[0] == '\0' || buf[0] == '#')
+           continue;
+       else
+       {
+           strcpy(monsters[l][m]->name, strtok(buf, "~"));
+           strcpy(monsters[l][m]->weapon, strtok(NULL, "~"));
+           monsters[l][m]->strength = stringtoint(strtok(NULL, "~"));
+           monsters[l][m]->gold = stringtoint(strtok(NULL, "~"));
+           monsters[l][m]->exp = stringtoint(strtok(NULL, "~"));
+           monsters[l][m]->maxhp = stringtoint(strtok(NULL, "~"));
+           strcpy(monsters[l][m]->death, strtok(NULL, ""));
+           m++;
+       }
+    }
+  }
+    delete [] buf;
+return true;
+}