#include "rd_questinc"
#include "sql_db_partywide"

void main()
{
	int iRandom;
	int iQuest;
	int iQuestStepType;
	object oPC;
	object oGiver;
	object oBoss;

	oPC = GetPCSpeaker();
	oGiver = OBJECT_SELF;

	SetToken(oPC,oGiver,110,"Thank you.");

	SetPartyString(oPC,"QuestStep1Token111","REPEAT");
	SetPartyString(oPC,"QuestStep1Token112","REPEAT");
	SetPartyString(oPC,"QuestStep1Token113","REPEAT");

	iQuest = 130;
	SetPartyInt(oPC,"QuestSteps",3);
	iQuestStepType = 2;
	SetPartyString(oPC,"QuestStep1Item","en4_letter3");
	SetPartyInt(oPC,"QuestStep1ItemUnknown",1);

	SetPartyInt(oPC,"QuestDifficulty",10);
	SetPartyInt(oPC,"Quest",iQuest);
	SetPartyInt(oPC,"OnOverallQuest",1);
	SetPartyInt(oPC,"QuestStep",1);
	SetPartyString(oPC,"QuestGiver",GetTag(oGiver));
	SetPartyString(oPC,"QuestZone",GetZone(oPC));
	SetLocalInt(GetModule(),GetZone(oPC),1);
	SetPartyInt(oPC,"QuestDone",0);

	SetLocalInt(GetModule(),"UniqueBoss",1);
	SetupQuestStep(iQuestStepType,1,oPC,oGiver);
	SetLocalInt(GetModule(),"UniqueBoss",0);
	RemoveJournalQuestEntry("jCamp",oPC);

	SetLocalInt(oPC,"Overall4NotAccepted",0);
	SQL_SetLocalIntOnAll(oPC,"OverallQuest",130);

	oBoss = GetObjectByTag(GetLocalString(oPC,"QuestTargetMob"));
	GetMagicItem(oBoss);
}