Added script to make two random AI trainers battle, tweaked battle messages when logged, fixed typos

2025-12-09 14:14:59 +00:00 · 2022-09-06 22:57:51 +01:00
parent b8c61a6038
commit eecb7a1453
27 changed files with 335 additions and 154 deletions
--- a/Data/Scripts/999_Main/002_debug
+++ b/Data/Scripts/999_Main/002_debug
@@ -0,0 +1,115 @@
+def debug_set_up_trainer
+  # Values to return
+  trainer_array = []
+  foe_items     = []   # Intentionally left blank (for now)
+  pokemon_array = []
+  party_starts  = [0]
+
+  # Choose random trainer type and trainer name
+  trainer_type = GameData::TrainerType.keys.sample
+  trainer_name = ["Alpha", "Bravo", "Charlie", "Delta", "Echo",
+                  "Foxtrot", "Golf", "Hotel", "India", "Juliette",
+                  "Kilo", "Lima", "Mike", "November", "Oscar",
+                  "Papa", "Quebec", "Romeo", "Sierra", "Tango",
+                  "Uniform", "Victor", "Whiskey", "X-ray", "Yankee", "Zulu"].sample
+
+  # Generate trainer
+  trainer = NPCTrainer.new(trainer_name, trainer_type)
+  trainer.id        = $player.make_foreign_ID
+  trainer.lose_text = "I lost."
+  trainer_array.push(trainer)
+
+  # Generate party
+  valid_species = []
+  GameData::Species.each_species { |sp| valid_species.push(sp.species) }
+  Settings::MAX_PARTY_SIZE.times do |i|
+    this_species = valid_species.sample
+    this_level = rand(1, Settings::MAXIMUM_LEVEL)
+    pkmn = Pokemon.new(this_species, this_level, trainer)
+    trainer.party.push(pkmn)
+    pokemon_array.push(pkmn)
+  end
+
+  # Return values
+  return trainer_array, foe_items, pokemon_array, party_starts
+end
+
+def debug_test_auto_battle(logging = false)
+  old_internal = $INTERNAL
+  $INTERNAL = logging
+  echoln "Start of testing auto battle."
+  echoln "" if !$INTERNAL
+  PBDebug.log("")
+  PBDebug.log("================================================================")
+  PBDebug.log("")
+  # Generate information for the foes
+  foe_trainers, foe_items, foe_party, foe_party_starts = debug_set_up_trainer
+  # Generate information for the player and partner trainer(s)
+  player_trainers, ally_items, player_party, player_party_starts = debug_set_up_trainer
+  # Log the combatants
+  echo_participant = lambda do |trainer, party, index|
+    trainer_txt = "Trainer #{index}: #{trainer.full_name}"
+    ($INTERNAL) ? PBDebug.log_header(trainer_txt) : echoln(trainer_txt)
+    party.each do |pkmn|
+      pkmn_txt = "    #{pkmn.name}, Lv.#{pkmn.level}\r\n"
+      pkmn_txt += "        Ability: #{pkmn.ability&.name || "---"}\r\n"
+      pkmn_txt += "        Held item: #{pkmn.item&.name || "---"}"
+      ($INTERNAL) ? PBDebug.log(pkmn_txt) : echoln(pkmn_txt)
+      moves_msg = "        Moves: "
+      pkmn.moves.each_with_index do |move, i|
+        moves_msg += ", " if i > 0
+        moves_msg += move.name
+      end
+      ($INTERNAL) ? PBDebug.log(moves_msg) : echoln(moves_msg)
+    end
+  end
+  echo_participant.call(player_trainers[0], player_party, 1)
+  echo_participant.call(foe_trainers[0], foe_party, 2)
+  echoln "" if !$INTERNAL
+  # Create the battle scene (the visual side of it)
+  scene = Battle::DebugSceneNoVisuals.new(logging)
+  # Create the battle class (the mechanics side of it)
+  battle = Battle.new(scene, player_party, foe_party, player_trainers, foe_trainers)
+  battle.party1starts   = player_party_starts
+  battle.party2starts   = foe_party_starts
+  battle.ally_items     = ally_items
+  battle.items          = foe_items
+
+  battle.debug          = true
+  battle.internalBattle = false
+  battle.controlPlayer  = true
+  # Set various other properties in the battle class
+  BattleCreationHelperMethods.prepare_battle(battle)
+  # Perform the battle itself
+  outcome = battle.pbStartBattle
+  # End
+  echoln ["Undecided",
+          "Trainer 1 #{player_trainers[0].name} won",
+          "Trainer 2 #{foe_trainers[0].name} won",
+          "Ran/forfeited",
+          "Wild Pokémon caught",
+          "Draw"][outcome]
+  echoln ""
+  $INTERNAL = old_internal
+end
+
+#===============================================================================
+# Add to Debug menu
+#===============================================================================
+MenuHandlers.add(:debug_menu, :test_auto_battle, {
+  "name"        => _INTL("Test Auto Battle"),
+  "parent"      => :main,
+  "description" => _INTL("Runs an AI-controlled battle with no visuals."),
+  "effect"      => proc {
+    debug_test_auto_battle
+  }
+})
+
+MenuHandlers.add(:debug_menu, :test_auto_battle_logging, {
+  "name"        => _INTL("Test Auto Battle with Logging"),
+  "parent"      => :main,
+  "description" => _INTL("Runs an AI-controlled battle with no visuals. Logs messages."),
+  "effect"      => proc {
+    debug_test_auto_battle(true)
+  }
+})