DEADSOFTWARE

models: fix player walk + fire
authorDeaDDooMER <deaddoomer@deadsoftware.ru>
Tue, 18 Jan 2022 17:40:36 +0000 (20:40 +0300)
committerDeaDDooMER <deaddoomer@deadsoftware.ru>
Tue, 18 Jan 2022 17:40:36 +0000 (20:40 +0300)
src/game/g_playermodel.pas

index 1d1fca781779cccd2b76e08cc34ab2af6a458046..86d5b5a8be9b8d124ad79aa872302319d3d5c076 100644 (file)
@@ -749,7 +749,7 @@ end;
   procedure TPlayerModel.SetFire (Fire: Boolean);
   begin
     if Fire then
-      FFireCounter := PlayerModelsArray[FID].ModelSpeed[A_ATTACK] * PlayerModelsArray[FID].Anim[TDirection.D_RIGHT, A_ATTACK].Frames
+      FFireCounter := PlayerModelsArray[FID].ModelSpeed[A_ATTACK] * PlayerModelsArray[FID].Anim[TDirection.D_RIGHT, A_ATTACK].Frames + 1
     else
       FFireCounter := 0
   end;