Strange Loop Issue(Spells)

function ShiverArmor_Actions takes nothing returns nothing
  local unit A = GetTriggerUnit()
  local unit D = GetAttachedUnit(gg_trg_ShiverArmor,"S")
  local player S = GetOwningPlayer(A)

    call DisplayTextToForce( GetPlayersAll(), UnitId2StringBJ(GetUnitTypeId(D)) )
    call CasterCastAbility( S, ShiverArmor_DummySpellId(), ShiverArmor_Orderid(), A, true)

endfunction

function ShiverArmor_Effects takes nothing returns nothing
  local real A = GetRandomReal(-100.00, 100.00)
  local real S = GetRandomReal(-100.00, 100.00)
  local unit G = GetAttachedUnit(gg_trg_ShiverArmor,"S")
  local location D = OffsetLocation(GetUnitLoc(G), A, S)
  local player F = GetOwningPlayer(G)
  local location H = GetUnitLoc(G)

    if UnitHasBuffBJ(GetTriggerUnit(), 'B000') == true then
        call ProjectileLaunchExLoc( F, "Abilities\\Weapons\\ZigguratFrostMissile\\ZigguratFrostMissile.mdl", 1.5, 255, 255, 255, 255, 522, 0.15, H, 0, D, 200 )
    endif

    call RemoveLocation(D)
    call RemoveLocation(H)

  set A = 0
  set S = 0
  set G = null
  set D = null
  set F = null
  set H = null
endfunction

function ShiverArmor_Retaliation takes nothing returns nothing
endfunction

function ShiverArmor_Setup takes nothing returns nothing
  local trigger A = CreateTrigger(  )
  local unit S = GetTriggerUnit()

    call CleanAttachedVars(A)
    call AttachObject( gg_trg_ShiverArmor,"S",S)

    call TriggerRegisterUnitEvent(A,S,EVENT_UNIT_SPELL_EFFECT)
    call TriggerAddAction( A, function ShiverArmor_Actions )

    if ShiverArmor_Effect() == true then
       call TriggerRegisterTimerEventPeriodic( A, ShiverArmor_EffectTimer() )
       call TriggerRegisterTimerEvent(A,0,false)
       call TriggerAddAction( A, function ShiverArmor_Effect )
    else
    endif

    call TriggerRegisterUnitEvent( A, S, EVENT_UNIT_ATTACKED )
    call TriggerAddAction( A, function ShiverArmor_Retaliation )

  set S = null              //Nullify the unit var so it wont leak (Unit vars do not leak anyway:P)
endfunction

function InitTrig_ShiverArmor takes nothing returns nothing
    call OnAbilityEffect(ShiverArmor_SpellId(),"ShiverArmor_Setup")
endfunction

function ShiverArmor_Effect takes nothing returns boolean
   return true
endfunction

function ShiverArmor_EffectTimer takes nothing returns real
   return GetRandomReal(1.25, 4.00)
endfunction

function ShiverArmor_Setup takes nothing returns nothing
  local trigger A = CreateTrigger(  )
  local unit S = GetTriggerUnit()

    call CleanAttachedVars(A)
    //You are cleaning variables for a trigger that was just created, why?
    
    call AttachObject( gg_trg_ShiverArmor,"S",S)
    //gg_trg_ShiverArmor is NEVER initialized cause you are just using OnAbilityEffect
    //gg_trg_ShiverArmor is surelly pointing to null
    //Even if that was initialized correctly it would be senseless to attach the Triggering unit to
    //it, because it is a global and that would make the attached var "S" a global too and break
    //any hope of multi instancibility which is the point of Attacheable Variables

    call TriggerRegisterUnitEvent(A,S,EVENT_UNIT_SPELL_EFFECT)
    call TriggerAddAction( A, function ShiverArmor_Actions )
    // More senseless stuff, you are registering the EVENT_UNIT_SPELL_EFFECT event FOR TRIGGERING UNIT
    // So every time current Triggering unit starts a effect of an ability the ShiberArmor_Actions will
    // Execute, that's a problem cause probably the current execution - which was called by a 'Starts
    // the effect of an ability event too - will also trigger the new trigger.
    
    // And you use the attached variable "S" to the global gg_trg_ShiverArmor in that other trigger
    // Did you note that most likelly in ShiverArmor_Actions both unit D and A will actually be
    // the same unit? Cause that trigger will only run when current triggering unit starts the effect
    // of an ability, so in that trigger GetTriggerUnit() will always be the GetTriggerUnit() of this
    // trigger which you are also setting for gg_trg_ShiverArmor,"S"

    
    if ShiverArmor_Effect() == true then
       call TriggerRegisterTimerEventPeriodic( A, ShiverArmor_EffectTimer() )
       call TriggerRegisterTimerEvent(A,0,false)
       call TriggerAddAction( A, function ShiverArmor_Effect )
       // This is the major Senseless ever cause ShiverArmor_Effect is just a function that returns true,
       // whatever makes you think it is a good idea to make the trigger A call it.
       
       // You also override previous call TriggerAddAction( A, function ShiverArmor_Actions )
       
    else
    endif

    call TriggerRegisterUnitEvent( A, S, EVENT_UNIT_ATTACKED )
    // Whenever current Triggering unit is attacked execute that trigger, so the trigger will work when
    // you attack that unit or when that unit starts the effect of an ability?
    
    call TriggerAddAction( A, function ShiverArmor_Retaliation )
    // Now you are giving that trigger an Action that does nothing , congratulations the trigger will not
    // do anything

  set S = null              //Nullify the unit var so it wont leak (Unit vars do not leak anyway:P)
endfunction

function InitTrig_ShiverArmor takes nothing returns nothing
    call OnAbilityEffect(ShiverArmor_SpellId(),"ShiverArmor_Setup")
endfunction