#include "rd_questinc"
#include "rd_advzones"

void main()
{
object oPC;
object oBoss;
int iLevel;
int iAdjustedLevel;
int iQuestType;
int iZones;
int iDifficulty;
string sTokenLine;

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

SetPartyInt(oPC,"QuestStep",1);
SetPartyString(oPC,"QuestGiver",GetTag(OBJECT_SELF));
SetPartyInt(oPC,"Quest",1);
SetPartyInt(oPC,"QuestType",1);
SetPartyInt(oPC,"QuestAdventureZone",1);
SetPartyString(oPC,"AZRespawn",GetTag(OBJECT_SELF));

oBoss = SetupAdventureZones(iAdjustedLevel,1);
SetPartyString(oPC,"QuestStep1Mob",GetTag(oBoss));
SetPartyString(oPC,"QuestTargetMob",GetTag(oBoss));
SetToken(oPC,OBJECT_SELF,101,GetLocalString(oBoss,"sCD"));

iZones = GetLocalInt(GetModule(),"AdvZones");
if (iZones < 3)
    iDifficulty = 2;
else if (iZones < 5)
    iDifficulty = 3;
else
    iDifficulty = 4;
SetPartyInt(oPC,"QuestDifficulty",iDifficulty);

SetCustomToken(105, GetName(oBoss));

SetCustomToken(111, "");
SetCustomToken(112, "");
SetCustomToken(113, "");

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


sTokenLine = GetName(OBJECT_SELF) + " has sent me into a dungeon to eliminate the source of evil.";
sTokenLine = FixTokenLine(sTokenLine,"REPEAT");
SetToken(oPC,OBJECT_SELF,111,sTokenLine);


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

}