![]() |
![]() |
![]() Сообщение #1
|
|
Выложил это всё для БЭДРОБОТА, который в НТ. Не забудь прочти раздел БИБЛИОТЕКА (справо в главном меню) ###---прокачка кукинга. жарит рыбу (если есть), мясо-ребра (если есть), тушки ###---птичек (если есть). жарит на том, на что укажут курсором в начале работы ###---скрипта: костер, форжа и тп. ###---КУКИНГ (HOTKEY ALT+R) sub RibsAndFish() VAR IsFish=0, IsRibs=0, IsBirds=0 VAR Exit=0 UO.Exec('addobject Fire') while UO.Targeting() wait(100) wend repeat if IsFish==0 then # блок приготовления рыбы if CookFood('0x097A')==1 then UO.Print('сырой рыбы нет') IsFish=1 wait(100) end if end if if IsRibs==0 then # блок приготовления ребрышек птичек if CookFood('0x09F1')==1 then UO.Print('сырых ребрышек нет') IsRibs=1 wait(100) end if end if if IsBirds==0 then # блок приготовления дичи if CookFood('0x09B9')==1 then UO.Print('куропаток нет') IsBirds=1 wait(100) end if end if if IsFish==1 && IsRibs==1 && IsBirds==1 && Exit==0 then UO.Print("жарить нечего... конец работе ))") Exit=1 wait(100) end if if UO.InJournal("on some sort of fire") && Exit==0 then UO.Print("костер выгорел... конец работе ))") Exit=1 wait(200) end if until Exit==1 || UO.Dead() if NOT UO.Dead() then UO.Print('Приготовление еды закончил') else UO.Print('Помер на кухонном посту - захлебнулся слюной') end if end sub ###---ПРИГОТОВЛЕНИЕ ПИЩИ Sub CookFood(Food) VAR LastTimer UO.DeleteJournal() LastTimer=UO.Timer() UO.FindType(Food,'-1','2') if UO.FindCount() then UO.WaitTargetObject('Fire') UO.UseObject('finditem') repeat wait(100) until UO.InJournal("You put|You burn|положили|сожгли") || LastTimer+100<UO.Timer() return 0 else return 1 end if end sub ###---ЧЕКЛАГ Sub checklag() deljournal("backpack|Backpack") UO.Click("backpack") repeat wait(100) until UO.InJournal("backpack|Backpack") end sub ###---СТЕРЕТЬ ЖУРНАЛ Sub deljournal(msg) while UO.InJournal(msg) UO.SetJournalLine(UO.InJournal(msg)-1,"") wend end sub ###---ТЕРМИНАТОР - ОСТАНОВКА ВСЕХ РАБОТАЮШИХ СКРИПТОВ (HOTKEY ALT+Z) sub MyTerminate() UO.set('quiet','1') UO.cancelmenu() UO.ignorereset() UO.set('quiet','0') UO.exec('terminate all') end sub |
|
|
|
![]() Сообщение #2
|
|
Лутим скай элемов в НТ 0x0E76 - мешки 0x0EED - золото sub Ept() var gold, bag gold=UO.Gold bag=UO.Count(0x0E76) UO.Set('finddistance', '3') UO.FindType(0x0E76, -1,'ground') UO.Grab(str(0),'finditem'); юзай Grab UO.FindType(0x0EED, -1,'ground') UO.Grab(str(0),'finditem'); if UO.Count(0x0E76)>bag and UO.Gold>gold then UO.Say(')') endif end sub |
|
|
|
![]() Сообщение #3
|
|
Замечательный помошнег для разгрузки мешков в сундук или бэк пак, который лежит в банке и выгребания хлама в другой мешок и следующий скрипт на продажу из этого мешка хлам дереву. Спасибо Ревенанту # Rev/En/Ant sub empter() VAR Sunduk1 = '0x403A2C57' ;сундук для мешков VAR Sunduk2 = '0x40C17C79' ;сундук для хлама VAR Meshok = '0x0E76' ;тип мешка VAR MeshSer repeat uo.findtype(Meshok,-1,'backpack') MeshSer = UO.GetSerial( 'finditem' ) uo.useobject(MeshSer) wait(600) repeat uo.findtype(-1,-1,MeshSer) uo.moveitem('finditem',0,Sunduk2) wait(500) until not UO.GetQuantity('finditem') wait(500) uo.moveitem(MeshSer,0,Sunduk1) until not UO.count(Meshok) end sub sub derevo() var bag=0x40C17C79; мешок для мусора repeat UO.FindType(-1,-1,bag) UO.MoveItem('finditem',1,'backpak') UO.WaitTargetObject('finditem') UO.UseFromGround('0x11C9') wait(1000) until UO.Dead() end sub |
|
|
|
![]() ![]() Сообщений: 435 Рег. 19.05.2010 |
![]() Сообщение #4
|
пасиб =) полезно... потерял их давно, найти не мог =) гыы |
|
|
|
![]() Сообщение #5
|
|
Слушай, а вот такая строчка... until UO.InJournal("You put|You burn|положили|сожгли") ... говорит о том, что у тебя нормально проверяются кириллические записи в журнале. А у меня никак не хотят. Нет мыслей навскидку, какие я галочки-фигалочки и где не поставил? |
|
|
|
![]() Сообщение #6
|
|
Прошу прощения, я просто пользователей и хранитель скриптов, но не скриптер! Скрипты работают, сбоев нет! |
|
|
|
![]() Сообщение #7
|
|
НИкто такое даже читать не будет, пока не оформишь нормально. |
|
|
|
![]() ![]() Сообщений: 102 Рег. 4.05.2010 |
![]() Сообщение #8
|
Не хочешь не читай кто захочет и кому будет интерестно прочтёт.... |
|
|
|
![]() ![]() Сообщений: 435 Рег. 19.05.2010 |
![]() Сообщение #9
|
ламбер в НТ по скрипту? О_о интересно, а от толпы безголовых он сам отбивается и не помирает? |
|
|
|
![]() ![]() Сообщений: 102 Рег. 4.05.2010 |
![]() Сообщение #10
|
Ламбер не в НТ а после него )) |
|
|
|
![]() Сообщение #11
|
|
Мне очень жаль, что это Таверна, а не другой раздел! С уважением относитесь к другим и к Вам будут так же относиться. По идее топик со скриптами для Ньюби Тауна, по идее, принято оформить скрипт [ code ]сам скрипт[ /code ] с помощью не хитрых слов code взятых в квадратные скобки (без пробелов) в начале и это же слово в таких же скобках со знаком слэшь в конце,по моему это не трудно, особенно когда при написании топика можно автоматом поставить всё это. Вот и всё ))))) Не сочтите за трудность, г-н KUK исправьтесь! Заранее благодарен! FaceControl и Leo Wiskonti благодарен! |
|
|
|
![]() Сообщение #12
|
|
Коль я тебе завтра 7 мегов скриптов скину ссылкой через лс осчастливишь нубов)) |
|
|
|
![]() ![]() Сообщений: 435 Рег. 19.05.2010 |
![]() Сообщение #13
|
скинь мну тоже плз, осчастливь меня ![]() |
|
|
|
![]() Сообщение #14
|
|
Был в командировке в США, ссылки нет )))) Оч жду! Буду благодарен! |
|
|
|
![]() ![]() ![]() Сообщений: 1454 Рег. 22.03.2010 |
![]() Сообщение #15
|
Коль стукни в асю 376017772 есть пару пар скриптов нормальных. |
|
|
|
![]() Сообщение #16
|
|
Прости, я асей не пользуюсь! Нужен скрипт на прокачку майнинга через переплавку железных вещей или руды. |
|
|
|
![]() ![]() ![]() Сообщений: 27 Рег. 2.05.2010 |
![]() Сообщение #17
|
Майнинг так не качается |
|
|
|
![]() Сообщение #18
|
|
Да, я забыл, просто на переплавку. В НТ неудобно, надо по квесту 500 ингов, надоедет вручную плавить оружие и доспехи после каждой ходки. |
|
|
|
![]() ![]() ![]() Сообщений: 27 Рег. 2.05.2010 |
![]() Сообщение #19
|
Складывай в отдельную сумку в банке, а потом разом все сплавишь.. плавить не так и муторно - 500 ингов это ерунда. |
|
|
|
![]() Сообщение #20
|
|
а почему бы сделать отдельный раздел посвящённый инже и скриптам для неё именно для нашего шарда,а то антарес прикрыли и все из этого ресурсы канули в лету.... |
|
|
|
Сейчас: 17 мая 2024 09:46 |