/*
   ----------------
   Cloud Mind, Mass

   psi_pow_cldmndm
   ----------------

    25/9/07 by Stratovarius
*/ /** @file

    Cloud Mind, Mass

    Telepathy [Mind-Affecting]
    Level: Psion/wilder 6
    Manifesting Time: 1 standard action
    Range: Close (25 ft. + 5 ft./2 levels)
    Target: One creature/level
    Duration: 1 min./level
    Saving Throw: Will negates
    Power Resistance: Yes
    Power Points: 11
    Metapsionics: Extend, Twin

    You make yourself completely undetectable to the subjects by erasing all awareness of your presence from their minds.
    However, if you attack any creature they becomes fully aware of your presence.
*/

#include "psi_inc_psifunc"
#include "psi_inc_pwresist"
#include "psi_spellhook"
#include "prc_inc_spells"

void main()
{
/*
  Spellcast Hook Code
  Added 2004-11-02 by Stratovarius
  If you want to make changes to all powers,
  check psi_spellhook to find out more

*/

    if (!PsiPrePowerCastCode())
    {
    // If code within the PrePowerCastHook (i.e. UMD) reports FALSE, do not run this spell
        return;
    }

// End of Spell Cast Hook

    object oManifester = OBJECT_SELF;
    object oTarget = PRCGetSpellTargetObject();
    struct manifestation manif =
            EvaluateManifestation(oManifester, oTarget,
                                  PowerAugmentationProfile(),
                                  METAPSIONIC_EXTEND | METAPSIONIC_TWIN
                              );

    if(manif.bCanManifest)
    {
        int nDC          = GetManifesterDC(oManifester);
        int nPen         = GetPsiPenetration(oManifester);
        effect eLink     = EffectFascinate();
        effect eVis      = EffectVisualEffect(VFX_IMP_SLOW);
        effect eFNF      = EffectVisualEffect(VFX_FNF_LOS_NORMAL_20);
        float fDur       = 60.0f * manif.nManifesterLevel;
        float fRadius    = FeetToMeters(25.0 + (5 * (manif.nManifesterLevel / 2)));
        location lOrigin = GetLocation(oManifester);
        if(manif.bExtend) fDur *= 2;

        // Let the AI know
        PRCSignalSpellEvent(oTarget, TRUE, manif.nSpellID, oManifester);

        // Handle Twin Power
        int nRepeats = manif.bTwin ? 2 : 1;
        for(; nRepeats > 0; nRepeats--)
        {
            // Do area VFX
            ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eFNF, lOrigin);

            // Loop over targets in the line shape
            oTarget = MyFirstObjectInShape(SHAPE_SPHERE, fRadius, lOrigin, TRUE, OBJECT_TYPE_CREATURE);
            while(GetIsObjectValid(oTarget))
            {
                // Difficulty & faction limits on targeting
                if(GetIsEnemy(oTarget, oManifester))
                {
                    // Let the AI know
                    PRCSignalSpellEvent(oTarget, TRUE, manif.nSpellID, oManifester);
                    // Make an SR check
                    if(PRCMyResistPower(oManifester, oTarget, nPen))
                    {
                		//Make a saving throw check
                		if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_MIND_SPELLS))
                		{
                		    //Apply VFX Impact and cloud mind effect effect
                		    SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, fDur, TRUE, manif.nSpellID, manif.nManifesterLevel);
                		    SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
                		    int nRep = GetReputation(oTarget, oManifester);
                		    AssignCommand(oManifester, ClearAllActions(TRUE));
	        	    		AssignCommand(oTarget, ClearAllActions(TRUE));
        		    		AdjustReputation(oManifester, oTarget, 100);
        		    		DelayCommand(fDur, AdjustReputation(oManifester, oTarget, nRep));
                		}// end if - Save
                	}// end if - SR check
                }// end if - Allowed to target this object

                // Get next target
                oTarget = MyNextObjectInShape(SHAPE_SPHERE, fRadius, lOrigin, TRUE, OBJECT_TYPE_CREATURE);
            }// end while - Target loop
        }
    }
}