tyler.durden/P3D-Legacy
1
0
Fork 0
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git synced 2025-07-30 01:05:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix TotalFlips

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

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

21
P3D/Screens/VoltorbFlipScreen.vb
View File

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