Namespace Abilities Public Class FlameBody Inherits Ability Public Sub New() MyBase.New(49, "Flame Body", "Contact with the Pokémon may burn the attacker.") End Sub End Class End Namespace