#include "rd_questinc"

void main()
{
object oPC;
int iLevel;
int iAdjustedLevel;
int iQuestType;
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",2);
SetCustomToken(111, "");
SetCustomToken(112, "");
SetCustomToken(113, "");

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

if (iAdjustedLevel < 12 || iAdjustedLevel > 25)
    iQuestType = Random(2)+1;
else
    iQuestType = Random(3)+1;

SetPartyInt(oPC,"SpecialQuestType",iQuestType);
SetPartyInt(oPC,"QuestLevel",iAdjustedLevel);

sTokenLine = "I need to help the people of Nirra Hamlett.";
sTokenLine = FixTokenLine(sTokenLine,"REPEAT");
SetToken(oPC,OBJECT_SELF,111,sTokenLine);


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

}