equal
deleted
inserted
replaced
235 if gear^.Timer = 0 then |
235 if gear^.Timer = 0 then |
236 gear^.Timer:= 3000 |
236 gear^.Timer:= 3000 |
237 end; |
237 end; |
238 gtMelonPiece: begin |
238 gtMelonPiece: begin |
239 gear^.AdvBounce:= 1; |
239 gear^.AdvBounce:= 1; |
240 gear^.Density:= _2 |
240 gear^.Density:= _2; |
|
241 gear^.Radius:= 4 |
241 end; |
242 end; |
242 gtHedgehog: begin |
243 gtHedgehog: begin |
243 gear^.AdvBounce:= 1; |
244 gear^.AdvBounce:= 1; |
244 gear^.Radius:= cHHRadius; |
245 gear^.Radius:= cHHRadius; |
245 gear^.Elasticity:= _0_35; |
246 gear^.Elasticity:= _0_35; |