globals
    group MSH
endglobals

function FT takes nothing returns boolean
    return (GetUnitAbilityLevel(GetSpellTargetUnit(), 'B000') > 0) == true 
    return IsUnitEnemy(GetTriggerUnit(), GetOwningPlayer(GetSpellTargetUnit())) == true
endfunction


function Trig_Magic_Defence_Actions takes nothing returns nothing
    local unit ST = GetSpellTargetUnit()
    local real x1 = GetUnitX(ST)
    local real y1 = GetUnitY(ST)
    local real x2 = GetUnitX(GetTriggerUnit())
    local real y2 = GetUnitY(GetTriggerUnit())
    local unit last
    local integer AL = GetUnitAbilityLevel(ST,'A004')
    local integer MSHi = AL * 2
    local real F = bj_RADTODEG * Atan2((y2 - y1),( x1 - x2))
    loop
        set MSHi = MSHi - 1
        exitwhen MSHi == 0
        set last = CreateUnit(GetOwningPlayer(ST),'E001',x1,y1,(F - GetRandomReal(-10,10)))
        call SetUnitPathing(last,false)
        call SetUnitState(last, UNIT_STATE_MANA, GetHeroInt(ST,true) /2)
        call AddSpecialEffectTarget("Abilities\\Weapons\\SpiritOfVengeanceMissile\\SpiritOfVengeanceMissile.​mdl", last, "origin")
        call GroupAddUnit(MSH, last)
    endloop
if GetRandomReal(0,100) >= 15*AL then
    call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkCaster.mdl", x1, y1))
    set x2 = (x1 + 300 * Cos(F * bj_DEGTORAD))
    set y2 = (y1 + 300 * Sin(F * bj_DEGTORAD))
    call SetUnitX( ST, x2)
    call SetUnitY( ST, y2)
    call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkTarget.mdl", x2 , y2))
endif
endfunction

globals
    group MSH
    unit fu
    integer count
endglobals

function damage takes nothing returns nothing
    call UnitDamageTarget(fu,GetEnumUnit(),(GetUnitState(fu,UNIT_STATE_MANA) / 2),true,false,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL,WEAPON_TYPE_WHOKNOWS)
    call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\NightElf\\Blink\\BlinkCaster.mdl",GetUn​itX(fu),GetUnitY(fu)))
    call DestroyEffect(AddSpecialEffectTarget("Abilities\\Spells\\NightElf\\Blink\\BlinkCaster.mdl"​,GetEnumUnit(),"chest"))
endfunction

function Count takes nothing returns nothing
    set count = count + 1
endfunction

function filterMS takes nothing returns boolean
return (IsUnitEnemy(GetEnumUnit(),GetOwningPlayer(fu)) == true)
endfunction

function Mad takes nothing returns nothing
    local real x1 = GetUnitX(fu)
    local real y1 = GetUnitY(fu)
    local real F = GetUnitFacing(fu)
    local real x2 = (x1 + 20 * Cos(F * bj_DEGTORAD))
    local real y2 = (y1 + 20 * Sin(F * bj_DEGTORAD))
    local real dmg = GetUnitState(fu, UNIT_STATE_MANA)
    local group temp
    set fu = GetEnumUnit()
    call SetUnitX(fu,x2)
    call SetUnitY(fu,y2)
    call GroupEnumUnitsInRange(temp, x2,y2, 64, Condition(function filterMS))
    set count=0
    call ForGroup(temp, function Count)
    if count>0 then
        call ForGroup(temp, function damage)
    endif
endfunction

function Trig_Move_System_Actions takes nothing returns nothing
    call ForGroup( MSH , function Mad)
endfunction

//===========================================================================
function InitTrig_Move_System takes nothing returns nothing
    local trigger gg_trg_Move_System = CreateTrigger(  )
    call TriggerRegisterTimerEvent( gg_trg_Move_System, 0.03,true )
    call TriggerAddAction( gg_trg_Move_System, function Trig_Move_System_Actions )
    set gg_trg_Move_System = null
endfunction