diff -r c3ccec3834e8 -r 29bc9c36ad5f hedgewars/uAIMisc.pas --- a/hedgewars/uAIMisc.pas Thu Jan 18 20:29:28 2007 +0000 +++ b/hedgewars/uAIMisc.pas Sun Jan 21 19:51:02 2007 +0000 @@ -18,9 +18,9 @@ unit uAIMisc; interface -uses SDLh, uConsts, uGears; +uses SDLh, uConsts, uGears, uFloat; {$INCLUDE options.inc} - + { type TTarget = record Point: TPoint; Score: integer; @@ -48,9 +48,9 @@ var ThinkingHH: PGear; Targets: TTargets; - + } implementation -uses uTeams, uMisc, uLand, uCollisions; +{uses uTeams, uMisc, uLand, uCollisions; const KillScore = 200; MAXBONUS = 1024; @@ -389,6 +389,6 @@ begin if random(2) = 0 then Result:= num else Result:= - num -end; +end; } end.