P3D-Legacy/P3D/Pokemon/Items/Standard/ChoiceSpecs.vb

21 lines
697 B
VB.net
Raw Normal View History

2019-10-09 08:10:44 +02:00
Namespace Items.Standard
<Item(580, "Choice Specs")>
Public Class ChoiceSpecs
Inherits Item
Public Overrides ReadOnly Property Description As String = "Boosts Special Attack by 50%, but only allows the use of the first move selected."
Public Overrides ReadOnly Property PokeDollarPrice As Integer = 4000
Public Overrides ReadOnly Property CanBeUsedInBattle As Boolean = False
Public Overrides ReadOnly Property CanBeUsed As Boolean = False
2022-05-07 00:45:59 +02:00
Public Overrides ReadOnly Property PluralName As String = Name
2019-10-09 08:10:44 +02:00
Public Sub New()
_textureRectangle = New Rectangle(48, 288, 24, 24)
End Sub
End Class
End Namespace