hedgewars/uAI.pas
changeset 15686 034955e721a1
parent 15681 a92220611821
child 15688 31ca6451056a
equal deleted inserted replaced
15685:78e383fff605 15686:034955e721a1
   229                             begin
   229                             begin
   230                             if (AmmoTests[a].flags and amtest_MultipleAttacks) = 0 then
   230                             if (AmmoTests[a].flags and amtest_MultipleAttacks) = 0 then
   231                                 n:= 1 else n:= ap.AttacksNum;
   231                                 n:= 1 else n:= ap.AttacksNum;
   232 
   232 
   233                             AddAction(BestActions, aia_attack, aim_push, 650 + random(300), 0, 0);
   233                             AddAction(BestActions, aia_attack, aim_push, 650 + random(300), 0, 0);
       
   234                             if (a = amResurrector) and (BotLevel < 4) then
       
   235                                 AddAction(BestActions, aia_Up, aim_push, 1, 0, 0);
   234                             for t:= 2 to n do
   236                             for t:= 2 to n do
   235                                 begin
   237                                 begin
   236                                 AddAction(BestActions, aia_attack, aim_push, 150, 0, 0);
   238                                 AddAction(BestActions, aia_attack, aim_push, 150, 0, 0);
   237                                 AddAction(BestActions, aia_attack, aim_release, ap.Power, 0, 0);
   239                                 AddAction(BestActions, aia_attack, aim_release, ap.Power, 0, 0);
   238                                 end;
   240                                 end;
       
   241                             if (a = amResurrector) and (BotLevel < 4) then
       
   242                                 AddAction(BestActions, aia_Up, aim_release, ap.Power, 0, 0);
   239                             AddAction(BestActions, aia_attack, aim_release, ap.Power, 0, 0);
   243                             AddAction(BestActions, aia_attack, aim_release, ap.Power, 0, 0);
   240                             end;
   244                             end;
   241 
   245 
   242                     if (Ammoz[a].Ammo.Propz and ammoprop_Track) <> 0 then
   246                     if (Ammoz[a].Ammo.Propz and ammoprop_Track) <> 0 then
   243                         begin
   247                         begin