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

Voltorb Flip coin case cap won't prevent game

This commit is contained in:
JappaWakka 2023-08-01 20:05:52 +02:00
parent 2e85705bf8
commit e8e27c727e
1 changed files with 16 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
P3D/World/ActionScript/V2/ScriptCommands/DoScreen.vb
View File

@ -284,27 +284,22 @@
CanContinue = False CanContinue = False
Case "voltorbflip" Case "voltorbflip"
If Core.Player.Inventory.GetItemAmount(54.ToString) > 0 Then If Core.Player.Inventory.GetItemAmount(54.ToString) > 0 Then
If CInt(GameModeManager.GetGameRuleValue("CoinCaseCap", "0")) > 0 AndAlso Core.Player.Coins > CInt(GameModeManager.GetGameRuleValue("CoinCaseCap", "0")) Then If VoltorbFlip.VoltorbFlipScreen.TotalCoins = -1 Then
Screen.TextBox.Show(Localization.GetString("VoltorbFlip_BeforeGame_FullCoinCase", "Your Coin Case is already full!")) Core.SetScreen(New VoltorbFlip.VoltorbFlipScreen(CurrentScreen))
IsReady = True End If
Else If CurrentScreen.Identification = Screen.Identifications.OverworldScreen Then
If VoltorbFlip.VoltorbFlipScreen.TotalCoins = -1 Then VoltorbFlip.VoltorbFlipScreen.CurrentLevel = 1
Core.SetScreen(New VoltorbFlip.VoltorbFlipScreen(CurrentScreen)) VoltorbFlip.VoltorbFlipScreen.PreviousLevel = 1
End If If VoltorbFlip.VoltorbFlipScreen.TotalCoins > 0 Then
If CurrentScreen.Identification = Screen.Identifications.OverworldScreen Then Screen.TextBox.Show(Localization.GetString("VoltorbFlip_AfterGame_Won1", "You've won") & " " & VoltorbFlip.VoltorbFlipScreen.TotalCoins & " " & Localization.GetString("VoltorbFlip_AfterGame_Won2", "Coins!"))
VoltorbFlip.VoltorbFlipScreen.CurrentLevel = 1 Core.Player.Coins += VoltorbFlip.VoltorbFlipScreen.TotalCoins
VoltorbFlip.VoltorbFlipScreen.PreviousLevel = 1 PlayerStatistics.Track("Obtained Coins", VoltorbFlip.VoltorbFlipScreen.TotalCoins)
If VoltorbFlip.VoltorbFlipScreen.TotalCoins > 0 Then VoltorbFlip.VoltorbFlipScreen.TotalCoins = -1
Screen.TextBox.Show(Localization.GetString("VoltorbFlip_AfterGame_Won1", "You've won") & " " & VoltorbFlip.VoltorbFlipScreen.TotalCoins & " " & Localization.GetString("VoltorbFlip_AfterGame_Won2", "Coins!")) IsReady = True
Core.Player.Coins += VoltorbFlip.VoltorbFlipScreen.TotalCoins Else
PlayerStatistics.Track("Obtained Coins", VoltorbFlip.VoltorbFlipScreen.TotalCoins) Screen.TextBox.Show(Localization.GetString("VoltorbFlip_AfterGame_Lost", "Too bad, you didn't win~any Coins!*Better luck next time!"))
VoltorbFlip.VoltorbFlipScreen.TotalCoins = -1 VoltorbFlip.VoltorbFlipScreen.TotalCoins = -1
IsReady = True IsReady = True
Else
Screen.TextBox.Show(Localization.GetString("VoltorbFlip_AfterGame_Lost", "Too bad, you didn't win~any Coins!*Better luck next time!"))
VoltorbFlip.VoltorbFlipScreen.TotalCoins = -1
IsReady = True
End If
End If End If
End If End If
Else Else