#include "rd_treasure"

void main()
{
location lLoc;
object oDross;
object oPC;
object oGuard;
int iFlag;

oPC = GetPCSpeaker();

oGuard = GetObjectByTag("RP1_P_S");
while (GetIsObjectValid(oGuard))
    {
    DestroyObject(oGuard);
    oGuard = GetObjectByTag("RP1_P_S");
    }

lLoc = GetLocation(GetObjectByTag("RP1_P"));
oDross = CreateObject(OBJECT_TYPE_CREATURE,"en4_cdross",lLoc,FALSE,"RP1_P_S");
CreateObject(OBJECT_TYPE_CREATURE,"en4_cdross_g",lLoc,FALSE,"RP1_P_S");
CreateObject(OBJECT_TYPE_CREATURE,"en4_cdross_g",lLoc,FALSE,"RP1_P_S");

if (Random(10)==0)
    GetMagicItem(oDross);

object oPartyMember = GetFirstFactionMember(oPC, TRUE);
while (GetIsObjectValid(oPartyMember) == TRUE)
    {
    SetLocalInt(oPartyMember,"EvilQuest",1);
    oPartyMember = GetNextFactionMember(oPC, TRUE);
    }
}