#include "prc_inc_spells"
#include "prc_inc_template"
#include "sha_subr_methds"

void main()
{
	int isLycan		= GetLevelByClass(CLASS_TYPE_WEREWOLF, OBJECT_SELF);
	int iRacial 	= MyPRCGetRacialType(OBJECT_SELF);
	
	if(isLycan)
	{
		return;
	}
	
	if(GetRacialType(OBJECT_SELF) == RACIAL_TYPE_DROW_FEMALE ||
			GetRacialType(OBJECT_SELF) == RACIAL_TYPE_DROW_MALE)
	{
		SHA_SendSubraceMessageToPC(OBJECT_SELF, "s_faction: Found drow faction.");
		ExecuteScript("s_faction_drow", OBJECT_SELF);
		return;
	}
	
	if((iRacial == RACIAL_TYPE_UNDEAD) 	&&
			(GetHasTemplate(TEMPLATE_ARCHLICH, OBJECT_SELF) == FALSE	&&
			GetLevelByClass(CLASS_TYPE_BAELNORN, OBJECT_SELF) == FALSE))			
	{
		SHA_SendSubraceMessageToPC(OBJECT_SELF, "s_faction: Found undead faction.");
		ExecuteScript("s_faction_vampir", OBJECT_SELF);
		return;
	}
	
/* 	else if(Subrace == "lich" || Subrace == "lich")
	{
		ExecuteScript("s_faction_vampir", OBJECT_SELF);
		return;
	} */
	
	if(GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HALFDROW)
	{
		SHA_SendSubraceMessageToPC(OBJECT_SELF, "s_faction: Found dark elf faction.");
		ExecuteScript("s_faction_darkel", OBJECT_SELF);
		return;
	} 
	
	if( GetRacialType(OBJECT_SELF) == RACIAL_TYPE_GNOLL	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_TROLL	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_FERAL_GARGUN	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HAGSPAWN	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_TAER	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_FLIND	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_OGRE	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_MINOTAUR	||
				GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HALFOGRE )   
   {
      SHA_SendSubraceMessageToPC(OBJECT_SELF, "s_faction: Found giant faction.");
	  ExecuteScript(" s_faction_giant", OBJECT_SELF);
      return;
   }

   else
   {
       return;
   }
}