# HG changeset patch # User nemo # Date 1288972294 14400 # Node ID 0aba28eb8e34451185d38a02ed683146c369ba6e # Parent 0d3e701491fb51369ab87d76b11895a42712c45c more button updates, wait for hogs in infinite attack mode stop moving before clearing their damage (just used an arbitrary small interval) diff -r 0d3e701491fb -r 0aba28eb8e34 QTfrontend/res/btnAISurvival.png Binary file QTfrontend/res/btnAISurvival.png has changed diff -r 0d3e701491fb -r 0aba28eb8e34 QTfrontend/res/btnInfAttack.png Binary file QTfrontend/res/btnInfAttack.png has changed diff -r 0d3e701491fb -r 0aba28eb8e34 QTfrontend/res/btnResetHealth.png Binary file QTfrontend/res/btnResetHealth.png has changed diff -r 0d3e701491fb -r 0aba28eb8e34 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Fri Nov 05 11:06:22 2010 -0400 +++ b/hedgewars/uGears.pas Fri Nov 05 11:51:34 2010 -0400 @@ -627,7 +627,7 @@ Gear:= GearsList; while Gear <> nil do begin - if Gear^.Kind = gtHedgehog then + if (Gear^.Kind = gtHedgehog) and (((GameFlags and gfInfAttack) = 0) or ((Gear^.dX.QWordValue < _0_000004.QWordValue) and (Gear^.dY.QWordValue < _0_000004.QWordValue))) then begin if (not isInMultiShoot) then inc(Gear^.Damage, Gear^.Karma); if (Gear^.Damage <> 0) and