equal
deleted
inserted
replaced
1459 begin |
1459 begin |
1460 AllInactive := false; |
1460 AllInactive := false; |
1461 WorldWrap(Gear); |
1461 WorldWrap(Gear); |
1462 HHGear := Gear^.Hedgehog^.Gear; |
1462 HHGear := Gear^.Hedgehog^.Gear; |
1463 dec(Gear^.Timer); |
1463 dec(Gear^.Timer); |
1464 if ((GameFlags and gfInfAttack) <> 0) and (TurnTimeLeft > 0) then |
|
1465 dec(TurnTimeLeft); |
|
1466 if (TurnTimeLeft = 0) or (Gear^.Timer = 0) |
1464 if (TurnTimeLeft = 0) or (Gear^.Timer = 0) |
1467 or((Gear^.Message and gmDestroy) <> 0) |
1465 or((Gear^.Message and gmDestroy) <> 0) |
1468 or((HHGear^.State and gstHHDriven) =0) then |
1466 or((HHGear^.State and gstHHDriven) =0) then |
1469 begin |
1467 begin |
1470 StopSoundChan(Gear^.SoundChannel); |
1468 StopSoundChan(Gear^.SoundChannel); |
1587 prevX: LongInt; |
1585 prevX: LongInt; |
1588 begin |
1586 begin |
1589 AllInactive := false; |
1587 AllInactive := false; |
1590 WorldWrap(Gear); |
1588 WorldWrap(Gear); |
1591 dec(Gear^.Timer); |
1589 dec(Gear^.Timer); |
1592 if ((GameFlags and gfInfAttack) <> 0) and (TurnTimeLeft > 0) then |
|
1593 dec(TurnTimeLeft); |
|
1594 |
1590 |
1595 if Gear^.Hedgehog^.Gear = nil then |
1591 if Gear^.Hedgehog^.Gear = nil then |
1596 begin |
1592 begin |
1597 StopSoundChan(Gear^.SoundChannel); |
1593 StopSoundChan(Gear^.SoundChannel); |
1598 DeleteGear(Gear); |
1594 DeleteGear(Gear); |