function MadnessTranformationCond takes void returns boolean
    int id = GetSpellAbilityId()
    return id == 'A0BT' or id == 'A03N' or id == 'A0BZ' or id == 'A0C8' or id == 'A07U' or id == 'A0UN' or id == 'A0PD' or id == 'A0LY' or id == 'A068' or id == 'A09J' or id == 'A0PR' or id == 'A0CI' or id == 'A0OX'
endfunction

function MadnessTranformationCast takes void returns void
    unit u = GetTriggerUnit()
    UnitAddAbility(u, 'ACm2')
    UnitRemoveBuffsEx(u, false, true, true, true, true, true, true)
    UnitRemoveAbility(u, 'ACm2')
    UnitAddItemById(u, 'I03T')
    UnitAddItemById(u, 'I03U')
    BJDebugMsg("!")
    u = null
endfunction

function InitTrig_MadnessTranformation takes void returns void
    trigger t = CreateTrigger()
    int i = 0
    loop
        exitwhen i == 12 
        TriggerRegisterPlayerUnitEvent(t,Player(i),EVENT_PLAYER_UNIT_SPELL_CAST,null)
        i = i+1
    endloop
    TriggerAddCondition(t, Condition( function MadnessTranformationCond ) )
    TriggerAddAction(t, function MadnessTranformationCast )
    t = null
endfunction

function MadnessTranformationCond takes void returns boolean
    int id = GetSpellAbilityId()
    return id == 'A0BT' or id == 'A03N' or id == 'A0BZ' or id == 'A0C8' or id == 'A07U' or id == 'A0UN' or id == 'A0PD' or id == 'A0LY' or id == 'A068' or id == 'A09J' or id == 'A0PR' or id == 'A0CI' or id == 'A0OX'
endfunction

function MadnessTranformationCast3 takes void returns void
    timer t = GetExpiredTimer()
    integer id = GetHandleId(t)
    unit u = LoadUnitHandle(h, id, 0)
    UnitRemoveAbility(u, 'ACm2')
    BJDebugMsg("3")
    DestroyTimer(t)
    FlushChildHashtable(h, id)
    u = null
    t = null
endfunction

function MadnessTranformationCast2 takes void returns void
    timer t = GetExpiredTimer()
    integer id = GetHandleId(t)
    unit u = LoadUnitHandle(h, id, 0)
    UnitAddAbility(u, 'ACm2')
    UnitRemoveBuffsEx(u, false, true, true, true, true, true, true)
    UnitAddItemById(u, 'I03T')
    UnitAddItemById(u, 'I03U')
    PauseTimer(t)
    TimerStart(t,0.02,false,function MadnessTranformationCast3)
    BJDebugMsg("2")
    u = null
    t = null
endfunction

function MadnessTranformationCast takes void returns void
    unit u = GetTriggerUnit()
    timer t = CreateTimer()
    int id = GetHandleId(t)
    int sa = GetSpellAbilityId()
    int lvl = GetUnitAbilityLevel(u,sa)
    BJDebugMsg("1")
    if sa == 'A0BT' or sa == 'A0BZ' or sa == 'A0C8' or sa == 'A0PR' then
        SaveUnitHandle(h,id,0,u)
        TimerStart(t,2+lvl-0.01,false,function MadnessTranformationCast2)
    endif
    u = null
    t = null
endfunction

function InitTrig_MadnessTranformation takes void returns void
    trigger t = CreateTrigger()
    int i = 0
    loop
        exitwhen i == 12 
        TriggerRegisterPlayerUnitEvent(t,Player(i),EVENT_PLAYER_UNIT_SPELL_CAST,null)
        i = i+1
    endloop
    TriggerAddCondition(t, Condition( function MadnessTranformationCond ) )
    TriggerAddAction(t, function MadnessTranformationCast )
    t = null
endfunction