Fix Self Destruct

This commit is contained in:
JappaWakka 2025-02-11 11:00:49 +01:00
parent 96984213b1
commit 96276520e3
1 changed files with 2 additions and 0 deletions

View File

@ -1791,6 +1791,8 @@
End If End If
End If End If
moveUsed.PreAttack(own, BattleScreen)
Dim substitute As Integer = BattleScreen.FieldEffects.OppSubstitute Dim substitute As Integer = BattleScreen.FieldEffects.OppSubstitute
If own = False Then If own = False Then
substitute = BattleScreen.FieldEffects.OwnSubstitute substitute = BattleScreen.FieldEffects.OwnSubstitute