DS_Trigger - триггер(массив)
DS_Time - целочисленная(массив)
DS_Count  - целочисленная

function Ab takes nothing returns integer
    return 'A000'
endfunction

function VampChance takes integer i returns nothing
    local integer d = R2I(GetEventDamage())  
    local integer c = GetRandomInt(0,100)
    if c<=i then
        call SetUnitState(GetEventDamageSource(),UNIT_STATE_LIFE,GetUnitState(GetEventDamageS    ource(),UNIT_STATE_LIFE)+200 + d)
    else
    endif
endfunction

function DS_UAttacked takes nothing returns nothing
    local integer l = GetUnitAbilityLevel(GetEventDamageSource(),Ab())
    call VampChance(15 + 5*(l-1))
endfunction

function DS_AddUnit takes nothing returns nothing
    set udg_DS_Trigger[udg_DS_Count] = CreateTrigger()
    call TriggerRegisterUnitEvent(udg_DS_Trigger[udg_DS_Count],GetTriggerUnit(),EVENT_UNIT_DAMAGED)
    call TriggerAddAction(udg_DS_Trigger[udg_DS_Count],function DS_UAttacked)
    set udg_DS_Time[udg_DS_Count] = 2
    set udg_DS_Count = udg_DS_Count + 1
endfunction

function DS_TL takes nothing returns nothing
    local integer i = 0
    loop
    exitwhen i > udg_DS_Count - 1
        set udg_DS_Time = udg_DS_Time[i] - 1
        if udg_DS_Time[i]<=0 then
            call DestroyTrigger(udg_DS_Trigger[i])
            set udg_DS_Trigger[i] = udg_DS_Trigger[udg_DS_Count - 1]
            set udg_DS_Trigger[udg_DS_Count - 1] = null
            set udg_DS_Time[i] = udg_DS_Time[udg_DS_Count - 1]
            set udg_DS_Time[udg_DS_Count - 1] = 0
            set udg_DS_Count =  udg_DS_Count - 1
        else
        endif
    set i = i + 1
    endloop
endfunction

function Ab takes nothing returns nothing
    return 'A000'
endfunction

function Ab takes nothing returns integer
    return 'A000'
endfunction

Events:
Игра - The in-game time of day becomes равно 24.00
Conditions:
  // as you want
Actions:
Player - Disable <Оборотень> for Player 1 (Red)

Events:
Игра - The in-game time of day becomes равно 5.00
Conditions:
  // as you want
Actions:
Player - Enable <Оборотень> for Player 1 (Red)

Events:
Generic Unit Event
Юнит получил приказ с целю - объект
Conditions:
String Comparison
(Issued order) Equal to Right-Click
+ проверка на левел спелла
Actions:
...

// trg_KickLaunch:
Events:
Юнит применяет заклинание
Conditions:
Ability beeing cast = <YourSpell>
Actions:
set kick_caster = Triggering Unit
set kick_facing = Facing Of kick_caster
set kick_target = Target Unit Of Ability Beeing Cast
set kick_int = 0
Turn on trg_KickMove

// trg_KickMove:
Events:
Every 0.01 seconds
Conditions:
Actions:
If\Then\Else:
If:
  kick_int < 100
Then:
    // тут юзай полярки: Point With Polar Offset
  Move kick_target to (Location Of (kick_target) with offset 10) towards kick_facing degrees
  set kick_int = kick_int+1
Else:
  Turn Of (This Trigger)