Перейти к содержанию
Форум шарда Middle-Earth

imaborg

Members
  • Публикаций

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

  • Посещение

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


  1. Захотел я "of Shiftiness" вещи заточить и хочется уточнить некоторые моменты)

     

    1.Фиолетовые кристаллы создаются из 5 зеленых и позволяют улучшать магические эффекты вещей!

    Вопрос: какой скилл влияет на соединение кристаллов?

    (кинул 5 кристалов в бэкпэк, двойной клик, после чего один кристалл сломался - информации о вероятности создания фиолетового кристалла не появилась. Дабы избежать излишней траты кристаллов, хотелось бы услышать чей нибудь совет!)

     

    2.Опишите процесс заточки предметов! Пример:

    -хочу заточить предмет с маг эффектами "Resistive, of Shiftiness" до "Resistive, of Evading"

    Вопрос: чем на что жать, какой скилл нужен, есть ли вариант сломать вещь?

    -если предмет с "of Shiftiness, of Fortification", а я хочу сделать его "of Evading, of Fortification" или "of Shiftiness, of Invulnerability" как это сделать?

     

    ps. информация о магических свойствах и о их уровнях дана тут ==>> middle-earth.ru


  2. вот сам абы как переделал, ибо не вникал в этот скрипт с головой)) просто тайлы подставил нужные!

     

    теперь это чудо ходит и вскапывает землю!!! УРа))) ща бетатесчу... если кто-то поможет доработать - фермеры будут счастливы!

     

    Sub MiningTile(t, x, y, z)
    var timer
    
    repeat
    uo.canceltarget()
    uo.WaitTargetTile(Str(t), Str(x), Str(y), Str(z))
    uo.UseType(0x0F39)
    uo.DeleteJournal()
    timer = 0
        repeat
    wait(500)
        timer = timer + 1
        until UO.injournal("There is no") or uo.injournal("You fail to prospect") or uo.injournal("Âû âñêîïàëè çåìëþ") or UO.injournal("There is no brimstone") or UO.injournal("There is nothing") or timer > 5
    uo.canceltarget()
    #UO.Usetype("0x0F39")
    until uo.injournal("You fail to prospect") or uo.InJournal("line") or uo.InJournal("far away") or UO.injournal("There is no brimstone") or UO.injournal("There is nothing") or uo.injournal("Âû âñêîïàëè çåìëþ")
    end sub
    
    sub Mining()
    var i, j, tile, f, b, p
    f = 0
    b = 0
    while not uo.dead()
    for i = -2 to 2
    for j = -2 to 2
    tile = 168
    while (not uo.PrivateGetTile(uo.GetX() + i, uo.GetY() + j, 251, tile, tile)) and (tile < 1343)
    if tile == 1617 then
    tile = 310
    else
    if tile == 311 then
    tile = 1
    else
    tile = tile + 1
    endif
    endif
    wend
    
    if tile < 1617 then
    tile = 0
    endif
    
    if tile < 1617 then
    uo.concolor(0x53)
    uo.Print("Êîïàåì òàéë " + Str((i + 2) * 5 + j + 3) + " èç 25...")
    uo.concolor(0)
    
    MiningTile(tile, uo.GetX() + i, uo.GetY() + j, 251)
    endif
    next
    next 
    uo.Print("Çàâåðøèë êðóã. Ïðîäîëæàþ.")
    f = f + 1
    if b == 2 then
    for p=1 to 11
    wait(1000)
    uo.press(36)
    next
    uo.press(34)
    f = 0
    b = 0
    else
    if f == 3 then
    for p=1 to 5
    wait(1000)
    uo.press(34)
    next
    f = 0
    b = b + 1
    endif
    endif
    
    
    wend
    end sub


  3. я часто бегаю покупаю броню! так что ставь вендора на черный и выставляй комплекты с броней по 6 итемов. + отдельно хитер щиты и war axe.

    Будут адекватные цены - буду постоянным покупателем)

     

    в добавок можешь поставить вендора на скупку перьев и регов (по той цене, которую хочешь) - периодически бывают моменты когда перьев и регов куча валяется в доме)

     

    п.с. - мой вендор на черном рынке Graham (желтый плащ, с файр гранком в руках) цены ставлю наименьшие, по сравнению с остальными предложениями!


  4. есть специальные патчи для клиентов, которые изменяют стандартные 800-600 на любое значение...

     

    сильно много ты всё равно не увеличишь, ибо сервер не будет показывать объекты свыше 20тайлов... (поправьте если не 20 а меньше или больше - я не помню сколько точно)

     

    если инжектом не пользуешься, то разрешение меняют такие проги как:

    uostealth

    uorazor


  5. есть у кого скрипт на сбор посаженных регов?

    чтобы сам ходил и собирал!)

    ну и на посадку за одно)))

     

    заранее спс

     

     

    вот нашёл в предыдущих постах кое что:

    Сбор регов ,все реги которые растут он собирает,естественно вокруг себя,сам он не ходит.

     

    sub Regs_Harvester()

    var oldx, oldy;

    uo.set('finddistance', '2');

    while not uo.dead()

    oldx = uo.getx();

    oldy = uo.gety();

    uo.deletejournal();

    uo.ignorereset();

    while oldx == uo.getx() and oldy == uo.gety()

    uo.findtype('0x18E5', -1, 1); НС

    if uo.findcount('finditem')==0 then

    uo.findtype('0x18E9', -1, 1); Женьшень

    if uo.findcount('finditem')==0 then

    uo.findtype('0x18E1', -1, 1); Чеснок

    if uo.findcount('finditem')==0 then

    uo.findtype('0x1F10', -1, 1); Блудмос

    if uo.findcount('finditem')==0 then

    uo.findtype('0x18E0', -1, 1); Мандрейк

    if uo.findcount('finditem')==0 then

    uo.findtype('0x0C4F', -1, 1); хлопок

    if uo.findcount('finditem')==0 then

    wait(500)

    endif

    endif

    endif

    endif

    endif

    endif

    if uo.findcount('finditem') then

    uo.useobject('finditem');

    uo.deleteJournal();

    repeat

    wait(1000)

    until uo.injournal("You put") or uo.injournal("You must wait") or uo.injournal("That is too") or uo.injournal("t see that")

    if uo.injournal("You must wait") or uo.injournal("That is too") or uo.injournal("t see that") then

    uo.ignore('finditem', 'on');

    uo.deletejournal();

    endif

    else

    wait(500)

    endif

    wend

    wait(500)

    wend

    end sub

     


  6. ну задачу он свою выполняет) так что можно выложить я думаю, 1.0 версию)

     

    к сожалению у меня нету игрового чара с прокаченным БС(( и возможности отладить скрипт мне не светит!

    но можно сказать совместными усилиями мы написали его ГЫГ)

     

    полюбому пригодиится комунить)


  7. опишите плиз процесс посева регов по стадиям!

    1. как\чем сделать почву плодородной? (чем на что нажимать)

    2. когда и как сажать и через сколько оно выростит?

    3. как раздобыть зёрна?

    ну вообщем TIPS & TRICS по выращиванию реагентов!


  8. неееее мэн) это печалька какаято а не предложение!

    Я сначала подумал ты чочешь чтобы нпс вендоры продавали такое! И кста такая вещь была на какомто шарде уже))

     

    темболее ты и так можешь выставить такие мешочки у своего вендора))))

    котвмешке 1

    котвмешке 2

    итд. и придумай условие!

    В одном из этих 20 мешков стоимостью 100к лежит фуллвирм) сыграй! рискни и он твой!


  9. о! хоть что-то прояснилось у меня в голове)

    я незнал что массив из функции выносить нельзя!

    Спасиб!

     

    По поводу лишних переменных -

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

     

    Чтобы к примеру поставил скрипт, ушел) а он тебе 10 комплектов брони сделал! Конечно это рассчитано не на вышку, но кто знает у кого ее сколько))))

     

    вообще изначально я начал писать ээтот скрипт для того чтобы один чел поставил вендора и продавал различные комплекты брони - от вауксита до вышки! А то ему лень вручную сидеть)

     

    через пару часиков буду дома, попробую все это дописать!


  10. Писал скрипт для производства полного комплекта экскептиональной брони и помещения её в мешок!

     

    у меня слабый уровень скриптинга и никакой научной подготовки (учусь на юрфаке), прочитал пару раз все уроки на joko форуме, видел кучу разных скриптов и анализировал их.

    помогите дописать этот скрипт!

     

    sub main()
    
    var i
    var dwserial
    var expserial
    VAR FoodType='0x097B' # Тип еды                                                                               
                #'0x097B' - жаренная рыба                                
                #'0x09F2' - жаренное мясо                                
                #'0x171F' - бананы  
    
    dim dwitem[7]
        dwitem[0]='0x1416' #Breastplate
        dwitem[1]='0x141A' #Legs
        dwitem[2]='0x1417' #Arms
        dwitem[3]='0x1419' #Helm
        dwitem[4]='0x1418' #Gloves
        dwitem[5]='0x1413' #Gorget
        dwitem[6]='0x1B76' #Shield
        
    dim dwmenu[7]
        dwmenu[0]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Dwarven Platemail Breastplate'"
        dwmenu[1]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Dwarven Platemail Legs'"
        dwmenu[2]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Dwarven Platemail Arms'"
        dwmenu[3]="'What' 'Armor' 'Select' 'Helmets' 'Select' 'Dwarven Plate Helm'"
        dwmenu[4]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Dwarven Platemail Gloves'"
        dwmenu[5]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Platemail Gorget'"
        dwmenu[6]="'What' 'Shields' 'Select' 'Heater'"
    
    
    uo.CancelMenu()
    uo.CancelTarget()
    
      UO.Print("Укажите контейнер для FULL DW Exceptional комплекта!")
      UO.Exec('addobject Expbag')
        While UO.Targeting()
            Wait(300)
        Wend
        
      UO.Print("Укажите из какого металла будем ковать?")
      UO.Exec('addobject dwmetall')
        While UO.Targeting()
            Wait(300)
        Wend
    
    if UO.GetQuantity('dwmetall') <= 150 then
    uo.print("Недостаточное количество ингов в паке")
    wait(100)
    else
    uo.print('Приступаем к ковке Dwarven Platemail Breastplate')
    
    For i = 0 to 6
    fulldw()
    next 
      
    endif
    end sub
    
    Sub fullDW()
    while not UO.InJournal("exceptional")
        UO.DeleteJournal()
        UO.waitmenu("dwmenu[i]")   ##################################################################
        uo.waittargetobject('dwmetall')
        uo.useobject('^0x13E3')
                while not (UO.InJournal("You create") or UO.InJournal("You make") or UO.InJournal("You destroy"))
                wait(300)
                wend
            repeat
        uo.findtype('dwitem[i]','-1','Backpack')
        uo.waittargettype('0x0F51')
           UO.Usetype('0x0FBB')
        wait(4000)
        until uo.injournal("You could make some material from that.")
    wend
      UO.Findtype('dwitem[i]','-1','Backpack')
      uo.MoveItem('finditem','-1','ExpBag')
      CheckLag()
      uo.print('Exceptional сделан!')
      uo.usetype('FoodType')
      wait(1000)
    end sub
    
    Sub CheckLag()
    UO.DeleteJournal("Backpack")
    UO.Click('backpack')
    repeat
    wait(100)
    until UO.InJournal("Backpack")
    end sub

     

     

    как я только не вставлял этот dwmenu ничего не выходит((

     

    возможные ошибки:

    1. заменить пробелы на запятые или убрать " в

    dwmenu[0]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Dwarven Platemail Breastplate'"

    2. заменить uo.waitmenu("dwmenu") на uo.exec("waitmenu.............. или использовать uo.automenu

     

     

    пс - наткнулся в стандартной документации на вот что

    sub Craft(tool, resource, minresource, delay, menu1, choice1, menu2, choice2, menu3, choice3)
    if menu1<>"" then UO.Exec("automenu '"+menu1+"' '"+choice1+"'")
    if menu2<>"" then UO.Exec("automenu '"+menu2+"' '"+choice2+"'")
    if menu3<>"" then UO.Exec("automenu '"+menu3+"' '"+choice3+"'")
    while UO.Count(resource)>minresource
    if UO.Count(tool) < 1 then
      UO.Print("Tool not found")
      return
    end if
    UO. Print("Resource "+STR(UO.Count(resource)))
    wait(delay)
    UO. waittargettype(resource)
    UO.usetype(tool)
    wend
    UO.Print("Out of resource ("+STR(UO.Count(resource))+")")
    end sub

     

    не понимаю что означает и кроется за этим if menu1<>"" then и зачемто везде + ставит перед менюшками

     

    может в этом ключ к успеху моего скрипта?


  11. да меня то все устраивает)))

     

    даже хорошо что при 100 дядя ваняя своей удочкой не агрит коварную жидкость)

     

    с трудом представляю рыбака в тяжелой броне с закрытым забралом на шлеме))))) отбивающийся удочкой от водяного)

    во умора былабы


  12. по поводу Fishing:

    всегда интересовал вопрос - почему фишинг оставили без всяких защитников воды итд.. (на подобии Ent'ов в ламбере и элементалей в мининге)

     

    и тут столкнулся с О НЕКИМ!!!))) при фишинге 100.0 стоишь себе и рыбачишь как дядя ваня у себя на участке - тишина, птички чирикают!

    а как только я создал нуба 0лвл с 33.0 фишингом и дал ему удочку, так он сразу стал привлекать О ВОДЯНОГО!!!!!!!! да ещё какого))) водяного элементаля)

     

    это че за бред?)))

     

    кто риммону заплатил чтобы элементалей выключили?))))))))))))


  13. пробовал убирать кавычки и так и так, но почемуто меню автоматически не выбирается! Или пишет ошибку скрипта (что то там немогу прочесть переменную I )

    как домой приеду скину то что нагородил)

    0 to 2 - эт я случайно ошибся) это пример скрипта, в массиве на самом деле 7 переменных!

     

    П.с. - месс, знал бы я, что на форуме есть твой замечательный всеобъемный скрипт на БС))) сделел бы все на основе него)

     


  14. как правильно вставить массив в uo.waitmenu

    или как сделать иначе? помогите плиз!

     

    пример:

    sub main()

    var i

    dim dwmenu[2]

    dwmenu[0]="'What' 'Weapons' 'Select' 'Swords' 'Select' 'Dagger'"

    dwmenu[1]="'What' 'Armor' 'Select' 'Platemail' 'Select' 'Dwarven Platemail Legs'"

    For i = 0 to 2

    #куём армор и в uo.waitmenu(dwmenu

    next

    end sub

     

    правильно ли я впихнул в массив текст " '...' " ?

    нужно ли задавать i = 0 перед for?

     

     


  15. я думаю нужно делать через

     

    while not uo.injournal("exceptional")

    #сюда вписываем нужные манипуляции с молоточком и ингами)

    if uo.injournal("You could") then

    #проверка на - сделался предмет или нет!

    endif

    #файндтипим броню и плавка предмета щипцами

    wend

    uo.moveitem.... # файндтипим екскепт и перемещаем в пак номер 1

     

     

    прально мыслю?

     

    ещё было бы круто реализовать:

    1. остановка скрипта если инготов мало.

    2. ковка щипчиков, если закончились (бред но можно дописать)

    3. ложим много сумок в пак, скрипт запоминает серийник первой сумки и кидает фуллDW туда.. после чего вносит предмет\серийник в игнорлист, ищет следующую сумку и запоминает её серийник и кидает уже в неё!

    4. ну и кушает соответственно))

    5. перед началом скрипта можно вписать Addobject и тыкать на метал из которого будет делаться броня! (тоже ненужная хрень, но пусть будет)

     

     

    пару дней назад какраз пытался написать этот скрипт.... но у меня нету даже 100БС))) такчто забросил эту хрень и сделал скрипт для расфасовки карт с сокровищами) кому нужно обращайтесь, выложу!


  16. Ааааааааааааааа черт меня подери) не могу найти Trashcan или как там его... - мусорный контейнер короче!

     

    где сиё чудо продаётся или чем делается?

     

    совсем окротел уже, не могу найти) соре!

     

    и вот ещё, что даёт ожерелье к фишингу? разрушаемо ли оно при ловле? я так понимаю шанс выловить карты и маг рыбу станет выше, так?


  17. Я всетаки повторюсь ещё разок)) может кто поймёт к чему я это предлагал!

     

    Предложение по серверу:

    По поводу продажи крафт вещей и помощи развитию нубам:

    -Организовывать в разных городах "Государственный Заказ" на закупку определённого вида крафт продукции разных отраслей.

     

    Предположим поступает "гос заказ" на производство ножей для рубки мяса (cleaver's) в количестве 1000шт. (из нишки какойнить) -

    устанавливается определённый срок на выполнение заказа, и расценки!

    каждый первый принёсший 1000шт cleaver's получает столько-то голды. второй чуть меньше, а у третьего ещё дешевле, и всё (кто не успел, тот не продаст).

    расставлять данных продавцов с охраной (ну чтобы по уошному и красиво) и какиминить ящиками в центре городов (всегда разные города) чтобы был интерес мотаться по миру...

    информацию о данного вида заказах можно вписывать на доски объявлений в городах , ну или на сайте\форуме на крайняк, рекламить при входе в игру!

     

    (данный вид заработка поможет контролировать так называемый "роботизированный фарм денег"! придаст смысл в нижке и добавит интереса крафтить никому ненужные предметы)))

     

    всегото нужно на сервере запустить и отладить пару скриптов! да или на крайняк пусть админы\гмы сами такого рода скрипт на инже напишут ну или себя в роли торговца поставят ЛОЛ ))) (я уверен это не сверх сложно)

     


  18. а ребятам которые пострадали, предлагаю помочь!!

    1. Подогнать домик)

    2. Подогать руды для мининг прокачки!

    3. Ну вещи сортировать канешн фэйлово))) но можно чемнибудь заменить!

     

    Кто готов? ( особенно интересуют инициатива виновников отката! )

     

    гмов и админов вообще боюсь спрашивать) а хотя они бы и могли восстановить справедливость! Онлайн мал, помогайте своим ннаркоманчикам!

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