* Trimmed the names of the Hoenn region Pokémons.
* Updated the dialog xba file that was missed when updating the dialog last time.
This commit is contained in:
		@@ -272,15 +272,15 @@ Function fnGetBaseStatsData As Variant
 | 
				
			|||||||
		Array ("Lugia", "249", 212, 193, 323, Array ()), _
 | 
							Array ("Lugia", "249", 212, 193, 323, Array ()), _
 | 
				
			||||||
		Array ("HoOh", "250", 193, 239, 274, Array ()), _
 | 
							Array ("HoOh", "250", 193, 239, 274, Array ()), _
 | 
				
			||||||
		Array ("Celebi", "251", 200, 210, 210, Array ()), _
 | 
							Array ("Celebi", "251", 200, 210, 210, Array ()), _
 | 
				
			||||||
		Array ("Treecko ", "252", 80, 124, 104, Array ("Grovyle ", "Sceptile ")), _
 | 
							Array ("Treecko", "252", 80, 124, 104, Array ("Grovyle", "Sceptile")), _
 | 
				
			||||||
		Array ("Grovyle ", "253", 100, 172, 130, Array ("Sceptile ")), _
 | 
							Array ("Grovyle", "253", 100, 172, 130, Array ("Sceptile")), _
 | 
				
			||||||
		Array ("Sceptile ", "254", 140, 223, 180, Array ()), _
 | 
							Array ("Sceptile", "254", 140, 223, 180, Array ()), _
 | 
				
			||||||
		Array ("Torchic ", "255", 90, 130, 92, Array ("Combusken ", "Blaziken ")), _
 | 
							Array ("Torchic", "255", 90, 130, 92, Array ("Combusken", "Blaziken")), _
 | 
				
			||||||
		Array ("Combusken ", "256", 120, 163, 115, Array ("Blaziken ")), _
 | 
							Array ("Combusken", "256", 120, 163, 115, Array ("Blaziken")), _
 | 
				
			||||||
		Array ("Blaziken ", "257", 160, 240, 141, Array ()), _
 | 
							Array ("Blaziken", "257", 160, 240, 141, Array ()), _
 | 
				
			||||||
		Array ("Mudkip ", "258", 100, 126, 93, Array ("Marshtomp ", "Swampert ")), _
 | 
							Array ("Mudkip", "258", 100, 126, 93, Array ("Marshtomp", "Swampert")), _
 | 
				
			||||||
		Array ("Marshtomp ", "259", 140, 156, 133, Array ("Swampert ")), _
 | 
							Array ("Marshtomp", "259", 140, 156, 133, Array ("Swampert")), _
 | 
				
			||||||
		Array ("Swampert ", "260", 200, 208, 175, Array ()), _
 | 
							Array ("Swampert", "260", 200, 208, 175, Array ()), _
 | 
				
			||||||
		Array ("Poochyena", "261", 70, 96, 63, Array ("Mightyena")), _
 | 
							Array ("Poochyena", "261", 70, 96, 63, Array ("Mightyena")), _
 | 
				
			||||||
		Array ("Mightyena", "262", 140, 171, 137, Array ()), _
 | 
							Array ("Mightyena", "262", 140, 171, 137, Array ()), _
 | 
				
			||||||
		Array ("Zigzagoon", "263", 76, 58, 80, Array ("Linoone")), _
 | 
							Array ("Zigzagoon", "263", 76, 58, 80, Array ("Linoone")), _
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -20,9 +20,9 @@
 | 
				
			|||||||
Option Explicit
 | 
					Option Explicit
 | 
				
			||||||
 | 
					
 | 
				
			||||||
' Remembers the selected Pokémon for the next run.
 | 
					' Remembers the selected Pokémon for the next run.
 | 
				
			||||||
Global sLastSelected As String
 | 
					Global sLastPokemon As String
 | 
				
			||||||
' Remembers the selected trainer level for the next run.
 | 
					' Remembers the selected trainer level for the next run.
 | 
				
			||||||
Global sLastLevel As Integer
 | 
					Global sLastTrainerLevel As Integer
 | 
				
			||||||
 | 
					
 | 
				
			||||||
' The parameters to find the individual values.
 | 
					' The parameters to find the individual values.
 | 
				
			||||||
Type aFindIVParam
 | 
					Type aFindIVParam
 | 
				
			||||||
@@ -76,18 +76,18 @@ Function fnAskParam As aFindIVParam
 | 
				
			|||||||
		"ImageURL", fnGetImageUrl ("Unknown"))
 | 
							"ImageURL", fnGetImageUrl ("Unknown"))
 | 
				
			||||||
	
 | 
						
 | 
				
			||||||
	' Remembers the previously-selected Pokémon.
 | 
						' Remembers the previously-selected Pokémon.
 | 
				
			||||||
	oDialog.getControl ("lstPokemon").selectItem (sLastSelected, True)
 | 
						oDialog.getControl ("lstPokemon").selectItem (sLastPokemon, True)
 | 
				
			||||||
	oDialog.getControl ("lstTrainerLevel").selectItem (sLastLevel, True)
 | 
						oDialog.getControl ("lstTrainerLevel").selectItem (sLastTrainerLevel, True)
 | 
				
			||||||
	
 | 
						
 | 
				
			||||||
	If oDialog.execute = 0 Then
 | 
						If oDialog.execute = 0 Then
 | 
				
			||||||
		aQuery.bIsCancelled = True
 | 
							aQuery.bIsCancelled = True
 | 
				
			||||||
	    sLastLevel = oDialog.getControl ("lstTrainerLevel").getSelectedItem
 | 
						    sLastTrainerLevel = oDialog.getControl ("lstTrainerLevel").getSelectedItem
 | 
				
			||||||
		fnAskParam = aQuery
 | 
							fnAskParam = aQuery
 | 
				
			||||||
		Exit Function
 | 
							Exit Function
 | 
				
			||||||
	End If
 | 
						End If
 | 
				
			||||||
	
 | 
						
 | 
				
			||||||
	subReadBaseStats
 | 
						subReadBaseStats
 | 
				
			||||||
	sLastLevel = oDialog.getControl ("lstTrainerLevel").getSelectedItem
 | 
						sLastTrainerLevel = oDialog.getControl ("lstTrainerLevel").getSelectedItem
 | 
				
			||||||
	nSelected = oDialog.getControl ("lstPokemon").getSelectedItemPos
 | 
						nSelected = oDialog.getControl ("lstPokemon").getSelectedItemPos
 | 
				
			||||||
	With aQuery
 | 
						With aQuery
 | 
				
			||||||
		.sPokemonId = maBaseStats (nSelected).sPokemonId
 | 
							.sPokemonId = maBaseStats (nSelected).sPokemonId
 | 
				
			||||||
@@ -182,9 +182,9 @@ Sub subLstPokemonSelected (oEvent As object)
 | 
				
			|||||||
	oDialog = oEvent.Source.getContext
 | 
						oDialog = oEvent.Source.getContext
 | 
				
			||||||
	
 | 
						
 | 
				
			||||||
	' Checks which Pokémon was selected.
 | 
						' Checks which Pokémon was selected.
 | 
				
			||||||
	sLastSelected = oDialog.getControl ("lstPokemon").getSelectedItem
 | 
						sLastPokemon = oDialog.getControl ("lstPokemon").getSelectedItem
 | 
				
			||||||
	nSelected = oDialog.getControl ("lstPokemon").getSelectedItemPos
 | 
						nSelected = oDialog.getControl ("lstPokemon").getSelectedItemPos
 | 
				
			||||||
	' This happens at the beginning where sLastSelected is "".
 | 
						' This happens at the beginning where sLastPokemon is "".
 | 
				
			||||||
	If nSelected = -1 Then
 | 
						If nSelected = -1 Then
 | 
				
			||||||
		Exit Sub
 | 
							Exit Sub
 | 
				
			||||||
	End If
 | 
						End If
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -274,15 +274,15 @@ Function fnGetBaseStatsData As Variant
 | 
				
			|||||||
		Array ("Lugia", "249", 212, 193, 323, Array ()), _
 | 
							Array ("Lugia", "249", 212, 193, 323, Array ()), _
 | 
				
			||||||
		Array ("HoOh", "250", 193, 239, 274, Array ()), _
 | 
							Array ("HoOh", "250", 193, 239, 274, Array ()), _
 | 
				
			||||||
		Array ("Celebi", "251", 200, 210, 210, Array ()), _
 | 
							Array ("Celebi", "251", 200, 210, 210, Array ()), _
 | 
				
			||||||
		Array ("Treecko ", "252", 80, 124, 104, Array ("Grovyle ", "Sceptile ")), _
 | 
							Array ("Treecko", "252", 80, 124, 104, Array ("Grovyle", "Sceptile")), _
 | 
				
			||||||
		Array ("Grovyle ", "253", 100, 172, 130, Array ("Sceptile ")), _
 | 
							Array ("Grovyle", "253", 100, 172, 130, Array ("Sceptile")), _
 | 
				
			||||||
		Array ("Sceptile ", "254", 140, 223, 180, Array ()), _
 | 
							Array ("Sceptile", "254", 140, 223, 180, Array ()), _
 | 
				
			||||||
		Array ("Torchic ", "255", 90, 130, 92, Array ("Combusken ", "Blaziken ")), _
 | 
							Array ("Torchic", "255", 90, 130, 92, Array ("Combusken", "Blaziken")), _
 | 
				
			||||||
		Array ("Combusken ", "256", 120, 163, 115, Array ("Blaziken ")), _
 | 
							Array ("Combusken", "256", 120, 163, 115, Array ("Blaziken")), _
 | 
				
			||||||
		Array ("Blaziken ", "257", 160, 240, 141, Array ()), _
 | 
							Array ("Blaziken", "257", 160, 240, 141, Array ()), _
 | 
				
			||||||
		Array ("Mudkip ", "258", 100, 126, 93, Array ("Marshtomp ", "Swampert ")), _
 | 
							Array ("Mudkip", "258", 100, 126, 93, Array ("Marshtomp", "Swampert")), _
 | 
				
			||||||
		Array ("Marshtomp ", "259", 140, 156, 133, Array ("Swampert ")), _
 | 
							Array ("Marshtomp", "259", 140, 156, 133, Array ("Swampert")), _
 | 
				
			||||||
		Array ("Swampert ", "260", 200, 208, 175, Array ()), _
 | 
							Array ("Swampert", "260", 200, 208, 175, Array ()), _
 | 
				
			||||||
		Array ("Poochyena", "261", 70, 96, 63, Array ("Mightyena")), _
 | 
							Array ("Poochyena", "261", 70, 96, 63, Array ("Mightyena")), _
 | 
				
			||||||
		Array ("Mightyena", "262", 140, 171, 137, Array ()), _
 | 
							Array ("Mightyena", "262", 140, 171, 137, Array ()), _
 | 
				
			||||||
		Array ("Zigzagoon", "263", 76, 58, 80, Array ("Linoone")), _
 | 
							Array ("Zigzagoon", "263", 76, 58, 80, Array ("Linoone")), _
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user