Namespace Items.MegaStones ''' ''' The Mega Stone for Houndoomin. ''' Public Class Houndoominite Inherits MegaStone Public Sub New() MyBase.New("Houndoom", 229) _textureRectangle = New Rectangle(144, 24, 24, 24) End Sub End Class End Namespace