assasin 0 Жалоба Опубликовано 14 августа, 2010 парни помогите пожалуйста.... начал играть на этом сервере... качаю асасина нужен скрипт на снупинг и стилинг.... Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
assasin 0 Жалоба Опубликовано 15 августа, 2010 парни ну помогите со скриптом на стилинг... (( ну неужели ни кто не в силах нубу помочь... =( Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
responsible 0 Жалоба Опубликовано 15 августа, 2010 Берешь любого чара, открываешь бэкпак и запускаешь скрипт. больше свой бэкап и другие мешки не открывай - может сбиться скрипт sub stealing() var item = '0x19b9'; Вместо 0x19b9 впиши id той вещи, которую хочешь украсть - команда ,info repeat uo.findtype(item,-1,'lastcontainer') uo.useskill("Stealing","finditem") wait(15000); Задержка зависит от DEX, сам смотри, сколько у тебя занимает времени steal одной вещи until UO.Dead() wend end sub Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
assasin 0 Жалоба Опубликовано 15 августа, 2010 Берешь любого чара, открываешь бэкпак и запускаешь скрипт. больше свой бэкап и другие мешки не открывай - может сбиться скрипт sub stealing() var item = '0x19b9'; Вместо 0x19b9 впиши id той вещи, которую хочешь украсть - команда ,info repeat uo.findtype(item,-1,'lastcontainer') uo.useskill("Stealing","finditem") wait(15000); Задержка зависит от DEX, сам смотри, сколько у тебя занимает времени steal одной вещи until UO.Dead() wend end sub спасибо большое щас буду мазговать как его запускать=) Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Heroline 0 Жалоба Опубликовано 29 августа, 2010 на бс sub main() while uo.count('0x1BF2')>9 # тут проставить кол-во ингов, необходимое для выковываемой вещи UO.Exec("waitmenu 'What do you wish to make?' 'Armor' 'Select armor' 'Chainmail' 'Select item' 'Gnomish Chainmail Coif'") # здесь вписывается, что куем UO.Exec("waittargetobject '^0x1BF2'") UO.Exec("useobject '^0x13E3'") wait(2000) UO.Exec("waittargetobject '^0x13C0'") # здесь вписываем тип вещи, определяется командой ",info" Wait (300) UO.Exec("useobject '^0x0FBB'") Wait (3000) UO.Exec("useobject '^0x097b'") # еда, жареная рыба, или заменяем на свое wend end sub вокруг себя расставляем наковальни, в пак кладем чем будем ковать и много тонгов наковальни и тонги постепенно ломаются а по-поводу гвардов на майнинге - проще запустить отдельный скрипт, где он зовет гвардов, например, каждые 3 секунды Нехрена оно не роботает Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
responsible 0 Жалоба Опубликовано 29 августа, 2010 Снупинг. Запускаем, выбираем объект для снупинга и идем пить чай) sub snooping() uo.addobject('SnoopCharter'); while uo.targeting() wait(250) wend while UO.Life > 0 uo.waittargetobject('SnoopCharter'); UO.Exec("usetype '0x13c6'"); wait(10000) wend end sub Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Catherine 0 Жалоба Опубликовано 4 сентября, 2010 а кто может дать действительно рабочий и предельно простой по настройке скрипт на ламбер? лучше ооочень простой) Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Danke 0 Жалоба Опубликовано 4 сентября, 2010 проще всего поставить хаммер )) Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Catherine 0 Жалоба Опубликовано 4 сентября, 2010 проще всего поставить хаммер )) по подробнее пожалста Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Danke 0 Жалоба Опубликовано 4 сентября, 2010 по подробнее пожалста UO Hammer - программа похожая на Injection со встроенными макросами на Lumberjacking, Mining, Fishing. http://middle-earth.ru/forum/index.php?sho...amp;#entry69453 Вообще... аська в профиле... если че, спрашивай... Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Catherine 0 Жалоба Опубликовано 19 сентября, 2010 Напишите скрипт дял прокачки боукрафта после 70, чтобы крафтил или луки или кросбоу, токо не стрелы или болты Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Schutze 0 Жалоба Опубликовано 20 сентября, 2010 Помогите пожалуйста дописать скриптик на майнинг. Вот он: sub main() var i While UO.Life>0 for i=1 to 14 kopat() uo.press(34) next uo.print("GO назад =)") kopat() for i=1 to 15 wait(500) uo.press(36) next uo.press(34) wend end sub sub kopat() var where_x,where_y,coords,i UO.DeleteJournal() where_x=uo.getx() where_y=uo.gety() for i=-2 to 2 uo.print("Тайл "+str(i+3)+"/5") coords="waittargettile "+" 1339 "+str(where_x)+" "+str(where_y+i)+" 0" uo.exec(coords) uo.exec("usetype '0x143C'") # Здесь прописываем тип кирки UO.DeleteJournal() while (not (UO.InJournal("stop mining") or UO.InJournal("far") or UO.InJournal("no ore") or UO.InJournal("cannot"))) wait(1000) wend next end sub sub heal() While UO.WEIGHT < 30000 wait(300) if UO.Life < 70 then UO.Exec("bandageself") wait(6000) endif wend end sub sub guards() While UO.WEIGHT < 30000 wait(300) if UO.Life < 90 then uo.say('.guards') wait(6000) endif wend end sub Нада чтоб при вылете сообщения типа ('Ouch! You hit yourself with your tool!') он продолжил скрипт. А то стопится на месте и всё =( Заранее спасибо! Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Danke 0 Жалоба Опубликовано 20 сентября, 2010 while (not (UO.InJournal("stop mining") or UO.InJournal("far") or UO.InJournal("no ore") or UO.InJournal("cannot") or UO.InJournal("tool"))) Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Schutze 0 Жалоба Опубликовано 20 сентября, 2010 while (not (UO.InJournal("stop mining") or UO.InJournal("far") or UO.InJournal("no ore") or UO.InJournal("cannot") or UO.InJournal("tool"))) Сори я с инжектом не так сильно дружу) в готовом виде это будет выглядеть вот так? sub stop() while (not (UO.InJournal("stop mining") or UO.InJournal("far") or UO.InJournal("no ore") or UO.InJournal("cannot") or UO.InJournal("tool"))) wait(1000) endif wend end sub Еше раз спасибо за внимание =) Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Danke 0 Жалоба Опубликовано 20 сентября, 2010 sub main() var i While UO.Life>0 for i=1 to 14 kopat() uo.press(34) next uo.print("GO назад =)") kopat() for i=1 to 15 wait(500) uo.press(36) next uo.press(34) wend end sub sub kopat() var where_x,where_y,coords,i UO.DeleteJournal() where_x=uo.getx() where_y=uo.gety() for i=-2 to 2 uo.print("Тайл "+str(i+3)+"/5") coords="waittargettile "+" 1339 "+str(where_x)+" "+str(where_y+i)+" 0" uo.exec(coords) uo.exec("usetype '0x143C'") # Здесь прописываем тип кирки UO.DeleteJournal() while (not (UO.InJournal("stop mining") or UO.InJournal("far") or UO.InJournal("no ore") or UO.InJournal("cannot") or UO.InJournal("tool"))) wait(1000) wend next end sub sub heal() While UO.WEIGHT < 30000 wait(300) if UO.Life < 70 then UO.Exec("bandageself") wait(6000) endif wend end sub sub guards() While UO.WEIGHT < 30000 wait(300) if UO.Life < 90 then uo.say('.guards') wait(6000) endif wend end sub Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Schutze 0 Жалоба Опубликовано 20 сентября, 2010 Благодарю ! =) Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Schutze 0 Жалоба Опубликовано 20 сентября, 2010 Проверил, так же как и было =( На этом Ouche стопит и всё. Не хочет продолжать путь приходится заново ставить на место и стартовать. Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Danke 0 Жалоба Опубликовано 20 сентября, 2010 sub main() var i While UO.Life>0 for i=1 to 14 kopat() uo.press(34) next uo.print("GO назад =)") kopat() for i=1 to 15 wait(500) uo.press(36) next uo.press(34) wend end sub sub kopat() var where_x,where_y,coords,i,t UO.DeleteJournal() where_x=uo.getx() where_y=uo.gety() for i=-2 to 2 uo.print("Тайл "+str(i+3)+"/5") coords="waittargettile "+" 1339 "+str(where_x)+" "+str(where_y+i)+" 0" uo.exec(coords) uo.exec("usetype '0x143C'") # Здесь прописываем тип кирки t=0 while (not (UO.InJournal("stop mining") or UO.InJournal("far") or UO.InJournal("no ore") or UO.InJournal("cannot") or UO.InJournal("tool") or t>10)) wait(1000) t=t+1 wend next end sub sub heal() While UO.WEIGHT < 30000 wait(300) if UO.Life < 70 then UO.Exec("bandageself") wait(6000) endif wend end sub sub guards() While UO.WEIGHT < 30000 wait(300) if UO.Life < 90 then uo.say('.guards') wait(6000) endif wend end sub Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Danke 0 Жалоба Опубликовано 20 сентября, 2010 Фразы для хамера на мининг Файл mining.hll [strings to continue] You put some You cannot prospect You fail to find any usable ore [strings to end] there is no more ore here to mine. There is no ore here to mine That is too far away [string numbers to continue] 24032 24033 24034 24035 24036 24037 24038 24039 44291 [string numbers to end] 44288 36013 Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
korish 0 Жалоба Опубликовано 21 октября, 2010 если кому делать не чего замутите скрипт этот под наш шард sub maning() var mx, my, mz, i, j, jor, ser, noto Uo.exec("set norbcheck 1"); для рекола uo.exec("set norbcalc 1"); тоже uo.print('0x0E85') uo.exec('addobject Shovel') while uo.targeting() wait(100) wend uo.print('0x7F39DD43') uo.exec('addobject Runebook') while uo.targeting() wait(100) wend na4alo: mx = UO.GetX("self") my = UO.GetY("self") mz = UO.GetZ("self") UO.DeleteJournal() for i = mx-2 to mx+2 for j = my -2 to my+2 UO.Print("Копаем в координатах: "+str(mx-i)+" "+str(my-j)) while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and not UO.InJournal("Iron Ore") and not UO.InJournal("Copper") and not UO.InJournal("Rusty Ore") UO.DeleteJournal() if uo.waiting() then uo.canceltarget() endif UO.Waittargettile("1341", str(i), str(j), str(mz)) UO.Useobject("Shovel") while not UO.InJournal("You put") and not UO.InJournal("heavy") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("but fail") and not UO.InJournal("far away") and not UO.InJournal("in rock") wait (500) if uo.injournal("heavy") or uo.dead() then pwav() Pause() endif for jor = 0 to 9 ser = uo.journalserial(jor) noto = uo.getnotoriety(ser) if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then if uo.waiting() then uo.canceltarget() endif Save() pwavw() wait(180000) ; время в секундах при ожидании пока уйдет ПК loot() wait(3000) goto reccal endif next wend if uo.weight > 10000 then ; Максимальный вес при котором домой с рудой goto end endif wend UO.DeleteJournal() next next goto na4alo end: if uo.waiting() then uo.canceltarget() endif uo.exec("recall Runebook 21") ; домой ( в рунбуке слот 1 ) wait(10000) loot() wait(3000) reccal: uo.deletejournal() if uo.waiting() then uo.canceltarget() endif uo.exec("recall Runebook 94") ; в шахту ( в рунбуке слот 8 ) mx = UO.GetX("self") my = UO.GetY("self") wait(10000) if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then goto reccal endif goto na4alo end sub sub loot() ; перекладка руды в сундук if uo.waiting() then uo.canceltarget() endif VAR a,Exit VAR UnloadCont='0x7FEAB71C' ; АЙДИ сундука для руды DIM Ore[5] Ore[0]=0x19B9 ; 4 and more ore Ore[1]=0x19B7 ; 1 ore Ore[2]=0x19BA ; 2 ore Ore[3]=0x19B8 ; 3 ore UO.SetReceivingContainer(UnloadCont) wait(500) For a=0 to 3 Exit=0 repeat UO.FindType(Ore[a]) if UO.GetQuantity('finditem')>0 then UO.Grab('0','finditem') wait(1500) Else Exit=1 endif until Exit==1 Next UO.UnSetReceivingContainer() end sub sub save() var i, t_len = 2 ; DIM t [ val( str( t_len ) ) ] t[0] = "0x0191" t[1] = "0x0190" uo.ignore( "self" ) uo.set('finddistance',12) repeat for i = 0 to t_len -1 uo.findtype( t, "-1", "ground" ) If uo.FindCount() Then If uo.getNotoriety( "finditem" ) == 1 or uo.getNotoriety( "finditem" ) == 3 Then ; если синий или серый, игнор uo.Ignore( "finditem" ) Else uo.msg('.recall') ; функция телепорта wait(3000) End If End If next wait( 300 ) until false End Sub sub pwav() ; звук при выкапывании ЭЛЕМЕНТАЛА uo.playwav("C:\Program Files\ICQ6.5\sounds\Default\CallOnHold") endsub sub pwavw(); звук при появлении ПК uo.playwav("C:\Program Files\ICQ6.5\sounds\Default\CallConnected") endsub sub Pause() ; Пауза скрипта если выкопали Элема (продолжить сказав GO ) UO.DeleteJournal() REPEAT WAIT(3000) UO.Print("!!!СКРИПТ НА ПАУЗЕ!!!!") UNTIL UO.InJournal('GO') UO.Print("!!!СКРИПТ ПРОДОЛЖЕН!!!!") endif end sub Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
Lamark 0 Жалоба Опубликовано 21 октября, 2010 cho zahotel [= Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
korish 0 Жалоба Опубликовано 22 октября, 2010 cho zahotel [= знаю хотеть не вредно Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
MeSSiR 0 Жалоба Опубликовано 22 октября, 2010 можно я не буду переписывать банальные скрипты на мининг? Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
korish 0 Жалоба Опубликовано 23 октября, 2010 можно я не буду переписывать банальные скрипты на мининг? блин знал бы я как в скрипты добавльять другие скрипт я бы сам справился. Проста есть у меня уже пару готовых скриптов тока надо склеить Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты
MeSSiR 0 Жалоба Опубликовано 23 октября, 2010 так в чем проблема? Вставляй хоть тысячу макросов в 1 файл и будет тебе СЧАСТЬЕ Цитата Поделиться сообщением Ссылка на сообщение Поделиться на другие сайты