((код jass

function Trig_FireEscort_Conditions takes nothing returns boolean
return GetSpellAbilityId() == 'A000'
endfunction

function FireEscort_Move takes nothing returns nothing
local timer t=GetExpiredTimer()
local integer id=GetHandleId(t)
local unit dummy = LoadUnitHandle(udg_Hashtable,id,1)

local real tx
local real ty

set tx = GetUnitX(dummy)
set ty = GetUnitY(dummy)

call SetUnitX(dummy,tx+30)
call SetUnitY(dummy,ty+30)

endfunction

function Trig_FireEscort_Actions takes nothing returns nothing
local unit caster = GetSpellAbilityUnit()
local timer t = CreateTimer()
local integer id=GetHandleId(t)
local unit dummy
set dummy = CreateUnit(GetOwningPlayer(caster), 'h000', x+100, y+100, 90 )

call SaveUnitHandle(udg_Hashtable,id,1,dummy)

call TimerStart(t, 1, true, function FireEscort_Move)

endfunction

))

((код jass

function Trig_FireEscort_Conditions takes nothing returns boolean
return GetSpellAbilityId() == 'A000'
endfunction

function FireEscort_Move takes nothing returns nothing
local timer t = GetExpiredTimer()
local integer id = GetHandleId(t)
local unit d = LoadUnitHandle(udg_Hashtable, id, 1)
local real a = LoadReal(udg_Hashtable, id, 0)
local real x = GetUnitX(d)+30.*Cos(a*0.0174532)
local real y = GetUnitY(d)+30.*Sin(a*0.0174532)
добавляешь условие, при котором юнит закончит движение, допустим по дистанции или времени, и когда движение закончится втыкай действия:
call PauseTimer(t)
call FlushChildHashtable(udg_Hashtable, id)
call DestroyTimer(t)
Опять же освобождаем память от уже использованных значений, которые нам не понадобятся в дальнейшем, и избегаем утечности.
call SetUnitPosition(d, x, y)
set t = null
set d = null
endfunction

function Trig_FireEscort_Actions takes nothing returns nothing
local unit c = GetSpellAbilityUnit() юнит-кастер
local timer t = CreateTimer()
local integer id = GetHandleId(t)
local real x = GetUnitX(c)
local real y = GetUnitY(c)
local real a = GetUnitFacing(c)
call SaveReal(udg_Hashtable, id, 0, a)
call SaveUnitHandle(udg_Hashtable, id, 1, CreateUnit(GetOwningPlayer(c), 'h000', x+100, y+100, a))
call TimerStart(t, 0.04, true, function FireEscort_Move)
set t = null// после запуска таймера необходимо его обнулять, иначе будут утечки.
set c = null// с юнитом тоже самое
endfunction

function InitTrig_FireEscort takes nothing returns nothing
set gg_trg_FireEscort = CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(gg_trg_FireEscort, EVENT_PLAYER_UNIT_SPELL_CAST)
call TriggerAddCondition(gg_trg_FireEscort, Condition(function Trig_FireEscort_Conditions))
call TriggerAddAction(gg_trg_FireEscort, function Trig_FireEscort_Actions)
endfunction
))