private static void HandleTrapDetected(CLRScriptBase s, ALFA.Shared.ActiveTrap trap, uint detector)
{
trap.Detected = true;
NWEffect vfx = s.SupernaturalEffect(s.EffectNWN2SpecialEffectFile(trap.TrapTriggerVFX, OBJECT_INVALID, s.Vector(0.0f, 0.0f, 0.0f)));
s.ApplyEffectToObject(DURATION_TYPE_PERMANENT, vfx, s.GetObjectByTag(trap.Tag, 0), 0.0f);
uint detectWidget = s.CreateObject(OBJECT_TYPE_PLACEABLE, "acr_trap_disarm", s.GetLocation(detector), TRUE, trap.Tag + "_");
if (!String.IsNullOrEmpty(trap.Description))
{
s.SetDescription(detectWidget, trap.Description);
}
s.SetFirstName(detectWidget, String.Format("Disarm the {0} trap", trap.SpellTrap ? "Spell" : "Mechanical"));
// If they clicked to walk, let's stop them from walking into the hazard they just found.
if (s.GetCurrentAction(detector) == ACTION_MOVETOPOINT)
{
s.AssignCommand(detector, delegate { s.ClearAllActions(0); });
}
s.PlaySound("alert", FALSE);
s.ApplyEffectToObject(DURATION_TYPE_TEMPORARY, s.SupernaturalEffect(s.EffectNWN2SpecialEffectFile("fx_bang", detector, s.Vector(0.0f, 0.0f, 0.0f))), detector, 6.0f);
s.SendMessageToPC(detector, "You spot a trap!");
}
public static uint _SpawnObject(string sResRef, int nObjectType, uint oWP, NWLocation lLoc, int nFlags, int nAlternate, CLRScriptBase s)
{
// if the object is not being spawned at it's waypoint location, we need to make sure
// the actual spawn-in location isn't violating the "in PC sight" guidelines.
if ((nAlternate != CLRScriptBase.FALSE) && ((nFlags & _SPAWN_FLAGS_IN_PC_SIGHT) == 0))
{
uint oNeighbor = s.GetNearestCreatureToLocation(CLRScriptBase.CREATURE_TYPE_PLAYER_CHAR, CLRScriptBase.PLAYER_CHAR_IS_PC, lLoc, 1, -1, -1, -1, -1);
if (s.GetIsObjectValid(oNeighbor) == CLRScriptBase.FALSE && (s.GetDistanceBetweenLocations(lLoc, s.GetLocation(oNeighbor)) <= PC_PERCEPTION_RANGE))
{ // ACR_GetPCVisualRange() )) {
return(CLRScriptBase.OBJECT_INVALID);
}
if (GetPrespawnPrediction(s) == CLRScriptBase.FALSE)
{
uint oTestWP = s.GetNearestObjectToLocation(CLRScriptBase.OBJECT_TYPE_WAYPOINT, lLoc, 1);
int nWP_Index = 1;
while ((oTestWP != CLRScriptBase.OBJECT_INVALID) && (s.GetDistanceBetweenLocations(lLoc, s.GetLocation(oTestWP)) <= PC_PERCEPTION_RANGE))
{ // ACR_GetPC_VisualRange() )) {
if (s.GetTag(oTestWP) == "ACR_SA_WP")
{
return(CLRScriptBase.OBJECT_INVALID);
}
else
{
nWP_Index = nWP_Index + 1;
oTestWP = s.GetNearestObjectToLocation(CLRScriptBase.OBJECT_TYPE_WAYPOINT, lLoc, nWP_Index);
}
}
}
}
uint oSpawned = s.CreateObject(nObjectType, sResRef, lLoc, nFlags & _SPAWN_FLAGS_WITH_ANIMATION, "");
// Check to make sure it spawned ok, print an error and exit if not.
if (s.GetIsObjectValid(oSpawned) == CLRScriptBase.FALSE)
{
return(CLRScriptBase.OBJECT_INVALID);
}
// If it should be in stealth mode, place it there.
if ((nFlags & _SPAWN_IN_STEALTH) == _SPAWN_IN_STEALTH)
{
s.SetActionMode(oSpawned, CLRScriptBase.ACTION_MODE_STEALTH, 1);
}
// If it should be in detect mode, place it there.
if ((nFlags & _SPAWN_IN_DETECT) == _SPAWN_IN_DETECT)
{
s.SetActionMode(oSpawned, CLRScriptBase.ACTION_MODE_DETECT, 1);
}
// If this creature should buff himself, do it.
if ((nFlags & _SPAWN_BUFFED) == _SPAWN_BUFFED)
{
ActivateLongTermBuffs(oSpawned, s);
}
// Play the spawn animation.
s.PlayAnimation(s.GetLocalInt(oWP, _WP_SPAWN_ANIMATION), 1.0f, 0.0f);
// Play the spawn in VFX.
s.ApplyEffectAtLocation(CLRScriptBase.DURATION_TYPE_INSTANT, s.EffectVisualEffect(s.GetLocalInt(oWP, _WP_SPAWN_IN_VFX), CLRScriptBase.FALSE), s.GetLocation(oSpawned), 0.0f);
// Play the spawn in SFX.
s.AssignCommand(oSpawned, delegate { s.PlaySound(s.GetLocalString(oWP, _WP_SPAWN_IN_SFX), CLRScriptBase.FALSE); });
// Determine facing.
if ((nFlags & _SPAWN_FLAGS_RANDOM_FACING) == _SPAWN_FLAGS_RANDOM_FACING)
{
// Spawn facing is random.
s.AssignCommand(oSpawned, delegate { s.SetFacing(new Random().Next() * 360.0f, CLRScriptBase.FALSE); });
}
// Colorize name if needed.
if (s.GetLocalString(oSpawned, ACR_COLOR_NAME) != "")
{
s.SetFirstName(oSpawned, "<C='" + s.GetLocalString(oSpawned, ACR_COLOR_NAME) + "'>" + s.GetName(oSpawned) + "</C>");
s.SetLastName(oSpawned, "");
}
// Run the spawn-in scripts, if any.
int i = 1;
while (true)
{
string sScript = s.GetLocalString(oWP, _WP_SPAWN_IN_SCRIPT_ARRAY + s.IntToString(i));
if (sScript == "")
{
break;
}
s.ExecuteScript(sScript, oSpawned);
i++;
}
_AddObjectToSpawnPoint(oWP, oSpawned, s);
return(oSpawned);
}
public static void Dismount(CLRScriptBase script, uint Character, uint Cloak, NWLocation Location)
{
string resRef = "";
if (script.GetLocalInt(Cloak, ACR_IS_WARHORSE) == 1)
{
resRef = "abr_cr_an_horse_pal_";
int nPalLevel = script.GetLevelByClass(CLRScriptBase.CLASS_TYPE_PALADIN, Character);
if (nPalLevel >= 15)
{
resRef += "15";
}
else if (nPalLevel >= 11)
{
resRef += "11";
}
else if (nPalLevel >= 8)
{
resRef += "8";
}
else if (nPalLevel >= 5)
{
resRef += "5";
}
else
{
resRef = "abr_cr_an_horse03";
}
}
else
{
switch (script.GetTag(Cloak))
{
case "acr_ooc_horse01":
resRef = "abr_cr_an_horse01";
break;
case "acr_ooc_horse02":
resRef = "abr_cr_an_horse02";
break;
case "acr_ooc_horse03":
resRef = "abr_cr_an_horse03";
break;
default:
// Looks like we're not actually dismounting a horse.
return;
}
}
uint Horse = script.CreateObject(CLRScriptBase.OBJECT_TYPE_CREATURE, resRef, Location, CLRScriptBase.FALSE, "");
script.SetLocalInt(Horse, ACR_HORSE_OWNER, script.GetLocalInt(Character, ACR_CID));
script.SetLocalInt(Horse, ACR_HORSE_ID, script.GetLocalInt(Cloak, ACR_HORSE_ID));
int damage = script.GetCurrentHitPoints(Horse) - script.GetLocalInt(Cloak, ACR_HORSE_HP);
if (damage > 0)
{
script.ApplyEffectToObject(CLRScriptBase.DURATION_TYPE_INSTANT, script.EffectDamage(damage, CLRScriptBase.DAMAGE_TYPE_MAGICAL, CLRScriptBase.DAMAGE_POWER_PLUS_TWENTY, CLRScriptBase.TRUE), Horse, 0.0f);
}
if (script.GetLocalInt(Cloak, ACR_IS_WARHORSE) == 1)
{
script.AddHenchman(Character, Horse);
script.SetLocalInt(Horse, ACR_IS_WARHORSE, 1);
script.SetLocalObject(Character, ACR_PAL_WARHORSE, Horse);
}
uint Item = GetOwnershipItemById(script, Character, script.GetLocalInt(Cloak, ACR_HORSE_ID));
script.SetLocalObject(Item, ACR_HORSE_OBJECT, Horse);
script.SetLocalObject(Horse, ACR_HORSE_OBJECT, Character);
script.SetLocalString(Item, ACR_HORSE_PERS_LOC_AREA, script.GetTag(script.GetArea(Horse)));
script.SetLocalFloat(Item, ACR_HORSE_PERS_LOC_X, script.GetPosition(Horse).x);
script.SetLocalFloat(Item, ACR_HORSE_PERS_LOC_Y, script.GetPosition(Horse).y);
script.SetLocalFloat(Item, ACR_HORSE_PERS_LOC_Z, script.GetPosition(Horse).z);
script.SetPlotFlag(Cloak, CLRScriptBase.FALSE);
script.DestroyObject(Cloak, 0.0f, CLRScriptBase.FALSE);
isWarhorse.Remove(Character);
}
private void PopulateArea(CLRScriptBase script)
{
List <Vector3> trapsToSpawn = new List <Vector3>();
if (!DungeonStore.DungeonSpawns.ContainsKey(SpawnType))
{
return;
}
foreach (uint wp in script.GetObjectsInArea(AreaId))
{
if (script.GetTag(wp) == "MONSTER_LOW")
{
if (DungeonStore.DungeonSpawns[SpawnType].ContainsKey(CR / 3))
{
script.CreateObject(CLRScriptBase.OBJECT_TYPE_CREATURE, DungeonStore.DungeonSpawns[SpawnType][CR / 3][rand.Next(DungeonStore.DungeonSpawns[SpawnType][CR / 3].Count)], script.GetLocation(wp), CLRScriptBase.TRUE, "");
}
}
else if (script.GetTag(wp) == "MONSTER_MED")
{
if (DungeonStore.DungeonSpawns[SpawnType].ContainsKey(CR / 2))
{
script.CreateObject(CLRScriptBase.OBJECT_TYPE_CREATURE, DungeonStore.DungeonSpawns[SpawnType][CR / 2][rand.Next(DungeonStore.DungeonSpawns[SpawnType][CR / 2].Count)], script.GetLocation(wp), CLRScriptBase.TRUE, "");
}
}
else if (script.GetTag(wp) == "MONSTER_HIGH")
{
if (DungeonStore.DungeonSpawns[SpawnType].ContainsKey(CR))
{
script.CreateObject(CLRScriptBase.OBJECT_TYPE_CREATURE, DungeonStore.DungeonSpawns[SpawnType][CR][rand.Next(DungeonStore.DungeonSpawns[SpawnType][CR].Count)], script.GetLocation(wp), CLRScriptBase.TRUE, "");
}
if (!questSpawned)
{
questSpawned = true;
NWEffect AoE = script.EffectAreaOfEffect(86, "acf_trg_onenter", "acf_trg_onheartbeat", "acf_trg_onexit", "AOE" + Quest);
script.ApplyEffectAtLocation(CLRScriptBase.DURATION_TYPE_PERMANENT, script.SupernaturalEffect(AoE), script.GetLocation(wp), 0.0f);
uint spawnedAoE = script.GetObjectByTag("AOE" + Quest, 0);
script.SetLocalString(spawnedAoE, "ACR_QST_NAME", Quest);
script.SetLocalInt(spawnedAoE, "ACR_QST_LOWER_STATE", 1);
script.SetLocalInt(spawnedAoE, "ACR_QST_UPPER_STATE", 2);
script.SetLocalString(spawnedAoE, "ACR_QST_MESSAGE", "This appears to be the end of the dungeon, and your path here is scouted.");
}
}
else if (script.GetTag(wp) == "TRAP")
{
if (DungeonStore.DungeonTraps[TrapType].ContainsKey(CR))
{
trapsToSpawn.Add(script.GetPosition(wp));
}
}
}
foreach (Vector3 trap in trapsToSpawn)
{
script.ClearScriptParams();
script.AddScriptParameterInt(1);
script.AddScriptParameterFloat(trap.x);
script.AddScriptParameterFloat(trap.y);
script.AddScriptParameterFloat(trap.z);
script.AddScriptParameterObject(AreaId);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterFloat(-1.0f);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterObject(CLRScriptBase.OBJECT_INVALID);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterInt(-1);
script.AddScriptParameterString(DungeonStore.DungeonTraps[TrapType][CR][rand.Next(DungeonStore.DungeonTraps[TrapType][CR].Count)]);
script.ExecuteScriptEnhanced("ACR_Traps", script.GetModule(), CLRScriptBase.FALSE);
}
}