globals
    group Rgr
endglobals
function Trig_test_Actions takes nothing returns nothing
    local unit d=CreateUnitAtLoc(Player(0),'hfoo',GetRectCenter(GetPlayableMapRect()),bj_UNIT_F  ACING)
    set Rgr=CreateGroup()
    call GroupAddUnit(Rgr,d)
     call BJDebugMsg("1")
    call EnableTrigger(gg_trg_GroupTest)
endfunction
//===========================================================================
function InitTrig_test takes nothing returns nothing
    set gg_trg_test = CreateTrigger(  )
    call TriggerRegisterTimerEventSingle( gg_trg_test, 5 )
    call TriggerAddAction( gg_trg_test, function Trig_test_Actions )
endfunction

trig GroupTest
function GroupRemoveTest takes nothing returns boolean
    local unit u=GetEnumUnit()
    call RemoveUnit(u)
    call BJDebugMsg("2")
    set u=null
    return false
endfunction
function Trig_GroupLaser_Actions takes nothing returns nothing
    call BJDebugMsg("2")
    call ForGroup(Rgr,function GroupRemoveUnitsLaser)
endfunction
//===========================================================================
function InitTrig_GroupLaser takes nothing returns nothing
    set gg_trg_GroupLaser = CreateTrigger(  )
    call DisableTrigger(gg_trg_GroupLaser)
    call TriggerAddAction( gg_trg_GroupLaser, function Trig_GroupLaser_Actions )
endfunction