diff -r 5688d2141464 -r 0c359a7a2356 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Sun Jul 30 18:57:44 2006 +0000 +++ b/hedgewars/uGears.pas Sun Jul 30 18:59:35 2006 +0000 @@ -293,12 +293,11 @@ end; Gear:= Gear.NextGear end; -CheckForWin end; procedure ProcessGears; const delay: integer = cInactDelay; - step: (stDelay, stChDmg, stSpawn, stNTurn) = stDelay; + step: (stDelay, stChDmg, stChWin, stSpawn, stNTurn) = stDelay; var Gear, t: PGear; {$IFDEF COUNTTICKS} tickcntA, tickcntB: LongWord; @@ -336,6 +335,7 @@ end end; stChDmg: if CheckNoDamage then inc(step) else step:= stDelay; + stChWin: if not CheckForWin then inc(step) else step:= stDelay; stSpawn: begin if not isInMultiShoot then SpawnBoxOfSmth; inc(step)