Add RandomFollowItemPickup GameRule
This controls the random item pickup for all follower pokémon
This commit is contained in:
parent
10cc749328
commit
4fca486fab
|
@ -894,7 +894,7 @@
|
||||||
|
|
||||||
Public Shared Sub CheckForRandomPickup()
|
Public Shared Sub CheckForRandomPickup()
|
||||||
'Checks if the first Pokémon in the party is following the player:
|
'Checks if the first Pokémon in the party is following the player:
|
||||||
If Screen.Level.ShowOverworldPokemon = True And CBool(GameModeManager.GetGameRuleValue("ShowFollowPokemon", "1")) = True Then
|
If Screen.Level.ShowOverworldPokemon = True And CBool(GameModeManager.GetGameRuleValue("ShowFollowPokemon", "1")) = True AndAlso CBool(GameModeManager.GetGameRuleValue("RandomFollowItemPickup", "1")) = True Then
|
||||||
'Checks if the player has a Pokémon:
|
'Checks if the player has a Pokémon:
|
||||||
If Core.Player.Pokemons.Count > 0 And Screen.Level.Surfing = False And Screen.Level.Riding = False And Screen.Level.ShowOverworldPokemon = True And Not Core.Player.GetWalkPokemon() Is Nothing Then
|
If Core.Player.Pokemons.Count > 0 And Screen.Level.Surfing = False And Screen.Level.Riding = False And Screen.Level.ShowOverworldPokemon = True And Not Core.Player.GetWalkPokemon() Is Nothing Then
|
||||||
If Core.Player.GetWalkPokemon().Status = Pokemon.StatusProblems.None Then
|
If Core.Player.GetWalkPokemon().Status = Pokemon.StatusProblems.None Then
|
||||||
|
|
|
@ -643,6 +643,7 @@ Public Class GameMode
|
||||||
gameRules.Add(New GameRule("GameOverAt0Pokemon", "0"))
|
gameRules.Add(New GameRule("GameOverAt0Pokemon", "0"))
|
||||||
gameRules.Add(New GameRule("CanGetAchievements", "1"))
|
gameRules.Add(New GameRule("CanGetAchievements", "1"))
|
||||||
gameRules.Add(New GameRule("ShowFollowPokemon", "1"))
|
gameRules.Add(New GameRule("ShowFollowPokemon", "1"))
|
||||||
|
gameRules.Add(New GameRule("RandomFollowItemPickup", "1"))
|
||||||
gameRules.Add(New GameRule("OverworldPoison", "0"))
|
gameRules.Add(New GameRule("OverworldPoison", "0"))
|
||||||
gameRules.Add(New GameRule("SavingDisabled", "0"))
|
gameRules.Add(New GameRule("SavingDisabled", "0"))
|
||||||
gameRules.Add(New GameRule("SingleUseTM", "0"))
|
gameRules.Add(New GameRule("SingleUseTM", "0"))
|
||||||
|
|
Loading…
Reference in New Issue