//======================================================================
//NOVA SPELL
//======================================================================
library A initializer A_Init uses XAT

constant function MapSize takes nothing returns real
    return 11392.
endfunction

function AreaSafe takes real R returns real
    if R > MapSize() then
        return MapSize()-64
    endif
    if R < -MapSize() then
        return -MapSize()+64
    endif
    return R
endfunction

function PolarProjectionX takes real X, real R, real A returns real
    return AreaSafe(X + Cos(A * 0.0174533) * R)
endfunction

function PolarProjectionY takes real Y, real R, real A returns real
    return AreaSafe(Y + Sin(A * 0.0174533) * R)
endfunction
//=======================================================================
private struct NV
unit caster
unit f
group g = CreateGroup()
group n
integer time
real R
endstruct

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

function Nova_Filter takes nothing returns boolean
    return IsPlayerEnemy(GetOwningPlayer(GetSpellAbilityUnit()), GetOwningPlayer(GetFilterUnit())) and not IsUnitType(GetFilterUnit(), UNIT_TYPE_FLYING)
endfunction

function Nova_CopyGroup takes group g returns group
    set bj_groupAddGroupDest = CreateGroup()
    call ForGroup(g, function GroupAddGroupEnum)
    return bj_groupAddGroupDest
endfunction

function Nova_Action takes nothing returns nothing
    local timer t =GetExpiredTimer()
    local NV a =GetInt(t)
    local real x = GetUnitX(a.caster)
    local real y = GetUnitY(a.caster)
    local real ang = 0
    local real X1
    local real Y1
    local integer I=0
    loop
        exitwhen I > 30
        set X1 = PolarProjectionX(x,a.R,ang)
        set Y1 = PolarProjectionY(y,a.R,ang)
        call DestroyEffect(AddSpecialEffect("Abilities\\Weapons\\Bolt\\BoltImpact.mdl",X1,Y1))
        set ang = (ang+12)
        set I = (I+1)
    endloop
    set a.R = a.R+50
    set a.time = a.time+1
    if a.time >= 7 then
        call RemoveInt(t)
        call DestroyTimer(t)
        call a.destroy()
    endif
endfunction

function Nova_Launch takes nothing returns nothing
    local NV a = NV.create()
    local timer t = CreateTimer()
    local real x = GetUnitX(a.caster)
    local real y = GetUnitY(a.caster)
    local boolexpr b = Condition(function Nova_Filter)
    local integer lvl = GetUnitAbilityLevel(a.caster,'A000')
    set a.caster = GetSpellAbilityUnit()
    call GroupEnumUnitsInRange(a.g,x,y,500,b)
    set a.n = Nova_CopyGroup(a.g)
    loop
        set a.f = FirstOfGroup(a.n)
        exitwhen a.f == null
        call UnitDamageTarget(a.caster,a.f, 50*lvl, true, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_MAGIC, null)
        call GroupRemoveUnit(a.n,a.f)
    endloop
    set a.time = 150
    set a.R = 0
    call SetInt(t,a)
    call TimerStart(t,0.25,true,function Nova_Action)
    set t=null
endfunction

//A Init
private function A_Init takes nothing returns nothing
    local trigger t=CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ(t,EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition(t,Condition(function Nova_Check))
    call TriggerAddAction(t,function Nova_Launch)
    set t=null
endfunction
endlibrary