This commit is contained in:
CaptainSegis 2016-10-21 02:15:48 -05:00
commit 4f7821a9e3
7 changed files with 14 additions and 14 deletions

View File

@ -5,9 +5,9 @@ Namespace Abilities
Inherits Ability
Public Sub New()
MyBase.New(51, "Keen Eye", "Keen eyes prevent other Pokémon from lowering this Pokémon's accuracy.")
MyBase.New(51, "Keen Eye", "Prevents other Pokémon from lowering accuracy.")
End Sub
End Class
End Namespace
End Namespace

View File

@ -5,9 +5,9 @@ Namespace Abilities
Inherits Ability
Public Sub New()
MyBase.New(92, "Skill Link", "Maximizes the number of times multi-strike moves hit.")
MyBase.New(92, "Skill Link", "Increases the frequency of multi-strike moves.")
End Sub
End Class
End Namespace
End Namespace

View File

@ -5,9 +5,9 @@ Namespace Abilities
Inherits Ability
Public Sub New()
MyBase.New(9, "Static", "The Pokémon is charged with static electricity, so contact with it may cause paralysis.")
MyBase.New(9, "Static", "Contact with the Pokémon may cause paralysis.")
End Sub
End Class
End Namespace
End Namespace

View File

@ -5,9 +5,9 @@ Namespace Abilities
Inherits Ability
Public Sub New()
MyBase.New(173, "Strong Jaw", "The Pokémon's strong jaw boosts the power of its biting moves.")
MyBase.New(173, "Strong Jaw", "The Pokémon's strong jaw gives it tremendous biting power.")
End Sub
End Class
End Namespace
End Namespace

View File

@ -5,9 +5,9 @@ Namespace Abilities
Inherits Ability
Public Sub New()
MyBase.New(72, "Vital Spirit", "The Pokémon is full of vitality, and that prevents it from falling asleep.")
MyBase.New(72, "Vital Spirit", "Prevents the Pokémon from falling asleep.")
End Sub
End Class
End Namespace
End Namespace

View File

@ -13,7 +13,7 @@ Namespace BattleSystem.Moves.Water
Me.MaxPP = 20
Me.Power = 15
Me.Accuracy = 100
Me.Category = Categories.Special
Me.Category = Categories.Physical
Me.ContestCategory = ContestCategories.Cool
Me.Name = "Water Shuriken"
Me.Description = "The user hits the target with throwing stars two to five times in a row. This move always goes first."
@ -83,4 +83,4 @@ Namespace BattleSystem.Moves.Water
End Class
End Namespace
End Namespace

View File

@ -6,7 +6,7 @@ Namespace Items.Medicine
Inherits MedicineItem
Public Overrides ReadOnly Property IsHealingItem As Boolean = True
Public Overrides ReadOnly Property Description As String = "A spray-type medicine for treating wounds. It can be used to restore 60 HP to an injured Pokémon."
Public Overrides ReadOnly Property Description As String = "A spray-type medicine for treating wounds. It can be used to restore 50 HP to an injured Pokémon."
Public Overrides ReadOnly Property PokeDollarPrice As Integer = 700
Public Sub New()
@ -22,7 +22,7 @@ Namespace Items.Medicine
End Sub
Public Overrides Function UseOnPokemon(ByVal PokeIndex As Integer) As Boolean
Return HealPokemon(PokeIndex, 60)
Return HealPokemon(PokeIndex, 50)
End Function
End Class