function qwerty_Main takes nothing returns nothing
local timer Timer=GetExpiredTimer()
local unit Target = LoadUnitHandle(udg_h,GetHandleId(Timer),2)
local unit Caster = LoadUnitHandle(udg_h,GetHandleId(Timer),1)
local real lim = LoadReal(udg_h,GetHandleId(Timer),3)
local integer n = LoadInteger(udg_h,GetHandleId(Timer),4)
set n = n+1
if n == 150 or lim==0 then
    call DestroyTimer(Timer)
    else
        if (GetTriggerEventId()== EVENT_PLAYER_UNIT_ATTACKED and GetAttacker() == Target) then
        call DisplayTextToForce( GetPlayersAll(), "DMG1" )
        else
        call DisplayTextToForce( GetPlayersAll(), "DMG2" )
        endif
    call SaveInteger(udg_h,GetHandleId(Timer),3,n)
endif

endfunction

function HolyShild_Main takes nothing returns nothing
local timer Timer=GetExpiredTimer()
local unit Target = LoadUnitHandle(udg_h,GetHandleId(Timer),2)
local unit Caster = LoadUnitHandle(udg_h,GetHandleId(Timer),1)
local real Dmglim = LoadReal(udg_h,GetHandleId(Timer),3)
local integer n = LoadInteger(udg_h,GetHandleId(Timer),4)
local trigger trig=GetTriggeringTrigger()
call DisplayTextToForce( GetPlayersAll(), "go" )
set n = n+1
if n == 150 then
    call DestroyTimer(Timer)
    call DestroyTrigger(trig)
    else
        if GetTriggerEventId()== EVENT_UNIT_DAMAGED then
        call DisplayTextToForce( GetPlayersAll(), "DMG1" )
        else
        call DisplayTextToForce( GetPlayersAll(), "DMG2" )
        endif
    call SaveInteger(udg_h,GetHandleId(Timer),3,n)
endif

endfunction


function HolyShild_Actions takes nothing returns nothing
local timer Timer=CreateTimer()
local unit Caster = GetSpellAbilityUnit()
local unit Target = GetSpellTargetUnit()
local real Dmglim = 0
local integer Level = GetUnitAbilityLevel(Caster,'A010')
local trigger trig=CreateTrigger()
set Dmglim = 120
call SaveUnitHandle(udg_h,GetHandleId(Timer),1,Caster)
call SaveUnitHandle(udg_h,GetHandleId(Timer),2,Target)
call SaveReal(udg_h,GetHandleId(Timer),3,Dmglim)
call DisplayTextToForce( GetPlayersAll(), "start" )
call TriggerRegisterTimerEvent(trig,.2,true)
call TriggerRegisterUnitEvent(trig,Target,EVENT_UNIT_DAMAGED)
call TriggerAddAction(trig,function HolyShild_Main)
endfunction