diff --git a/P3D/Battle/BattleSystemV2/Battle.vb b/P3D/Battle/BattleSystemV2/Battle.vb index 8d01eaa68..ef68f9649 100644 --- a/P3D/Battle/BattleSystemV2/Battle.vb +++ b/P3D/Battle/BattleSystemV2/Battle.vb @@ -8017,6 +8017,12 @@ CureStatusProblem(False, False, BattleScreen, "", "move:healingwish") End If End If + Dim cq1 As ScreenFadeQueryObject = New ScreenFadeQueryObject(ScreenFadeQueryObject.FadeTypes.Vertical, Color.Black, True, 16) + Dim cq2 As ScreenFadeQueryObject = New ScreenFadeQueryObject(ScreenFadeQueryObject.FadeTypes.Vertical, Color.Black, False, 16) + cq2.PassThis = True + BattleScreen.BattleQuery.AddRange({cq1, cq2}) + BattleScreen.HasSwitchedOwn = False + BattleScreen.Battle.StartRound(BattleScreen) End With End Sub