Namespace Abilities Public Class RunAway Inherits Ability Public Sub New() MyBase.New(50, "Run Away", "Enables a sure getaway from wild Pokémon.") End Sub End Class End Namespace