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

comatoza

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

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

  • Посещение

Весь контент comatoza

  1. не знаю кто-как, а я после 40 качал на коже... вот скрипт на ткани до 40 там дальше сам переделывай по аналогии... sub main() repeat uo.deletejournal() uo.waittargettype('0x1766') uo.usetype('0x0f9d') uo.waitmenu('Choose a category', 'shirts', 'What kind of shirt?', "Fancy Shirt") while not uo.injournal('You create|You failed') wait(100) wend if uo.Waiting() then uo.canceltarget() endif if not uo.InJournal('exeptional|failed') then CutNonExeptionalRobe('0x1EFD') endif until uo.count('0x1766')<8 end sub sub CutNonExeptionalRobe(type) var x uo.findtype(type, '0x0000', 'backpack') if uo.FindCount()>0 then x = uo.Count('0x1766') uo.usetype('0x0f9e') uo.waittargettype(type) while uo.Count('0x1766')==x wait(100) wend endif end sub
  2. просили кинуть скрипт на лоры... универсальный я так и не написал... фсё ломает массивы забивать... sub main() while uo.SkillVal('Item ID') < 800 uo.waittargettype('dagger') uo.useskill('Item') wait(10000) uo.usetype('0x103B') wait(1000) wend while uo.SkillVal('Forensic Evaluation') < 800 uo.waittargetself() uo.useskill('Eva') wait(10000) uo.usetype('0x103B') wait(1000) wend while uo.SkillVal('Spirit Speak') < 1000 uo.UseSkill('Spirit Speak') wait(10000) uo.usetype('0x103B') wait(1000) wend while uo.SkillVal('Anatomy')<1000 uo.waittargetself() uo.useskill('Ana') wait(10000) uo.usetype('0x103B') wait(1000) wend while uo.SkillVal('Evaluate Intelligence')< 700 uo.waittargetself() uo.useskill('Int') wait(10000) uo.usetype('0x103B') wait(1000) wend while uo.SkillVal('Detect Hidden')<1000 uo.useskill('Hidd') wait(10000) uo.usetype('0x103B') wait(1000) wend while uo.SkillVal('Hiding')<800 uo.useskill('Hidi') wait(10000) uo.usetype('0x103B') wait(1000) wend uo.exec("automenu creature cancel") while uo.SkillVal('Tracking')<500 uo.useskill('Track') wait(10000) uo.usetype('0x103B') wait(1000) wend uo.cancelmenu() end sub
  3. Может быть, кому-нить будет Ынтерессен такой скрипт - чар стоит на арене и зазывая народ ждёт денег как-тока ему дают 750 монет или больше, он ждёт нажатия галки, нажимает галку сам и обкастовывает давшего денег... грубо-говоря бот-полуавтомат.. т.к. покупку регов реализовать всвязи с запретом рекалла на арену тяжело... ф опщем смотрите... может кому ф чём поможет... ##********************************************************* ##********************************************************* ##**************Арена, блесс за деньги. ******************* ##********************************************************* ##********************************************************* sub bless_for_money() var client, time var money_bag ='0x61F9241C' ##Это сумка, которая должна быть у мага. В неё убираются все деньги после каста uo.ignore(money_bag) uo.moveoff() ##Запрет на перемещение - для того чтоб при закрытии окна обмена чар никуда не бежал while (uo.gs>1 and uo.ga>2 and uo.sa>1 and uo.mr>1) while not uo.TradeCount() wait(100) wend if uo.TradeCount() then ##Проверяем наличие окна обмена.. Check() if Check()==0 then uo.fontcolor('0x0026') uo.msg('Не вижу тут денег...') while uo.TradeCount() uo.RClick(173,98) wait(2500) wend endif if Check()==1 then uo.fontcolor('0x0026') uo.msg('Для обкаста нужно 750 монет, а не меньше!') while uo.TradeCount() uo.RClick(173,98) wait(2500) wend endif if Check()==2 then uo.fontcolor('0x010c') uo.msg('Нажмите галочку, пожалуйста.') while not (uo.TradeCheck('n', 'right', '1') or uo.TradeCount()==0) ##Ожидаем закрытия окна или нажатия галки wait(100) wend if uo.TradeCount() then client = uo.TradeOpponent('n') uo.TradeCheck('n', 'left', 1) ##Жмём галку wait(2500) cast(client) wait(1000) endif endif endif endif uo.findtype('0x0EED','-1', 'backpack') uo.moveitem('finditem','all',money_bag) ##Убираем деньги в сумку wait(1000) wend uo.fontcolor('0x0026') uo.msg('Фсё, цЫрк сворачивается!') uo.closeuo() end sub sub Check() var gold uo.findtype('0x0EED','0x0000', uo.TradeContainer('right')) ##Проверка наличия денег в правои окне, цвет добавлен для защиты от подсовывания песка gold = 750 - uo.getQuantity('finditem') ##Проверка количества денег if gold==750 then return 0 endif if gold>0 then return 1 endif if gold<=0 then return 2 endif end sub sub cast(client) if uo.mana<50 then uo.fontcolor('0x010c') uo.msg('Секундочку.') while uo.mana<50 uo.useskill('Meditation') wait(11000) wend endif uo.cast('Bless',client) while uo.waiting() wait(100) wend uo.cast('Protection',client) while uo.waiting() wait(100) wend end sub sub zazjvalka() while not uo.dead() uo.fontcolor('0x0003') uo.msg('Фпервые под куполом цЫрка - обкаст за деньги: Bless+Protectioin фсего за 750 монет') uo.msg('Для обкаста просто дайте мне денег :)') wait(50000) wend end sub
  4. я немного не понял одного.... он же у тя фсё равно пьёт гх? даже, если отличился... для любого скрипта и ваще ,наскока я понимаю, в програмировании (хотя сам по образованию инженер-конструктор разгонных блоков космических аппаратов а по профессии строитель ) - главное алгоритм... так вот твой алгоритм выглядит так: если 90% здоровья юзаем бандаги, ждём пока не отлечится или пока не пройдёт 10000 сек или сообщения, потом говорим фсякое, юзаем гх, и снова чего-то ждём... кстати... чтоб не делать коунтеров.... можно юзать uo.timer() примерно так до выполнения некого цикла ожидания time=uo.timer() а в условиях цыкла - while uo.timer()<time+скока нада а, если ты заметил, то я не твой ответ в качестве цытаты использовал - т.е. ему пишу, что идея - пшик а скрипт твой рабочий тока вопрос... скока таких скриптов(с вайт 100) нада запустить чтоб серьёзно затормозить игру? мне хватает одного автостаба
  5. comatoza

    Отборные скрипты

    Кое-какие скрипты... если есть желание переложите сюда... самому постить второй раз напрягает
  6. хм.... попробуй конечно вместо uo.drophere('finditem') uo.drop('all', 'finditem')
  7. sub DropOre() DIM ores[5] ores[1]='0x01BF' ores[2]='0x0602' ores[3]='0x0455' ores[4]='0x0386' ores[5]='0x0000' var i while not UO.Dead() for i=1 to 5 UO.findtype('0x19B9',ores[i],'back') UO.drophere("finditem") wait(100) next wait(12000)#ждёт 2 минуты wend end sub
  8. команда рекалл работает с гампами рунбуки... по-этому uo.recall(<Серийник рунбуки в кавычках>, <номер руны в кавычках>)
  9. не могу... не буду переделывать чужой скрипт, тем облее выложенный без тЭга и написаный так неровно...
  10. sub main() while not uo.dead() while uo.mana>50 uo.cast("Res") uo.waittargetself() wait(11000) wend while uo.mana<>uo.int uo.useskill("Med") wait(11000) wend wend end sub
  11. uo.set('norbcalc', '1') uo.set('norbcheck', '1') var MaxVes = 1000, x, y if uo.Wight()>MaxVes then uo.disarm() x=uo.getX() y=uo.gety() uo.recall(<серийник рунбуки>, <номер руны, 601 - первая>) while (uo.getx()==x and uo.gety()==y) wait(100) wend uo.findtype(<тайп того, что сбрасываем>, '-1', 'my') while uo.findcount() uo.moveitem('finditem', 'all', <серийник контейнера в который сбрасываем>) wait(100) uo.findtype(<тайп того, что сбрасываем>, '-1', 'my') wend вот так... реколиться по рунбуке... скидывает в указанный контейнер то что укажещь как скидываемое...
  12. очень странно... проверил - копает лопатой совершенно намана песок а по сабжу dim tile[3] tile[1] = 1339 tile[2] = 1340 tile[3] = 1345 for j = 1 to 3 for x= -2 to 2 for y = -2 to 2 uo.waittargettile(tile[j],...........................)
  13. наверно ты прав.... писал от балды
  14. sub main() var x,y while not uo.dead() for x=-2 to 2 for y=-2 to 2 uo.waittargettile('all', uo.getx()+x, uo.gety(), uo.getz()) uo.usetype('0x0f39') wait(11000) uo.waittargettile('all', uo.getx(), uo.gety()+y, uo.getz()) uo.usetype('0x0f39') wait(11000) next next wend end sub если примитивно то вот так...
  15. во-первых выкладывай скрипты в теге... а во-вторых попробуй сам проставить для себя коменты к каждой строчке и поймёшь сразу почему он не пашет
  16. там рунбука с первой рункой установленной как дефолт и эта рунка и есть домой... тебе на рунку нада? насчёт продажи не знаю.... макря вот sub main() var i Dim MaxSkillVal[3] MaxSkillVal[1] = 550 MaxSkillVal[2] = 800 MaxSkillVal[3] = 1000 Dim MapType[3] Maptype[1] = 'Local Map' Maptype[2] = 'Regional Map' Maptype[3] = 'World Map' while uo.count('0x14EB')<>0 for i=1 to 3 uo.automenu('What you you want to create?', maptype[i]) while uo.SkillVal('Cartography')<MaxSkillVal[i] uo.deletejournal() uo.usetype('0x14EB') while not (uo.injournal('You carefully scribe') or uo.injournal('You are not familiar')) wait(100) wend while not uo.injournal('You are full') uo.usetype('0x097B') wait(1000) wend wend uo.cancelmenu() next wend end sub сразу кэтЧбэк на урну...
  17. sub fast_recall() var i DIM Regs[3] Regs[0]='0x0F7A' ; Black Pearl Regs[1]='0x0F7B' ; Bood Moss Regs[2]='0x0F86' ; Mandrake Root for i=0 to 2 uo.findtype(Regs[i], 'my', 'back') if uo.count(Regs[i])<1 then uo.disarm() uo.recall(0x603d144c, 601) endif next if uo.mana<11 then uo.disarm() uo.recall(0x603d144c, 601) else uo.disarm() uo.cast('Recall',0x603d144c) endif endsub вот такой скриптик нет правда проверки на физзл и проверки на наличие зарядов рунбуки... но проверяет наличие регов и маны
  18. написал таки скрипт без "попсы" трэкинг без клика для закрытия меню sub tracking() uo.exec("automenu creature cancel") while not uo.dead() uo.useskill('Track') wait(11000) wend uo.cancelmenu() end sub
  19. небольшое уточнение скрипт может сбиться когда бежишь.... правильнее будет использовать либо ongump либо recall принцип примерно следующий ,recall xxxxxxxxxx yyyyyy где xxxxxxxxx - серийник объекта рунбуки yyyyyy - серийник кнопки рунбуки который получаем следующим путём - запускаем рунбуку и давим кнопку напротив руны, после пишем в клиенте ,infogump получаем что-то вроде infogump_______ serial 0x01380a8a gumpid 0x002dd8de X 0 Y 0 15101 packet size 23 reply packet size Buttons: ________ page 1 1 [ 900] image=0x09A9 at 55:10 2 [ 800] image=0x09A9 at 230:10 3 [ 800] image=0x08BC at 320:8 4 [ 1] image=0x099D at 142:200 5 [ 601] image=0x0845 at 56:62 6 [ 602] image=0x0845 at 5 .................................................... 70] Drop Rune Reply: ___________ [0259] primary reply Checks&Radios (0) Entryes (0) где нас и Ынтересует - serial(сериал рунбуки) и primary reply(cериал кнопки в HEX, перевести в DEC в виндосном калке я думаю смогут все) NB! сериал рунбуки оставляем как есть, сериал руны - переводим в DEC! таким образом получаем: ,recall 0x01380a8a 601
  20. [ не знаю, как ты... а я, к примеру, живу в реале... и работаю не в офисе... т.о. за компом провожу как правило время где-то в промежутке с 22 до 4 ночи... а жить возле твоего постамента чтобы чара не потёрли не могу.... или ты предлагаешь всем собраться определить время вахты и будет у нас вася, петя и коля из хаоса в 15:00 нападают на сашу, машу и фросю из ордера ГЫЫЫЫЫЫЫ в 16:30 пересменка и новая группа из 4 человек за Хаос нападают на группу из одного человека за Ордер, потому что те не могут в это время выставить игроков не пылите дядя.... а если и правда с инжой проблема - обращайтесь, причём лучше не здесь, а сразу на Йоко Форум хотя мелкие проблемки помогут и тут решить кстати предлагаю перед удалением инжи ышо и всех чаров потереть - сразу заметишь как онлайн скакнёт причём с крыши вниз.... ГЫЫЫЫЫЫЫ в общем - БЕЗ ПАНИКИ!
  21. uo.canceltarget() uo.waittargetself() uo.cast('Gre') наверно так примерно
  22. написал следующую бодягу - определяет все не идентифицированные бутыли в бэке... единственное неучтённое - это white potion который не определяется sub TasteID() uo.findtype('0x0f09', 'back', 'my') while uo.findcount()>0 uo.waittargettype('0x0f09') uo.useskill('Tas') wait(11000) uo.findtype('0x0f09', 'back', 'my') wend end sub
  23. кто-то тут просил тейлоринга 2 года назад када играл качал тейлор таким скриптом... sub main() var i While UO.LIFE > 0 i=0 while i<5 UO.waittargettype('0x1078') UO.usetype('0x0f9d') UO.Exec("waitmenu 'Choose a category.' 'female' 'What do you want to create?' 'Studded Bustier - takes 4 hides'") while not (uo.injournal('your pack') or uo.injournal('You destroy')) wait(100) wend uo.deletejournal() i=i+1 wend uo.findtype("0x1c0c","-1","back") while uo.getquantity('finditem')>0 UO.usetype('0x0f9e') UO.waittargettype('0x1c0c') while not uo.injournal('You could') wait(100) wend uo.deletejournal() wend uo.usetype('0x09ec') wait(1000) Wend end sub в бэк кожу, ножницы, "иголку с ниткой" и поехали.... // запускал скрипт на хавку и на ворлд сейвы...
×
×
  • Создать...