Partially fixed switch moves

This commit is contained in:
JappaWakka 2023-08-22 20:55:32 +02:00
parent 4a4a2133ee
commit 18e020bfdf
3 changed files with 1 additions and 9 deletions

View File

@ -69,9 +69,7 @@
If BattleScreen.IsTrainerBattle = True Then
If BattleScreen.IsRemoteBattle = True Or BattleScreen.IsPVPBattle = True Then
If BattleScreen.OppPokemon.Status <> Pokemon.StatusProblems.Fainted Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
If BattleScreen.Trainer.CountUseablePokemon > 1 AndAlso BattleScreen.FieldEffects.OppSwapIndex <> BattleScreen.OppPokemonIndex AndAlso BattleScreen.FieldEffects.OppSwapIndex <> -1 Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
BattleScreen.Battle.SwitchOutOpp(BattleScreen, BattleScreen.FieldEffects.OppSwapIndex)
BattleScreen.FieldEffects.OppSwapIndex = -1
@ -83,7 +81,6 @@
End If
Else
If BattleScreen.Trainer.CountUseablePokemon > 1 Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
BattleScreen.Battle.SwitchOutOpp(BattleScreen, GetPokemonIndex(BattleScreen, own))
Else

View File

@ -77,9 +77,7 @@
If BattleScreen.IsTrainerBattle = True Then
If BattleScreen.IsRemoteBattle = True Or BattleScreen.IsPVPBattle = True Then
If BattleScreen.OppPokemon.Status <> Pokemon.StatusProblems.Fainted Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
If BattleScreen.Trainer.CountUseablePokemon > 1 AndAlso BattleScreen.FieldEffects.OppSwapIndex <> BattleScreen.OppPokemonIndex AndAlso BattleScreen.FieldEffects.OppSwapIndex <> -1 Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
BattleScreen.Battle.SwitchOutOpp(BattleScreen, BattleScreen.FieldEffects.OppSwapIndex)
BattleScreen.FieldEffects.OppSwapIndex = -1
@ -91,7 +89,6 @@
End If
Else
If BattleScreen.Trainer.CountUseablePokemon > 1 Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
BattleScreen.Battle.SwitchOutOpp(BattleScreen, GetPokemonIndex(BattleScreen, own))
Else

View File

@ -69,9 +69,8 @@ Namespace BattleSystem.Moves.Electric
If BattleScreen.IsTrainerBattle = True Then
If BattleScreen.IsRemoteBattle = True Or BattleScreen.IsPVPBattle = True Then
If BattleScreen.OppPokemon.Status <> Pokemon.StatusProblems.Fainted Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
If BattleScreen.Trainer.CountUseablePokemon > 1 AndAlso BattleScreen.FieldEffects.OppSwapIndex <> BattleScreen.OppPokemonIndex AndAlso BattleScreen.FieldEffects.OppSwapIndex <> -1 Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
BattleScreen.Battle.SwitchOutOpp(BattleScreen, BattleScreen.FieldEffects.OppSwapIndex)
BattleScreen.FieldEffects.OppSwapIndex = -1
@ -83,7 +82,6 @@ Namespace BattleSystem.Moves.Electric
End If
Else
If BattleScreen.Trainer.CountUseablePokemon > 1 Then
BattleScreen.FieldEffects.OppUsedBatonPass = True
BattleScreen.Battle.SwitchOutOpp(BattleScreen, GetPokemonIndex(BattleScreen, own))
Else