diff --git a/P3D/Overworld/OverworldCamera.vb b/P3D/Overworld/OverworldCamera.vb index 148b1685f..77ca0348d 100644 --- a/P3D/Overworld/OverworldCamera.vb +++ b/P3D/Overworld/OverworldCamera.vb @@ -1011,6 +1011,18 @@ Public Class OverworldCamera facing -= 4 End While + Turning = True + _aimDirection = facing + End If + Else + If ForceCameraTurn = True Then + Dim facing As Integer = GetFacingDirection() + facing += _playerFacing - GetFacingDirection() + + While facing > 3 + facing -= 4 + End While + Turning = True _aimDirection = facing End If diff --git a/P3D/World/ActionScript/V2/ScriptCommands/DoPlayer.vb b/P3D/World/ActionScript/V2/ScriptCommands/DoPlayer.vb index 7ab46c31b..179ea9682 100644 --- a/P3D/World/ActionScript/V2/ScriptCommands/DoPlayer.vb +++ b/P3D/World/ActionScript/V2/ScriptCommands/DoPlayer.vb @@ -164,7 +164,7 @@ turns = turns + 4 End If - If turns > 0 Then + If turns > 0 OrElse ForceCameraTurn = True Then Screen.Camera.Turn(turns, ForceCameraTurn) Started = True Screen.Level.OverworldPokemon.Visible = False