function Trig_RageOfScream_Conditions takes nothing returns boolean
return GetUnitAbilityLevel(GetAttacker(), 'A08L') > 0 and IsUnitType(GetTriggerUnit(), UNIT_TYPE_STRUCTURE) != true
endfunction
function Scream_Conditions takes nothing returns boolean
return GetUnitAbilityLevelSwapped('A08L', GetEventDamageSource()) > 0 and IsPlayerEnemy(GetOwningPlayer(GetTriggerUnit()), GetOwningPlayer(GetEventDamageSource())) == true
endfunction

function Scream_actions takes nothing returns nothing
    local texttag s
    if ( GetRandomInt(1, 100) <= ( 7 + ( 3 * GetUnitAbilityLevelSwapped('A08L', GetEventDamageSource()) ) ) ) then
        call UnitDamageTargetBJ( GetEventDamageSource(), GetTriggerUnit(), I2R(GetHeroStatBJ(bj_HEROSTAT_STR, GetEventDamageSource(), true)), ATTACK_TYPE_CHAOS, DAMAGE_TYPE_DEMOLITION )
    set s=CreateTextTagLocBJ( ( "|c00FF0000" + ( I2S(GetHeroStatBJ(bj_HEROSTAT_STR, GetEventDamageSource(), true)) + "|r" ) ), GetUnitLoc(GetTriggerUnit()), 50.00, 10, 100, 100, 100, 0 )   
    call SetTextTagVelocityBJ( s, 64, 90 )
    call TriggerSleepAction( 0.50 )
    call DestroyTextTagBJ(s)
    set s=null
    else
        call DoNothing(  )
    endif
endfunction

function Trig_RageOfScream_Actions takes nothing returns nothing
    local unit u = GetTriggerUnit()
    local unit u2 = GetAttacker()
    local trigger t = CreateTrigger()
    local boolexpr c = Condition(function Scream_Conditions)
    call TriggerRegisterUnitEvent(t, u, EVENT_UNIT_DAMAGED)
    call TriggerAddCondition(t, c)
    call TriggerAddAction(t, function Scream_actions)
    call TriggerSleepAction(3.5)
    call DestroyTrigger(t)
    set u = null
    set u2 = null
    set t = null
    set c = null
endfunction

//===========================================================================
function InitTrig_SpellUltimateOfMagicGhost takes nothing returns nothing
    local integer i = 0
    set gg_trg_RageOfScream = CreateTrigger( )
    loop
        exitwhen i > 15
        call TriggerRegisterPlayerUnitEvent( gg_trg_RageOfScream, Player(i), EVENT_PLAYER_UNIT_ATTACKED, null )
        set i = i + 1
    endloop
    call TriggerAddCondition( gg_trg_RageOfScream, Condition( function Trig_RageOfScream_Conditions ) )
    call TriggerAddAction( gg_trg_RageOfScream, function Trig_RageOfScream_Actions )
endfunction

function blabla takes nothing returns nothing
    local boolexpr c = Condition(function Scream_Conditions)
    // . . .
    call TriggerAddCondition(t, c)
    // . . .
    set c = null
endfunction

function blabla takes nothing returns nothing
    // . . .
    call TriggerAddCondition(t, Condition(function Scream_Conditions))
endfunction