451 lines
13 KiB
Plaintext
451 lines
13 KiB
Plaintext
|
#include "nw_i0_tool"
|
||
|
|
#include "rd_treasure"
|
||
|
|
#include "rd_misc"
|
||
|
|
#include "utl_i_sqluuid"
|
||
|
|
|
||
|
|
void SetPartyVariables(object oPC);
|
||
|
|
void GivePartyMagicItem(object oPC);
|
||
|
|
void GivePartyQuestPoints(object oPC, int iQuestPoints);
|
||
|
|
void GivePartyMinorMagicItem(object oPC);
|
||
|
|
void GivePartyCharSpecific(object oPC);
|
||
|
|
void GivePartyQuestCredit(object oPC);
|
||
|
|
void SetPartyQuestType(object oPC);
|
||
|
|
|
||
|
|
void main()
|
||
|
|
{
|
||
|
|
int iDifficulty;
|
||
|
|
int iGold;
|
||
|
|
int iXP;
|
||
|
|
int iChance;
|
||
|
|
int iRandom;
|
||
|
|
int iMod;
|
||
|
|
int iLevel;
|
||
|
|
int iQuestPoints;
|
||
|
|
int iMaxLevel;
|
||
|
|
int iQuests;
|
||
|
|
object oPC;
|
||
|
|
|
||
|
|
oPC = GetPCSpeaker();
|
||
|
|
|
||
|
|
if (GetLocalInt(oPC,"QuestType") == 1)
|
||
|
|
AddJournalQuestEntry("jCamp",12,oPC);
|
||
|
|
else if (GetLocalInt(oPC,"QuestType") == 2)
|
||
|
|
AddJournalQuestEntry("jDelivery",2,oPC);
|
||
|
|
else if (GetLocalInt(oPC,"QuestType") == 3)
|
||
|
|
AddJournalQuestEntry("jSpecial",2,oPC);
|
||
|
|
|
||
|
|
if (GetLocalInt(oPC,"QuestAdventureZone") > 0)
|
||
|
|
{
|
||
|
|
SetLocalInt(GetModule(),"AdventureZone",0);
|
||
|
|
SetLocalInt(GetModule(),"AdvZones",0);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (GetLocalInt(oPC,"HTCAbandonedHouse1") == 1)
|
||
|
|
{
|
||
|
|
SetLocalInt(GetModule(),"HTCAbandonedHouse1",0);
|
||
|
|
SetPartyInt(oPC,"HTCAbandonedHouse1",0);
|
||
|
|
}
|
||
|
|
if (GetLocalInt(oPC,"HTCAbandonedHouse1") == 1)
|
||
|
|
{
|
||
|
|
SetLocalInt(GetModule(),"HTCAbandonedHouse2",0);
|
||
|
|
SetPartyInt(oPC,"HTCAbandonedHouse2",0);
|
||
|
|
}
|
||
|
|
|
||
|
|
iDifficulty = GetLocalInt(oPC,"QuestDifficulty");
|
||
|
|
|
||
|
|
iLevel = GetHitDice(oPC);
|
||
|
|
iLevel = ZoneLevel(GetArea(oPC),iLevel);
|
||
|
|
|
||
|
|
if (iLevel < 20)
|
||
|
|
iMod = iLevel/5 + 1;
|
||
|
|
else
|
||
|
|
iMod = (iLevel-20)/8 + 5;
|
||
|
|
|
||
|
|
iGold = 100 * iDifficulty * iMod;
|
||
|
|
iXP = 150 * iDifficulty * iMod;
|
||
|
|
iChance = iDifficulty + iLevel/3 + 1;
|
||
|
|
|
||
|
|
if (iGold == 0)
|
||
|
|
iGold = 25;
|
||
|
|
|
||
|
|
if (iXP == 0)
|
||
|
|
iXP = 50;
|
||
|
|
|
||
|
|
|
||
|
|
if (GetLocalInt(oPC,"QuestGold") > 0)
|
||
|
|
{
|
||
|
|
iGold = 0;
|
||
|
|
TakeGoldFromCreature(GetLocalInt(oPC,"QuestGold"),oPC);
|
||
|
|
}
|
||
|
|
|
||
|
|
SetPartyVariables(oPC);
|
||
|
|
|
||
|
|
iRandom = Random(100);
|
||
|
|
|
||
|
|
if (GetSkillRank(SKILL_PERSUADE,oPC)>4)
|
||
|
|
{
|
||
|
|
if (GetIsSkillSuccessful(oPC,SKILL_PERSUADE,25))
|
||
|
|
{
|
||
|
|
SendMessageToPC(oPC,"You are very persuading...");
|
||
|
|
iGold=iGold*3/2;
|
||
|
|
iChance = iChance + 3;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (GetSkillRank(SKILL_INTIMIDATE,oPC)>4)
|
||
|
|
{
|
||
|
|
if (GetIsSkillSuccessful(oPC,SKILL_INTIMIDATE,25))
|
||
|
|
{
|
||
|
|
SendMessageToPC(oPC,"You are very intimidating...");
|
||
|
|
iGold=iGold*3/2;
|
||
|
|
iChance = iChance + 3;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (GetSkillRank(SKILL_BLUFF,oPC)>4)
|
||
|
|
{
|
||
|
|
if (GetIsSkillSuccessful(oPC,SKILL_BLUFF,25))
|
||
|
|
{
|
||
|
|
SendMessageToPC(oPC,"You have successfully blown your exploits out of proportion...");
|
||
|
|
iGold=iGold*3/2;
|
||
|
|
iChance = iChance + 3;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (GetLocalInt(oPC,"Lucky") == 1)
|
||
|
|
iChance = iChance + 4;
|
||
|
|
if (GetLocalInt(oPC,"Charming") == 1 && iDifficulty>0)
|
||
|
|
iChance = iChance + 2;
|
||
|
|
|
||
|
|
if (iDifficulty < 1)
|
||
|
|
iChance = 0;
|
||
|
|
|
||
|
|
RewardPartyXP(iXP, GetPCSpeaker());
|
||
|
|
RewardPartyGP(iGold, GetPCSpeaker());
|
||
|
|
|
||
|
|
iRandom = Random(100);
|
||
|
|
if (iRandom < iChance)
|
||
|
|
{
|
||
|
|
if (iLevel < 4)
|
||
|
|
GivePartyMinorMagicItem(oPC);
|
||
|
|
else if (iRandom < iChance/2)
|
||
|
|
GivePartyMagicItem(oPC);
|
||
|
|
else
|
||
|
|
GivePartyMinorMagicItem(oPC);
|
||
|
|
}
|
||
|
|
else if (iRandom < (iChance + iLevel/5 + 1) && iLevel < 20)
|
||
|
|
GivePartyCharSpecific(oPC);
|
||
|
|
else if (iRandom < (iChance + 5) && iLevel > 19)
|
||
|
|
GivePartyCharSpecific(oPC);
|
||
|
|
|
||
|
|
iQuests = GetLocalInt(oPC,"GuildQuests");
|
||
|
|
|
||
|
|
if (SQLocalsUUID_GetInt(oPC,"PCHardCorePNP") == 0)
|
||
|
|
{
|
||
|
|
if (iQuests < 5 && iLevel < 7)
|
||
|
|
iQuestPoints = iDifficulty;
|
||
|
|
else if (iQuests > 4 && iQuests < 10 && iLevel < 14)
|
||
|
|
iQuestPoints = iDifficulty;
|
||
|
|
else if (iQuests > 9 && iQuests < 15 && iLevel < 21)
|
||
|
|
iQuestPoints = iDifficulty;
|
||
|
|
else
|
||
|
|
iQuestPoints = iDifficulty/2;
|
||
|
|
} else {
|
||
|
|
if (iQuests < 5 && iLevel < 10)
|
||
|
|
iQuestPoints = iDifficulty;
|
||
|
|
else if (iQuests > 4 && iQuests < 10 && iLevel < 20)
|
||
|
|
iQuestPoints = iDifficulty;
|
||
|
|
else if (iQuests > 9 && iQuests < 15 && iLevel < 30)
|
||
|
|
iQuestPoints = iDifficulty;
|
||
|
|
else
|
||
|
|
iQuestPoints = iDifficulty/2;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (iQuestPoints > 0)
|
||
|
|
GivePartyQuestPoints(oPC,iQuestPoints);
|
||
|
|
|
||
|
|
GivePartyQuestCredit(oPC);
|
||
|
|
|
||
|
|
//This is a fix for the infinite quest loop -- more of a bandaid since can't find logical reason for bug.
|
||
|
|
SetPartyQuestType(oPC);
|
||
|
|
SetLocalInt(oPC,"Quest",0);
|
||
|
|
SetLocalInt(oPC,"QuestType",0);
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
void GivePartyQuestCredit(object oPC)
|
||
|
|
{
|
||
|
|
int iQuest;
|
||
|
|
object oItem;
|
||
|
|
itemproperty ip;
|
||
|
|
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
if (SQLocalsUUID_GetInt(oPartyMember,"PCGuild") == 2)
|
||
|
|
{
|
||
|
|
iQuest = SQLocalsUUID_GetInt(oPartyMember,"GuildQuests");
|
||
|
|
iQuest++;
|
||
|
|
//iQuest=iQuest+4;
|
||
|
|
SQLocalsUUID_SetInt(oPartyMember,"GuildQuests",iQuest);
|
||
|
|
if (iQuest == 5)
|
||
|
|
{
|
||
|
|
SendMessageToPC(oPartyMember,"You have risen to the rank of Adventurer and been given a magical ring as a sign of your growing reputation within the guild.");
|
||
|
|
CreateItemOnObject("en4_agring",oPartyMember);
|
||
|
|
}
|
||
|
|
if (iQuest == 10)
|
||
|
|
{
|
||
|
|
SendMessageToPC(oPartyMember,"You have risen to the rank of Crusader. The Ring of the Adventurer grows more powerful.");
|
||
|
|
oItem = GetItemPossessedBy(oPartyMember,"en4_agring");
|
||
|
|
ip = ItemPropertyRegeneration(3);
|
||
|
|
IPSafeAddItemProperty(oItem,ip);
|
||
|
|
ip = ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,3);
|
||
|
|
IPSafeAddItemProperty(oItem,ip);
|
||
|
|
ip = ItemPropertyDamageReduction(IP_CONST_DAMAGEREDUCTION_1,IP_CONST_DAMAGESOAK_5_HP);
|
||
|
|
IPSafeAddItemProperty(oItem,ip);
|
||
|
|
}
|
||
|
|
if (iQuest == 15)
|
||
|
|
{
|
||
|
|
SendMessageToPC(oPartyMember,"You have risen to the rank of Master Adventurer. The Ring of the Adventurer grows more powerful.");
|
||
|
|
oItem = GetItemPossessedBy(oPartyMember,"en4_agring");
|
||
|
|
ip = ItemPropertyRegeneration(5);
|
||
|
|
IPSafeAddItemProperty(oItem,ip);
|
||
|
|
ip = ItemPropertyAbilityBonus(IP_CONST_ABILITY_STR,5);
|
||
|
|
IPSafeAddItemProperty(oItem,ip);
|
||
|
|
ip = ItemPropertyDamageReduction(IP_CONST_DAMAGEREDUCTION_1,IP_CONST_DAMAGESOAK_10_HP);
|
||
|
|
IPSafeAddItemProperty(oItem,ip);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void GivePartyQuestPoints(object oPC, int iQuestPoints)
|
||
|
|
{
|
||
|
|
int iQuest;
|
||
|
|
int iPCLevelMod;
|
||
|
|
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
iPCLevelMod = SQLocalsUUID_GetInt(oPartyMember,"PCLevelMod");
|
||
|
|
|
||
|
|
if (iPCLevelMod>1)
|
||
|
|
iQuestPoints = iQuestPoints - 1;
|
||
|
|
if (iPCLevelMod == 2 && iQuestPoints == 0)
|
||
|
|
iQuestPoints = 1;
|
||
|
|
|
||
|
|
iQuest = SQLocalsUUID_GetInt(oPartyMember,"QuestPoints");
|
||
|
|
iQuest = iQuest + iQuestPoints;
|
||
|
|
SQLocalsUUID_SetInt(oPartyMember,"QuestPoints",iQuest);
|
||
|
|
SendMessageToPC(oPartyMember,"You have been given " + IntToString(iQuestPoints) + " quest points. You now have " + IntToString(iQuest) + ".");
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void GivePartyMagicItem(object oPC)
|
||
|
|
{
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
GetMagicItem(oPartyMember,TRUE,TRUE);
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void GivePartyMinorMagicItem(object oPC)
|
||
|
|
{
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
GetMinorMagicItem(oPartyMember);
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void GivePartyCharSpecific(object oPC)
|
||
|
|
{
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
if (Random(2)==0)
|
||
|
|
GetEnchantedItem(oPartyMember);
|
||
|
|
else
|
||
|
|
DTSGenerateCharSpecificTreasure(oPartyMember,oPartyMember);
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void SetPartyVariables(object oPC)
|
||
|
|
{
|
||
|
|
int iLastQuest;
|
||
|
|
int iNPCQuests;
|
||
|
|
int iIndex;
|
||
|
|
int iCount;
|
||
|
|
int iQuests;
|
||
|
|
string sZone;
|
||
|
|
string sQuestStep;
|
||
|
|
object oGiver;
|
||
|
|
object oModule;
|
||
|
|
|
||
|
|
oModule = GetModule();
|
||
|
|
|
||
|
|
oGiver = GetObjectByTag(GetLocalString(oPC,"QuestGiver"));
|
||
|
|
|
||
|
|
iLastQuest =GetLocalInt(oPC,"Quest");
|
||
|
|
SetPartyInt(oPC,"LastQuest",iLastQuest);
|
||
|
|
|
||
|
|
iQuests = GetLocalInt(oPC,GetTag(oGiver));
|
||
|
|
SetPartyInt(oPC,GetTag(oGiver),iQuests+1);
|
||
|
|
|
||
|
|
SetPartyInt(oPC,"Quest",0);
|
||
|
|
SetPartyInt(oPC,"QuestStep",0);
|
||
|
|
SetPartyInt(oPC,"QuestType",0);
|
||
|
|
SetPartyInt(oPC,"QuestDifficulty",0);
|
||
|
|
SetPartyInt(oPC,"QuestDone",0);
|
||
|
|
SetPartyInt(oPC,"QuestItemUnknown",0);
|
||
|
|
SetPartyInt(oPC,"SpecialQuestType",0);
|
||
|
|
SetPartyInt(oPC,"QuestLevel",0);
|
||
|
|
SetPartyInt(oPC,"QuestAdventureZone",0);
|
||
|
|
SetPartyInt(oPC,"QuestGold",0);
|
||
|
|
SetPartyInt(oPC,"QuestHouses",0);
|
||
|
|
SetPartyInt(oPC,"QuestFights",0);
|
||
|
|
|
||
|
|
iCount = GetLocalInt(oPC,"QuestSteps");
|
||
|
|
iIndex = 1;
|
||
|
|
while (iIndex <= iCount)
|
||
|
|
{
|
||
|
|
sQuestStep = "QuestStep" + IntToString(iIndex);
|
||
|
|
SetPartyInt(oPC,sQuestStep,0);
|
||
|
|
SetPartyString(oPC,sQuestStep + "Mob","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Item","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Token111","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Token112","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Token113","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Response","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Reply","");
|
||
|
|
SetPartyString(oPC,sQuestStep + "Escort","");
|
||
|
|
SetPartyInt(oPC,sQuestStep + "ItemUnknown",0);
|
||
|
|
iIndex++;
|
||
|
|
}
|
||
|
|
|
||
|
|
SetPartyInt(oPC,"QuestSteps",0);
|
||
|
|
|
||
|
|
SetPartyString(oPC,"QuestTargetNPC","");
|
||
|
|
SetPartyString(oPC,"QuestItemTag","");
|
||
|
|
SetPartyString(oPC,"QuestAttackers","");
|
||
|
|
SetPartyString(oPC,"QuestGiver","");
|
||
|
|
SetPartyString(oPC,"QuestTargetMob","");
|
||
|
|
SetPartyString(oPC,"QuestCampType","");
|
||
|
|
SetPartyString(oPC,"QuestEscort","");
|
||
|
|
|
||
|
|
sZone = GetLocalString(oPC,"QuestZone");
|
||
|
|
SetPartyInt(oModule,sZone,0);
|
||
|
|
SetPartyString(oPC,"QuestZone","");
|
||
|
|
|
||
|
|
iNPCQuests = GetLocalInt(oGiver,"QuestsCompleted");
|
||
|
|
iNPCQuests++;
|
||
|
|
SetPartyInt(oGiver,"QuestsCompleted",iNPCQuests);
|
||
|
|
SetPartyString(oGiver,"QUEST_PC" + IntToString(iNPCQuests),GetName(oPC));
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
void zSetPartyVariables(object oPC)
|
||
|
|
{
|
||
|
|
int iDeaths;
|
||
|
|
int iLastQuest;
|
||
|
|
int iNPCQuests;
|
||
|
|
int iIndex;
|
||
|
|
int iCount;
|
||
|
|
int iQuests;
|
||
|
|
string sZone;
|
||
|
|
string sQuestStep;
|
||
|
|
object oGiver;
|
||
|
|
object oModule;
|
||
|
|
|
||
|
|
oModule = GetModule();
|
||
|
|
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
oGiver = GetObjectByTag(GetLocalString(oPartyMember,"QuestGiver"));
|
||
|
|
iLastQuest =GetLocalInt(oPartyMember,"Quest");
|
||
|
|
SetLocalInt(oPartyMember,"LastQuest",iLastQuest);
|
||
|
|
|
||
|
|
iQuests = GetLocalInt(oPartyMember,GetTag(oGiver));
|
||
|
|
SetLocalInt(oPartyMember,GetTag(oGiver),iQuests+1);
|
||
|
|
|
||
|
|
SetLocalInt(oPartyMember,"Quest",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestStep",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestType",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestDifficulty",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestDone",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestItemUnknown",0);
|
||
|
|
SetLocalInt(oPartyMember,"SpecialQuestType",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestLevel",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestAdventureZone",0);
|
||
|
|
SetPartyInt(oPartyMember,"QuestGold",0);
|
||
|
|
SetPartyInt(oPartyMember,"QuestHouses",0);
|
||
|
|
SetPartyInt(oPartyMember,"QuestFights",0);
|
||
|
|
|
||
|
|
iCount = GetLocalInt(oPartyMember,"QuestSteps");
|
||
|
|
iIndex = 1;
|
||
|
|
while (iIndex <= iCount)
|
||
|
|
{
|
||
|
|
sQuestStep = "QuestStep" + IntToString(iIndex);
|
||
|
|
SetLocalInt(oPartyMember,sQuestStep,0);
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Mob","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Item","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Token111","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Token112","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Token113","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Response","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Reply","");
|
||
|
|
SetLocalString(oPartyMember,sQuestStep + "Escort","");
|
||
|
|
SetLocalInt(oPartyMember,sQuestStep + "ItemUnknown",0);
|
||
|
|
iIndex++;
|
||
|
|
}
|
||
|
|
|
||
|
|
SetLocalInt(oPartyMember,"QuestSteps",0);
|
||
|
|
|
||
|
|
SetLocalString(oPartyMember,"QuestTargetNPC","");
|
||
|
|
SetLocalString(oPartyMember,"QuestItemTag","");
|
||
|
|
SetLocalString(oPartyMember,"QuestAttackers","");
|
||
|
|
SetLocalString(oPartyMember,"QuestGiver","");
|
||
|
|
SetLocalString(oPartyMember,"QuestTargetMob","");
|
||
|
|
SetLocalString(oPartyMember,"QuestCampType","");
|
||
|
|
SetLocalString(oPartyMember,"QuestEscort","");
|
||
|
|
|
||
|
|
sZone = GetLocalString(oPartyMember,"QuestZone");
|
||
|
|
SetLocalInt(oModule,sZone,0);
|
||
|
|
SetLocalString(oPartyMember,"QuestZone","");
|
||
|
|
|
||
|
|
//SendMessageToPC(GetFirstPC(),"Giver = " + GetName(oGiver));
|
||
|
|
iNPCQuests = GetLocalInt(oGiver,"QuestsCompleted");
|
||
|
|
iNPCQuests++;
|
||
|
|
SetLocalInt(oGiver,"QuestsCompleted",iNPCQuests);
|
||
|
|
//SendMessageToPC(GetFirstPC(),"Quests Completed = " + IntToString(iNPCQuests));
|
||
|
|
SetLocalString(oGiver,"QUEST_PC" + IntToString(iNPCQuests),GetName(oPartyMember));
|
||
|
|
//SendMessageToPC(GetFirstPC(),"QUEST_PC" + IntToString(iNPCQuests) + " on " + GetName(oGiver) + " set to " + GetName(oPartyMember));
|
||
|
|
//SetLocalInt(OBJECT_SELF,"Quest",0);
|
||
|
|
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
void SetPartyQuestType(object oPC)
|
||
|
|
{
|
||
|
|
|
||
|
|
object oPartyMember = GetFirstFactionMember(oPC, TRUE);
|
||
|
|
while (GetIsObjectValid(oPartyMember) == TRUE)
|
||
|
|
{
|
||
|
|
SetLocalInt(oPartyMember,"Quest",0);
|
||
|
|
SetLocalInt(oPartyMember,"QuestType",0);
|
||
|
|
oPartyMember = GetNextFactionMember(oPC, TRUE);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|