#include "sha_subr_methds"
 #include "nw_i0_tool"


void main()
{
     object oPC = OBJECT_SELF;
     object Drow = GetObjectByTag("DROW_FACTION");
     object Alushri = GetObjectByTag("DROW_FACTION_ALUSHRI");
     object Somarish = GetObjectByTag("DROW_FACTION_SOMARISH");
     object Luentrazen = GetObjectByTag("DROW_FACTION_LUENTRAZEN");
     object Szithdra = GetObjectByTag("DROW_FACTION_SZITHDRA");
     object Ogelend = GetObjectByTag("DROW_FACTION_OGELEND");
     object Mamaluen = GetObjectByTag("DROW_FACTION_MAMALUEN");
     object Kothyrlie = GetObjectByTag("DROW_FACTION_KOTHYRLIE");
     object Illindith = GetObjectByTag("DROW_FACTION_ILLINDITH");

     object Commoner = GetObjectByTag("COMMONER_FACTION");
     object Defender = GetObjectByTag("DEFENDER_FACTION");
     object Merchant = GetObjectByTag("MERCHANT_FACTION");

     object Dryad = GetObjectByTag("FACTION_DRYAD");
     object Ranger = GetObjectByTag("FACTION_RANGER");
     object Mage = GetObjectByTag("FACTION_MAGE");
     object Monk = GetObjectByTag("FACTION_MONK");
     object Bard = GetObjectByTag("FACTION_BARD");
     object Rogue = GetObjectByTag("FACTION_ROGUE");
     object Barbarian = GetObjectByTag("FACTION_BARBARIAN");
     object Fighter = GetObjectByTag("FACTION_FIGHTER");
     object Paladin = GetObjectByTag("FACTION_PALADIN");
     object Druid = GetObjectByTag("FACTION_DRUID");
     object Tanzantor = GetObjectByTag("FACTION_TANZANTOR");
     object Myratherendi = GetObjectByTag("FACTION_MYRATHEREND");
     object DarkElf = GetObjectByTag("FACTION_DARKELF");

     AdjustReputation(oPC, Myratherendi, -100);
     AdjustReputation(oPC, DarkElf, -100);
     AdjustReputation(oPC, Drow, 100);
     AdjustReputation(oPC, Drow, -50);

     AdjustReputation(oPC, Alushri, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_1"))
     {
        AdjustReputation(oPC, Alushri, -50);
     }

     AdjustReputation(oPC, Somarish, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_2"))
     {
         AdjustReputation(oPC, Somarish, -50);
     }

     AdjustReputation(oPC, Luentrazen, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_3"))
     {
         AdjustReputation(oPC, Luentrazen, -50);
     }

     AdjustReputation(oPC, Szithdra, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_4"))
     {
         AdjustReputation(oPC, Szithdra, -50);
     }

     AdjustReputation(oPC, Ogelend, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_5"))
     {
         AdjustReputation(oPC, Ogelend, -50);
     }

     AdjustReputation(oPC, Mamaluen, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_6"))
     {
          AdjustReputation(oPC, Mamaluen, -50);
     }

     AdjustReputation(oPC, Kothyrlie, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_7"))
     {
          AdjustReputation(oPC, Kothyrlie, -50);
     }

     AdjustReputation(oPC, Illindith, 100);
     if(!HasItem(GetPCSpeaker(), "SHA_HOUSE_INSIGNIA_8"))
     {
        AdjustReputation(oPC, Illindith, -50);
     }

     AdjustReputation(oPC, Commoner, -100);
     SetStandardFactionReputation(STANDARD_FACTION_COMMONER, -100, oPC);
     AdjustReputation(oPC, Merchant, -100);
     SetStandardFactionReputation(STANDARD_FACTION_MERCHANT, -100, oPC);
     AdjustReputation(oPC, Defender, -100);
     SetStandardFactionReputation(STANDARD_FACTION_DEFENDER, -100, oPC);

     AdjustReputation(oPC, Dryad, -100);
     AdjustReputation(oPC, Ranger, -100);
     AdjustReputation(oPC, Mage, -100);
     AdjustReputation(oPC, Monk, -100);
     AdjustReputation(oPC, Bard, -100);
     AdjustReputation(oPC, Rogue, -100);
     AdjustReputation(oPC, Barbarian, -100);
     AdjustReputation(oPC, Fighter, -100);
     AdjustReputation(oPC, Paladin, -100);
     AdjustReputation(oPC, Druid, -100);
     AdjustReputation(oPC, Tanzantor, -100);

    SHA_SendSubraceMessageToPC(oPC, "Your faction has been adjusted to Drow");
}