integer array teamID
force array Pteams
group array Uteams
integer teamscount = 2
//...

private player LocalizeForPlayer_Player

private function LocalizeForPlayer_Group takes nothing returns nothing
local unit u = GetEnumUnit()
    if GetWidgetLife(u)>.405
        if GetLocalPlayer()==LocalizeForPlayer_Player
            call PingMinimapEx(GetUnitX(u),GetUnitY(u),2., 255,0,0,false)
        endif
    endif
    set u=null
endfunction

private function LocalizeForPlayer takes player p returns nothing
local int tID=teamID[GetConvertedPlayerId(p)]
local int i = 0
    set LocalizeForPlayer_Player=p
    loop
        if i!=tID
            call ForGroup(Uteams[i],function LocalizeForPlayer_Group)
        endif
        set i=i+1
        exitwhen i>=teamscount
    endloop
endfunction