tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Make wild pkmn uncatchable if catchrate = -1

This commit is contained in:
JappaWakka 2023-09-22 11:09:35 +02:00
parent ca3ddfa441
commit 25bda8826a
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
P3D/Battle/BattleSystemV2/BattleScreen.vb
View File

@ -196,6 +196,10 @@
Me.OppPokemon = WildPokemon Me.OppPokemon = WildPokemon
If Me.OppPokemon.CatchRate = -1 Then
CanCatch = False
End If
If Core.Player.Pokemons.Count = 0 Then If Core.Player.Pokemons.Count = 0 Then
Dim p1 As Pokemon = Pokemon.GetPokemonByID(247) Dim p1 As Pokemon = Pokemon.GetPokemonByID(247)
p1.Generate(15, True) p1.Generate(15, True)