stop HP bar from going down for party closing animation

This commit is contained in:
nilllzz 2018-03-08 19:47:36 +01:00
parent fb64e8dd07
commit b3d6195391
1 changed files with 6 additions and 1 deletions

View File

@ -323,7 +323,12 @@ Public Class PartyScreen
'108 pixels:
With p
Dim hpV As Double = .HP / .MaxHP
Dim hpWidth As Integer = CInt((104 * _interfaceFade) * hpV)
Dim hpWidth As Integer
If _closing Then
hpWidth = CInt(104 * hpV)
Else
hpWidth = CInt((104 * _interfaceFade) * hpV)
End If
Dim hpColorX As Integer = 0
If hpV < 0.5F Then
hpColorX = 5