50 lines
1.1 KiB
Plaintext
50 lines
1.1 KiB
Plaintext
#include "rd_questinc"
|
|
#include "rd_spawnzones"
|
|
|
|
void main()
|
|
{
|
|
object oPC;
|
|
object oItem;
|
|
int iRandom;
|
|
int iLevel;
|
|
int iDifficulty;
|
|
string sRandomNPC;
|
|
string sCampType;
|
|
|
|
oPC=GetPCSpeaker();
|
|
iLevel = GetHitDice(oPC);
|
|
SetPartyInt(oPC,"EvilQuest",3);
|
|
SetPartyInt(oPC,"QuestStep",1);
|
|
|
|
iRandom = Random(3)+1;
|
|
switch (iRandom)
|
|
{
|
|
case 1: sRandomNPC = "xander"; break;
|
|
case 2: sRandomNPC = "en3_Vastin"; break;
|
|
case 3: sRandomNPC = "en3_Zach"; break;
|
|
}
|
|
|
|
iRandom = Random(2)+1;
|
|
switch (iRandom)
|
|
{
|
|
case 1: sCampType = "elf"; break;
|
|
case 2: sCampType = "dwarf"; break;
|
|
}
|
|
|
|
if (sRandomNPC == "xander" && GetTag(OBJECT_SELF) == "xander")
|
|
sRandomNPC = "en3_Vastin";
|
|
if (sRandomNPC == "en3_Vastin" && GetTag(OBJECT_SELF) == "en3_Vastin")
|
|
sRandomNPC = "en3_Zach";
|
|
if (sRandomNPC == "en3_Zach" && GetTag(OBJECT_SELF) == "en3_Zach")
|
|
sRandomNPC = "xander";
|
|
|
|
oItem = CreateItemOnObject("en3_letter",oPC);
|
|
|
|
SetPartyInt(oPC,"QuestType",2);
|
|
SetPartyString(oPC,"QuestTargetNPC",sRandomNPC);
|
|
SetPartyString(oPC,"QuestItemTag","en3_letter");
|
|
SetPartyString(oPC,"QuestAttackers",sCampType);
|
|
iDifficulty =1;
|
|
SetPartyInt(oPC,"QuestDifficulty",iDifficulty);
|
|
}
|