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);
}
}
public static void StallForTime(CLRScriptBase s, ALFA.Shared.ActiveTrap trap, uint disabler, float delay, NWLocation loc)
{
delay -= 2.0f;
if (delay <= 0.5f)
{
DisableResult result = IsDisableSuccessful(s, trap, trap.DisarmDC, disabler);
if (result == DisableResult.Success)
{
RemoveTrap(s, trap);
s.SendMessageToPC(disabler, "<c=#98FFFF>This trap is now gone, and needs no more work from you.</c>");
return;
}
else if (result == DisableResult.CriticalFailure)
{
trap.Disabler = 0;
trap.Helpers = new List<uint>();
trap.TotalHelp = 0;
TrapTrigger.Fire(s, trap, disabler);
s.SendMessageToPC(disabler, "<c=#98FFFF>Your disable attempt has backfired, causing you to cease work.</c>");
return;
}
else
{
trap.Disabler = 0;
trap.Helpers = new List<uint>();
trap.TotalHelp = 0;
s.SendMessageToPC(disabler, "<c=#98FFFF>Your disable attempt has failed. You may retry if you like.</c>");
return;
}
}
else
{
Vector3 oldPos = s.GetPositionFromLocation(loc);
NWLocation newLoc = s.GetLocation(disabler);
Vector3 newPos = s.GetPosition(disabler);
if (Math.Abs(oldPos.x - newPos.x) > DisarmMovementThreshhold ||
Math.Abs(oldPos.y - newPos.y) > DisarmMovementThreshhold)
{
// The disabler has moved. Interpret as canceling.
trap.Disabler = 0;
trap.Helpers = new List<uint>();
trap.TotalHelp = 0;
s.SendMessageToPC(disabler, "<c=#98FFFF>You stop working on the trap, due to having moved from your workspace.</c>");
return;
}
int action = s.GetCurrentAction(disabler);
if (action == ACTION_ANIMALEMPATHY ||
action == ACTION_ATTACKOBJECT ||
action == ACTION_CASTSPELL ||
action == ACTION_CLOSEDOOR ||
action == ACTION_COUNTERSPELL ||
action == ACTION_DIALOGOBJECT ||
action == ACTION_DROPITEM ||
action == ACTION_EXAMINETRAP ||
action == ACTION_FLAGTRAP ||
action == ACTION_FOLLOW ||
action == ACTION_HEAL ||
action == ACTION_ITEMCASTSPELL ||
action == ACTION_KIDAMAGE ||
action == ACTION_LOCK ||
action == ACTION_MOVETOPOINT ||
action == ACTION_OPENDOOR ||
action == ACTION_OPENLOCK ||
action == ACTION_PICKPOCKET ||
action == ACTION_PICKUPITEM ||
action == ACTION_RANDOMWALK ||
action == ACTION_RECOVERTRAP ||
action == ACTION_REST ||
action == ACTION_SETTRAP ||
action == ACTION_SIT ||
action == ACTION_SMITEGOOD ||
action == ACTION_TAUNT ||
action == ACTION_USEOBJECT)
{
// Disabler isn't working on the trap any more. Abort.
trap.Disabler = 0;
trap.Helpers = new List<uint>();
trap.TotalHelp = 0;
s.SendMessageToPC(disabler, "<c=#98FFFF>You stop working on the trap, due to having begun another task.</c>");
return;
}
s.SendMessageToPC(disabler, "<c=#98FFFF>You continue work on the trap...</c>");
s.PlayAnimation(ANIMATION_FIREFORGET_KNEELFIDGET, 1.0f, 2.0f);
s.DelayCommand(2.0f, delegate { StallForTime(s, trap, disabler, delay, newLoc); });
}
}
private static uint GetNearestTrapEmitter(CLRScriptBase script, NWLocation loc)
{
float nearestDist = -1.0f;
uint nearestObject = CLRScriptBase.OBJECT_INVALID;
Vector3 trapPos = script.GetPositionFromLocation(loc);
foreach(uint obj in script.GetObjectsInArea(script.GetAreaFromLocation(loc)))
{
if(script.GetObjectType(obj) == OBJECT_TYPE_PLACEABLE &&
(script.GetTag(obj) == "TRAP_EMITTER" ||
script.GetTag(obj) == "TRAP_ORIGIN"))
{
Vector3 emitterPos = script.GetPosition(obj);
float newDist = (trapPos.x - emitterPos.x)*(trapPos.x - emitterPos.x)+(trapPos.y - emitterPos.y)*(trapPos.y - emitterPos.y);
if(nearestDist < 0 || nearestDist > newDist)
{
nearestDist = newDist;
nearestObject = obj;
}
}
}
if(script.GetIsObjectValid(nearestObject) == CLRScriptBase.FALSE || nearestDist > 400.0f) // 20 meters; nearestDist is squared to be cheaper
{
nearestObject = CLRScriptBase.OBJECT_INVALID;
}
return nearestObject;
}
public static void Fire(CLRScriptBase s, ALFA.Shared.ActiveTrap trap, uint specialTarget)
{
List<uint> targets = new List<uint>();
if (s.GetIsObjectValid(specialTarget) == TRUE)
{
targets.Add(specialTarget);
}
foreach (uint contents in s.GetObjectsInPersistentObject(s.GetObjectByTag(trap.Tag, 0), OBJECT_TYPE_CREATURE, 0))
{
if (FitsTrapTargetRestriction(s, trap, contents))
{
targets.Add(contents);
}
}
if (targets.Count == 0)
{
// Might be that they all left. In any case
// we have nothing to shoot
trap.IsFiring = false;
return;
}
uint target;
if (targets.Count == 1)
{
target = targets[0];
}
else
{
target = targets[s.Random(targets.Count)];
}
uint caster;
if (s.GetIsObjectValid(trap.TrapOrigin) == FALSE)
{
caster = s.GetObjectByTag(trap.Tag, 0);
}
else
{
caster = trap.TrapOrigin;
}
if (trap.SpellTrap)
{
// It's a spell-- guess this is simple.
s.AssignCommand(caster, delegate { s.ActionCastSpellAtObject(trap.SpellId, target, METAMAGIC_NONE, TRUE, 0, 0, 1); });
}
else
{
foreach (uint victim in s.GetObjectsInShape(trap.EffectArea, trap.EffectSize, s.GetLocation(target), false, OBJECT_TYPE_CREATURE, s.GetPosition(caster)))
{
s.ApplyEffectToObject(DURATION_TYPE_INSTANT, GetTrapEffect(s, trap, victim), victim, 0.0f);
_doSoloVFX(s, trap, victim);
}
_doGroupVFX(s, trap, s.GetLocation(target));
}
if (trap.NumberOfShots > -1)
{
if (trap.NumberOfShots < 2)
{
TrapDisable.RemoveTrap(s, trap);
return;
}
else
{
trap.NumberOfShots--;
}
}
trap.IsFiring = true;
s.DelayCommand(6.0f, delegate { Fire(s, trap); });
}
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);
}
