favor.lic

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

custom_require.call(%w[common common-travel common-money common-items equipmanager])

class CrossingFavor
  include DRC
  include DRCT
  include DRCM
  include DRCI

  def initialize
    arg_definitions = [
      [
        { name: 'immortal', regex: /\w+/, optional: true, description: "Immortal who's orb to get from an altar, turns on altar favors instead of the puzzle" }
      ]
    ]

    args = parse_args(arg_definitions, true)
    @settings = get_settings
    @hometown = @settings.hometown
    @hometown_data = get_data('town')[@settings.hometown]
    

    if args.immortal
      @immortal = args.immortal.capitalize
      @all_theurgy_data = get_data('theurgy')
      @data = @all_theurgy_data[@hometown]
      @immortal_to_aspect = @all_theurgy_data['immortal_to_aspect']
      @water_source = @data['holy_water']
      @aspect_to_primer = @all_theurgy_data['aspect_to_primer']
      @aspect = @immortal_to_aspect[@immortal]
      @primer_number = @aspect_to_primer[@aspect]
      @npc_name = @data['primer_npc']
      @room = @data['favor_altars'][@immortal]['id']
      #if immortal is set, but there is no room number then there are no favor_altars in current hometown for the selected immortal
      if !@room
        message("No usable #{@immortal} altar in your hometown (#{@hometown}).")
        message("Valid Immortals in #{@hometown}: #{@data['favor_altars'].keys}")
        #likely called from training manager.  This error will keep happning unless user adjusts their yaml.
        if running?('training-manager')
          message('Suggested to lower your favor_goal or change favor_god to a working immortal for your hometown to avoid this delay.')
          message('Exiting in 10.')
          pause 10
        end
        exit
      end
      @altar_noun = @data['favor_altars'][@immortal]['adjective']
      @water_holder = @settings.water_holder
    end

    EquipmentManager.new.empty_hands

    if args.immortal.is_a?(String)
      use_altar
    else
      use_puzzle
    end
  end

  def get_water
    walk_to(@water_source['id'])
    bput("get my #{@water_holder}", 'You get')
    3.times do
      bput("fill #{@water_holder} with water from #{@water_source['noun']}", 'You fill', 'There is no more room')
    end
  end

  def use_altar
    unless @water_holder
      echo('You must purchase a water container and set water_holder: in your yaml to use altars for favors')
      exit
    end
    if @primer_number > 300
      ensure_copper_on_hand(750, @settings)
    elsif @primer_number > 200
      ensure_copper_on_hand(500, @settings)
    else
      ensure_copper_on_hand(250, @settings)
    end
    unless exists?("#{@aspect} primer")
      wait_for_script_to_complete('find', [@npc_name])
      bput("order #{@primer_number} from #{@npc_name}", 'You decide to purchase')
      stow_hands
    end
    get_water unless inside?('holy water', @water_holder)
    walk_to(@room)
    clean_altar
    stow_hands
    case bput("get my #{@aspect} primer", 'You get', 'What were')
    when 'What were'
      echo('Somehow you lost your primer, exiting.')
      exit
    end
    bput("put my #{@aspect} primer on #{@altar_noun} altar", 'You reverently')
    bput('pray', 'You begin')
    waitfor('An overwhelming sense of contentment')
    bput("get orb from #{@altar_noun} altar", 'You get')
    fix_standing
    stow_hands
  end

  def clean_altar
    loop do
      case bput("clean #{@altar_noun} altar with water in #{@water_holder}",
        /^But the altar is perfectly clean/,
        /^You finish your job/,
        /^You begin to wash/,
        /^You diligently work/,
        /^Wash the altar with what?/,
        /altar does not look any cleaner/)
      when /^You diligently work/, /^You begin to wash/
        case waitfor('You finish your job', 'altar does not look any cleaner')
        when /^You finish your job/
          break
        when /altar does not look any cleaner/
          next
        end
      when /^Wash the altar with what?/
        get_water
        walk_to(@room)
        break
      when /^But the altar is perfectly clean/
        break
      end
    end
  end

  def use_puzzle
    walk_to @hometown_data['favor_puzzle']['id']

    loop do
      case bput("pray",
        /^You feel a sense of peace settle over you/,
        /^The gods ignore the pleas of your decaying spirit/,
        /^You close your eyes and pray/,
        /^As you continue to pray/,
        /if you have come seeking the favor of your god, declare that name now/i)
      when /^You close your eyes and pray/, /^As you continue to pray/, /^You feel a sense of peace settle over you/
        next
      when 'The gods ignore the pleas of your decaying spirit'
        DRC.message("***CANNOT GET A FAVOR YOU HEATHEN!***")
        exit
      when /if you have come seeking the favor of your god, declare that name now/i
        break
      end
    end

    case bput("say #{@settings.favor_god}", /^The voice speaks to you again saying, \"You have indicated an unknown god with the name/i, /rise and seek your favor/)
    when /^The voice speaks to you again saying, \"You have indicated an unknown god with the name/i
      DRC.message("***Only neutral aspects can be used with favor puzzles***")
      DRC.message("Check https://elanthipedia.play.net/Category:Immortals names of Neutral aspects")
      exit
    when /rise and seek your favor/
      fix_standing
      fput "get #{@settings.favor_god} orb from altar"
    end
    bput("go arch", /^You step through/)
    do_puzzle
  end

  def do_puzzle
    pause 1
    case bput("look", 'water jug on it', "some tinders, several candles", 'a small sponge.', 'A table sits against one wall, directly opposite an ancient window', 'vase on top of the altar', 'The view atop the raised dais is impressive')
    when 'water jug on it' 
      bput('fill font with jug', 'you pour out the water in a slow, steady manner until the basin is filled')
      leave_room
    when "some tinders, several candles"
      bput('light candle with tinders', 'you set it on fire and then use it to light the candles')
      leave_room
    when 'a small sponge.'
      bput('clean altar with sponge', 'you note with satisfaction that you have removed all the soot')
      leave_room
    when 'A table sits against one wall, directly opposite an ancient window'
      window
    when 'You cannot go through a closed window'
      window  
    when 'vase on top of the altar'
      vase
    end
  end

  def window
    loop do
      case bput('open window', 
        /^Judging the thickness of the paint which has sealed the window shut/,
        /^Shaking the frame of the glass once more, you manage to loosen it even further/,
        /^That is already open./,
        /At first it only creaks, but soon it slides open with jerking movements/)
      when /^Judging the thickness of the paint which has sealed the window shut/, /^Shaking the frame of the glass once more, you manage to loosen it even further/
        waitrt?
        pause 1
        next
      when /At first it only creaks, but soon it slides open with jerking movements/, /^That is already open/
        bput("go window", /^You cannot go through a closed window./, /^You hoist yourself off the floor and manage/)
        do_puzzle
        break
      end
    end
  end

  def vase
    bput('pick flowers', 'You carefully pick some of the lovely blossoms')
    pause 1
    bput("go tree", /^Having filled the vase with flowers/)
    do_puzzle
  end

  def leave_room
    pause 1
    case bput('go stair', 'You find yourself more than eager to step into the inviting world that awaits you', /^As you approach the stairway, the braziers on either side suddenly flare greatly/)
    when 'You find yourself more than eager to step into the inviting world that awaits you'
      case bput("go door", /^You are engulfed in a flash of light/, /^It would be difficult to go through the door from the bottom of the stairway./, /^A soft voice echoes in your mind/, /^You feel giddy all over/)
        when /^You are engulfed in a flash of light/, /^It would be difficult to go through the door from the bottom of the stairway./
          do_puzzle
      end
    when /^As you approach the stairway, the braziers on either side suddenly flare greatly/
      do_puzzle
    end
  end
end

CrossingFavor.new