scope KoldynOne {

void RemoveAbillity() {
timer t = GetExpiredTimer();int id = GetHandleId(t);unit c = LoadUnitHandle(Hash,id,0);
UnitRemoveAbility(c,'A03D');DestroyTimer(t);FlushChildHashtable(Hash,id);c = null;t = null;
}

void KoldynHp() {
                 timer t = GetExpiredTimer();int id = GetHandleId(t);unit u = LoadUnitHandle(Hash,id,0),d = LoadUnitHandle(Hash,id,1)
                     real x1 = GetUnitX(d), y1 = GetUnitY(d);
                     real x2 = GetUnitX(u), y2 = GetUnitY(u);
                     real angle = Atan2(y2-y1,x2-x1)+30*bj_DEGTORAD;
                     real x = x1 + 30. * Cos(angle), y = y1 + 30. * Sin(angle);
                     if DistanceBetweenCoords(x1,y1,x2,y2) > 35 {
                         SetUnitX(d,x);SetUnitY(d,y);SetUnitFacing(d,angle*bj_RADTODEG);
                     else
                         FadingTextSingle(GetOwningPlayer(u),"+"+I2S(R2I((GetWidgetLife(u)*(3.+2.*GetUnitAbilityLevel(u,'A03C')))*.01)),150, 0, 50,GetUnitX(u), GetWidgetY(u),.2,.4,.75)
                         SetWidgetLife(u,GetWidgetLife(u)+(GetWidgetLife(u)*(3.+2.*GetUnitAbilityLevel(u,'A03C')))*.01)
                         PauseTimer(t);DestroyTimer(t);RemoveUnit(d);FlushChildHashtable(Hash,id);
                     }
                     t = null
                     u = null
                     d = null
                 }

callback onUnitSpellEffect('A03C') {
timer t = CreateTimer();int id = GetHandleId(t);unit u = GetTriggerUnit();unit c = GetSpellTargetUnit()
unit d = CreateUnit(GetOwningPlayer(u),'h00N',GetUnitX(u),GetUnitY(u),Atan2(GetSpellTargetY()-GetWidgetY(u),GetSpellTargetX()-GetWidgetX(u))*57.29582     7)
SaveUnitHandle(Hash,id,0,u);SaveUnitHandle(Hash,id,1,d);SaveUnitHandle(Hash,id,2,c);
TimerStart(t,.04,true,\
lambda void() {
timer t = GetExpiredTimer();int id = GetHandleId(t);
         unit u = LoadUnitHandle(Hash,id,0),c = LoadUnitHandle(Hash,id,2), d = LoadUnitHandle(Hash,id,1);
         real x1 = GetUnitX(d), y1 = GetUnitY(d);
         real x2 = GetUnitX(c), y2 = GetUnitY(c);
         real angle = Atan2(y2-y1,x2-x1)+30*bj_DEGTORAD;
         real x = x1 + 30. * Cos(angle), y = y1 + 30. * Sin(angle);
             if DistanceBetweenCoords(x1,y1,x2,y2) > 35 {
                 SetUnitX(d,x);SetUnitY(d,y);SetUnitFacing(d,angle*bj_RADTODEG);
             else
             DestroyEffect(AddSpecialEffectTarget("Abilities\\Spells\\Undead\\DeathCoil\\DeathCoilSpecialArt.mdl",c,"chest"));UnitAddAbility(c,'A03D');
             FadingTextSingle(GetOwningPlayer(u),I2S(R2I(GetWidgetLife(c)*(5.+5.*GetUnitAbilityLevel(u,'A03C'))*.01))+"!",150, 0, 130,GetWidgetX(c), GetWidgetY(c),.3,.6,1.);
             UnitDamageTarget(u,c,GetWidgetLife(c)*(5.+5.*GetUnitAbilityLevel(u,'A03C'))*.01,true,false,ATTACK_TYPE_CHAOS,DAMAGE_TYPE_UNIVERS A L , null);
             PauseTimer(t);DestroyTimer(t);FlushChildHashtable(Hash,id);
             timer nt = CreateTimer();int nid = GetHandleId(nt);SaveUnitHandle(Hash,nid,0,u);SaveUnitHandle(Hash,nid,1,d);
             timer ct = CreateTimer();int cid = GetHandleId(ct);SaveUnitHandle(Hash,cid,0,c);
             TimerStart(nt,.04,true,function KoldynHp);TimerStart(ct,3.,false,function RemoveAbillity);
             }
         })
       }
}

scope KoldynTwo {

private void AnimSpeed(unit u,real time){
timer t = CreateTimer();SaveUnitHandle(Hash,GetHandleId(t),0,u);SetUnitTimeScale(u,.05)
TimerStart(t,time,false,\
lambda void(){
timer t = GetExpiredTimer();SetUnitTimeScale(LoadUnitHandle(Hash,GetHandleId(t),0),1.);DestroyTimer(t);FlushChildHashtable(Hash,GetHandleId(t));
})
}

callback onUnitSpellEffect('A03E') {
timer t = CreateTimer();int id = GetHandleId(t);unit u = GetTriggerUnit(),c = GetSpellTargetUnit();SaveUnitHandle(Hash,id,2,c);SaveReal(Hash,id,4,0);
unit d = CreateUnit(GetOwningPlayer(u),'h00O',GetUnitX(u),GetUnitY(u),Atan2(GetSpellTargetY()-GetWidgetY(u),GetSpellTargetX()-GetWidgetX(u))*57.29582   7)
SaveUnitHandle(Hash,id,0,u);SaveUnitHandle(Hash,id,1,d);
if UnitAddAbility(d,'Amrf') { UnitRemoveAbility(d,'Amrf') }
TimerStart(t, .02, true,\
lambda void(){
timer t = GetExpiredTimer();int id = GetHandleId(t);unit u = LoadUnitHandle(Hash,id,0),d = LoadUnitHandle(Hash,id,1),c = LoadUnitHandle(Hash,id,2);
real z = LoadReal(Hash,id,3),dis = LoadReal(Hash,id,4);
real x = GetUnitX(d),y = GetUnitY(d);
real x1 = GetUnitX(c),y1 = GetUnitY(c)
real angle = Atan2(y1-y,x1-x)
if DistanceBetweenCoords(x,y,x1,y1) / 2 > dis {
SetUnitX(d,x+20.*Cos(angle));SetUnitY(d,y+20.*Sin(angle));z = z + 20.;
SetUnitFlyHeight(d,z,0.);
else
SetUnitX(d,x+20.*Cos(angle));SetUnitY(d,y+20.*Sin(angle));z = z - 20.;
SetUnitFlyHeight(d,z,0.)
}
SaveReal(Hash,id,3,z);
SaveReal(Hash,id,4,dis+10.);
if z <= 0. then
FadingTextSingle(GetOwningPlayer(u),I2S(R2I(25+25*GetUnitAbilityLevel(u,'A03E')+(GetUnitState(c,UNIT_STATE_MAX_LIFE)*.05*GetUnitAbilityLevel   (u,'A03E'))))+"!",150, 0, 130,GetWidgetX(c), GetWidgetY(c),.3,.6,1.);
DestroyEffect(AddSpecialEffectTarget("Abilities\\Spells\\Undead\\DeathPact\\DeathPactTarget.mdl",c,"origin"));
AnimSpeed(c,3);
unit dum = CreateUnit(GetOwningPlayer(u),'h008',x,y,0);UnitAddAbility(dum,'A03F');IssueTargetOrderById(dum,852075,c);
UnitDamageTarget(u,c,25+25*GetUnitAbilityLevel(u,'A03E')+(GetUnitState(c,UNIT_STATE_MAX_LIFE)*.05*GetUnitAbilityLevel(u,'A03E')),true,false,   null,null,null)
PauseTimer(t);DestroyTimer(t);RemoveUnit(d);FlushChildHashtable(Hash,id);
endif

})
}
}