diff -r 24daa33a3114 -r 4c4c0a2507cc hedgewars/uGears.pas --- a/hedgewars/uGears.pas Sun Oct 10 22:32:01 2010 +0200 +++ b/hedgewars/uGears.pas Sun Oct 10 16:51:40 2010 -0400 @@ -696,6 +696,7 @@ procedure ProcessGears; const delay: LongWord = 0; + delay2: LongWord = 0; step: (stDelay, stChDmg, stSweep, stTurnReact, stAfterDelay, stChWin, stWater, stChWin2, stHealth, stSpawn, stNTurn) = stDelay; @@ -841,6 +842,20 @@ end; step:= Low(step) end; + end +else if ((GameFlags and gfInfAttack) <> 0) then + begin + if delay2 = 0 then + delay2:= cInactDelay + else + dec(delay2); + + if delay2 = 0 then + begin + if (CurrentHedgehog <> nil) and (CurrentHedgehog^.Gear <> nil) then CurrentHedgehog^.Gear^.State:= CurrentHedgehog^.Gear^.State and not gstAttacked; + CheckNoDamage; + CheckForWin + end end; if TurnTimeLeft > 0 then