Moved Defiant and Competitive effects
To display the animations in the correct order
This commit is contained in:
parent
1d4b52180a
commit
f097af5214
|
@ -2979,15 +2979,7 @@ endthisround:
|
||||||
printMessage &= " slightly fell."
|
printMessage &= " slightly fell."
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
If val > 0 Then
|
|
||||||
If p.Ability.Name.ToLower() = "defiant" And from <> own Then
|
|
||||||
RaiseStat(own, own, BattleScreen, "Attack", 2, p.GetDisplayName() & "'s Defiant raised its attack!", "defiant")
|
|
||||||
End If
|
|
||||||
|
|
||||||
If p.Ability.Name.ToLower() = "competitive" And from <> own Then
|
|
||||||
RaiseStat(own, own, BattleScreen, "Special Attack", 2, p.GetDisplayName() & "'s Competitive raised its Special Attack!", "competitive")
|
|
||||||
End If
|
|
||||||
End If
|
|
||||||
|
|
||||||
Select Case statString
|
Select Case statString
|
||||||
Case "attack"
|
Case "attack"
|
||||||
|
@ -3094,6 +3086,16 @@ endthisround:
|
||||||
BattleScreen.BattleQuery.Add(New TextQueryObject(printMessage))
|
BattleScreen.BattleQuery.Add(New TextQueryObject(printMessage))
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
|
If val > 0 Then
|
||||||
|
If p.Ability.Name.ToLower() = "defiant" And from <> own Then
|
||||||
|
RaiseStat(own, own, BattleScreen, "Attack", 2, p.GetDisplayName() & "'s Defiant raised its attack!", "defiant")
|
||||||
|
End If
|
||||||
|
|
||||||
|
If p.Ability.Name.ToLower() = "competitive" And from <> own Then
|
||||||
|
RaiseStat(own, own, BattleScreen, "Special Attack", 2, p.GetDisplayName() & "'s Competitive raised its Special Attack!", "competitive")
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
Return True
|
Return True
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue