Training - Discordance

////////////////////////////
//Title: Macro for training Discordance on UOEvolution
//Author: Maelune
//
//Requirements: Many charges of instruments.
//              Hiding skill at 100+
//              Musicianship skill at 100+
//
//Instructions: Stand so that you are within 8 tiles of as many vendors
//as possible. Check the "Loop" box in UOSteam. Hit 'Play'.
//
//Notes: This mod is setup to be used at a player VM. The more player vendors, //the better.
//       Player VMs will only get you into the low 50s in Discordance. Investigations into
//       methods of getting max Discordance without finding animals and locking them away
//       is ongoing.
////////////////////////////
//For each vendor, discord once then ignore. Clear list when finished
while @findtype 0x191 'any' 'ground' 'any' '8' or @findtype 0x190 'any' 'ground' 'any' '8'
  if not @property 'shop name' 'found'
    ignoreobject 'found'
  else
    useskill 'Discordance'
    if @injournal 'instrument shall you'
      @targettype! 0xeb1 'any' 'backpack'
      @targettype! 0xeb2 'any' 'backpack'
      @targettype! 0xeb3 'any' 'backpack'
      @targettype! 0xebc 'any' 'backpack'
      @targettype! 0xebd 'any' 'backpack'
      @targettype! 0xebe 'any' 'backpack'
      @targettype! 0x2805 'any' 'backpack'
      clearjournal
    endif
    if @injournal 'the target for your'
      pause 200
      target! 'found'
      if @injournal 'creature is already'
        ignoreobject 'found'
        clearjournal
        pause 150
      else
        //ignoreobject 'found'
      endif
      if @injournal 'You play'
        ignoreobject 'found'
        pause 13000
        clearjournal
      elseif @injournal 'You attempt'
        pause 13000
        clearjournal
      endif
    endif
  endif
endwhile
while not hidden 'self'
  useskill 'hiding'
endwhile
pause 20000
clearignorelist