equal
deleted
inserted
replaced
283 gear^.Elasticity:= _0_55; |
283 gear^.Elasticity:= _0_55; |
284 gear^.Friction:= _0_995; |
284 gear^.Friction:= _0_995; |
285 if cMinesTime < 0 then |
285 if cMinesTime < 0 then |
286 gear^.Timer:= getrandom(51)*100 |
286 gear^.Timer:= getrandom(51)*100 |
287 else |
287 else |
288 gear^.Timer:= cMinesTime*1000; |
288 gear^.Timer:= cMinesTime; |
289 end; |
289 end; |
290 gtSMine: begin |
290 gtSMine: begin |
291 gear^.Health:= 10; |
291 gear^.Health:= 10; |
292 gear^.State:= gear^.State or gstMoving; |
292 gear^.State:= gear^.State or gstMoving; |
293 gear^.Radius:= 2; |
293 gear^.Radius:= 2; |