Namespace Abilities Public Class ShellArmor Inherits Ability Public Sub New() MyBase.New(75, "Shell Armor", "The Pokémon is protected against critical hits.") End Sub End Class End Namespace