Namespace Items.Gems

    <Item(641, "Rock Gem")>
    Public Class RockGem

        Inherits GemItem

        Public Overrides ReadOnly Property Description As String = "A gem with an essence of rock. When held, it strengthens the power of a Rock-type move one time."

        Public Sub New()
            MyBase.New(Element.Types.Rock)
        End Sub

    End Class

End Namespace