scope RecursiveDemo {

    #if ! AUTOFLUSH_LOCALS
        #error ("Add /alf flag!")
    #endif

    #define {
        SpellId = 'A000'
        private EffectModel = "Abilities\\Spells\\Human\\DispelMagic\\DispelMagicTarget.mdl"
    }
    
    private group gMain = CreateGroup ()
    
    private nothing Pick (real x, real y) {
        group g = CreateGroup ()
        for (unit u; UnitsInRange(x, y, 256.) use g) {
            if (!IsUnitInGroup (u, gMain)) {
                GroupAddUnit (gMain, u)
                Pick (GetUnitX(u), GetUnitY(u))
            }            
        }
        DestroyGroup (g)
    }
    
    callback onUnitSpellEffect (SpellId) {
        unit c = GetTriggerUnit ()
        Pick (GetUnitX(c), GetUnitY(c))
        for (unit u; UnitsInGroup(gMain); GroupRemovePickedUnit()) {
            DestroyEffect (AddSpecialEffectTarget(EffectModel, u, "overhead"))
        }
    }
}