EN4_PRC8/_module/nss/qp_fear.nss
Jaysyn904 b464d8da05 Initial Commit
Initial Commit [v1.32PRC8]
2025-04-03 13:38:45 -04:00

38 lines
1010 B
Plaintext

#include "utl_i_sqluuid"
#include "prc_x2_itemprop"
void main()
{
object oPC;
object oItem;
int iQuestPoints;
int iProp;
itemproperty ip;
string sTag;
oPC=GetPCSpeaker();
sTag = SQLocalsUUID_GetString(oPC,"QPTag");
oItem = GetItemPossessedBy(oPC, sTag);
if(GetIsObjectValid(oItem) != 0)
{
iProp=SQLocalsUUID_GetInt(oPC,"QP_Fear");
if (iProp==0)
{
iQuestPoints = SQLocalsUUID_GetInt(oPC,"QuestPoints");
iQuestPoints = iQuestPoints - 10;
SQLocalsUUID_SetInt(oPC,"QuestPoints",iQuestPoints);
SQLocalsUUID_SetInt(oPC,"QP_Fear",1);
// IP_CONST_IMMUNITYMISC_DEATH_MAGIC
ip=ItemPropertyImmunityMisc(IP_CONST_IMMUNITYMISC_FEAR);
IPSafeAddItemProperty(oItem,ip);
DelayCommand(1.0,AssignCommand(OBJECT_SELF,ActionCastFakeSpellAtObject(SPELL_CURE_SERIOUS_WOUNDS,oPC)));
} else {
SendMessageToPC(oPC,"You already have that enhancement.");
}
} else {
SendMessageToPC(oPC,"Could not find item.");
}
}