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(6)*1000 |
368 gear^.Timer:= getrandom(51)*100 |
369 else |
369 else |
370 gear^.Timer:= cMinesTime*1; |
370 gear^.Timer:= cMinesTime*1000; |
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; |
888 if CurrentHedgehog^.Gear <> nil then |
888 if CurrentHedgehog^.Gear <> nil then |
889 if ((CurrentHedgehog^.Gear^.State and gstAttacking) = 0) |
889 if ((CurrentHedgehog^.Gear^.State and gstAttacking) = 0) |
890 and not isInMultiShoot then |
890 and not isInMultiShoot then |
891 begin |
891 begin |
892 if (TurnTimeLeft = 5000) |
892 if (TurnTimeLeft = 5000) |
893 and (cHedgehogTurnTime >= 10000) |
893 and (cHedgehogTurnTime >= 10) |
894 and (not PlacingHogs) |
894 and (not PlacingHogs) |
895 and (CurrentHedgehog^.Gear <> nil) |
895 and (CurrentHedgehog^.Gear <> nil) |
896 and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then |
896 and ((CurrentHedgehog^.Gear^.State and gstAttacked) = 0) then |
897 PlaySound(sndHurry, CurrentTeam^.voicepack); |
897 PlaySound(sndHurry, CurrentTeam^.voicepack); |
898 if ReadyTimeLeft > 0 then |
898 if ReadyTimeLeft > 0 then |