function Break takes nothing returns nothing
    local unit u=GetTriggerUnit()
    local unit a=GetAttacker()
    local player p=GetOwningPlayer(a)
    local real hp=GetWidgetLife(u)

    local real r=25.

    if IsUnitAlly(u,p) and hp>=.405 and hp/GetUnitState(u,UNIT_STATE_MAX_LIFE)*100.>=r then
        call IssueImmediateOrderById(a,851972)
    endif

    set u=null
    set a=null
endfunction

function InitTrig_FF takes nothing returns nothing
    local trigger t=CreateTrigger()
    local integer i=0

    loop
        call TriggerRegisterPlayerUnitEvent(t,Player(i),EVENT_PLAYER_UNIT_ATTACKED,null)
        set i=i+1
        exitwhen(i==16)
    endloop

    call TriggerAddAction(t,function Break)

    set t=null
endfunction