Prevent BattleMenu from softlocking pvp battle...

...so that the BattleMenu can't be used until there are no more text messages displaying.
This commit is contained in:
JappaWakka 2024-05-05 15:13:15 +02:00
parent eca6a70ed6
commit 4a16501926
1 changed files with 1 additions and 1 deletions

View File

@ -317,7 +317,7 @@
Public Sub Update(ByRef BattleScreen As BattleScreen) Public Sub Update(ByRef BattleScreen As BattleScreen)
Dim blockinteractscreen() As Screen.Identifications = {Screen.Identifications.PartyScreen, Screen.Identifications.SummaryScreen, Screen.Identifications.PauseScreen, Screen.Identifications.ChatScreen} Dim blockinteractscreen() As Screen.Identifications = {Screen.Identifications.PartyScreen, Screen.Identifications.SummaryScreen, Screen.Identifications.PauseScreen, Screen.Identifications.ChatScreen}
If blockinteractscreen.Contains(Core.CurrentScreen.Identification) = True Then If blockinteractscreen.Contains(Core.CurrentScreen.Identification) = True OrElse (BattleScreen.BattleQuery.Count > 0 AndAlso BattleScreen.BattleQuery(0).QueryType = QueryObject.QueryTypes.Textbox) Then
CanInteract = False CanInteract = False
Else Else
CanInteract = True CanInteract = True