Jaysyn/Battledale_PRC8
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

Initial upload

Browse Source 
Initial upload.  PRC8 has been added.  Module compiles, PRC's default AI & treasure scripts have been integrated.  Started work on top hak for SLA / Ability / Scripting modifications.
This commit is contained in:
Jaysyn904
2024-03-11 23:44:08 -04:00
parent c4b5794c59
commit 7b9e44ebbb
11454 changed files with 10436475 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

50
_module/nss/nk_fp_sum_master.nss Normal file
View File

@@ -0,0 +1,50 @@
//:://////////////////////////////////////////////
//:: Created By: Narak
//:: Created On: 11/6/2002
//:://////////////////////////////////////////////
void main()
{
int nUser = GetUserDefinedEventNumber();
if(nUser == 1001)
{
int nBronze = GetLocalInt(OBJECT_SELF, "BRONZE");
int nSilver = GetLocalInt(OBJECT_SELF, "SILVER");
int nGold = GetLocalInt(OBJECT_SELF, "GOLD");
if ((nBronze != 0) && (nSilver != 0) && (nGold != 0))
{
int nWpCount = 1;
object oParty = GetNearestCreature (CREATURE_TYPE_PLAYER_CHAR, PLAYER_CHAR_IS_PC, OBJECT_SELF, 1);
object oPC = GetFirstFactionMember(oParty, TRUE);
while (oPC != OBJECT_INVALID)
{
if (GetArea(oPC) == GetArea(OBJECT_SELF))
{
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_POLYMORPH), oPC);
AssignCommand(oPC, ActionJumpToLocation(GetLocation(GetWaypointByTag("nk_fp_fight"+IntToString(nWpCount)))));
nWpCount++;
if (nWpCount > 7)
{
nWpCount = 1;
}
}
oPC = GetNextFactionMember (oParty, TRUE);
}
location lSummon = GetLocation(OBJECT_SELF);
//DelayCommand(3.0, ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_SCREEN_SHAKE), OBJECT_SELF));
DelayCommand(5.0, ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_SUMMON_GATE), lSummon));
DelayCommand(8.0, SignalEvent(OBJECT_SELF, EventUserDefined(1002)));
}
}
else if(nUser == 1002)
{
location lSummon = GetLocation(OBJECT_SELF);
CreateObject(OBJECT_TYPE_CREATURE, "balorboss001", lSummon, TRUE);
object oBalor = GetNearestObjectByTag("nk_fp_balor", OBJECT_SELF, 1);
AssignCommand(oBalor, ActionSpeakString("WHO DARES TO SUMMON ME?! AAAARGH, INTRUDERS!", TALKVOLUME_TALK));
object oPortal = GetNearestObjectByTag("nk_fp_balorportal", OBJECT_SELF, 1);
DestroyObject(oPortal);
}
}