hedgewars/uAI.pas
changeset 553 5478386d935f
parent 545 f527450337c1
child 599 7c7b90c402d3
equal deleted inserted replaced
552:2167020d3bc0 553:5478386d935f
   306    OutError('AI: no targets!?', false);
   306    OutError('AI: no targets!?', false);
   307    exit
   307    exit
   308    end;
   308    end;
   309 FillBonuses((Me^.State and gstAttacked) <> 0);
   309 FillBonuses((Me^.State and gstAttacked) <> 0);
   310 for a:= Low(TAmmoType) to High(TAmmoType) do
   310 for a:= Low(TAmmoType) to High(TAmmoType) do
   311     CanUseAmmo[a]:= Assigned(AmmoTests[a].proc) and HHHasAmmo(PHedgehog(Me^.Hedgehog), a);
   311     CanUseAmmo[a]:= Assigned(AmmoTests[a].proc) and HHHasAmmo(PHedgehog(Me^.Hedgehog)^, a);
   312 {$IFDEF DEBUGFILE}AddFileLog('Enter Think Thread');{$ENDIF}
   312 {$IFDEF DEBUGFILE}AddFileLog('Enter Think Thread');{$ENDIF}
   313 BeginThread(@Think, Me, ThinkThread)
   313 BeginThread(@Think, Me, ThinkThread)
   314 end;
   314 end;
   315 
   315 
   316 procedure ProcessBot;
   316 procedure ProcessBot;