Further file organization

Further file organization

nwn/nwnprc/trunk/newspellbook/tob_stsn_fgnopn.nss

@@ -0,0 +1,89 @@
+/*
+   ----------------
+   Feigned Opening
+
+   tob_stsn_fgnopn
+   ----------------
+
+   15/07/07 by Stratovarius
+*/ /** @file
+
+    Feigned Opening
+
+    Setting Sun (Counter)
+    Level: Swordsage 3
+    Prerequisite: One Setting Sun maneuver.
+    Initiation Action: 1 Swift Action
+    Range: Melee.
+    Target: One Creature.
+
+    You show your opponent a seemingly fatal mistake in your defenses, but easily avoid
+    the ensuing attack and simultaneously draw your foe into overextending. As she fights
+    to regain her balance, you make a swift counterattack.
+    
+    You provoke an attack of opportunity from a creature. If it misses, you get an attack against
+    the creature. If it hits, all of your allies who threaten that creature can make an attack against it.
+*/
+
+#include "tob_inc_move"
+#include "tob_movehook"
+//#include "prc_alterations"
+
+void TOBAttack(object oTarget, object oInitiator)
+{
+    	effect eNone;
+    	object oWeap = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oInitiator);
+    	// First attack, the monster's AoO
+	PerformAttack(oInitiator, oTarget, eNone, 0.0, 0, 0, 0, "Feigned Opening Hit", "Feigned Opening Miss");
+       
+        if (GetLocalInt(oInitiator, "PRCCombat_StruckByAttack"))
+    	{
+		location lTarget = GetLocation(oTarget);
+		// Use the function to get the closest creature as a target
+        	object oAreaTarget = MyFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_SMALL, lTarget, TRUE, OBJECT_TYPE_CREATURE);
+        	while(GetIsObjectValid(oAreaTarget))
+        	{
+        	    // Don't hit yourself
+        	    // Make sure the target is both next to the one struck and within melee range of the caster
+        	    // Don't hit the one already struck
+        	    if(oAreaTarget != oInitiator && // You don't get to attack
+        	       GetIsInMeleeRange(oAreaTarget, oTarget) && // Have to be within range
+        	       GetIsFriend(oAreaTarget, oInitiator) && // Only your allies get to attack
+        	       oAreaTarget != oTarget) // Ensures the creature can't attack itself
+        	    {
+        	        // Perform the Attack
+ 			effect eVis = EffectVisualEffect(VFX_IMP_STUN);
+ 			oWeap = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oAreaTarget);
+			PerformAttack(oTarget, oAreaTarget, eVis, 0.0, 0, 0, GetWeaponDamageType(oWeap), "Feigned Opening Hit", "Feigned Opening Miss");
+        	    }
+	
+        	    //Select the next target within the spell shape.
+        	    oAreaTarget = MyNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_SMALL, lTarget, TRUE, OBJECT_TYPE_CREATURE);
+        	}// end while - Target loop
+    	}
+    	else
+    	{
+    		PerformAttack(oTarget, oInitiator, eNone, 0.0, 0, 0, 0, "Feigned Opening Hit", "Feigned Opening Miss");
+    	}
+}
+
+void main()
+{
+    if (!PreManeuverCastCode())
+    {
+    // If code within the PreManeuverCastCode (i.e. UMD) reports FALSE, do not run this spell
+        return;
+    }
+
+// End of Spell Cast Hook
+
+    object oInitiator    = OBJECT_SELF;
+    object oTarget       = PRCGetSpellTargetObject();
+    struct maneuver move = EvaluateManeuver(oInitiator, oTarget);
+
+    if(move.bCanManeuver)
+    {
+    	DelayCommand(0.0, TOBAttack(oTarget, oInitiator));
+    }
+}
+