#include "rd_questinc"
#include "rd_spawnzones"

void main()
{
object oPC;
object oBoss;
int iMaxSpots;
int iSpawn;
int iLevel;
int iDifficulty;
string sTag;
string sZone;

oPC=GetPCSpeaker();
iLevel = GetHitDice(oPC);
SetPartyInt(oPC,"EvilQuest",2);
SetPartyInt(oPC,"QuestStep",1);

sZone = GetZone(oPC);
iMaxSpots = GetMaxQuestSpots(sZone);
iSpawn = Random(iMaxSpots)+1;
sTag = sZone + "_Q_" + IntToString(iSpawn);

iLevel = GetHitDice(oPC);
GetParty(iLevel,sTag,1);

SetPartyInt(oPC,"QuestType",3);
SetPartyString(oPC,"QuestTargetNPC",GetTag(OBJECT_SELF));
SetPartyString(oPC,"QuestCreatureTag",sTag + "_S");
iDifficulty =1;
SetPartyInt(oPC,"QuestDifficulty",iDifficulty);
}