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

Namespace Items.Berries

    <Item(2012, "Mago")>
    Public Class MagoBerry

        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.", "12.6cm", "Hard", 2, 3)

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

            Me.Type = Element.Types.Ghost
            Me.Power = 80
        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(2012, "Mago")>`
0.53.3 commit 2016-09-07 18:50:38 +02:00			`Public Class MagoBerry`

			`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.", "12.6cm", "Hard", 2, 3)`
0.53.3 commit 2016-09-07 18:50:38 +02:00
			`Me.Spicy = 0`
			`Me.Dry = 0`
			`Me.Sweet = 15`
			`Me.Bitter = 0`
			`Me.Sour = 0`

			`Me.Type = Element.Types.Ghost`
Roseli, Kee, Maranga added + berry BP update 2019-09-22 23:43:13 +02:00			`Me.Power = 80`
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`