equal
deleted
inserted
replaced
363 gear^.State:= gear^.State or gstMoving; |
363 gear^.State:= gear^.State or gstMoving; |
364 gear^.Radius:= 2; |
364 gear^.Radius:= 2; |
365 gear^.Elasticity:= _0_55; |
365 gear^.Elasticity:= _0_55; |
366 gear^.Friction:= _0_995; |
366 gear^.Friction:= _0_995; |
367 if cMinesTime < 0 then |
367 if cMinesTime < 0 then |
368 gear^.Timer:= getrandom(51)*100 |
368 gear^.Timer:= getrandom(6)*1000 |
369 else |
369 else |
370 gear^.Timer:= cMinesTime*1000; |
370 gear^.Timer:= cMinesTime*1; |
371 end; |
371 end; |
372 gtSMine: begin |
372 gtSMine: begin |
373 gear^.Health:= 10; |
373 gear^.Health:= 10; |
374 gear^.State:= gear^.State or gstMoving; |
374 gear^.State:= gear^.State or gstMoving; |
375 gear^.Radius:= 2; |
375 gear^.Radius:= 2; |