#===============================================================================
#
#===============================================================================
class UI::TrainerCardVisuals < UI::BaseVisuals
  GRAPHICS_FOLDER = "Trainer Card/"   # Subfolder in Graphics/UI
  BADGE_SIZE      = [32, 32]   # [width, height] of a Gym Badge
  BADGE_SPACING   = 16         # Size of gap between adjacent Gym Badges
  FIRST_BADGE_X   = 72         # Left edge of the first Gym Badge
  FIRST_BADGE_Y   = 310        # Top edge of the first Gym Badge
  BADGE_COUNT     = 8          # Number of Gym Badges to show
  TEXT_COLOR_THEMES = {   # Themes not in DEFAULT_TEXT_COLOR_THEMES
    :gray => [Color.new(72, 72, 72), Color.new(160, 160, 160)]
  }

  def initialize_sprites
    # Trainer card
    add_icon_sprite(:card, 0, 0, graphics_folder + gendered_filename(_INTL("trainer_card")))
    # Overrides sprite (coordinates are the bottom middle of the sprite)
    @sprites[:player] = IconSprite.new(400, 240, @viewport)
    @sprites[:player].setBitmapDirectly(generate_front_trainer_sprite_bitmap())
    if !@sprites[:player].bitmap
      raise _INTL("No trainer front sprite exists for the player character, expected a file at {1}.",
                  "Graphics/Trainers/" + $player.trainer_type.to_s + ".png")
    end
    @sprites[:player].x -= @sprites[:player].bitmap.width / 2
    @sprites[:player].y -= @sprites[:player].bitmap.height
    @sprites[:player].z = 10
  end

  #-----------------------------------------------------------------------------

  def refresh_overlay
    super
    draw_ID
    draw_stats
    draw_badges
  end

  # Draws the player's name and ID number onto the overlay.
  def draw_ID
    draw_text(_INTL("Name"), 34, 70, theme: :gray)
    draw_text($player.name, 302, 70, align: :right, theme: :gray)
    draw_text(_INTL("ID No."), 332, 70, theme: :gray)
    draw_text(sprintf("%05d", $player.public_ID), 468, 70, align: :right, theme: :gray)
  end

  # Draws the player's money, Pokédex numbers, play time and start date onto the
  # overlay.
  def draw_stats
    # Create money text
    money_text = _INTL("${1}", $player.money.to_s_formatted)
    # Create Pokédex stats text
    pokedex_text = sprintf("%d/%d", $player.pokedex.owned_count, $player.pokedex.seen_count)
    # Create play time text
    total_secs = $stats.play_time.to_i
    hour = (total_secs / 60) / 60
    min = (total_secs / 60) % 60
    play_time_text = (hour > 0) ? _INTL("{1}h {2}m", hour, min) : _INTL("{1}m", min)
    # Create start date text
    $PokemonGlobal.startTime = Time.now if !$PokemonGlobal.startTime
    if System.user_language[3..4] == "US"
      start_date_text = _INTL("{1} {2}, {3}",
                              pbGetAbbrevMonthName($PokemonGlobal.startTime.mon),
                              $PokemonGlobal.startTime.day,
                              $PokemonGlobal.startTime.year)
    else
      start_date_text = _INTL("{1} {2}, {3}",
                              $PokemonGlobal.startTime.day,
                              pbGetAbbrevMonthName($PokemonGlobal.startTime.mon),
                              $PokemonGlobal.startTime.year)
    end
    # Draw text
    draw_text(_INTL("Money"), 34, 118, theme: :gray)
    draw_text(money_text, 302, 118, align: :right, theme: :gray)
    draw_text(_INTL("Pokédex"), 34, 166, theme: :gray)
    draw_text(pokedex_text, 302, 166, align: :right, theme: :gray)
    draw_text(_INTL("Time"), 34, 214, theme: :gray)
    draw_text(play_time_text, 302, 214, align: :right, theme: :gray)
    draw_text(_INTL("Started"), 34, 262, theme: :gray)
    draw_text(start_date_text, 302, 262, align: :right, theme: :gray)
  end

  # Draws the player's owned Gym Badges onto the overlay.
  def draw_badges
    x = FIRST_BADGE_X
    region = pbGetCurrentRegion(0)   # Get the current region
    BADGE_COUNT.times do |i|
      if $player.badges[i + (region * BADGE_COUNT)]
        draw_image(graphics_folder + "icon_badges", x, FIRST_BADGE_Y,
                   i * BADGE_SIZE[0], region * BADGE_SIZE[1], *BADGE_SIZE)
      end
      x += BADGE_SIZE[0] + BADGE_SPACING
    end
  end
end

#===============================================================================
#
#===============================================================================
class UI::TrainerCard < UI::BaseScreen
  def initialize_visuals
    @visuals = UI::TrainerCardVisuals.new
  end

  def start_screen
    super
    pbSEPlay("GUI trainer card open")
  end

  def end_screen
    pbPlayCloseMenuSE
    super
  end
end