Sort GTS Pokémon by number

This commit is contained in:
JappaWakka 2024-02-14 17:19:24 +01:00
parent 8fb00475af
commit dcfe88a811
2 changed files with 4 additions and 2 deletions

View File

@ -627,7 +627,8 @@
End If
End If
Next
fileList.Sort()
Dim newFileList = (From f In fileList Order By CInt(f.GetSplit(0, "_").GetSplit(0, ";")) Ascending).ToList()
fileList = newFileList
While CurrentPokemon.Count < 20 And noMorePokemon = False
If index <= fileList.Count - 1 Then

View File

@ -924,7 +924,8 @@
End If
End If
Next
fileList.Sort()
Dim newFileList = (From f In fileList Order By CInt(f.GetSplit(0, "_").GetSplit(0, ";")) Ascending).ToList()
fileList = newFileList
While CurrentPokemon.Count < 20 And noMorePokemon = False
If index <= fileList.Count - 1 Then