tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix TotalFlips

This commit is contained in:
JappaWakka 2023-05-27 16:23:21 +02:00
parent 39ce4458f1
commit e2793e6a03
2 changed files with 14 additions and 8 deletions

1
P3D/Screens/MainMenu/PauseScreen.vb
View File

@ -299,6 +299,7 @@
VoltorbFlip.VoltorbFlipScreen.CurrentLevel = 1
VoltorbFlip.VoltorbFlipScreen.PreviousLevel = 1
VoltorbFlip.VoltorbFlipScreen.ConsecutiveWins = 0
VoltorbFlip.VoltorbFlipScreen.TotalFlips = 0
If JoinServerScreen.Online = True Then
Core.ServersManager.ServerConnection.Disconnect()

13
P3D/Screens/VoltorbFlipScreen.vb
View File

@ -932,21 +932,22 @@ TryAgain:
If Delay = 0 Then
PreviousLevel = CurrentLevel
TotalFlips += CurrentFlips
If CurrentFlips >= 8 Then
TotalFlips += 1
End If
CurrentFlips = 0
ConsecutiveWins += 1
If ConsecutiveWins = 5 AndAlso TotalFlips >= 8 Then
If ConsecutiveWins = 5 AndAlso TotalFlips = 5 Then
CurrentLevel = MaxLevel + 1
Else
If CurrentLevel < MaxLevel + 1 Then
If CurrentLevel + 1 > MaxLevel Then
CurrentLevel = MaxLevel
Else
CurrentLevel += 1
End If
End If
End If
GameState = States.GameWon
Delay = 5
@ -1055,6 +1056,10 @@ TryAgain:
If TextBox.Showing = False Then
SoundManager.PlaySound("VoltorbFlip\StartGame")
Board = CreateBoard(CurrentLevel)
If CurrentLevel = 8 Then
TotalFlips = 0
ConsecutiveWins = 0
End If
If CurrentLevel < PreviousLevel Then
TextBox.Show("Dropped to Game Lv." & " " & CurrentLevel & "!")
End If