anchor.diff:    Result := -1;
     for I := 1 to fCount do
       if fNetPlayers[I].fNikname = aNikname then
  -      Result := I;
  +      Exit(I);
   end;
   
   
  
positive.code:   Result := -1;
    for I := 1 to fCount do
      if fNetPlayers[I].StartLocation = aLoc then
        Result := I;
  end;
  
  
  
negative.code:   Result := -1;
    for I := 1 to fCount do
      if fNetPlayers[I].fIndexOnServer = aIndexOnServer then
        Exit(I);
  end;
  
  
  