13 lines
239 B
VB.net
13 lines
239 B
VB.net
|
Namespace Abilities
|
|||
|
|
|
|||
|
|
Public Class ColorChange
|
|||
|
|
|
|||
|
|
Inherits Ability
|
|||
|
|
|
|||
|
|
Public Sub New()
|
|||
|
|
MyBase.New(16, "Color Change", "Changes the Pok<6F>mon's type to the foe's move.")
|
|||
|
|
End Sub
|
|||
|
|
|
|||
|
|
End Class
|
|||
|
|
|
|||
|
|
End Namespace
|