34 lines
678 B
Plaintext
34 lines
678 B
Plaintext
|
#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);
|
||
|
|
}
|