Пулемётный огонь веером

group = CreateGroup()

--всякие параметры
range = 650
dAngle = 30
stepAngle = 15
projVelocity = 100

Timers = {}
Timers.bullets = CreateTimer()

TimerStart(Timers.bullets, 0.25, true, function()
    launchBullets(GetUnitX(hero), GetUnitY(hero)) -- пусть hero это будет пулемётчик
end)

function launchBullets(x, y) -- выпускаем очередь из пулемёта
    local angle = GetUnitFacing(hero)

    SetUnitAnimation(hero, "attack")
    local segments = getSegments(x, y, range, angle - dAngle, angle + dAngle, stepAngle) --находим конечные точки отрезков, по которым пустим снаряды

    local t = CreateTimer()
    TimerStart(t, 0.03, true, function()
        local p = table.remove(segments, math.random(1, #segments))
        launchBullet(x, y, p.x, p.y) --для красоты пускаем выстрелы с небольшой задержкой

        if #segments <= 0 or IsUnitDeadBJ(t) then
            DestroyTimer(t)
            return
        end
    end)
end

function launchBullet(x, y, x1, y1)
    -- выпускаем "снаряд" и ищем цель
    local eff = AddSpecialEffect("bullets", x, y)
    BlzSetSpecialEffectZ(eff, 60)
    BlzSetSpecialEffectYaw(eff, getAngle(x, y, x1, y1))

    local t = CreateTimer()
    local isProjectileAlive = true
    local xEffect, yEffect = x, y
    TimerStart(t, 0.015, true, function()
        GroupEnumUnitsInRange(group, xEffect, yEffect, 120)
        while true do
            local target = FirstOfGroup(group)
            if target == nil then break end
            GroupRemoveUnit(group, target)
            if UnitAlive(target) and target ~= hero and IsUnitInRangeXY(target, xEffect, yEffect, 50) --ищем юнитов в ренже, кроме пулемётчика
            then
                DestroyEffect(eff)
                isProjectileAlive = false --после первого столкновения уничтожим снаряд, чтобы он не летел дальше
                UnitDamageTargetBJ(hero, target, 20.00, ATTACK_TYPE_PIERCE, DAMAGE_TYPE_NORMAL) -- наносим те самые 20 дальнего урона
            end
        end

        -- двигаем снаряд в нужном направлении
        local sin, cos = getSinCos(xEffect, yEffect, x1, y1)

        xEffect = xEffect + cos * projVelocity
        yEffect = yEffect + sin * projVelocity

        if getDistance(x, y, xEffect, yEffect) >= range or not isProjectileAlive then
            DestroyTimer(t)
            DestroyEffect(eff)
            return
        end
        BlzSetSpecialEffectPosition(eff, xEffect, yEffect, 60)
    end)
end

function getSegments(cx, cy, r, angle1, angle2, angle_step)
    local segments = {}
    local n = math.floor((angle2 - angle1) / angle_step) + 1

    for i = 0, n - 1 do
        local angle = angle1 + i * angle_step
        local x = cx + r * math.cos(math.rad(angle))
        local y = cy + r * math.sin(math.rad(angle))
        table.insert(segments, {x = x, y = y})
    end

    return segments
end

function getSinCos(x1, y1, x2, y2)
    local dX = x2 - x1
    local dY = y2 - y1
    local dist = math.sqrt(dX*dX + dY*dY)
    local sin = dY / dist
    local cos = dX / dist

    return sin, cos
end

function getAngle(x1, y1, x2, y2)
    local deltaX = x2 - x1
    local deltaY = y2 - y1

    local angle
    if deltaX == 0 then
        if deltaY > 0 then
            angle = math.pi / 2
        else
            angle = -math.pi / 2
        end
    else
        angle = math.atan(deltaY / deltaX)
        if deltaX < 0 then
            angle = angle + math.pi
        end
    end

    return angle
end

function getDistance(x1, y1, x2, y2)
    local deltaX = x2 - x1
    local deltaY = y2 - y1

    return math.sqrt(deltaX^2 + deltaY^2)
end