release 6.2

Data/Scripts/051_AddOns/EggMoveTutor.rb

@@ -0,0 +1,32 @@
+def pbRelearnEggMoveScreen(pkmn)
+  retval = true
+  pbFadeOutIn {
+    scene = MoveRelearner_Scene.new
+    screen = MoveRelearnerScreen.new(scene)
+    retval = screen.pbStartScreenEgg(pkmn)
+  }
+  return retval
+end
+
+class MoveRelearnerScreen
+  def pbStartScreenEgg(pkmn)
+    baby = pbGetBabySpecies(pkmn.species)
+    moves = pbGetSpeciesEggMoves(baby)
+
+    @scene.pbStartScene(pkmn, moves)
+    loop do
+      move = @scene.pbChooseMove
+      if move
+        if @scene.pbConfirm(_INTL("Teach {1}?", GameData::Move.get(move).name))
+          if pbLearnMove(pkmn, move)
+            @scene.pbEndScene
+            return true
+          end
+        end
+      elsif @scene.pbConfirm(_INTL("Give up trying to teach a new move to {1}?", pkmn.name))
+        @scene.pbEndScene
+        return false
+      end
+    end
+  end
+end