Sort GTS Pokémon by number
This commit is contained in:
parent
8fb00475af
commit
dcfe88a811
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue