235 

   235 

   236     if BestRate > BaseRate then exit

   236     if BestRate > BaseRate then exit

   237     end

   237     end

   238 end;

   238 end;

   239 

   239 

   241 var BackMe, WalkMe: TGear;

   241 var BackMe, WalkMe: TGear;

   242     StartTicks: Longword;

   242     StartTicks: Longword;

   243 begin

   243 begin

   244 StartTicks:= GameTicks;

   244 StartTicks:= GameTicks;

   245 BestActions.Count:= 0;

   245 BestActions.Count:= 0;