/****************************************************
 *	      All weight function are coded here		*										
 *               Done by Moongraven					*
 ****************************************************/

#include "uox3.h"

#define GOLD_WEIGHT 0.02

float calcweight(int p)	//First let's grab all item that player wear
{
	int p1, p2, p3, p4;
	unsigned int i;
	float totalweight=0;
	tile_st tile;

	p1=chars[p].ser1;
	p2=chars[p].ser2;
	p3=chars[p].ser3;
	p4=chars[p].ser4;


	for (i=0;i<itemcount;i++)
	
		if ((items[i].cont1==p1)&&(items[i].cont2==p2)
	    	&&(items[i].cont3==p3)&&(items[i].cont4==p4)&&(!items[i].free))
		{
		  if(items[i].type==1 &&(items[i].id1!=0x09 && items[i].id2!=0xAB))
		  {
			  seektile((items[i].id1*256)+items[i].id2, &tile);
		      totalweight += tile.weight;
			  totalweight += calcweightpack(i);
		  }
		  else 
		  { 
			  if (items[i].id1!=0x09 && items[i].id2!=0xAB)
			  {
				seektile((items[i].id1*256)+items[i].id2, &tile);
				if (tile.weight==0)	totalweight += (items[i].amount*0.02);
				else totalweight += (items[i].amount*tile.weight);
			  }
		  }
		}
	
	return totalweight;
}
	
float calcweightpack(int backpack) 	//Next let's grab all item in player backpack
{
	int k;
	unsigned int i;
	float totalweight=0;
	tile_st tile;


    k=backpack;
    for (i=0;i<itemcount;i++)
	
		if((items[i].cont1==items[k].ser1)&&(items[i].cont2==items[k].ser2)&&
			(items[i].cont3==items[k].ser3)&&(items[i].cont4==items[k].ser4)&&(!items[i].free))
		{
			if (items[i].type==1||items[i].type==8)
			{
				seektile((items[i].id1*256)+items[i].id2, &tile);
		        totalweight += tile.weight;
			 	totalweight += calcweightpack(i);
			}
			else 
			{
				seektile((items[i].id1*256)+items[i].id2, &tile);
				if (tile.weight==0)	
				{
					if(items[i].id1==0x0E&&items[i].id2==0xED)
						totalweight += (items[i].amount*GOLD_WEIGHT);
					else totalweight += (items[i].amount*0.1);
				}
				else totalweight += (items[i].amount*tile.weight);
			}
		}
	return totalweight;
}

char CheckMaxWeightPack(int chars) //Check max capacity of container
{								   //Not used for now 
	int pack;
	unsigned int i;
	float totalweight=0;
	tile_st tile;

	pack=packitem(chars);
    for (i=0;i<itemcount;i++)
	
		if((items[i].cont1==items[pack].ser1)&&(items[i].cont2==items[pack].ser2)&&
			(items[i].cont3==items[pack].ser3)&&(items[i].cont4==items[pack].ser4)&&(!items[i].free))
		{
			if(items[i].type==1||items[i].type==8) totalweight += calcweightpack(i);
			else 
			{
				seektile((items[i].id1*256)+items[i].id2, &tile);
				totalweight += (items[i].amount*tile.weight);
			}
		}
		if (items[pack].weight>=totalweight) return 0;
		else 
		{
		  sysmessage(chars,"Your backpack are full!");
		  return 1;
		}
}

int checkweight(int s, int k) // Check when player is walking if overloaded
{
   if ((chars[s].weight > (chars[s].st*WEIGHT_PER_STR)+30))
   {
	   float res=(chars[s].weight - ((chars[s].st*WEIGHT_PER_STR)+30))*2;
	
	   chars[s].stm -= (int)res;
	   if (chars[s].stm<=0)
      {
         chars[s].stm=0;
	      return 0;
	   }
   }
   return 1;
}

void additemweight(int i, int s) //add weight of this item  on  player's weight
{
   tile_st tile;
   
   seektile((items[i].id1*256)+items[i].id2, &tile);
   if (items[i].type==1||items[i].type==8) //if item is container add container
   {									    //and all item  weight
	   chars[s].weight +=tile.weight;
       chars[s].weight += calcweightpack(i);
   }
   else
   {
	  if (tile.weight==0)	
	   {
		if(items[i].id1==0x0E && items[i].id2==0xED)
			chars[s].weight += (items[i].amount*GOLD_WEIGHT);
		else chars[s].weight += (items[i].amount*0.1);
	   }	
	   else chars[s].weight += (items[i].amount*tile.weight);
   }
}

void subtractitemweight(int i, int s) //subtract weight of this item on player's weight
{									  
   tile_st tile;

   seektile((items[i].id1*256)+items[i].id2, &tile);
   if (items[i].type==1||items[i].type==8) //if item is container subtract container 
   {									   //and all item  weight
  	    chars[s].weight -= tile.weight;
        chars[s].weight -= calcweightpack(i);
   }
   else
   {
	   if (tile.weight==0)	
	   {
		if(items[i].id1==0x0E&&items[i].id2==0xED)
			chars[s].weight -= (items[i].amount*GOLD_WEIGHT);
		else chars[s].weight -= (items[i].amount*0.1);
	   }	
	   else chars[s].weight -= (items[i].amount*tile.weight);
   }
}

int checkwhereitem( int pack, int i, int s)
{
  
  if (!((items[i].cont1==items[pack].ser1 && items[i].cont2==items[pack].ser2 &&
         items[i].cont3==items[pack].ser3 && items[i].cont4==items[pack].ser4 )||
	    (items[i].cont1==chars[currchar[s]].ser1&&items[i].cont2==chars[currchar[s]].ser2&&
	     items[i].cont3==chars[currchar[s]].ser3&&items[i].cont4==chars[currchar[s]].ser4)))
	
	    return 1;
  else return 0;
}

void subtractquanweight(int i, int s, int total) //subtract weight of this item on player's weight
{									  
   tile_st tile;

   seektile((items[i].id1*256)+items[i].id2, &tile);
   	   if (tile.weight==0)	
	   {
		if(items[i].id1==0x0E&&items[i].id2==0xED)
			chars[s].weight -= (total*GOLD_WEIGHT);
		else chars[s].weight -= (total*0.1);
	   }	
	   else chars[s].weight -= (total*tile.weight);
  
}

void addamountweight(int i, int s, int amount) //add weight of this item  on  player's weight
{
   tile_st tile;
   
   seektile((items[i].id1*256)+items[i].id2, &tile);
     if (tile.weight==0)	
	   {
		if(items[i].id1==0x0E && items[i].id2==0xED)
			chars[currchar[s]].weight += (amount*GOLD_WEIGHT);
		else chars[currchar[s]].weight += (amount*0.1);
	   }	
	   else chars[currchar[s]].weight += (amount*tile.weight);
   
}

int whereitem( int p, int i, int s) // To find if item are in possesion of player
{									// If return is 1 item are not on player otherwise they are on	
	if ((items[i].cont1==255 && items[i].cont2==255 && items[i].cont3==255 && items[i].cont4==255)||
		(items[p].cont1==255 && items[p].cont2==255 && items[p].cont3==255 && items[p].cont4==255)||
		(items[p].id1==0x09 && items[p].id2==0xAB))  return 1;

	else if ((items[i].cont1==items[p].ser1 && items[i].cont2==items[p].ser2 &&
			  items[i].cont3==items[p].ser3 && items[i].cont4==items[p].ser4)||
             (items[i].cont1==chars[currchar[s]].ser1 && items[i].cont2==chars[currchar[s]].ser2 &&
		      items[i].cont3==chars[currchar[s]].ser3 && items[i].cont4==chars[currchar[s]].ser4))
			 return 0;
	else return (wheresub(i,p));
}

int wheresub(int i, int p) // If item are in a subcontainer posseded by player 
{						   // If return is 1 item are not on player otherwise they are on
	for (unsigned int a=0;a<itemcount;a++)
	{
		if (items[i].cont1==items[a].ser1 && items[i].cont2==items[a].ser2 &&
			items[i].cont3==items[a].ser3 && items[i].cont4==items[a].ser4   )
		{
		if (items[a].cont1==items[p].ser1 && items[a].cont2==items[p].ser2 &&
			items[a].cont3==items[p].ser3 && items[a].cont4==items[p].ser4   )
				 return 0;

			else if ((items[a].cont1==255 && items[a].cont2==255 &&
				      items[a].cont3==255 && items[a].cont4==255) ||
					 (items[a].id1==0x09 && items[a].id2==0xAB)) 
					 return 1;

			else return (wheresub(a,p));
		}
	}
	return 1;
}