function Trig_cast_Func001C takes nothing returns boolean
      if ( not ( GetSpellAbilityId() == 'A000' ) ) then
          return false
      endif
      return true
endfunction

function Trig_cast_Actions takes nothing returns nothing
      if ( Trig_cast_Func001C() ) then
          set udg_all_point[0] = GetUnitLoc(GetTriggerUnit())
          set udg_Nm_MUI = ( udg_Nm_MUI + 1 )
          set udg_Nm_hero[udg_Nm_MUI] = GetTriggerUnit()
          call CreateNUnitsAtLoc( 1, 'u001', Player(PLAYER_NEUTRAL_PASSIVE), udg_all_point[0], bj_UNIT_FACING )
          set udg_Nm_dummy[udg_Nm_MUI] = GetLastCreatedUnit()
          set udg_Nm_time[udg_Nm_MUI] = GetRandomReal(2.00, 10.00)
          call SetUnitVertexColorBJ( GetLastCreatedUnit(), 100, 100, 100, 50.00 )
          call EnableTrigger( gg_trg_time )
          call RemoveLocation(udg_all_point[0])
      else
      endif
endfunction

//===========================================================================
function InitTrig_cast takes nothing returns nothing
      set gg_trg_cast = CreateTrigger(  )
      call TriggerRegisterAnyUnitEventBJ( gg_trg_cast, EVENT_PLAYER_UNIT_SPELL_EFFECT )
      call TriggerAddAction( gg_trg_cast, function Trig_cast_Actions )
endfunction

function Trig_time_Func001Func004C takes nothing returns boolean
      if ( not ( udg_Nm_time[GetForLoopIndexA()] < 0.03 ) ) then
          return false
      endif
      return true
endfunction

function Trig_time_Func002C takes nothing returns boolean
      if ( not ( udg_Nm_MUI == 0 ) ) then
          return false
      endif
      return true
endfunction

function Trig_time_Actions takes nothing returns nothing
      set bj_forLoopAIndex = 1
      set bj_forLoopAIndexEnd = udg_Nm_MUI
      loop
          exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
          set udg_all_point[0] = GetUnitLoc(udg_Nm_hero[GetForLoopIndexA()])
          call SetUnitPositionLoc( udg_Nm_dummy[GetForLoopIndexA()], udg_all_point[0] )
          set udg_Nm_time[GetForLoopIndexA()] = ( udg_Nm_time[GetForLoopIndexA()] - 0.03 )
          if ( Trig_time_Func001Func004C() ) then
              call KillUnit( udg_Nm_dummy[GetForLoopIndexA()] )
              set udg_Nm_hero[GetForLoopIndexA()] = udg_Nm_hero[udg_Nm_MUI]
              set udg_Nm_dummy[GetForLoopIndexA()] = udg_Nm_dummy[udg_Nm_MUI]
              set udg_Nm_time[GetForLoopIndexA()] = udg_Nm_time[udg_Nm_MUI]
              set udg_Nm_MUI = ( udg_Nm_MUI - 1 )
          else
          endif
          call RemoveLocation(udg_all_point[0])
          set bj_forLoopAIndex = bj_forLoopAIndex + 1
      endloop
      if ( Trig_time_Func002C() ) then
          call DisableTrigger( GetTriggeringTrigger() )
      else
      endif
endfunction

//===========================================================================
function InitTrig_time takes nothing returns nothing
      set gg_trg_time = CreateTrigger(  )
      call DisableTrigger( gg_trg_time )
      call TriggerRegisterTimerEventPeriodic( gg_trg_time, 0.03 )
      call TriggerAddAction( gg_trg_time, function Trig_time_Actions )
endfunction