function Blast_Wave_Arrow_Timer takes nothing returns boolean
    local trigger t=GetTriggeringTrigger()
    local integer table=GetHandleId(t)
    local unit target=(LoadUnitHandle(udg_h,(table),(17)))
    local unit u=(LoadUnitHandle(udg_h,(table),(18)))
    local real angle=(LoadReal(udg_h,(table),(13)))
    local real x=GetUnitX(target)
    local real y=GetUnitY(target)
    local real speed=25.0
    local unit loc
    if GetTriggerEvalCount(t)>13 then
        call FlushChildHashtable(udg_h,(table))
        call SaveInteger(udg_h,(GetHandleId((target))),((4260)),(2))
        call DestroyTrigger(t)
    else
        call DestroyEffect(AddSpecialEffect("Environment\\SmallBuildingFire\\SmallBuildingFire2.mdl",x,y))
        if((LoadInteger(udg_h,(GetHandleId((target))),((4261))))==1)==false then
            call SetUnitX(target,x+speed*Cos(angle))
            call SetUnitY(target,y+speed*Sin(angle))
            //call SetUnitPosition(target,x+speed*Cos(angle),y+speed*Sin(angle))
        endif
    endif
    set t=null
    set target=null
    set loc=null
    set u=null
    return false
endfunction

function Blast_Wave_Arrow_Act takes nothing returns nothing
    local trigger t=CreateTrigger()
    local integer table=GetHandleId(t)
    local unit target=GetEnumUnit()
    local real x=GetSpellTargetX()
    local real y=GetSpellTargetY()
    local real angle=bj_RADTODEG *Atan2(y-GetUnitY(target),x-GetUnitX(target))
    call DestroyEffect(AddSpecialEffectTarget("Environment\\SmallBuildingFire\\SmallBuildingFire2.mdl",target,"chest"))
    call UnitDT(GetTriggerUnit(),target,3,50.+GetHeroAgi(GetTriggerUnit(),true))
    call SaveInteger(udg_h,(GetHandleId((target))),((4260)),(1))
    call SaveUnitHandle(udg_h,(table),(17),(target))
    call SaveUnitHandle(udg_h,(table),(18),(GetTriggerUnit()))
    call SaveReal(udg_h,(table),(13),angle*1.)
    call TriggerRegisterTimerEvent(t,0.04,true)
    call TriggerAddCondition(t,Condition(function Blast_Wave_Arrow_Timer))
    set t=null
    set target=null
endfunction