hedgewars/uAI.pas
changeset 15602 583080b0272b
parent 15601 30ad3fd974f1
child 15603 ac44dae6425e
equal deleted inserted replaced
15601:30ad3fd974f1 15602:583080b0272b
   178                         AddAction(BestActions, aia_LookLeft, 0, 200, 0, 0);
   178                         AddAction(BestActions, aia_LookLeft, 0, 200, 0, 0);
   179 
   179 
   180                     if (Ammoz[a].Ammo.Propz and ammoprop_Timerable) <> 0 then
   180                     if (Ammoz[a].Ammo.Propz and ammoprop_Timerable) <> 0 then
   181                         AddAction(BestActions, aia_Timer, ap.Time div 1000, 400, 0, 0);
   181                         AddAction(BestActions, aia_Timer, ap.Time div 1000, 400, 0, 0);
   182 
   182 
   183                     // Set minimum mine bounciness for improved aim
   183                     if ((Ammoz[a].Ammo.Propz and ammoprop_SetBounce) > 0) and (ap.Bounce > 0) then
   184                     if (BotLevel < 5) and (a = amMine) then
       
   185                         begin
   184                         begin
   186                         AddAction(BestActions, aia_Precise, aim_push, 10, 0, 0);
   185                         AddAction(BestActions, aia_Precise, aim_push, 10, 0, 0);
   187                         AddAction(BestActions, aia_Timer, 1, 200, 0, 0);
   186                         AddAction(BestActions, aia_Timer, ap.Bounce, 200, 0, 0);
   188                         AddAction(BestActions, aia_Precise, aim_release, 10, 0, 0);
   187                         AddAction(BestActions, aia_Precise, aim_release, 10, 0, 0);
   189                         end;
   188                         end;
   190 
   189 
   191                     if (Ammoz[a].Ammo.Propz and ammoprop_NoCrosshair) = 0 then
   190                     if (Ammoz[a].Ammo.Propz and ammoprop_NoCrosshair) = 0 then
   192                         begin
   191                         begin