function HealRayCon takes nothing returns boolean
return GetSpellAbilityId() == 'A001'
endfunction

function HealRayEffect takes nothing returns nothing
local timer t= GetExpiredTimer()
local integer id = GetHandleId(t)
local unit c = LoadUnitHandle(udg_AssassinHash,id,0)
local unit d = LoadUnitHandle(udg_AssassinHash,id,1)
local unit f = LoadUnitHandle(udg_AssassinHash,id,2)
local real XE = LoadReal(udg_AssassinHash,id,StringHash("XE"))
local real YE = LoadReal(udg_AssassinHash,id,StringHash("YE"))
local real x
local real y
local real X = LoadReal(udg_AssassinHash,id,StringHash("X"))
local real Y = LoadReal(udg_AssassinHash,id,StringHash("Y"))
local real ang = Atan2(YE-Y,XE-X)
local real r = 60.
local integer i = LoadInteger(udg_AssassinHash,id,4)
local real R = LoadReal(udg_AssassinHash,id,5)
local real dist = SQ(X,Y,XE,YE)
local boolean b = LoadBoolean(udg_AssassinHash,id,3)
local real za = LoadReal(udg_AssassinHash,id,StringHash("AngleZ"))
if dist > 35. then
set X = X+30.*Cos(ang)
set Y = Y+30.*Sin(ang)
call SaveReal(udg_AssassinHash,id,StringHash("X"),X)
call SaveReal(udg_AssassinHash,id,StringHash("Y"),Y)
call SetUnitX(d,SafeX(X + r*Cos(za)*Cos(ang-.71)))
call SetUnitY(d,SafeY(Y + r*Cos(za)*Sin(ang-.71)))
call SetUnitX(f,SafeX(X + r*Cos(za)*Cos(ang+.71)))
call SetUnitY(f,SafeY(Y + r*Cos(za)*Sin(ang+.71)))
call SaveReal(udg_AssassinHash,id,StringHash("AngleZ"),za+.4)
else
call DestroyEffect(LoadEffectHandle(udg_AssassinHash,id,StringHash("ED")))
call DestroyEffect(LoadEffectHandle(udg_AssassinHash,id,StringHash("ED2")))
call UnitApplyTimedLife(d,'BTLF',1.)
call DestroyEffect(LoadEffectHandle(udg_AssassinHash,id,StringHash("EM")))
call DestroyEffect(LoadEffectHandle(udg_AssassinHash,id,StringHash("EM2")))
call UnitApplyTimedLife(f,'BTLF',1.)
call DestroyTimer(t)
call FlushChildHashtable(udg_AssassinHash,id)
endif
set t = null
set c = null
set d = null
set f = null
endfunction

function HealRay takes nothing returns nothing
local timer t = CreateTimer()
local unit c = GetTriggerUnit()
local real X = SafeX(GetSpellTargetX())
local real Y = SafeY(GetSpellTargetY())
local integer id = GetHandleId(t)
local real x = GetUnitX(c)
local real y = GetUnitY(c)
local real r = Atan2(Y-y,X-x)
local unit d = CreateUnit(GetOwningPlayer(c),'e000',x,y,bj_RADTODEG*r)
local unit f = CreateUnit(GetOwningPlayer(c),'e000',x,y,bj_RADTODEG*r)
call SaveUnitHandle(udg_AssassinHash,id,0,c)
call SaveUnitHandle(udg_AssassinHash,id,1,d)
call SaveUnitHandle(udg_AssassinHash,id,2,f)
call SaveEffectHandle(udg_AssassinHash,id,StringHash("ED"),AddSpecialEffectTarget("Abiliti​es\\Spells\\Other\\HealingSpray\\HealBottleMissile.mdl",d,"origin"))
call SaveEffectHandle(udg_AssassinHash,id,StringHash("ED2"),AddSpecialEffectTarget("Abilit​ies\\Weapons\\FaerieDragonMissile\\FaerieDragonMissile.mdl",d,"origin"))
call SaveEffectHandle(udg_AssassinHash,id,StringHash("EM"),AddSpecialEffectTarget("Abiliti​es\\Spells\\Other\\HealingSpray\\HealBottleMissile.mdl",f,"origin"))
call SaveEffectHandle(udg_AssassinHash,id,StringHash("EM2"),AddSpecialEffectTarget("Abilit​ies\\Weapons\\FaerieDragonMissile\\FaerieDragonMissile.mdl",f,"origin"))
call SaveReal(udg_AssassinHash,id,StringHash("XE"),X)
call SaveReal(udg_AssassinHash,id,StringHash("YE"),Y)
call SaveReal(udg_AssassinHash,id,StringHash("X"),x)
call SaveReal(udg_AssassinHash,id,StringHash("Y"),y)
call SaveReal(udg_AssassinHash,id,StringHash("Angle"),r)
call SetUnitFlyHeight(d,65,0)
call SetUnitScalePercent(d,200,200,200)
call SetUnitFlyHeight(f,65,0)
call SetUnitScalePercent(f,200,200,200)
call TimerStart(t,.02,true,function HealRayEffect)
set t = null
set c = null
set d = null
set f = null
endfunction
//===========================================================================
function InitTrig_Heal_Ray takes nothing returns nothing
    set gg_trg_Heal_Ray = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Heal_Ray, EVENT_PLAYER_UNIT_SPELL_EFFECT)
    call TriggerAddCondition( gg_trg_Heal_Ray, Condition( function HealRayCon))
    call TriggerAddAction( gg_trg_Heal_Ray, function HealRay )
endfunction