fix all roaming mons being caterpie

2022-06-30 09:09:05 -05:00 · 2022-06-30 09:09:05 -05:00 · b344879f20
parent 913c53211c
commit b344879f20
1 changed files with 1 additions and 1 deletions
--- a/P3D/Pokemon/Monster/RoamingPokemon.vb
+++ b/P3D/Pokemon/Monster/RoamingPokemon.vb
@ -8,7 +8,7 @@ Public Class RoamingPokemon
    Public Sub New(ByVal DataLine As String)
        Dim data() As String = DataLine.Split(CChar("|"))

-        Me.PokemonReference = Pokemon.GetPokemonByData(data(5))
+        Me.PokemonReference = Pokemon.GetPokemonByData(data(6))

        Me.WorldID = CInt(data(2))
        Me.LevelFile = data(3)