#include "rd_questinc"

void main()
{
object oPC;
object oBoss;
int iVariance;
int iLevel;
int iAdjustedLevel;
string sTokenLine;
string sTag;

oPC = GetPCSpeaker();

SetPartyInt(oPC,"QuestStep",1);
SetLocalString(oPC,"QuestGiver",GetTag(OBJECT_SELF));
SetLocalInt(oPC,"Quest",1);
SetCustomToken(111, "");
SetCustomToken(112, "");
SetCustomToken(113, "");

SetToken(oPC,OBJECT_SELF,103,GetName(OBJECT_SELF));

iLevel = GetHitDice(oPC);
iAdjustedLevel = GetAdjustedLevel(oPC);
iAdjustedLevel = ZoneLevel(GetArea(oPC),iAdjustedLevel);


if (iAdjustedLevel<10)
    sTag = "summon2";
else if (iAdjustedLevel<16)
    sTag = "summon5";
else if (iAdjustedLevel<25)
    sTag = "summon6";
else if (iAdjustedLevel<35)
    sTag = "fiend";
else
    sTag = "demon";

if (Random(2)==0 || iAdjustedLevel < 4)
    oBoss = GetRandomQuestMobs(oPC,OBJECT_SELF,0,sTag);
else
    oBoss = GetQuestCamp(oPC,OBJECT_SELF,sTag);

sTokenLine = "I need to eliminate some demons located " + GetToken(102) + ".";
sTokenLine = FixTokenLine(sTokenLine,"REPEAT");
SetToken(oPC,OBJECT_SELF,111,sTokenLine);


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

}