45 lines
1021 B
Plaintext
45 lines
1021 B
Plaintext
|
#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);
|
||
|
|
|
||
|
|
}
|
||
|
|
|