hedgewars/VGSHandlers.inc
changeset 5355 9e0c51a882aa
parent 5236 ab044774e29d
child 5366 bfdd925e89a5
equal deleted inserted replaced
5352:7f57d0c7816a 5355:9e0c51a882aa
    44         begin
    44         begin
    45         dec(FrameTicks, vobSDFrameTicks);
    45         dec(FrameTicks, vobSDFrameTicks);
    46         inc(Frame);
    46         inc(Frame);
    47         if Frame = vobSDFramesCount then Frame:= 0
    47         if Frame = vobSDFramesCount then Frame:= 0
    48         end;
    48         end;
    49     X:= X + (cWindSpeedf * 600 + dX + tdX) * Steps;
    49     X:= X + (cWindSpeedf * 400 + dX + tdX) * Steps;
    50     if SuddenDeathDmg then
    50     if SuddenDeathDmg then
    51         Y:= Y + (dY + tdY + cGravityf * vobSDFallSpeed) * Steps
    51         Y:= Y + (dY + tdY + cGravityf * vobSDFallSpeed) * Steps
    52     else
    52     else
    53         Y:= Y + (dY + tdY + cGravityf * vobFallSpeed) * Steps;
    53         Y:= Y + (dY + tdY + cGravityf * vobFallSpeed) * Steps;
    54     Angle:= Angle + dAngle * Steps;
    54     Angle:= Angle + dAngle * Steps;