anchor.diff:      Label_AlliesFPS[I].Strikethrough := gGame.Networking.NetPlayers[NetI].Dropped;
       DropBox_AlliesTeam[I].Enabled := (NetI = gGame.Networking.MyIndex); // Our index
       DropBox_AlliesTeam[I].Hide; // Use label for demos until we fix exploits
  +
  +    Inc(I);
     end;
   end;
   
   
   procedure TKMGamePlayInterface.AlliesOnPingInfo(Sender: TObject);
   var
  -  I, NetI: Integer;
  +  I, K, NetI: Integer;
     Ping: Word;
     Fps: Cardinal;
   begin
     UpdateNetPlayersMapping;
   
  -  for I := 0 to fPlayerLinesCnt - 1 do
  -  begin
  -    NetI := fLineIdToNetPlayerId[I];
  +  I := 0;
  +  for K := 0 to fPlayerLinesCnt - 1 do
  +  begin
  +    NetI := fLineIdToNetPlayerId[K];
  +
  +    if NetI = -1 then Continue; //In case we have AI players at hand, without NetI
  +
       if (I < gGame.Networking.NetPlayers.Count) and (gGame.Networking.NetPlayers[NetI].IsHuman) then
       begin
         Ping := gGame.Networking.NetPlayers[NetI].GetInstantPing;
  
positive.code: 
  procedure TKMGamePlayInterface.AlliesOnPlayerSetup(Sender: TObject);
  var
    I, NetI: Integer;
    LocaleID: Integer;
  begin
    Image_AlliesHostStar.Hide;
  
negative.code:       Label_AlliesPingFpsSlash[I].Caption := '';
        Label_AlliesFPS[I].Caption := '';
      end;
      Inc(I);
    end;
  end;
  
  