Skip to content
Permalink
Browse files

Belly Drum fails if attack maxed, fixed stat messages

  • Loading branch information...
TheOmegaGhost committed Oct 2, 2019
1 parent f56696d commit 8bb0c00a1014dfa88825928337614693ba74f240
Showing with 18 additions and 6 deletions.
  1. +4 −6 P3D/Battle/BattleSystemV2/Battle.vb
  2. +14 −0 P3D/Pokemon/Attacks/Normal/BellyDrum.vb
@@ -3347,11 +3347,7 @@
Select Case val
Case 2
printMessage &= " sharply rose!"
Case 3
printMessage &= " rose drastically!"
Case 4
printMessage &= " rose drastically!"
Case 5
Case 3, 4, 5
printMessage &= " rose drastically!"
Case 6
printMessage &= " was maximized!"
@@ -3611,8 +3607,10 @@
Select Case val
Case 2
printMessage &= " sharply fell!"
Case 3
Case 3, 4, 5
printMessage &= " fell drastically!"
Case 6
printMessage &= " was minimized!"
Case Else
printMessage &= " slightly fell."
End Select
@@ -55,6 +55,20 @@
Me.AIField2 = AIField.Nothing
End Sub

Public Overrides Function MoveFailBeforeAttack(Own As Boolean, BattleScreen As BattleScreen) As Boolean
Dim p As Pokemon = BattleScreen.OwnPokemon
If Own = False Then
p = BattleScreen.OppPokemon
End If

If p.StatAttack = 6 Then
BattleScreen.BattleQuery.Add(New TextQueryObject(Me.Name & " failed!"))
Return True
Else
Return False
End If
End Function

Public Overrides Sub MoveHits(own As Boolean, BattleScreen As BattleScreen)
Dim p As Pokemon = BattleScreen.OwnPokemon
If own = False Then

0 comments on commit 8bb0c00

Please sign in to comment.
You can’t perform that action at this time.