/*
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
    }	
}