function Trig_HealLightning_Conditions takes nothing returns boolean
local integer spellId='A02Y'//здесь указываешь равкод своей способности
return GetSpellAbilityId() == spellId
endfunction

function GetUnitZZ takes unit u returns real
local location loc=GetUnitLoc(u)
local real z=GetUnitFlyHeight(u)+GetLocationZ(loc)+50.// эта строчка нужна для того,
 //чтобы молния создавалась не у ног,а чуть выше(на 50,можешь поменять)
call RemoveLocation(loc)
set loc=null
return z
endfunction

function HealLightning_m takes nothing returns nothing
local timer t=GetExpiredTimer()
local integer id=GetHandleId(t)
local unit caster=LoadUnitHandle(udg_ah2,id,0)
local unit target=LoadUnitHandle(udg_ah2,id,1)
local real damage = (GetHeroInt(caster,true)*2)+(GetHeroStr(target,true)*2)
//local real damage=LoadReal(udg_ah2,id,2)
local lightning lg=LoadLightningHandle(udg_ah2,id,3)
local integer number=LoadInteger(udg_ah2,id,4)-1
local group gn=LoadGroupHandle(udg_ah2,id,5)
local lightning lg2=LoadLightningHandle(udg_ah2,id,6)
local real x=GetUnitX(target)
local real y=GetUnitY(target)
local real z=GetUnitZZ(target)
local real tx
local real ty
local real tz
local group g
local unit target2
local integer end=0
local string lgstring="CLPB"// здесь указываешь название эффекта молнии,если захочешь изменить
// её вид
local string lgstring2="MFPB"// здесь указываешь название эффекта 2 молнии,если захочешь изменить
// её вид
local real radius=700.00// здесь расстояние поиска следующей цели для скачка молнии
    call DestroyLightning(lg)
    call DestroyLightning(lg2)
if number>0 then
    set g=CreateGroup()
    call GroupEnumUnitsInRange(g,x,y,radius,null)
    call GroupRemoveGroup(gn,g)
if CountUnitsInGroup(g)==0 then
    call GroupClear(gn)
    call DestroyGroup(gn)
    call GroupClear(g)
    call DestroyGroup(g)
    call PauseTimer(t)
    call DestroyTimer(t)
    call FlushChildHashtable(udg_ah2,id)
else
loop
    set target2=FirstOfGroup(g)
exitwhen end==1
if IsPlayerAlly(GetOwningPlayer(caster),GetOwningPlayer(target2)) and GetWidgetLife(target2)>=0.405 and not IsUnitType(target2,UNIT_TYPE_STRUCTURE) and not IsUnitType(target2,UNIT_TYPE_MAGIC_IMMUNE) and not IsUnit(caster, target2) then
    set end=1
else
    call GroupRemoveUnit(g,target2)
if CountUnitsInGroup(g)==0 then
    set end=1
    call GroupClear(gn)
    call DestroyGroup(gn)
    call PauseTimer(t)
    call DestroyTimer(t)
    call FlushChildHashtable(udg_ah2,id)    
endif
endif
endloop
    call GroupClear(g)
    call DestroyGroup(g)
if target2!=null then
    set tx=GetUnitX(target2)
    set ty=GetUnitY(target2)
    set tz=GetUnitZZ(target2)
    set lg=AddLightningEx(lgstring,true,x,y,z,tx,ty,tz)
    set lg2=AddLightningEx(lgstring2,true,x,y,z,tx,ty,tz)
    call GroupAddUnit(gn,target2)
    call SetUnitLifeBJ(target2,GetUnitStateSwap(UNIT_STATE_LIFE, target2) + damage)
//    call UnitDamageTarget(caster,target2,damage,true,false,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_NORMAL,null)
// этот эффект можешь удалить,если хочешь
  call DestroyEffect(AddSpecialEffectTarget("Abilities\\Weapons\\Bolt\\BoltImpact.mdl",target2,&q​uot;origin"))
  call DestroyEffect(AddSpecialEffectTarget("Abilities\\Spells\\Demon\\DemonBoltImpact\\DemonBoltImpac​t.mdl",target2,"origin"))
// я его добавил для красоты    call GroupAddUnit(gn,target2)
    call SaveUnitHandle(udg_ah2,id,1,target2)
    call SaveLightningHandle(udg_ah2,id,3,lg)
    call SaveInteger(udg_ah2,id,4,number)
    call SaveGroupHandle(udg_ah2,id,5,gn)
    call SaveLightningHandle(udg_ah2,id,6,lg2)
elseif target==null then
    call GroupClear(gn)
    call DestroyGroup(gn)
    call PauseTimer(t)
    call DestroyTimer(t)
    call FlushChildHashtable(udg_ah2,id)
endif
endif
elseif number==0 then
    call GroupClear(gn)
    call DestroyGroup(gn)
    call PauseTimer(t)
    call DestroyTimer(t)
    call FlushChildHashtable(udg_ah2,id)
endif
set caster=null
set t=null
set target=null
set target2=null
set lg=null
set lg2=null
set g=null
set gn=null
endfunction

function Trig_HealLightning_Actions takes nothing returns nothing
local unit caster=GetTriggerUnit()
local unit target=GetSpellTargetUnit()
local real x=GetUnitX(caster)
local real y=GetUnitY(caster)
local real z=GetUnitZZ(caster)
local real tx=GetUnitX(target)
local real ty=GetUnitY(target)
local real tz=GetUnitZZ(target)
local real damage=(GetHeroInt(caster,true)*5)+( GetUnitStateSwap(UNIT_STATE_LIFE, GetTriggerUnit()) * 2.00 )// это настройка урона,в данном случае урон=
// разум кастера(включая бонусы)*2
local timer t=CreateTimer()
local integer id=GetHandleId(t)
local real time=0.25// здесь указываешь период срабатывания таймера
local string lgstring="CLPB"// здесь указываешь название эффекта молнии,если захочешь изменить
// её вид
local string lgstring2="MFPB"// здесь указываешь название эффекта 2 молнии,если захочешь изменить
// её вид
local lightning lg=AddLightningEx(lgstring,true,x,y,z,tx,ty,tz)
local lightning lg2=AddLightningEx(lgstring2,true,x,y,z,tx,ty,tz)
local group gn=CreateGroup()
local integer number=5// здесь указываешь количество скачков молний
    call SetUnitLifeBJ(target,GetUnitStateSwap(UNIT_STATE_LIFE, target) + damage)
   // call UnitDamageTarget(caster,target,damage,true,false,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_NORMAL,null)
// этот эффект можешь удалить,если хочешь
  call DestroyEffect(AddSpecialEffectTarget("Abilities\\Weapons\\Bolt\\BoltImpact.mdl",target,&qu​ot;origin"))
    call DestroyEffect(AddSpecialEffectTarget("Abilities\\Spells\\Demon\\DemonBoltImpact\\DemonBoltImpac​t.mdl",target,"origin"))
// я его добавил для красоты
    call GroupAddUnit(gn,target)
    call SaveUnitHandle(udg_ah2,id,0,caster)
    call SaveUnitHandle(udg_ah2,id,1,target)
    call SaveReal(udg_ah2,id,2,damage)
    call SaveLightningHandle(udg_ah2,id,3,lg)
    call SaveInteger(udg_ah2,id,4,number)
    call SaveGroupHandle(udg_ah2,id,5,gn)
    call SaveLightningHandle(udg_ah2,id,6,lg2)
    call TimerStart(t,time,true,function HealLightning_m)
set caster=null
set target=null
set t=null
set gn=null
set lg=null
set lg2=null
endfunction

//===========================================================================
function InitTrig_HealLightning takes nothing returns nothing
    set gg_trg_HealLightning = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_HealLightning, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_HealLightning, Condition( function Trig_HealLightning_Conditions ) )
    call TriggerAddAction( gg_trg_HealLightning, function Trig_HealLightning_Actions )
// если будешь удалять эффект выше, то удаляй и эту строчку
    call Preload("Abilities\\Weapons\\Bolt\\BoltImpact.mdl")
    call Preload("Abilities\\Spells\\Demon\\DemonBoltImpact\\DemonBoltImpact.mdl")
// она была использована лишь для подгрузки спецэффекта
endfunction