From 3c21a672c0d5dff4d02aef62d65d37db7852b63c Mon Sep 17 00:00:00 2001
From: JappaWakka <jjlspeelman@outlook.com>
Date: Wed, 26 Jul 2023 10:33:53 +0200
Subject: [PATCH] Stop Player from animating when game paused

---
 P3D/Entites/Other/OwnPlayer.vb | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

diff --git a/P3D/Entites/Other/OwnPlayer.vb b/P3D/Entites/Other/OwnPlayer.vb
index 11de3b64f..31c2dee48 100644
--- a/P3D/Entites/Other/OwnPlayer.vb
+++ b/P3D/Entites/Other/OwnPlayer.vb
@@ -85,13 +85,18 @@
 
     Private Sub Move()
         If (Screen.Camera.IsMoving() = True And Me.DoAnimation = True) OrElse (Screen.Level.OwnPlayer IsNot Nothing AndAlso Screen.Level.OwnPlayer.isDancing) Then
-            Me.AnimationDelay -= 0.13F
-            If AnimationDelay <= 0.0F Then
-                AnimationDelay = GetAnimationDelay()
-                AnimationX += 1
-                If AnimationX > 4 Then
-                    AnimationX = 1
+            If CurrentScreen.Identification <> Screen.Identifications.PauseScreen Then
+                Me.AnimationDelay -= 0.13F
+                If AnimationDelay <= 0.0F Then
+                    AnimationDelay = GetAnimationDelay()
+                    AnimationX += 1
+                    If AnimationX > 4 Then
+                        AnimationX = 1
+                    End If
                 End If
+            Else
+                AnimationX = 1
+                ChangeTexture()
             End If
         Else
             AnimationX = 1