ДАМ ЗЕЛЕНЫЕ НИТКИ ! ЗА МАКРОСС

  • CAIIIOK аватар
    Не в сети
  • CAIIIOK
  • Автор темы
  • Junior Member
  • Сообщений: 5
  • Thanks: 0
CAIIIOK аватар
Не в сети

ДАМ ЗЕЛЕНЫЕ НИТКИ ! ЗА МАКРОСС

Posted: 02 нояб 2014 10:10
#21195
МНЕ НУЖЕН МАКРОС НА КОВКУ БУЛОК БС !

Пожалуйста Войти или Регистрация, чтобы присоединиться к беседе.

  • Не в сети
  • Eventualis
  • Модератор: Общий форум
  • Сообщений: 184
  • Thanks: 3
Не в сети

Re: Re: ДАМ ЗЕЛЕНЫЕ НИТКИ ! ЗА МАКРОСС

Posted: 02 нояб 2014 18:21
#21197
привет загляни в тему <!-- l --><a class="postlink-local" href="uogames.ru/forum/viewtopic.php?f=39&t=21...opic.php?f=39&t=2122[/url]<!-- l -->
там есть такой пост Новая версия скрипта выполнения заказов кузнеца. Плавит лишние вещи - не дает переполниться бекпаку.
uodreams.zbord.ru/viewtopic.php?p=4945#4945
так как я автор скрипта - с тебя зеленый руник, а можно два))

Добавлено спустя 3 часа 25 минут 57 секунд: 
// Author: Eventualis
//Version 1.3
// Description: Blacksmith BOD Filler
//NEED TINKER TOOLS AND INGOTS IN RESTOCK BAG
if not @findobject 'Bulk Source'
  promptalias 'Bulk Source'
endif
if not @findobject 'Bulk Destination'
  promptalias 'Bulk Destination'
endif
if not @findobject 'Restock'
  promptalias 'Restock'
endif
if not @findobject 'Trash BODs Destination'
  promptalias 'Trash BODs Destination'
endif
// Craft Info
if not listexists 'BCCraftInfo'
  @createlist 'BCCraftInfo'
  // Ringmail
  @pushlist 'BCCraftInfo' 0x13eb //0 Gloves
  @pushlist 'BCCraftInfo' 0x13f0 //1 Leggins
  @pushlist 'BCCraftInfo' 0x13ee //2 Sleeves
  @pushlist 'BCCraftInfo' 0x13ec //3 Tunic
  // Chainmail
  @pushlist 'BCCraftInfo' 0x13bb //4 Coif
  @pushlist 'BCCraftInfo' 0x13be //5 Leggins
  @pushlist 'BCCraftInfo' 0x13bf //6 Tunic
  //Platemail
  @pushlist 'BCCraftInfo' 0x1410 //7Arms
  @pushlist 'BCCraftInfo' 0x1414 //8Gloves
  @pushlist 'BCCraftInfo' 0x1413 //9Gorget
  @pushlist 'BCCraftInfo' 0x1411 //10Legs
  @pushlist 'BCCraftInfo' 0x1415 //11(Tunic)
  @pushlist 'BCCraftInfo' 0x1c04 //12(Female)
  //Helmets
  @pushlist 'BCCraftInfo' 0x140c //13Bascinet
  @pushlist 'BCCraftInfo' 0x1408 //14Close helmet
  @pushlist 'BCCraftInfo' 0x140a //15Helmet
  @pushlist 'BCCraftInfo' 0x140e //16Norse helm
  @pushlist 'BCCraftInfo' 0x1412 //17Plate helm
  //Shields
  @pushlist 'BCCraftInfo' 0x1b73 //18Buckler
  @pushlist 'BCCraftInfo' 0x1b72 //19Bronze shield
  @pushlist 'BCCraftInfo' 0x1b76 //20Heater shield
  @pushlist 'BCCraftInfo' 0x1b7b //21Metal shield
  @pushlist 'BCCraftInfo' 0x1b74 //22Metall kite shield
  @pushlist 'BCCraftInfo' 0x1b79 //23Tear kite shield
  //Bladed
  @pushlist 'BCCraftInfo' 0x26bb //24Bone harvester
  @pushlist 'BCCraftInfo' 0xf5e //25Broadsword
  @pushlist 'BCCraftInfo' 0x26c1 //26Crescent blade
  @pushlist 'BCCraftInfo' 0x1441 //27Cutlass
  @pushlist 'BCCraftInfo' 0xf52 //28Dagger
  @pushlist 'BCCraftInfo' 0x13ff //29Katana
  @pushlist 'BCCraftInfo' 0x1401 //30Kryss
  @pushlist 'BCCraftInfo' 0xf61 //31Longsword
  @pushlist 'BCCraftInfo' 0x13b6 //32Scimitar
  @pushlist 'BCCraftInfo' 0x13b9 //33Viking sword
  //Axes
  @pushlist 'BCCraftInfo' 0xf49 //34Axe
  @pushlist 'BCCraftInfo' 0xf47 //35Battle axe
  @pushlist 'BCCraftInfo' 0xf4b //36Double axe
  @pushlist 'BCCraftInfo' 0xf45 //37Executioner's axe
  @pushlist 'BCCraftInfo' 0x13fb //38Large battle axe
  @pushlist 'BCCraftInfo' 0x1443 //39Two handed axe
  @pushlist 'BCCraftInfo' 0x13b0 //40War axe
  //Polearms
  @pushlist 'BCCraftInfo' 0xf4d //41Berdiche
  @pushlist 'BCCraftInfo' 0x26bd //42Bladed staff
  @pushlist 'BCCraftInfo' 0x26bf //43Double bladed staff
  @pushlist 'BCCraftInfo' 0x143e //44Halberd
  @pushlist 'BCCraftInfo' 0x26c0 //45Lance
  @pushlist 'BCCraftInfo' 0x26be //46Pike
  @pushlist 'BCCraftInfo' 0x1403 //47Short spear
  @pushlist 'BCCraftInfo' 0x26ba //48Scythe
  @pushlist 'BCCraftInfo' 0xf62 //49Spear
  @pushlist 'BCCraftInfo' 0x1405 //50War fork
  //Bashing
  @pushlist 'BCCraftInfo' 0x143d //51Hammer pick
  @pushlist 'BCCraftInfo' 0xf5c //52Mace
  @pushlist 'BCCraftInfo' 0x143b //53Maul
  @pushlist 'BCCraftInfo' 0x26bc //54Scepter
  @pushlist 'BCCraftInfo' 0x1407 //55War mace
  @pushlist 'BCCraftInfo' 0x1439 //56War hammer
endif
useobject 'Restock'
pause 500
if @targetexists
  @canceltarget
endif
if findtype 0x13e3 'backpack'
  for 0 to 'BCCraftInfo'
    while @findtype BCCraftInfo&#91;&#93; 0 'backpack'
      if usetype! 0x13e3
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 14
        waitfortarget 15000
        if @findtype BCCraftInfo&#91;&#93; 0 'backpack'
          target 'found'
        endif
        pause 1000
      endif
    endwhile
  endfor
endif
// Search for a Blacksmith BOD to fill
if @findtype 0x2258 1102 'backpack'
  @setalias 'bod' 'found'
  useobject! 'bod'
  waitforgump 0x5afbd742 15000
  // Combine
  if not targetexists 'server'
    replygump 0x5afbd742 2
    waitforgump 0x5afbd742 15000
    waitfortarget 5000
  endif
  // Check for tongs
  if @findtype 0x13e3 0 'backpack'
    pause 1500
    @setalias 'hammer' 'found'
    useobject! 'hammer'
    waitforgump 0x38920abd 15000
    // Craft
    while targetexists 'server'
      // Check for sewing kit before craft
      if not @findobject 'hammer'
        break
      endif
      // Check for cut cloths
      if @counttype 0x1bf2 0 'backpack' < 100
        if @movetype 0x1bf2 'Restock' 'backpack' 0 0 0 0 500
          pause 1500
        else
          sysmsg 'Out of ingots!' 25
          @canceltarget
          stop
        endif
      endif
      // Ringmail
      if @ingump 0x5afbd742 'ringmail gloves'
        replygump 0x38920abd 1
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;0&#93;
      elseif @ingump 0x5afbd742 'ringmail leggings'
        replygump 0x38920abd 1
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;1&#93;
      elseif @ingump 0x5afbd742 'ringmail sleeves'
        replygump 0x38920abd 1
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;2&#93;
      elseif @ingump 0x5afbd742 'ringmail tunic'
        replygump 0x38920abd 1
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;3&#93;
        //Chainmail
      elseif @ingump 0x5afbd742 'chainmail coif'
        replygump 0x38920abd 8
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;4&#93;
      elseif @ingump 0x5afbd742 'chainmail leggings'
        replygump 0x38920abd 8
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;5&#93;
      elseif @ingump 0x5afbd742 'chainmail tunic'
        replygump 0x38920abd 8
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;6&#93;
        //Platemail
      elseif @ingump 0x5afbd742 'platemail arms'
        replygump 0x38920abd 15
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;7&#93;
      elseif @ingump 0x5afbd742 'platemail gloves'
        replygump 0x38920abd 15
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;8&#93;
      elseif @ingump 0x5afbd742 'platemail gorget'
        replygump 0x38920abd 15
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;9&#93;
      elseif @ingump 0x5afbd742 'platemail legs'
        replygump 0x38920abd 15
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;10&#93;
      elseif @ingump 0x5afbd742 'platemail tunic'
        replygump 0x38920abd 15
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;11&#93;
      elseif @ingump 0x5afbd742 'female plate'
        replygump 0x38920abd 15
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 37
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;12&#93;
        //Helmets
      elseif @ingump 0x5afbd742 'bascinet'
        replygump 0x38920abd 22
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;13&#93;
      elseif @ingump 0x5afbd742 'close helmet'
        replygump 0x38920abd 22
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;14&#93;
      elseif @ingump 0x5afbd742 'helmet'
        replygump 0x38920abd 22
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;15&#93;
      elseif @ingump 0x5afbd742 'norse helm'
        replygump 0x38920abd 22
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;16&#93;
      elseif @ingump 0x5afbd742 'plate helm'
        replygump 0x38920abd 22
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;17&#93;
        //Shields
      elseif @ingump 0x5afbd742 'buckler'
        replygump 0x38920abd 29
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;18&#93;
      elseif @ingump 0x5afbd742 'bronze shield'
        replygump 0x38920abd 29
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;19&#93;
      elseif @ingump 0x5afbd742 'heater shield'
        replygump 0x38920abd 29
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;20&#93;
      elseif @ingump 0x5afbd742 'metal shield'
        replygump 0x38920abd 29
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;21&#93;
      elseif @ingump 0x5afbd742 'metal kite shield'
        replygump 0x38920abd 29
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;22&#93;
      elseif @ingump 0x5afbd742 'tear kite shield'
        replygump 0x38920abd 29
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 37
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;23&#93;
        //Bladed
      elseif @ingump 0x5afbd742 'bone harvester'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;24&#93;
      elseif @ingump 0x5afbd742 'broadsword'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;25&#93;
      elseif @ingump 0x5afbd742 'crescent blade'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;26&#93;
      elseif @ingump 0x5afbd742 'cutlass'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;27&#93;
      elseif @ingump 0x5afbd742 'dagger'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;28&#93;
      elseif @ingump 0x5afbd742 'katana'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 37
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;29&#93;
      elseif @ingump 0x5afbd742 'kryss'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 44
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;30&#93;
      elseif @ingump 0x5afbd742 'longsword'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 51
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;31&#93;
      elseif @ingump 0x5afbd742 'scimitar'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 58
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;32&#93;
      elseif @ingump 0x5afbd742 'viking sword'
        replygump 0x38920abd 43
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 65
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;33&#93;
        //Axes
      elseif @ingump 0x5afbd742 'battle axe'
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;35&#93;
      elseif @ingump 0x5afbd742 'double axe'
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;36&#93;
      elseif @ingump 0x5afbd742 "executioner's axe"
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;37&#93;
      elseif @ingump 0x5afbd742 'large battle axe'
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;38&#93;
      elseif @ingump 0x5afbd742 'two handed axe'
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 37
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;39&#93;
      elseif @ingump 0x5afbd742 'war axe'
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 44
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;40&#93;
      elseif @ingump 0x5afbd742 'axe'
        replygump 0x38920abd 50
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;34&#93;
        //Polearms
      elseif @ingump 0x5afbd742 'bardiche'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;41&#93;
      elseif @ingump 0x5afbd742 'bladed staff'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;42&#93;
      elseif @ingump 0x5afbd742 'double bladed staff'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;43&#93;
      elseif @ingump 0x5afbd742 'halberd'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;44&#93;
      elseif @ingump 0x5afbd742 'lance'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;45&#93;
      elseif @ingump 0x5afbd742 'pike'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 37
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;46&#93;
      elseif @ingump 0x5afbd742 'short spear'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 44
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;47&#93;
      elseif @ingump 0x5afbd742 'scythe'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 51
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;48&#93;
      elseif @ingump 0x5afbd742 'spear'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 58
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;49&#93;
      elseif @ingump 0x5afbd742 'war fork'
        replygump 0x38920abd 57
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 65
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;50&#93;
        //Bashing
      elseif @ingump 0x5afbd742 'hammer pick'
        replygump 0x38920abd 64
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 2
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;51&#93;
      elseif @ingump 0x5afbd742 'war mace'
        replygump 0x38920abd 64
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 30
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;55&#93;
      elseif @ingump 0x5afbd742 'war hammer'
        replygump 0x38920abd 64
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 37
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;56&#93;
      elseif @ingump 0x5afbd742 'mace'
        replygump 0x38920abd 64
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 9
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;52&#93;
      elseif @ingump 0x5afbd742 'maul'
        replygump 0x38920abd 64
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 16
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;53&#93;
      elseif @ingump 0x5afbd742 'scepter'
        replygump 0x38920abd 64
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 23
        waitforgump 0x38920abd 15000
        pause 250
        @findtype BCCraftInfo&#91;54&#93;
      else
        @unsetalias 'found'
      endif
      // No crafted items were found
      if not @findobject 'found'
        pause 2000
        if not @findobject 'found'
          @moveitem! 'bod' 'Trash BODs Destination'
          pause 1500
          break
        endif
      endif
      target! 'found'
      waitfortarget 5000
      if not targetexists and @injournal 'must be exceptional' 'system'
        if @useobject 'hammer'
          waitforgump 0x38920abd 15000
          @replygump 0x38920abd 14
          waitfortarget 15000
          @target! 'found'
          pause 1500
        endif
        replygump 0x5afbd742 2
        waitforgump 0x5afbd742 15000
        waitfortarget 5000
        @clearjournal
      endif
    endwhile
    // BOD is complete, move to destination
    if not targetexists 'server'
      @moveitem 'bod' 'Bulk Destination'
    endif
    pause 1500
    // Out of hammer, download from restock
  elseif @movetype 0x13e3 'Restock' 'backpack'
    pause 1500
    //Craft hammer
  else
    if @findtype 0x1eb8 'any' 'backpack'
      if @counttype 0x1bf2 'any' 'backpack' > 2
        usetype 0x1eb8 'any' 'backpack'
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 8
        waitforgump 0x38920abd 15000
        replygump 0x38920abd 93
        waitforgump 0x38920abd 15000
      else
        @movetype 0x1bf2 'Restock' 'backpack' 0 0 0 'any' 50
        pause 3000
      endif
    else
      @movetype 0x1eb8 'Restock' 'backpack' 0 0 0 'any'
      pause 3000
    endif
  endif
elseif not property 'Deeds In Book: 0' 'Bulk Source'
  useobject! 'Bulk Source'
  waitforgump 0x54f555df 15000
  replygump 0x54f555df 5
  pause 1500
else
  sysmsg 'Unable to find BODs to fill.' 64
  @canceltarget
  stop
endif

Пожалуйста Войти или Регистрация, чтобы присоединиться к беседе.