Roseli, Kee, Maranga added + berry BP update

2019-09-22 18:43:13 -03:00 · 2019-09-22 18:43:13 -03:00 · 67fba90004
parent 34122c1849
commit 67fba90004
68 changed files with 134 additions and 65 deletions
--- a/P3D/Pokemon/Items/Berries/AguavBerry.vb
+++ b/P3D/Pokemon/Items/Berries/AguavBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Dragon
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/ApicotBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ApicotBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 30

            Me.Type = Element.Types.Ground
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/AspearBerry.vb
+++ b/P3D/Pokemon/Items/Berries/AspearBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Ice
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/BabiriBerry.vb
+++ b/P3D/Pokemon/Items/Berries/BabiriBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Steel
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/BelueBerry.vb
+++ b/P3D/Pokemon/Items/Berries/BelueBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 30

            Me.Type = Element.Types.Electric
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/BlukBerry.vb
+++ b/P3D/Pokemon/Items/Berries/BlukBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Fire
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/ChartiBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ChartiBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Rock
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/CheriBerry.vb
+++ b/P3D/Pokemon/Items/Berries/CheriBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Fire
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/ChestoBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ChestoBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Water
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/ChilanBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ChilanBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Normal
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/ChopleBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ChopleBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Fighting
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/CobaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/CobaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Flying
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/ColburBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ColburBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 20

            Me.Type = Element.Types.Dark
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/CornnBerry.vb
+++ b/P3D/Pokemon/Items/Berries/CornnBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Bug
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/CustapBerry.vb
+++ b/P3D/Pokemon/Items/Berries/CustapBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ghost
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/DurinBerry.vb
+++ b/P3D/Pokemon/Items/Berries/DurinBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Water
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/EnigmaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/EnigmaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Bug
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/FigyBerry.vb
+++ b/P3D/Pokemon/Items/Berries/FigyBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Bug
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/GanlonBerry.vb
+++ b/P3D/Pokemon/Items/Berries/GanlonBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ice
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/GrepaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/GrepaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Flying
-            Me.Power = 70
+            Me.Power = 90
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/HabanBerry.vb
+++ b/P3D/Pokemon/Items/Berries/HabanBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Dragon
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/HondewBerry.vb
+++ b/P3D/Pokemon/Items/Berries/HondewBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ground
-            Me.Power = 70
+            Me.Power = 90
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/IapapaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/IapapaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 15

            Me.Type = Element.Types.Dark
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/JabocaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/JabocaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Dragon
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/KasibBerry.vb
+++ b/P3D/Pokemon/Items/Berries/KasibBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ghost
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/KebiaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/KebiaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Poison
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/KeeBerry.vb
+++ b/P3D/Pokemon/Items/Berries/KeeBerry.vb
@ -0,0 +1,23 @@
+Namespace Items.Berries
+
+    <Item(2065, "Kee")>
+    Public Class KeeBerry
+
+        Inherits Berry
+
+        Public Sub New()
+            MyBase.New(86400, "If held by a Pokémon, this Berry will increase the holder's Defense if it's hit with a physical move.", "5.0cm", "Very Soft", 1, 5)
+
+            Me.Spicy = 10
+            Me.Dry = 0
+            Me.Sweet = 0
+            Me.Bitter = 0
+            Me.Sour = 40
+
+            Me.Type = Element.Types.Fairy
+            Me.Power = 100
+        End Sub
+
+    End Class
+
+End Namespace
--- a/P3D/Pokemon/Items/Berries/KelpsyBerry.vb
+++ b/P3D/Pokemon/Items/Berries/KelpsyBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Fighting
-            Me.Power = 70
+            Me.Power = 90
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/LansatBerry.vb
+++ b/P3D/Pokemon/Items/Berries/LansatBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 30

            Me.Type = Element.Types.Flying
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/LeppaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/LeppaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Fighting
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/LiechiBerry.vb
+++ b/P3D/Pokemon/Items/Berries/LiechiBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Grass
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/LumBerry.vb
+++ b/P3D/Pokemon/Items/Berries/LumBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Flying
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/MagoBerry.vb
+++ b/P3D/Pokemon/Items/Berries/MagoBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ghost
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/MagostBerry.vb
+++ b/P3D/Pokemon/Items/Berries/MagostBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Rock
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/MarangaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/MarangaBerry.vb
@ -0,0 +1,23 @@
+Namespace Items.Berries
+
+    <Item(2066, "Maranga")>
+    Public Class MarangaBerry
+
+        Inherits Berry
+
+        Public Sub New()
+            MyBase.New(86400, "If held by a Pokémon, this Berry will increase the holder's Sp. Def if it's hit with a special move.", "18.6cm", "Hard", 1, 5)
+
+            Me.Spicy = 10
+            Me.Dry = 0
+            Me.Sweet = 40
+            Me.Bitter = 0
+            Me.Sour = 0
+
+            Me.Type = Element.Types.Dark
+            Me.Power = 100
+        End Sub
+
+    End Class
+
+End Namespace
--- a/P3D/Pokemon/Items/Berries/MicleBerry.vb
+++ b/P3D/Pokemon/Items/Berries/MicleBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Rock
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/NanabBerry.vb
+++ b/P3D/Pokemon/Items/Berries/NanabBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Water
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/NomelBerry.vb
+++ b/P3D/Pokemon/Items/Berries/NomelBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 20

            Me.Type = Element.Types.Dragon
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/OccaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/OccaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Fire
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/OranBerry.vb
+++ b/P3D/Pokemon/Items/Berries/OranBerry.vb
@ -17,7 +17,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Poison
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/PamtreBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PamtreBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Steel
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/PasshoBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PasshoBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Water
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/PayapaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PayapaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 15

            Me.Type = Element.Types.Psychic
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/PechaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PechaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Electric
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/PersimBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PersimBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Ground
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/PetayaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PetayaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Poison
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/PinapBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PinapBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Grass
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/PomegBerry.vb
+++ b/P3D/Pokemon/Items/Berries/PomegBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ice
-            Me.Power = 70
+            Me.Power = 90
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/QualotBerry.vb
+++ b/P3D/Pokemon/Items/Berries/QualotBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Poison
-            Me.Power = 60
+            Me.Power = 90
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/RabutaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/RabutaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Ghost
-            Me.Power = 60
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/RawstBerry.vb
+++ b/P3D/Pokemon/Items/Berries/RawstBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Grass
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/RazzBerry.vb
+++ b/P3D/Pokemon/Items/Berries/RazzBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Steel
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/RindoBerry.vb
+++ b/P3D/Pokemon/Items/Berries/RindoBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Grass
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/RoseliBerry.vb
+++ b/P3D/Pokemon/Items/Berries/RoseliBerry.vb
@ -0,0 +1,23 @@
+Namespace Items.Berries
+
+    <Item(2064, "Roseli")>
+    Public Class RoseliBerry
+
+        Inherits Berry
+
+        Public Sub New()
+            MyBase.New(64800, "If held by a Pokémon, this Berry will lessen the damage taken from one supereffective Fairy-type attack.", "3.2cm", "Soft", 1, 5)
+
+            Me.Spicy = 0
+            Me.Dry = 0
+            Me.Sweet = 25
+            Me.Bitter = 0
+            Me.Sour = 10
+
+            Me.Type = Element.Types.Fairy
+            Me.Power = 80
+        End Sub
+
+    End Class
+
+End Namespace
--- a/P3D/Pokemon/Items/Berries/RowapBerry.vb
+++ b/P3D/Pokemon/Items/Berries/RowapBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 40

            Me.Type = Element.Types.Dark
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/SalacBerry.vb
+++ b/P3D/Pokemon/Items/Berries/SalacBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 30

            Me.Type = Element.Types.Fighting
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/ShucaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/ShucaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ground
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/SitrusBerry.vb
+++ b/P3D/Pokemon/Items/Berries/SitrusBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Psychic
-            Me.Power = 60
+            Me.Power = 80
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/SpelonBerry.vb
+++ b/P3D/Pokemon/Items/Berries/SpelonBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Dark
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/StarfBerry.vb
+++ b/P3D/Pokemon/Items/Berries/StarfBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 30

            Me.Type = Element.Types.Psychic
-            Me.Power = 80
+            Me.Power = 100
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/TamatoBerry.vb
+++ b/P3D/Pokemon/Items/Berries/TamatoBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Psychic
-            Me.Power = 70
+            Me.Power = 90
        End Sub

        Public Overrides Sub Use()
--- a/P3D/Pokemon/Items/Berries/TangaBerry.vb
+++ b/P3D/Pokemon/Items/Berries/TangaBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Bug
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/WacanBerry.vb
+++ b/P3D/Pokemon/Items/Berries/WacanBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Electric
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/WatmelBerry.vb
+++ b/P3D/Pokemon/Items/Berries/WatmelBerry.vb
@ -15,8 +15,8 @@ Public Class WatmelBerry
        Me.Sour = 0

        Me.Type = Element.Types.Fire
-        Me.Power = 80
-    End Sub
+            Me.Power = 100
+        End Sub

 End Class

--- a/P3D/Pokemon/Items/Berries/WepearBerry.vb
+++ b/P3D/Pokemon/Items/Berries/WepearBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 10

            Me.Type = Element.Types.Electric
-            Me.Power = 70
+            Me.Power = 90
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/WikiBerry.vb
+++ b/P3D/Pokemon/Items/Berries/WikiBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Rock
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/Berries/YacheBerry.vb
+++ b/P3D/Pokemon/Items/Berries/YacheBerry.vb
@ -15,7 +15,7 @@ Namespace Items.Berries
            Me.Sour = 0

            Me.Type = Element.Types.Ice
-            Me.Power = 60
+            Me.Power = 80
        End Sub

    End Class
--- a/P3D/Pokemon/Items/_itemList.txt
+++ b/P3D/Pokemon/Items/_itemList.txt