#include "rd_evilqstinc"


void main()
{
object oPC;
object oBoss;
string sTag;
string sTokenLine;
int iRandom;

oPC = GetPCSpeaker();

SetPartyInt(oPC,"QuestStep",1);
SetPartyInt(oPC,"QuestSteps",1);
SetPartyString(oPC,"QuestGiver",GetTag(OBJECT_SELF));
SetPartyInt(oPC,"Quest",1);
SetCustomToken(111, "");
SetCustomToken(112, "");
SetCustomToken(113, "");
SetToken(oPC,OBJECT_SELF,103,GetName(OBJECT_SELF));

iRandom = Random(2)+1;
SetLocalInt(OBJECT_SELF,"Quest",iRandom);

if (iRandom == 1)
    {
    sTag=GetGoodCamp(oPC);
    oBoss = GetQuestCamp(oPC,OBJECT_SELF,sTag);
    sTokenLine = "I need to eliminate some " + GetToken(101) + " located " + GetToken(102) + ".";
    sTokenLine = FixTokenLine(sTokenLine,"REPEAT");
    SetToken(oPC,OBJECT_SELF,111,sTokenLine);
    }

if (iRandom == 2)
    {
    sTag=GetGoodCamp(oPC);
    oBoss = GetRandomQuestMobs(oPC,OBJECT_SELF,0,sTag);
    sTokenLine = "I need to eliminate a" + GetToken(101) + " located " + GetToken(102) + ".";
    sTokenLine = FixTokenLine(sTokenLine,"REPEAT");
    SetToken(oPC,OBJECT_SELF,111,sTokenLine);
    }

RemoveJournalQuestEntry("jDelivery",oPC);
RemoveJournalQuestEntry("jCamp",oPC);
AddJournalQuestEntry("jCamp",1,oPC);
}