infinitefusion-e18/Data/Scripts/053_PIF_Hoenn/PokeNav/PokeNav.rb

class Trainer
  attr_accessor :pokenav

  def install_app(app_id)
    @pokenav = Pokenav.new unless $Trainer.pokenav
    @pokenav.install_app(app_id)
  end
end

class Pokenav
  attr_accessor :installed_apps
  attr_accessor :last_opened_challenges #date
  attr_accessor :darkMode
  attr_accessor :viewed_trainers
  attr_accessor :last_opened_quest_mode

  attr_accessor :fusion_quiz_unlocked_modes


  AVAILABLE_APPS = {
    # Starting apps
    :QUESTS => "Quests",
    :MAP => "Town Map",
    :DAYNIGHT => "Toggle Dark/Light",
    :REARRANGE => "Rearrange",

    # Unlockable apps
    :CONTACTS => "Trainers", # obtained after rematch quest TODO
    :JUKEBOX => "Jukebox", # obtained at devon corp
    :WEATHER => "Weather Map", # obtained at TV Mauville
    :POKERADAR => "PokéRadar", # given by the rival somewhere?
    :POKECHALLENGE => "PokéChallenge", #Obtained at Slateport fan club
    :BOXLINK => "Box Link",
    :FUSIONQUIZ => "Who's That Fusion?",
    :BERRYDEX => "BerryDex",

    #To implement
    # Statistics  (shows you a bunch of statstics. nb of times you fused, nb of steps taken, etc.)
    #
    #Other ideas
    # Guess That Fusion -> same game as in pif 1, but in app form
    # Slot machine
    # Weather
    # Secret Bases map (a map that lists all the secret bases)
    # Something to check your Pokemon's EVs / IVs
    # Daycare app that tells you the status of your eggs
  }

  def self.app_name(app_id)
    return _INTL(AVAILABLE_APPS[app_id] || app_id.to_s)
  end

  def initialize
    @installed_apps = [:MAP, :QUESTS, :DAYNIGHT, :REARRANGE]
    @last_opened_challenges = nil
    @viewed_trainers = []
    @exiting = false
    @last_opened_quest_mode = :MAP
  end

  def install_app(app_id)
    return unless Pokenav::AVAILABLE_APPS.keys.include?(app_id)
    initialize unless @installed_apps
    @installed_apps << app_id unless @installed_apps.include?(app_id)
    app_name = Pokenav.app_name(app_id)
    pbMEPlay("match_call")
    pbMessage(_INTL("The \\C[3]{1} App\\C[0] was installed in the PokéNav!", app_name))
  end

  def has_app(app_id)
    return @installed_apps.include?(app_id)
  end
end

class PokemonPokegearScreen

  def update_commands
    commands = []
    $Trainer.pokenav&.installed_apps.each do |app|
      commands << [app.to_s, Pokenav.app_name(app)]
    end
    return commands
  end
  def pbStartScreen
    $Trainer.pokenav = Pokenav.new unless $Trainer.pokenav
    commands = update_commands
    @scene.pbStartScene(commands)
    loop do
      cmd = @scene.pbScene
      commands = update_commands  #in case they're reordered
      chosen = commands[cmd][0].to_sym
      if cmd < 0
        break
      elsif chosen == :MAP
        pbWeatherMap
        # pbShowMap(-1, false)
      elsif chosen == :JUKEBOX
          pbFadeOutIn {
            scene = PokemonJukebox_Scene.new
            screen = PokemonJukeboxScreen.new(scene)
            screen.pbStartScreen
          }
      elsif chosen == :QUESTS
        pbQuestlog()
      elsif chosen == :CONTACTS
        openContactsApp
        next
      elsif chosen == :WEATHER
        pbWeatherMap
      elsif chosen == :POKECHALLENGE
        openChallengeApp
      elsif chosen == :POKERADAR
        openPokeRadarApp
      elsif chosen == :REARRANGE
        @scene.rearrange_order
      elsif chosen == :DAYNIGHT
        toggleDarkMode
      elsif chosen == :BOXLINK
        openBoxLinkApp
      elsif chosen == :FUSIONQUIZ
        openGuessThatFusionApp
      elsif chosen == :BERRYDEX
        pbBerryDex
        # elsif cmdPhone>=0 && cmd==cmdPhone
        #   pbFadeOutIn {
        #     PokemonPhoneScene.new.start
        #   }
      end
    end
    @scene.pbEndScene
  end

  def openBoxLinkApp
    blacklisted_maps = []
    if blacklisted_maps.include?($game_map.map_id)
      Kernel.pbMessage(_INTL("There doesn't seem to be any network coverage here..."))
    else
      pbFadeOutIn {
        scene = PokemonStorageScene.new
        screen = PokemonStorageScreen.new(scene, $PokemonStorage)
        screen.pbStartScreen(0) # Boot PC in organize mode
      }
    end
  end

  def openContactsApp
    pbFadeOutIn {
      scene = ContactsAppScene.new
      screen = ContactsAppScreen.new(scene)
      screen.pbStartScreen(@scene,screen)
    }
  end

  def openPokeRadarApp
      pbFadeOutIn {
        scene = PokeRadarAppScene.new
        screen = PokeRadarAppScreen.new(scene)
        screen.pbStartScreen(@scene)
      }
  end

  def openGuessThatFusionApp
    pbFadeOutIn {
      scene = FusionQuizAppScene.new
      screen = FusionQuizAppScreen.new(scene)
      screen.pbStartScreen(@scene,screen)
    }
  end

  def toggleDarkMode
    pbSEPlay("GUI storage show party panel")
    $Trainer.pokenav.darkMode = false if $Trainer.pokenav.darkMode.nil?
    $Trainer.pokenav.darkMode = !$Trainer.pokenav.darkMode
    @scene.reloadBackground
  end
end