hedgewars/uAI.pas
changeset 7453 92bdcd69bf2a
parent 7450 4be946b65a85
child 7787 67c96b9c179c
equal deleted inserted replaced
7450:4be946b65a85 7453:92bdcd69bf2a
   177                     if (Ammoz[a].Ammo.Propz and ammoprop_OscAim) <> 0 then
   177                     if (Ammoz[a].Ammo.Propz and ammoprop_OscAim) <> 0 then
   178                         begin
   178                         begin
   179                         AddAction(BestActions, aia_attack, aim_push, 350 + random(200), 0, 0);
   179                         AddAction(BestActions, aia_attack, aim_push, 350 + random(200), 0, 0);
   180                         AddAction(BestActions, aia_attack, aim_release, 1, 0, 0);
   180                         AddAction(BestActions, aia_attack, aim_release, 1, 0, 0);
   181                          
   181                          
   182                         if ap.Angle > 32 then
   182                         if abs(ap.Angle) > 32 then
   183                            begin
   183                            begin
   184                            AddAction(BestActions, aia_Down, aim_push, 100 + random(150), 0, 0);
   184                            AddAction(BestActions, aia_Down, aim_push, 100 + random(150), 0, 0);
   185                            AddAction(BestActions, aia_Down, aim_release, 32, 0, 0);
   185                            AddAction(BestActions, aia_Down, aim_release, 32, 0, 0);
   186                            end;
   186                            end;
   187                         
   187