Finished splitting files, and updated dependencies.

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

#include "extern.h"
#include "aClient.h"
#include "flags.h"
#include "options.h"
#include "player.h"
#include "item.h"
#include "pouch.h"

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