P3D-Legacy/P3D/Pokemon/Items/Berries/WikiBerry.vb

Namespace Items.Berries

    <Item(2011, "Wiki")>
    Public Class WikiBerry

        Inherits Berry

        Public Sub New()
            MyBase.New(21600, "If held by a Pokémon, it restores the user's HP in a pinch, but it will cause confusion if the user hates the taste.", "11.5cm", "Hard", 2, 3)

            Me.Spicy = 0
            Me.Dry = 15
            Me.Sweet = 0
            Me.Bitter = 0
            Me.Sour = 0

            Me.Type = Element.Types.Rock
            Me.Power = 80
            Me.JuiceColor = "purple"
            Me.JuiceGroup = 3
        End Sub

    End Class

End Namespace
0.53.3 commit 2016-09-07 18:50:38 +02:00			`Namespace Items.Berries`

item access uses reflection instead of lookup table 2016-09-19 04:34:12 +02:00			`<Item(2011, "Wiki")>`
0.53.3 commit 2016-09-07 18:50:38 +02:00			`Public Class WikiBerry`

			`Inherits Berry`

			`Public Sub New()`
Changed berries 2016-09-20 05:42:56 +02:00			`MyBase.New(21600, "If held by a Pokémon, it restores the user's HP in a pinch, but it will cause confusion if the user hates the taste.", "11.5cm", "Hard", 2, 3)`
0.53.3 commit 2016-09-07 18:50:38 +02:00
			`Me.Spicy = 0`
			`Me.Dry = 15`
			`Me.Sweet = 0`
			`Me.Bitter = 0`
			`Me.Sour = 0`

			`Me.Type = Element.Types.Rock`
Roseli, Kee, Maranga added + berry BP update 2019-09-22 23:43:13 +02:00			`Me.Power = 80`
add juice properties to berries 2023-05-31 00:54:26 +02:00			`Me.JuiceColor = "purple"`
			`Me.JuiceGroup = 3`
0.53.3 commit 2016-09-07 18:50:38 +02:00			`End Sub`

			`End Class`

item access uses reflection instead of lookup table 2016-09-19 04:34:12 +02:00			`End Namespace`