Add RandomFollowItemPickup GameRule

This controls the random item pickup for all follower pokémon
This commit is contained in:
JappaWakka 2024-09-20 19:33:19 +02:00
parent 10cc749328
commit 4fca486fab
2 changed files with 2 additions and 1 deletions

View File

@ -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

View File

@ -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"))