hedgewars/VGSHandlers.inc
changeset 5236 ab044774e29d
parent 5235 e30b06ffea3a
child 5355 9e0c51a882aa
child 5357 ec36f3d53f3c
equal deleted inserted replaced
5235:e30b06ffea3a 5236:ab044774e29d
    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 * 200 + dX + tdX) * Steps;
    49     X:= X + (cWindSpeedf * 600 + 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;