function Army_Spawn_Actions takes nothing returns nothing
 local location array Loc
 local integer i = 3
 local unit u = null

 loop
 exitwhen i == 0
// set Loc[1] = GetRectCenter(gg_rct_Army_01)
// set Loc[2] = GetRectCenter(gg_rct_Army_02)
 set u = CreateUnit(Player(10), 'hfoo', GetLocationX(Loc[1]), GetLocationY(Loc[1]), 0)
 call IssuePointOrderLoc(u, "attack", Loc[2])
 call RemoveLocation(Loc[1])
 call RemoveLocation(Loc[2])
 set i = i - 1
 endloop

 set i = 7

 loop
 exitwhen i == 0
 set Loc[1] = GetRectCenter(gg_rct_Army_02)
 set Loc[2] = GetRectCenter(gg_rct_Army_01)
 set u = CreateUnit(Player(11), 'ugho', GetLocationX(Loc[1]), GetLocationY(Loc[1]), 0)
 call IssuePointOrderLoc(u, "attack", Loc[2])
 call RemoveLocation(Loc[1])
 call RemoveLocation(Loc[2])
 set i = i - 1
 endloop

 set i = 0
 set u = null
 set Loc[1] = null
 set Loc[2] = null
endfunction


function InitTrig_Army takes nothing returns nothing
 local trigger Army = CreateTrigger()
 call TriggerRegisterTimerEventPeriodic(Army, 20)
 call TriggerAddAction(Army, function Army_Spawn_Actions)
 set Army = null
endfunction

library A
endlibrary