Подскажите пожалуйста

//1. need 2 full runebooks marked 1 tile south of the mineable locations
//2. macro assumes you have tinkering and spot at dropoff location to restock ingots
//3. Organizer agent 'Ore' (CASE SENSITIVE) needs to be configured from your backpack to dropoff container and have the 4 ore graphics and 6 mining gems
//4. pauses after recalls are set to 1500 for 2Faster Casting. Change to 2000 for 0FC and 1000 for 4FC
@setalias 'IngotsSource' 0x40e7e8c2 //container at your house with ingots for tinkering
@setalias 'OreBookOne' 0x40336973
@setalias 'OreBookTwo' 0x403364df
@setalias 'HomeOre' 0x4033664c //runebook with first rune to dropoff location
if not listexists 'OreBook1'
  createlist 'OreBook1'
  pushlist 'OreBook1' 'OreBookOne'
  pushlist 'OreBook1' 'OreBookTwo'
endif
if not listexists 'Runes'
  createlist 'Runes'
  pushlist 'Runes' 7
  pushlist 'Runes' 13
  pushlist 'Runes' 19
  pushlist 'Runes' 25
  pushlist 'Runes' 31
  pushlist 'Runes' 37
  pushlist 'Runes' 43
  pushlist 'Runes' 49
  pushlist 'Runes' 55
  pushlist 'Runes' 61
  pushlist 'Runes' 67
  pushlist 'Runes' 73
  pushlist 'Runes' 79
  pushlist 'Runes' 85
  pushlist 'Runes' 91
  pushlist 'Runes' 97
endif
For 0 to 'OreBook1'
For 0 to 'Runes'
pause 500
clearjournal
pause 500
useobject OreBook1[]
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 Runes[]
//tells you which rune you are on, see runelist above
sysmsg 'Rune' 33
sysmsg Runes[] 33
pause 2500
while not @injournal 'no metal here' and not @injournal "can't mine there"
  //use pickaxe to northern tile until specified weight is reached
  pause 500
  usetype 0xe86
  waitfortarget 1000
  targettileoffset 0 -1 0
  // once weight is reached go home, if getting overweight, lower it
  if weight > 440
    useobject '0x4033664c'
    waitforgump 0x554b87f3 5000
    replygump 0x554b87f3 7
    pause 2500
    // organizer to put up ore
    pause 1000
    organizer 'Ore'
    while organizing
    endwhile
    // get ingots if low
    if counttype 0x1bf2 0 'backpack' < 20
      useobject 'IngotsSource'
      pause 1500
      movetype 0x1bf2 'IngotsSource' 'backpack' (0 0 0) 0 40
      pause 1500
    endif
    // kits
    while @counttype 0x1eb8 0 'backpack' < 2
      usetype! 0x1eb8
      waitforgump 0x38920abd 15000
      replygump 0x38920abd 8
      waitforgump 0x38920abd 15000
      replygump 0x38920abd 23
    endwhile
    //pickaxes
    while @counttype 0xe86 0 'backpack' < 3
      usetype! 0x1eb8
      waitforgump 0x38920abd 15000
      replygump 0x38920abd 8
      waitforgump 0x38920abd 15000
      replygump 0x38920abd 114
    endwhile
    //recall back to where you were
    useobject OreBook1[]
    waitforgump 0x554b87f3 5000
    replygump 0x554b87f3 Runes[]
    pause 2000
  endif
endwhile
endfor
//recall home so ingot container is found
pause 2000
useobject '0x4033664c'
waitforgump 0x554b87f3 5000
replygump 0x554b87f3 7
pause 2500
endfor