Гость MEdition Жалоба Опубликовано 15 июня, 2011 с 33 до 120 на стрелах # Create by MeSSiR ##################### MIDDLE-EARTH.RU ########################## # Скрипт для прокачки скилла Bowcraft. # Работает по принципу поднимания с пола по 1 шафту под собой # и последующего крафта шафта в стрелу или болт. # Для работы скрипта необходимо: # - Шафты, которые необходимо положить на пол под собой # - В свою сумку положить перья # - Рядом с собой на пол поставить контейнер для # изгототвленных стрел. # Желательно для скрипта: # - Еда ################################################################ # ВНИМАНИЕ! Макрос работает с объектами на полу, поэтому # рекомендуется запускать его дома, так как на улице предемты # могут исчезнуть либо их могут подобрать другие игроки. # Чтобы сделать шафты необходимо дважды кликнуть по дагеру и # появившимся прицелом указать на дерево (logs). В появившимся # меню выбрать шафты (Shafts). # При запуске макроса необходимо появившимся прицелом указать # на контейнер, который рекомендуется положить рядом с # персонажем на полу. # Для изготовления стрел(для луков) при выборе макроса выбираем # скрипт Arrow. Для изготовления болтов(для арбалетов) выбираем # скрипт Bolt. ###################### Настройка переменных #################### var stop=120 # Стоп-отметка уровня скилла, когда нужно # будет остановить прокачку для того, чтоб # применить Power скроллы. Если не нужна, # то поставить значение 120. var food='0x097B' # Тип еды, которую будем кушать в процессе. # '0x097B' - жаренная рыба # '0x09F2' - жаренное мясо # '0x171F' - бананы var wait=500 # Задержка в мс для для перетаскивания. # По-умолчанию 500. Если медленный интернет # ставьте больше. var t=0 sub Arrow() UO.canceltarget() uo.set('finddistance','2') UO.Print("Укажите контейнер на полу возле себя в который будем складывать стрелы:") uo.AddObject('bag') While uo.Targeting() Wait(100) Wend uo.msg(".pray") while uo.countground('0x1BD4') >0 and uo.count('0x1BD1') >0 or uo.skillval('Bowcraft',1)>1199 uo.findtype('0x1BD4','-1','ground') if uo.findcount() then uo.grab('1','finditem') wait(wait) saving() uo.waitmenu('What','Arrow') uo.waittargettype('0x1BD1') uo.usetype('0x1BD4') repeat wait(100) t=t+1 until uo.injournal("You create|You destroy") or t>300 t=0 saving() uo.deletejournal() uo.findtype(0x0F3F) if uo.findcount() then uo.moveitem('finditem','all','bag') wait(wait) endif eda() endif wend end sub sub Bolt() UO.canceltarget() uo.set('finddistance','2') UO.Print("Укажите мешок на полу возле себя в который будем складывать стрелы:") uo.AddObject('bag') While uo.Targeting() Wait(100) Wend uo.msg(".pray") while uo.countground('0x1BD4') >0 and uo.count('0x1BD1') >0 or uo.skillval('Bowcraft',1)>1199 uo.findtype('0x1BD4','-1','ground') if uo.findcount() then uo.grab('1','finditem') wait(wait) saving() uo.waitmenu('What','Bolt') uo.waittargettype('0x1BD1') uo.usetype('0x1BD4') repeat wait(100) t=t+1 until uo.injournal("You create|You destroy") or t>300 saving() uo.deletejournal() uo.findtype(0x1BFB) if uo.findcount() then uo.moveitem('finditem','all','bag') wait(wait) endif eda() wait(wait) endif wend end sub Sub eda() uo.findtype(food) if uo.findcount() then uo.usetype(food) else uo.print("Нет еды!") endif wait(wait) while uo.skillval('Bowcraft',1) >= stop*10 uo.msg("Стоп-отметка! Скилл прокачался до "+str(stop)) wait(3000) wend end sub Sub saving() if uo.injournal("Saving") then repeat wait(1000) until uo.injournal("complete.") uo.deletejournal() endif end sub Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты