Further file organization

Further file organization

nwn/nwnprc/trunk/newspellbook/moi_mld_sandalft.nss

@@ -0,0 +1,38 @@
+/*
+Cerulean Sandals Feet Bind
+
+Your feet and lower legs are encased in a sheath of blue-gray energy. This substance resembles ice, but motes of light like tiny stars drift through it as well.
+
+You can use dimension door as the spell, up to a total distance of 10 feet per meldshaper level. You can use this ability (in increments of 10 feet) any number of times,
+until the total distance has been traversed, at which point the soulmeld unshapes. This requires a standard action to activate.
+*/
+
+#include "spinc_dimdoor"
+#include "moi_inc_moifunc"
+
+void main()
+{
+    object oMeldshaper = OBJECT_SELF;
+    location lTarget = PRCGetSpellTargetLocation();
+    float fTraveled = GetLocalFloat(oMeldshaper, "CeruleanSandalsDist");
+    float fDist = GetDistanceBetweenLocations(lTarget, GetLocation(oMeldshaper));
+    // We know it's bound, now to check which class bound it 
+    int nClass = GetMeldShapedClass(oMeldshaper, MELD_CERULEAN_SANDALS);
+    int nLevel = GetMeldshaperLevel(oMeldshaper, nClass, MELD_CERULEAN_SANDALS);
+    float fMax = 10.0 * nLevel;	
+    // If it's within range
+    if (fMax >= (fDist+fTraveled))
+    {
+    	DimensionDoor(oMeldshaper, nLevel);  
+    	SetLocalFloat(oMeldshaper, "CeruleanSandalsDist", (fDist+fTraveled));
+    	FloatingTextStringOnCreature("You have "+FloatToString(fMax - (fDist+fTraveled))+" of distance left in your Cerulean Sandals", oMeldshaper, FALSE);
+    }
+    else
+    {
+    	// Using this ability ends the meld until tomorrow.
+    	PRCRemoveSpellEffects(MELD_CERULEAN_SANDALS, oMeldshaper, oMeldshaper);
+    	FloatingTextStringOnCreature("Cerulean Sandals unshaped", oMeldshaper, FALSE);
+    	ExecuteScript("prc_speed", oMeldshaper); // This will remove any speed bonus from the spell
+    }	
+}
+