equal
deleted
inserted
replaced
523 if (Flags and afTrackFall <> 0) and (Score > 0) and (dmg < Score) then |
523 if (Flags and afTrackFall <> 0) and (Score > 0) and (dmg < Score) then |
524 begin |
524 begin |
525 dX:= (0.005 * dmg + 0.01) / Density; |
525 dX:= (0.005 * dmg + 0.01) / Density; |
526 dY:= dX; |
526 dY:= dX; |
527 if (Kind = gtExplosives) and (State and gstTmpFlag = 0) and |
527 if (Kind = gtExplosives) and (State and gstTmpFlag = 0) and |
528 (((abs(dY) > 0.15) and (abs(dX) < 0.02)) or |
528 (((abs(dY) >= 0.15) and (abs(dX) < 0.02)) or |
529 ((abs(dY) < 0.15) and (abs(dX) < 0.15))) then |
529 ((abs(dY) < 0.15) and (abs(dX) < 0.15))) then |
530 dX:= 0; |
530 dX:= 0; |
531 |
531 |
532 if pX - x < 0 then dX:= -dX; |
532 if pX - x < 0 then dX:= -dX; |
533 if pY - y < 0 then dY:= -dY; |
533 if pY - y < 0 then dY:= -dY; |