14 lines
355 B
VB.net
14 lines
355 B
VB.net
Namespace Items.Balls
|
|
|
|
Public MustInherit Class BallItem
|
|
|
|
Inherits Item
|
|
|
|
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
|
|
Public Overrides ReadOnly Property ItemType As ItemTypes = ItemTypes.Pokéballs
|
|
Public Overrides ReadOnly Property PokeDollarPrice As Integer = 1000
|
|
|
|
End Class
|
|
|
|
End Namespace
|