function Trig_N_1_A_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'A00O' ) ) then
        return false
    endif
    return true
endfunction

function Trig_N_1_A_Actions takes nothing returns nothing
    local location l=GetSpellTargetLoc()
    local unit u=GetSpellTargetUnit()
    local integer i=R2I(DistanceBetweenPoints(GetUnitLoc(u), l))
    //local real r=0.01
    call TriggerSleepAction( 5.00 )
    loop
     exitwhen i<=75
     call SetUnitPositionLoc( u, PolarProjectionBJ(GetUnitLoc(u), 10.00, AngleBetweenPoints(GetUnitLoc(u), l)) )
     call TriggerSleepAction(0.01)
     set i=R2I(DistanceBetweenPoints(GetUnitLoc(u), l))
    endloop
    //set l=null
    //set u=null
    //set i=0
endfunction

//===========================================================================
function InitTrig_N_1_A takes nothing returns nothing
    set gg_trg_N_1_A = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_N_1_A, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_N_1_A, Condition( function Trig_N_1_A_Conditions ) )
    call TriggerAddAction( gg_trg_N_1_A, function Trig_N_1_A_Actions )
endfunction