Namespace Abilities

    Public Class BattleArmor

        Inherits Ability

        Public Sub New()
            MyBase.New(4, "Battle Armor", "The Pokémon is protected against critical hits.")
        End Sub

    End Class

End Namespace