// (ARROUNDWAVE)
function Trig_AroundWave_Conditions takes nothing returns boolean
return GetSpellAbilityId() == 'A05S'
endfunction
function R_Act takes nothing returns nothing
    local real range = GetStoredReal(udg_Cashe,I2S(H2I(GetTriggeringTrigger() ) ), "ra" )
    local real angle = GetStoredReal(udg_Cashe,I2S(H2I(GetTriggeringTrigger() ) ), "an" )
    local unit cas = I2U(GetStoredInteger(udg_Cashe,I2S(H2I(GetTriggeringTrigger() ) ), "cas" ))
    local location pos = I2L(GetStoredInteger(udg_Cashe,I2S(H2I(GetTriggeringTrigger() ) ), "pos" ))
    local location loc = PolarProjectionBJ(pos,range,angle)
    local real array coor
    local unit last = null

    if(RectContainsLoc(GetPlayableMapRect(), loc) != true) then
        call DisableTrigger(GetTriggeringTrigger())
        call RemoveLocation (loc)
        set loc = PolarProjectionBJ(pos,range - 60,angle)
        set coor[1] = GetLocationX(loc)
        set coor[2] = GetLocationX(loc)
        call RemoveLocation (loc)
        set loc = Location (coor[1],coor[2])
        call CreateNUnitsAtLocFacingLocBJ( 1, 'e000', GetOwningPlayer(cas), loc, pos )
        set last = GetLastCreatedUnit()
        call UnitAddAbilityBJ( 'A05T', GetLastCreatedUnit() )
        call SetUnitAbilityLevelSwapped( 'A05T', GetLastCreatedUnit(), GetUnitAbilityLevelSwapped('A05S', cas) )
        call IssuePointOrderLocBJ( GetLastCreatedUnit(), "shockwave", pos )
        call RemoveLocation (loc)
        set loc = null
        call RemoveLocation (pos)
        set pos = null
        set cas = null
        set range = 0
        set angle = 0
        call PolledWait (1.00)
        call RemoveUnit(last)
        call FlushStoredMission (udg_Cashe,I2S(H2I(GetTriggeringTrigger())))
        call DestroyTrigger (GetTriggeringTrigger())
    endif

    set range = range + 50
    call StoreReal (udg_Cashe, I2S(H2I(GetTriggeringTrigger())),"ra", range )
    call RemoveLocation (loc)
    set cas = null
    set range = 0
    set angle = 0
    set pos = null
    set loc = null
endfunction
function Trig_AroundWave_Actions takes nothing returns nothing
    local unit cas = GetSpellAbilityUnit()
    local location loc = GetSpellTargetLoc()
    local real r = 0
    local real range = 0
    local location pos = GetUnitLoc(cas)
    local trigger tr = CreateTrigger()
    call CreateNUnitsAtLocFacingLocBJ( 1, 'e000', Player(0), pos, loc )
    call RemoveUnit( GetLastCreatedUnit())
    set r = GetUnitFacing(GetLastCreatedUnit())
    call TriggerRegisterTimerEventPeriodic( tr, 0.05)
    call TriggerAddAction( tr, function R_Act)
    call StoreInteger (udg_Cashe, I2S(H2I(tr)),"pos", H2I(pos) )
    call StoreInteger (udg_Cashe, I2S(H2I(tr)),"cas", H2I(cas) )
    call StoreReal (udg_Cashe, I2S(H2I(tr)),"ra", range )
    call StoreReal (udg_Cashe, I2S(H2I(tr)),"an", r )
    call RemoveLocation (loc)
    set loc = null
    set pos = null
    set tr = null
    set cas = null
    set range = 0
    set r = 0
endfunction