appraisal.lic

=begin
  Documentation: https://elanthipedia.play.net/Lich_script_repository#appraisal
=end

class Appraisal
  def initialize
    arg_definitions = [
      [
        { name: 'focus', regex: /focus/i, description: 'Perform appraise focus on an item.' },
        { name: 'item', regex: /\w+/i, description: 'Item to use appraise focus with.' },
        { name: 'script_summary', optional: true, description: 'Trains the Appraisal skill by appraising your gear, zills, bundles, gem pouches, and studying the art in the Crossing art gallery.' }
      ],
      [
        { name: 'nonspecific', regex: /nonspecific/i, optional: true, description: 'Toggle off specific gem_pouch_adjective' },
        { name: 'count', regex: /count/i, optional: true, description: 'Count gem pouches as they are appraised' }
      ]
    ]

    args = parse_args(arg_definitions)

    @equipment_manager = EquipmentManager.new
    settings = get_settings
    train_list = settings.appraisal_training

    if args.nonspecific
      pouch_adjective = nil
    else
      pouch_adjective = settings.gem_pouch_adjective
    end

    if args.count
      if settings.low_value_gem_pouch_container.to_s.empty?
        echo '"count" passed as an argument, but no low_value_gem_pouch_container defined. Skipping counting.'
        @count = false
      else
        @count = true
      end
    end

    pouch_low_value = (settings.gem_pouch_low_value || 1).to_i

    if args.focus
      if DRSkill.getrank('Appraisal') < 200
        echo 'You need at least 200 Appraisal to use Appraise Focus.'
        exit
      end

      appraise_focus(args.item)
    else
      train_list.each do |task|
        break if DRSkill.getxp('Appraisal') >= 30

        case task
        when 'zills'
          assess_zills
        when 'pouches'
          train_appraisal_with_pouches(settings.full_pouch_container, settings.spare_gem_pouch_container, settings.low_value_gem_pouch_container, pouch_low_value, pouch_adjective, settings.gem_pouch_noun)
        when 'kit_pouches'
          train_appraisal_with_kit_pouches(settings.gem_kit_name, settings.spare_gem_pouch_container, settings.low_value_gem_pouch_container, pouch_low_value, pouch_adjective, settings.gem_pouch_noun)
        when 'gear'
          train_appraisal_with_gear
        when 'bundle'
          train_appraisal_with_bundle
        when 'art'
          train_appraisal_with_art
        else
          echo "#{task} is not a valid appraisal_training setting"
        end
      end
    end
  end

  def train_appraisal_with_art
    DRC.wait_for_script_to_complete('study-art', ['appraisal'])
  end

  def train_appraisal_with_gear
    @equipment_manager.wear_equipment_set?('standard')
    @equipment_manager.items.each { |item| break unless appraise_item?(item) }
  end

  def train_appraisal_with_bundle
    DRC.bput('appraise my bundle quick', 'Roundtime', 'Appraise what', 'You cannot appraise')
    waitrt?
  end

  def pouch_name(gem_pouch_adjective, gem_pouch_noun)
    [gem_pouch_adjective, gem_pouch_noun].compact.reject { |s| s.to_s.empty? }.join(' ')
  end

  def classify_pouch(name, low_value, low_value_gem_pouch_container, spare_gem_pouch_container)
    opened_here = false
    result = DRC.bput("appraise my #{name} quick", 'Roundtime', /You.ll need to open the .* to examine its contents./, /There doesn.t appear to be anything in/, /worth a total of about \d+/)

    if result =~ /You.ll need to open the .* to examine its contents./
      DRC.bput("open my #{name}", /You open your .* ./, /That is already open/)
      opened_here = true
      result = DRC.bput("appraise my #{name} quick", 'Roundtime', /There doesn.t appear to be anything in/, /worth a total of about \d+/)
    end

    chosen_container = nil
    case result
    when /worth a total of about (\d+)/
      pouch_value = Regexp.last_match(1).to_i
      if pouch_value < low_value
        DRC.message("Low value pouch found, putting it into low_value_gem_pouch_container")
        chosen_container = low_value_gem_pouch_container
      end
      if @count
        /(\d+)/ =~ DRC.bput("count my #{name}", /You sort through the contents .* and find \d+ gems in it/)
        pouch_count = Regexp.last_match(1).to_i
        if pouch_count < 500
          DRC.message("Pouch not full, putting it into #{low_value_gem_pouch_container}")
          chosen_container = low_value_gem_pouch_container
        end
      end
    when /There doesn.t appear to be anything in/
      if spare_gem_pouch_container.to_s.empty?
        DRC.message("Empty pouch found, but no spare_gem_pouch_container defined. Leaving in default container.")
      else
        DRC.message("Empty pouch found, putting it into spare_gem_pouch_container")
        chosen_container = spare_gem_pouch_container
      end
    else
      DRC.message("Unrecognized appraise result for #{name}: #{result.inspect}. Pouch not classified by value; routing to default container.")
    end

    DRC.bput("close my #{name}", /You close your/, /That is already closed/) if opened_here
    waitrt?
    chosen_container
  end

  def train_appraisal_with_pouches(full_pouch_container, spare_gem_pouch_container, low_value_gem_pouch_container, low_value, gem_pouch_adjective, gem_pouch_noun)
    name = pouch_name(gem_pouch_adjective, gem_pouch_noun)
    if gem_pouch_adjective
      case DRC.bput("appraise my #{name} quick", 'Roundtime', 'You can.t appraise the', 'Appraise what', /You.ll need to open the .* to examine its contents./, /There doesn.t appear to be anything in/)
      when /You.ll need to open the .* to examine its contents./
        DRC.bput("open my #{name}", /You open your .*./, /That is already open/)
        DRC.bput("appraise my #{name} quick", 'Roundtime', 'You can.t appraise the', 'Appraise what')
        DRC.bput("close my #{name}", /You close your/, /That is already closed/)
      end
      waitrt?
    end
    pause 1
    $ORDINALS.each do |ordinal|
      break unless DRCI.get_item?("#{ordinal} #{name}", full_pouch_container)

      target = classify_pouch(name, low_value, low_value_gem_pouch_container, spare_gem_pouch_container) || full_pouch_container
      DRCI.put_away_item?(name, target)
      pause 1
      break if DRSkill.getxp('Appraisal') >= 30
    end
  end

  def count_kit_pouches(gem_kit_name)
    count = 0
    in_listing = false
    clear
    put "rummage my #{gem_kit_name}"
    timer = Time.now
    while Time.now - timer < 20
      line = get?
      if line.nil?
        pause 0.1
        next
      end
      in_listing = true if line =~ /^Rummaging through .* you find it contains:/i
      if in_listing && (m = line.match(/^\s*(\d+)\.\s+/))
        n = m[1].to_i
        count = n if n > count
      end
      break if line =~ /^Roundtime:/ || line =~ /^\[You can TURN/ || line =~ /What were you/ || line =~ /isn.t a container/i
    end
    waitrt?
    count
  end

  def train_appraisal_with_kit_pouches(gem_kit_name, spare_gem_pouch_container, low_value_gem_pouch_container, low_value, gem_pouch_adjective, gem_pouch_noun)
    if gem_kit_name.to_s.empty?
      DRC.message("No gem_kit_name defined. Skipping kit_pouches task.")
      return
    end

    total = count_kit_pouches(gem_kit_name)
    if total <= 0
      DRC.message("No pouches found in #{gem_kit_name}.")
      return
    end

    name = pouch_name(gem_pouch_adjective, gem_pouch_noun)
    kit_pattern = Regexp.escape(gem_kit_name)

    total.downto(1) do |slot|
      break if DRSkill.getxp('Appraisal') >= 30

      case DRC.bput("turn my #{gem_kit_name} to #{slot}", /You turn/, /already (set )?to/, /Turn what/, /does not have that many/)
      when /does not have that many/
        next
      end

      pull_result = DRC.bput("pull my #{gem_kit_name}", /You get .* from your .*#{kit_pattern}/, /empty/, /nothing/, /no .* in that/, /Pull what/, /You need to TURN/)
      next unless pull_result =~ /You get .* from your .*#{kit_pattern}/

      target = classify_pouch(name, low_value, low_value_gem_pouch_container, spare_gem_pouch_container) || gem_kit_name
      DRCI.put_away_item?(name, target)
      pause 1
    end
  end

  def appraise_item?(item)
    if @equipment_manager.get_item?(item)
      DRC.bput("appraise #{item.short_name} quick", 'Roundtime')
      waitrt?
      pause 1
      @equipment_manager.empty_hands
    end
    DRSkill.getxp('Appraisal') < 30
  end

  def assess_zills
    if DRSkill.getrank('Appraisal') >= 250
      echo "Your appraisal skill is above 250. You can remove 'zills' from appraisal_training"
      return
    end

    case DRC.bput('remove my zill', 'You slide', 'Remove what')
    when 'Remove what'
      return
    end
    DRC.bput('assess my zill', 'you carefully look them over')
    waitrt?
    DRC.bput('wear my zill', 'You slide')
    pause 1
  end

  def appraise_focus(item)
    focus_concepts = ["defense", "arcane", "recall", "logic", "offense", "magic", "khri", "inner fire"]
    if focus_concepts.include?(item)
      focus_concept(item)
    else
      case DRC.bput("get my #{item}", "^You get.*#{item}", '^What were you referring', 'But that is already', 'You are already')
      when 'But that is already', '^What were you referring'
        echo "Cannot get the #{item} you are trying to focus upon. Exiting..."
        exit
      end
      focus(item)
    end
    waitrt?
    case DRC.bput('appraise focus check', 'You are currently', 'You have completed')
    when 'You are currently'
      waitfor('Breakthrough')
      echo "You have completed focusing on your #{item} and now have increased learning!"
    when 'You have completed'
      echo 'You already have an active appraise focus boost. Wait a while before trying again.'
    end

    exit
  end

  def focus_concept(item)
    waitrt?
    case DRC.bput("appraise focus #{item}", 'You carefully', 'You are already', 'You currently feel', 'You can\'t seem', 'You cant seem', 'You will lose your progress')
    when 'You carefully', 'You are already', 'You currently feel', 'You can\'t seem', 'You cant seem'
      return
    else
      focus_concept(item)
    end
  end

  def focus(item)
    waitrt?

    case DRC.bput("appraise focus my #{item}", 'You carefully', 'You are already', 'You currently feel', 'You can\'t seem', 'You cant seem', 'You will lose your progress')
    when 'You carefully', 'You are already', 'You currently feel', 'You can\'t seem', 'You cant seem'
      DRC.bput("stow my #{item}", "You put .*#{item}", 'You easily strap', "You don't seem to be able to move", 'You secure', 'is too small to hold that', 'You hang')
    else
      focus(item)
    end
  end
end

# Call this last
Appraisal.new