function Trig_Move_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetAttacker()) == 'Hmkg' ) ) then
        return false
    endif
    return true
endfunction

function Trig_Move_Actions takes nothing returns nothing
    local unit u1
    local unit u2
    local location p1
    local location p2
    local real a
    set u1=GetAttackedUnitBJ()
    set u2 = GetAttacker()
    set p1 = GetUnitLoc(u1)
    set p2 = GetUnitLoc(u2)
    set a = AngleBetweenPoints(p2, p1)
    // Начало Движения
    call MoveLocation(p1, GetLocationX(p1) + 50 * CosBJ(a), GetLocationY(p1) + 50 * SinBJ(a))
    call SetUnitPositionLoc( u1, p1)
    call PolledWait( 0.05 )
    call MoveLocation(p1, GetLocationX(p1) + 50 * CosBJ(a), GetLocationY(p1) + 50 * SinBJ(a))
    call SetUnitPositionLoc( u1, p1)
    call PolledWait( 0.05 )
    call MoveLocation(p1, GetLocationX(p1) + 50 * CosBJ(a), GetLocationY(p1) + 50 * SinBJ(a))
    call SetUnitPositionLoc( u1, p1)
    call PolledWait( 0.05 )
    call MoveLocation(p1, GetLocationX(p1) + 50 * CosBJ(a), GetLocationY(p1) + 50 * SinBJ(a))
    call SetUnitPositionLoc( u1, p1)
    call PolledWait( 0.05 )
    call MoveLocation(p1, GetLocationX(p1) + 50 * CosBJ(a), GetLocationY(p1) + 50 * SinBJ(a))
    call SetUnitPositionLoc( u1, p1)
endfunction

//===========================================================================
function InitTrig_Move takes nothing returns nothing
    set gg_trg_Move = CreateTrigger(  )
    call DisableTrigger( gg_trg_Move )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Move, EVENT_PLAYER_UNIT_ATTACKED )
    call TriggerAddCondition( gg_trg_Move, Condition( function Trig_Move_Conditions ) )
    call TriggerAddAction( gg_trg_Move, function Trig_Move_Actions )
endfunction