Fix CanUseHealItems GameRule

2023-02-26 12:37:29 +01:00 · 2023-02-26 12:37:29 +01:00 · 4a38a43e1f
parent 6dd4750770
commit 4a38a43e1f
20 changed files with 20 additions and 20 deletions
--- a/P3D/Pokemon/Items/Berries/OranBerry.vb
+++ b/P3D/Pokemon/Items/Berries/OranBerry.vb
@ -21,7 +21,7 @@ Namespace Items.Berries
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Berries/SitrusBerry.vb
+++ b/P3D/Pokemon/Items/Berries/SitrusBerry.vb
@ -19,7 +19,7 @@ Namespace Items.Berries
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/BerryJuice.vb
+++ b/P3D/Pokemon/Items/Medicine/BerryJuice.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/EnergyPowder.vb
+++ b/P3D/Pokemon/Items/Medicine/EnergyPowder.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/EnergyRoot.vb
+++ b/P3D/Pokemon/Items/Medicine/EnergyRoot.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/Fanta.vb
+++ b/P3D/Pokemon/Items/Medicine/Fanta.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/FreshWater.vb
+++ b/P3D/Pokemon/Items/Medicine/FreshWater.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/FullRestore.vb
+++ b/P3D/Pokemon/Items/Medicine/FullRestore.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/HyperPotion.vb
+++ b/P3D/Pokemon/Items/Medicine/HyperPotion.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/Lemonade.vb
+++ b/P3D/Pokemon/Items/Medicine/Lemonade.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/MaxPotion.vb
+++ b/P3D/Pokemon/Items/Medicine/MaxPotion.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/MaxRevive.vb
+++ b/P3D/Pokemon/Items/Medicine/MaxRevive.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/MooMooMilk.vb
+++ b/P3D/Pokemon/Items/Medicine/MooMooMilk.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/PewterCrunchies.vb
+++ b/P3D/Pokemon/Items/Medicine/PewterCrunchies.vb
@ -15,7 +15,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/Potion.vb
+++ b/P3D/Pokemon/Items/Medicine/Potion.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/RageCandyBar.vb
+++ b/P3D/Pokemon/Items/Medicine/RageCandyBar.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/RevivalHerb.vb
+++ b/P3D/Pokemon/Items/Medicine/RevivalHerb.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/Revive.vb
+++ b/P3D/Pokemon/Items/Medicine/Revive.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/SodaPop.vb
+++ b/P3D/Pokemon/Items/Medicine/SodaPop.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If
--- a/P3D/Pokemon/Items/Medicine/SuperPotion.vb
+++ b/P3D/Pokemon/Items/Medicine/SuperPotion.vb
@ -14,7 +14,7 @@ Namespace Items.Medicine
        End Sub

        Public Overrides Sub Use()
-            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItem", "1")) = False Then
+            If CBool(GameModeManager.GetGameRuleValue("CanUseHealItems", "1")) = False Then
                Screen.TextBox.Show("Cannot use heal items.", {}, False, False)
                Exit Sub
            End If