--- a/hedgewars/uAIMisc.pas	Fri May 09 12:58:10 2008 +0000
+++ b/hedgewars/uAIMisc.pas	Fri May 09 20:03:53 2008 +0000
@@ -51,7 +51,7 @@
     Targets: TTargets;
 
 implementation
-uses uTeams, uMisc, uLand, uCollisions, uconsole;
+uses uTeams, uMisc, uLand, uCollisions;
 const KillScore = 200;
       MAXBONUS = 1024;
       friendlyfactor: Longword = 300;
@@ -102,8 +102,7 @@
 	end;
 
 if e > f then friendlyfactor:= 300 + (e - f) * 30
-else friendlyfactor:= max(30, 300 - f * 80 div e);
-writelntoconsole('e:' +inttostr(e) + ' f:' + inttostr(f) + ' ff:'+ inttostr(friendlyfactor))
+else friendlyfactor:= max(30, 300 - f * 80 div e)
 end;
 
 procedure FillBonuses(isAfterAttack: boolean);