equal
deleted
inserted
replaced
627 gear^.Density:= _2; |
627 gear^.Density:= _2; |
628 gear^.Elasticity:= _0_55; |
628 gear^.Elasticity:= _0_55; |
629 gear^.Friction:= _0_995 |
629 gear^.Friction:= _0_995 |
630 end; |
630 end; |
631 gtBlowTorch: begin |
631 gtBlowTorch: begin |
632 gear^.Radius:= cHHRadius + cBlowTorchC; |
632 gear^.Radius:= cHHRadius + cBlowTorchC - 1; |
633 if gear^.Timer = 0 then gear^.Timer:= 7500 |
633 if gear^.Timer = 0 then gear^.Timer:= 7500 |
634 end; |
634 end; |
635 gtSwitcher: begin |
635 gtSwitcher: begin |
636 gear^.Z:= cCurrHHZ |
636 gear^.Z:= cCurrHHZ |
637 end; |
637 end; |