Перейти к содержанию
Наш Discord сервер: https://discord.gg/x53pHgq5qN ×
Форум шарда Middle-Earth

nepret

nepret
 Профиль  Обзор контента

  • Публикаций

    274

  • Зарегистрирован

  • Посещение

Сообщения, опубликованные nepret

  1. Опубликовано · Пожаловаться

    toGetType[1]='0x0DD6' #fish

    toGetType[2]='0x0DD6' #fish

    toGetType[3]='0x0F0E' #gh

    toGetType[4]='0x0E21' #bandages

    toGetType[5]='0x0F84' #garlic

    toGetType[6]='0x0F8C' #s.ash

    toGetType[7]='0x0F85' #ginseng

    ####### указываем цвет

    toGetColor[1]='0x0029' # red

    toGetColor[2]='0x0009' #blue

    toGetColor[3]='0x0690'

    toGetColor[4]='0'

    toGetColor[5]='0'

    toGetColor[6]='0'

    toGetColor[7]='0'

    ####### указываем нужное количество

    toGetQuan[1]=3

    toGetQuan[2]=3

    toGetQuan[3]=2

    toGetQuan[4]=250

    toGetQuan[5]=15

    toGetQuan[6]=15

    toGetQuan[7]=15

     

     

    ---------

    а с этим делать что?

     

    с первыми двумя столбцами ничего, а вот в последнем, надо указать там количество забираемых объектов

     

  3. Опубликовано · Пожаловаться 

    sub Medit()
UO.DeleteJournal()
dress:
uo.dress("1")
uo.arm("1")
wait(1000)
goto mana

undress:
uo.dress("2")
uo.arm("2")
wait(1000)
goto dress

mana:
if UO.Mana < UO.INT then 
UO.UseSkill("Meditation")
goto wait
else
goto undress
endif

wait:
if UO.InJournal("Points gained") then
UO.DeleteJournal()
goto wait_mana
else
if UO.InJournal("Points not") then
UO.DeleteJournal()
goto mana
else
wait(1000)
goto wait
endif
endif

wait_mana:
if uo.mana < uo.int then
wait(5000)
goto wait_mana
else
goto undress
endif

end sub

  9. Опубликовано · Пожаловаться

    Переделал скрипт на резку обуви.

     

    Мой не парсит...

     

    sub Boots()
DIM Boot[9]
   Boot[0]  = 0x170A    
   Boot[1]  = 0x170B   
   Boot[2]  = 0x170C    
   Boot[3]  = 0x170D    
   Boot[4]  = 0x170E    
   Boot[5]  = 0x170F     
   Boot[6]  = 0x1710   
   Boot[7]  = 0x1711  
   Boot[8]  = 0x0DC8 
   VAR i 

   For i = 0 To 8

      while uo.Count(Boot[i]) > 0
            uo.findtype(Boot[i])
            if uo.FindCount() > 0 then
                UO.WaitTargetobject('finditem') 
            UO.UseType(0x0F9E)
            wait(3500)
            endif
        wend
    next
end sub

  10. Опубликовано · Пожаловаться

    Чуть доработал скрипт.

    Что добавил:

    • Проверка на наличие удочек в бекпаке, если удочек не сталось, закрываем клиент.
    • Авто-кормёжка + проверка на наличие еды, если еды не осталось, закрываем клиент.
    • Дроп пойманной обуви себе под ноги.
    • Удаление пойманных сос-бутылок, карт и старых рыбацких сетей.

     

    В бекпаке ВСЕГДА иметь:

    • Trash бочку.
    • Еду.
    • Удочки.

     

    При старте, скрипт попросит вас указать Trash бочку.

     

     

    По поводу самого скрипта на ловлю:

    Чар начинает ловить с правого верхнего угла, потом плавно переходит ближе к чару. Поэтому приходиться ставить рыбака в верхний угол лодки...

    Что-бы можно было поставить второго чара, на нижний угол, надо в скрипте, в строке 

    FishTile(tile, uo.GetX() + i, uo.GetY() + j, 251)

    перед i поменять + на -, тогда всё заработает как надо.

     

     

     

    var food='0x097B'    # Тип еды                                                                               
                    #'0x097B' - жаренная рыба                                
                    #'0x09F2' - жаренное мясо                                
                    #'0x171F' - бананы  
    

Sub check()
    var q
    dim bot[7]
        bot[0] = '0x170D'
        bot[1] = '0x170E'
        bot[2] = '0x170C'
        bot[3] = '0x170B'
        bot[4] = '0x170F'
        bot[5] = '0x1710'
        bot[6] = '0x1711'
    for q=0 to 6
        while uo.Count(bot[q]) > 0
            uo.findtype(bot[q])
            if uo.FindCount() > 0 then
                uo.exec("moveitem 'finditem' '1' 'ground'")
                wait(300)
            endif
        wend
    next
    dim shlak[3]
        shlak[0] = '0x14ED'
        shlak[1] = '0x0DC8'
        shlak[2] = '0x099F'
    for q=0 to 2
        while uo.Count(shlak[q]) > 0
            uo.findtype(shlak[q])
            if uo.FindCount() > 0 then
                uo.exec("moveitem 'finditem' '1' 'trash'")
                wait(300)
            endif
        wend
    next
    if uo.count("0x0DBF")<1 then
        uo.closeuo()
    endif
uo.findtype(food)
if uo.findcount() then
    uo.usetype(food)
else
    uo.closeuo()
endif
end sub

Sub FishTile(t, x, y, z)
  var timer

  repeat
    check()
    uo.WaitTargetTile(Str(t), Str(x), Str(y), Str(z))
    uo.UseType(0x0DBF) #Удочка

    uo.DeleteJournal()
    timer = 0
    repeat
      wait(1000)
      timer = timer + 1
    until uo.InJournal("Points") or uo.InJournal("here") or uo.InJournal("line") or uo.InJournal("broken") or timer > 120
        

  until uo.InJournal("here") or uo.InJournal("line")
end sub

sub Fishing()
  UO.canceltarget()    
  UO.Print("Укажите Trash бочку...")
  UO.addobject('trash')
  While UO.Targeting()
      Wait(100)
  Wend
  
  var i, j, tile
  
  uo.Disarm()

  while not uo.dead()
    for i = -6 to 6
      for j = -6 to 6
        tile = 168
        while (not uo.PrivateGetTile(uo.GetX() + i, uo.GetY() + j, 251, tile, tile)) and (tile < 6045)
          if tile == 171 then
            tile = 310
          else
            if tile == 311 then
              tile = 6039
            else
              tile = tile + 1
            endif
          endif
        wend
      
        if tile < 6039 then
          tile = 0
        endif

        if tile < 6045 then
          uo.concolor(0x53)
          uo.Print("Fishing: " + Str((i + 6) * 13 + j + 7) + "/169...")
          uo.concolor(0)
          
          FishTile(tile, uo.GetX() + i, uo.GetY() + j, 251)
        endif
      next
    next
    
    uo.Print("Завершил круг. Продолжаю.")
  wend
end sub

  11. Опубликовано · Пожаловаться

    Скрипт крафтит полный комплект брони Exceptional Dwarven Platemail

     

    ################################################################
#
# Скрипт изготавливает полный комплект эгзептовой брони Dwarven Platemail + щит Heater и
# перекладывает готовые части в контейнер.
# Контейнер указывается таргетом после старта скрипта.
# Если во время ковки поломался молоток, тонг, наковальня или кончились инги,
# скрипт встанет на паузу пока в бекпаке не появится нужные предметы.
# Для работы скрипта в бекпаке должны лежать:
#  *Инги
#  *Тонг
#  *Молоток
# Так же, чар должен стоять возле плавильни и наковальни (не дальше 2 тайлов от обоих).
# В настройках скрипта можно выбрать тип еды и ковка комплекта как с щитом, так и без него.
#
################################################################
var food = '0x097B'      # Тип еды, которую будем кушать в процессе.
                           # '0x097B' - жаренная рыба
                           # '0x09F2' - жаренное мясо
                           # '0x171F' - бананы
                       
var shield = 0            # Если нужен комплект брони без щита, поставте 0

sub FEDP()
    var i, c
    var t = 0
    
    UO.set('finddistance','3')
    UO.canceltarget()    
    UO.Print("Куда складывать броню?")
    UO.addobject('Bag')
    While UO.Targeting()
        Wait(100)
    Wend


    dim armor[7]
        armor[0]='0x1416' #Breastplate
        armor[1]='0x141A' #Legs
        armor[2]='0x1417' #Arms
        armor[3]='0x1419' #Helm
        armor[4]='0x1418' #Gloves
        armor[5]='0x1413' #Gorget
        armor[6]='0x1B76' #Shield
    
    dim menu1[7]
        menu1[0]='Armor'
        menu1[1]='Armor'
        menu1[2]='Armor'
        menu1[3]='Armor'
        menu1[4]='Armor'
        menu1[5]='Armor'
        menu1[6]='Shields'
        
    dim menu2[7]
        menu2[0]='Platemail'
        menu2[1]='Platemail'
        menu2[2]='Platemail'
        menu2[3]='Helmets'
        menu2[4]='Platemail'
        menu2[5]='Platemail'
        menu2[6]='Heater'
        
    dim menu3[6]
        menu3[0]='Dwarven Platemail Breastplate'
        menu3[1]='Dwarven Platemail Legs'
        menu3[2]='Dwarven Platemail Arms'
        menu3[3]='Dwarven Plate Helm'
        menu3[4]='Dwarven Platemail Gloves'
        menu3[5]='Platemail Gorget'
    
    for i=0 to 5
        repeat
            c = 1
            check()
            uo.DeleteJournal()
            uo.waitmenu('What', menu1[i], 'Select', menu2[i], 'Select', menu3[i])
            uo.waittargettype('0x1BF2')
            uo.usetype('0x13E3')
            repeat
                wait(1000)
                t = t + 1
            until uo.injournal("You create|You destroy|You make") or t == 20
            t = 0
            if uo.injournal("exceptional") then
                uo.findtype(armor[i])
                if uo.findcount() then
                    uo.moveitem('finditem', 1, 'Bag')
                       wait(300)
                endif
                c = 0
                wait(500)
            else
                uo.findtype(armor[i])
                if uo.findcount() > 0 then
                    uo.waittargetobject('finditem')
                    uo.usetype('0x0FBB')
                    repeat
                        wait(1000)
                        t = t + 1
                    until uo.injournal("You could make") or t == 20
                    t = 0
                    wait(3000)
                endif
            endif
        until c == 0
    next
    if shield == 1 then
        repeat
                c = 1
                uo.DeleteJournal()
                uo.waitmenu('What', menu1[6], 'Select', menu2[6])
                uo.waittargettype('0x1BF2')
                uo.usetype('0x13E3')
                repeat
                    wait(1000)
                    t = t + 1
                until uo.injournal("You create|You destroy|You make") or t == 20
                t = 0
                if uo.injournal("exceptional") then
                    c = 0
                    wait(500)
                else
                    uo.findtype(armor[6])
                    if uo.findcount() > 0 then
                        uo.waittargetobject('finditem')
                        uo.usetype('0x0FBB')
                        repeat
                            wait(1000)
                            t = t + 1
                        until uo.injournal("You could make") or t == 20
                        t = 0
                        wait(3000)
                    endif
                endif
            until c == 0
        endif
end sub

Sub check()
    uo.findtype(food)
    if uo.findcount() then
        uo.usetype(food)
    else
        uo.print("Нет еды!")
    endif
    while uo.count('0x1BF2') < 30
        uo.print("Нет инготов в бекпаке! Либо их меньше 30 штук.")
        wait(5000)
    wend
    while uo.count('0x13E3') < 1
        uo.print("Нет молотка!")
        wait(5000)
    wend
    while uo.count('0x0FBB') < 1
        uo.print("Нет тонга!")
        wait(5000)
    wend
    uo.findtype('0x0FAF',-1,'ground')
    while uo.findcount() < 1
        uo.findtype('0x0FAF',-1,'ground')
        if uo.findcount() < 1 then
            uo.print("Рядом нет наковальни")
            wait(5000)
        endif
    wend
end sub

     

    ЗЫ: дим брал из этого поста

  13. Опубликовано · Пожаловаться

    проблема со стаками ткани, к примеру 2 рулона по 100 в каждом, если оба порезать на ткань, то есть большая вероятность (50-50) что они не будут стаковаться

    100 рулонов это где-то 5к ткани

    причём, один из этих стаков не будет "принимать в себя" резаную ткань из вещей которые были сделаны из этого же стака

     

    клиент 200, но пробывал и на 403, таже хрень

    вин7 х64

     

     

    зы: заметил такую вещь! если при переделки баулов в ткань, шмотка сфейлиться, то ткань пойдёт нормальная, и на оборот

  14. Опубликовано · Пожаловаться

    я вот сейчас заглянул в раздел файлы на сайте и немного удивился вот этому

     

    UOhammer (3 Mb) - Программа похожая на Yoko Injection с встроенными макросами на Lumberjacking, Mining, Fishing. Поддерживает скриты для Injection!

     

    с каких пор хамер потдерживает скрипты инжекта? оО

×
×
  • Создать...