equal
deleted
inserted
replaced
1823 if (Ammo^.Kind = gtDrill) then begin Ammo^.Timer:= 0; exit; end; |
1823 if (Ammo^.Kind = gtDrill) then begin Ammo^.Timer:= 0; exit; end; |
1824 if (not Gear^.Invulnerable) then |
1824 if (not Gear^.Invulnerable) then |
1825 ApplyDamage(Gear, tmpDmg) |
1825 ApplyDamage(Gear, tmpDmg) |
1826 else |
1826 else |
1827 Gear^.State:= Gear^.State or gstWinner; |
1827 Gear^.State:= Gear^.State or gstWinner; |
|
1828 if (Gear^.Kind = gtExplosives) and (Ammo^.Kind = gtBlowtorch) then ApplyDamage(Gear, tmpDmg * 100); // crank up damage for explosives + blowtorch |
1828 |
1829 |
1829 DeleteCI(Gear); |
1830 DeleteCI(Gear); |
1830 if (Gear^.Kind = gtHedgehog) and PHedgehog(Gear^.Hedgehog)^.King then |
1831 if (Gear^.Kind = gtHedgehog) and PHedgehog(Gear^.Hedgehog)^.King then |
1831 begin |
1832 begin |
1832 Gear^.dX:= Ammo^.dX * Power * _0_005; |
1833 Gear^.dX:= Ammo^.dX * Power * _0_005; |