276 lines
8.5 KiB
Plaintext
276 lines
8.5 KiB
Plaintext
|
void main()
|
||
|
|
{
|
||
|
|
|
||
|
|
|
||
|
|
if (GetLocalInt(OBJECT_SELF, "CQ1") == 0)
|
||
|
|
{
|
||
|
|
SetLocalInt(OBJECT_SELF, "CQ1", 1);
|
||
|
|
int nDiceRoll1 = d4(1);
|
||
|
|
string StrMob1 = IntToString(nDiceRoll1);
|
||
|
|
|
||
|
|
switch(nDiceRoll1)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob1", 1);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob1", 2);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob1", 3);
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob1", 4);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
int nLocation1 = d10(1);
|
||
|
|
string sCQloc1 = ("CQ_WP_0" + IntToString(nLocation1));
|
||
|
|
location lLocation1 = GetLocation(GetWaypointByTag(sCQloc1));
|
||
|
|
|
||
|
|
switch(nLocation1)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the bars in Heija.");
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the bars in Heija.");
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the Elven City of Sallen.");
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the Dwarven City of Amanbrakul.");
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Word is this one might be working with the Oxen in Heija.");
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Rumors have it he has been seen around the Leistran Wharfs. Maybe this one took work there.");
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the bars in the Hur Krull.");
|
||
|
|
break;
|
||
|
|
case 8:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the bars in the Hur Krull.");
|
||
|
|
break;
|
||
|
|
case 9:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "This one is rumored to have taken shelter in Fehn.");
|
||
|
|
break;
|
||
|
|
case 10:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc1", "Search the bars in Birka.");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
CreateObject(OBJECT_TYPE_CREATURE, "cq_mob1_0"+StrMob1, lLocation1);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
if (GetLocalInt(OBJECT_SELF, "CQ2") == 0)
|
||
|
|
{
|
||
|
|
SetLocalInt(OBJECT_SELF, "CQ2", 1);
|
||
|
|
|
||
|
|
int nDiceRoll2 = d4(1);
|
||
|
|
string StrMob2 = IntToString(nDiceRoll2);
|
||
|
|
|
||
|
|
switch(nDiceRoll2)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob2", 1);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob2", 2);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob2", 3);
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob2", 4);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
int nLocation2x = d10(1);
|
||
|
|
int nLocation2 = nLocation2x + 10;
|
||
|
|
string sCQloc2 = ("CQ_WP_0" + IntToString(nLocation2));
|
||
|
|
location lLocation2 = GetLocation(GetWaypointByTag(sCQloc2));
|
||
|
|
|
||
|
|
|
||
|
|
switch(nLocation2x)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "Rumors are this one took a job in Gehln.");
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "Look to the frigid hunting grounds of Friowald.");
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "Rumors say this one had a hermit friend that lives in Friowald. Seek him there.");
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "This one is said to be hiding in the Heijan Catacombs.");
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "This one was a friend of the Kobolds. Our sources say he returned to Vesrilia.");
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "Sources say this one has taken up in the abandoned keep in Nauchtor.");
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "Sources say this one has joined with the Tanglethorn pirates.");
|
||
|
|
break;
|
||
|
|
case 8:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "Seek this one in the abandoned keep in Crepsnar Forest.");
|
||
|
|
break;
|
||
|
|
case 9:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "We have reliable information that is hiding amongst the bugbears in Rjkali.");
|
||
|
|
break;
|
||
|
|
case 10:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc2", "This one was last seen leaving Leistra by the West, and never seen again. Seek in the area of Trinland.");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
CreateObject(OBJECT_TYPE_CREATURE, "cq_mob2_0"+StrMob2, lLocation2);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
if (GetLocalInt(OBJECT_SELF, "CQ3") == 0)
|
||
|
|
{
|
||
|
|
|
||
|
|
SetLocalInt(OBJECT_SELF, "CQ3", 1);
|
||
|
|
|
||
|
|
int nDiceRoll3 = d4(1);
|
||
|
|
string StrMob3 = IntToString(nDiceRoll3);
|
||
|
|
|
||
|
|
|
||
|
|
switch(nDiceRoll3)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob3", 1);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob3", 2);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob3", 3);
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob3", 4);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
int nLocation3x = d10(1);
|
||
|
|
int nLocation3 = nLocation3x + 20;
|
||
|
|
string sCQloc3 = ("CQ_WP_0" + IntToString(nLocation3));
|
||
|
|
location lLocation3 = GetLocation(GetWaypointByTag(sCQloc3));
|
||
|
|
|
||
|
|
|
||
|
|
switch(nLocation3x)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "Rumors say this one is under the protection of the Third Vargul Cohort.");
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "Spies tell us that this one hides in Wynfaire.");
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "A captain swears he dropped this one off in the Daosian Foreign Quarter.");
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "We believe this one has fled to Hafir.");
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "This one was last seen taking a boat down the River Seing.");
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "This one no doubt has fallen back in with the Osiria Smugglers.");
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "A friend of the A'Tsuanmu Ratlic, and I believe sheltered by him.");
|
||
|
|
break;
|
||
|
|
case 8:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "Daosian spies tell us that this one may be hiding in Ur'katan");
|
||
|
|
break;
|
||
|
|
case 9:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "This one disappeared into the frigid hinterlands of Friowald.");
|
||
|
|
break;
|
||
|
|
case 10:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc3", "This one disappeared into the frigid hinterlands of Friowald.");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
CreateObject(OBJECT_TYPE_CREATURE, "cq_mob3_0"+StrMob3, lLocation3);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
if (GetLocalInt(OBJECT_SELF, "CQ4") == 0)
|
||
|
|
{
|
||
|
|
|
||
|
|
SetLocalInt(OBJECT_SELF, "CQ4", 1);
|
||
|
|
|
||
|
|
int nDiceRoll4 = d4(1);
|
||
|
|
string StrMob4 = IntToString(nDiceRoll4);
|
||
|
|
|
||
|
|
|
||
|
|
switch(nDiceRoll4)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob4", 1);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob4", 2);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob4", 3);
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalInt(OBJECT_SELF, "cq_mob4", 4);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
int nLocation4x = d10(1);
|
||
|
|
int nLocation4 = nLocation4x + 30;
|
||
|
|
string sCQloc4 = ("CQ_WP_0" + IntToString(nLocation4));
|
||
|
|
location lLocation4 = GetLocation(GetWaypointByTag(sCQloc4));
|
||
|
|
|
||
|
|
|
||
|
|
switch(nLocation4x)
|
||
|
|
{
|
||
|
|
case 1:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "We believe that Council Member Rensyk shelters this one. No exceptions can be made.");
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "This one had strange ties to the Argul.");
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "This one came out of the West, and was a servant of Hasslich.");
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "We have reason to believe this one is being sheltered by the A'Tsunamu in Falgarath. No exceptions can be made.");
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "We have reason to believe this one is being sheltered by the A'Tsunamu in Falgarath. No exceptions can be made.");
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "We have reason to believe this one is being sheltered by the A'Tsunamu in Falgarath. No exceptions can be made.");
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "We have reason to believe this one is being sheltered by the A'Tsunamu in Falgarath. No exceptions can be made.");
|
||
|
|
break;
|
||
|
|
case 8:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "We have reason to believe this one is being sheltered by Wyser in Osiria. No exceptions can be made.");
|
||
|
|
break;
|
||
|
|
case 9:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "Spies tell us this one is being sheltered in Daos.");
|
||
|
|
break;
|
||
|
|
case 10:
|
||
|
|
SetLocalString(OBJECT_SELF, "strCQloc4", "Rumors have it that this one is sheltered in the Temples of Hafir.");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
CreateObject(OBJECT_TYPE_CREATURE, "cq_mob4_0"+StrMob4, lLocation4);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
}
|