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

blind(00apm)

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

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

  • Посещение

Репутация

0 Обычный

Информация о blind(00apm)

  • Звание
    Member
  1. blind(00apm)

    Скрипты для UOHammer 200

    У тя тут ошибка ) HR.UseSkill("'Detect Hidden") не хватает одной ' . [hr.CastSpell] Кастует заклинание HR.CastSpell ("Название заклинания"); Примечание: Если название содержит 2 Слова, Например Flame Strike, то пишем HR.CastSpell("'Flame Strike'"); [hr.UseSkill] Использует навык UseSkill [Имя навыка]; Все по аналогии с CastSpell, если навык состоит из двух слов или более (что мало вероятно), то пишем его через ' ' (С) пёрто.
  2. ,tileinfo и тык на воду у берега ... в море и у берега разные типы тайлов (в строке определения таргета для удочки, нужно поменять номер тайла) ... и поэтому не хочет ловить у берега скрипт, который гуд ловит в море.
  3. Да, при использовании свитка, расходуется 2, = ) выбирай .. либо реги, либо свитки ...
  4. blind(00apm)

    Начинающим магам

    Можно чаром 0 лвл, в НТ(нуби таун) у дяди , что у банкира стоит, прописать слово harvest, и он те выдаст кучу барахла, с лопатой.
  5. Один косяк, при свернутом клиенте бывает тупит и не ловит(не кликает по коордам). Вот мой... ему все равно как стоит корабль, главное чтоб в море и чтоб чар стоял у трюма ... ну и пару требований ) но это для 100% профита Можно стоять сутками и ловить, не опасаясь того, что сумка переполнится сапогами, либо весом. Сапоги потом дома режутся на кожу... Раньше еще и сети резал на ткань ... но это какая то сомнительная выгода =) только время тратить ... и я это дело выпилил. ## # Становимся на нос корабля(или в другом месте, но рядом с трюмом). #В трюм кладем: # Empty Tub(крафтится при помощи карпентри); # Large Crate(крафтится при помощи карпентри); # Backpack(крафтится при помощи тейлоринг); # Trash Can (продается у плотников в любом городе). # В бекпек кидаем побольше удочек. Вытаскиваем удочку из рук (если она в руках). # Запускаем Main и следуем инструкциям в чате = ). ## # Скрипт ловит в квадрате 8х8(64 тайла). И делает дырки в корабле = ). # Всю рыбу перемещает в Empty Tub. # Все сапоги перемещает в Large Crate. # Все карты открывает, 4 и 5(если попадется кому нить) лвл # перемещаяет в Backpack, 1, 2, 3 лвл, cети и соски кидает в Trash Can ## Sub Main() Var mx, my, mz, i, j UO.ConColor(0x0942) UO.Print('Укажи трюм корабля') UO.Exec('addobject aHatch') While UO.Targeting() Wait(100) Wend UO.ConColor(0x0000) While Not UO.Dead() mx = UO.GetX("self") my = UO.GetY("self") mz = UO.GetZ("self") For i = mx-4 To mx+4 For j = my-4 To my+4 UO.DeleteJournal() Wait(100) UO.WaitTargetTile("0", str(i), str(j), str(mz)) UO.UseType("0x0DBF") #Fishing Pole Repeat Wait(100) Until UO.InJournal("attract|equip|sight|looks|seem|catch|find|there!|<uninitialized object>!") If UO.InJournal('<uninitialized object>!') Then Wait(100) Next End If Eat() SW() Map() Boot() Fish() Trash() Next Next Wend End Sub Sub Eat() # Кушает жареные фиш стейки ... If UO.Count("0x097B")>0 Then UO.UseType ("0x097B") End If End Sub sub SW() # Проверка на World Save ... If UO.InJournal("Saving World State") Then Repeat Wait(200) Until UO.InJournal("Saving World State complete") End If End Sub Sub Map() # Перемещает выловленные карты 4 лвл в Backpack в трюме... UO.DeleteJournal() UO.FindType( 0x14ED, '-1', 'backpack') If UO.FindCount() > 0 Then Repeat Wait(100) UO.UseObject("finditem") Until Uo.InJournal('successfully') UO.FindType('0x14EB', '-1', 'backpack') If UO.FindCount() > 0 Then UO.DeleteJournal() Wait(100) UO.Click('finditem') Repeat Wait(100) Until UO.InJournal("map") If UO.InJournal("(1 lvl)|(2 lvl)|(3 lvl)") Then UO.Exec("moveitem 'finditem' '1' 'aHatch.0x0E77'") Wait(100) UO.Exec("moveitem '^0x0FB7' '1' 'aHatch.0x0E77'") Wait(100) End If If UO.InJournal("(4 lvl)|(5 lvl)") Then UO.Exec("moveitem 'finditem' '1' 'aHatch.0x0E75'") Wait(100) UO.Exec("moveitem '^0x0FB7' '1' 'aHatch.0x0E75'") Wait(100) End If End If End If End Sub Sub Boot() # Перемещает выловленные сапоги в Large Crate ... DIM aBoot[7] aBoot[0] = 0x170A aBoot[1] = 0x170B aBoot[2] = 0x170C aBoot[3] = 0x170D aBoot[4] = 0x170E aBoot[5] = 0x170F aBoot[6] = 0x1710 aBoot[7] = 0x1711 VAR i For i = 0 To 7 UO.FindType( aBoot[i], '-1', 'backpack') If UO.FindCount() > 0 Then UO.Exec("moveitem 'finditem' '1' 'aHatch.0x0E3C'") Wait(500) End If Next End Sub Sub Fish() # Перемещает выловленную рыбу в Empty Tub ... DIM aFish[3] aFish[0] = 0x09CE # фиолетовая рыба aFish[1] = 0x09CD # бежевая рыба aFish[2] = 0x09CC # зеленая рыба aFish[3] = 0x0DD6 # магическая рыбка VAR j For j = 0 To 3 UO.FindType( aFish[j], '-1', 'backpack') If UO.FindCount() > 0 Then UO.Exec("moveitem 'finditem' '' 'aHatch.0x0E83'") Wait(500) End if Next End Sub Sub Trash() # Перемещает указанный ниже мусор, в Trash Can ... DIM aTrash[1] aTrash[0] = 0x0DC8 #сеть aTrash[1] = 0x099F #sos бутылка VAR k For k = 0 To 1 UO.FindType( aTrash[k], '-1', 'backpack') If UO.FindCount() > 0 Then UO.Exec("moveitem 'finditem' '' 'aHatch.0x0E77'") Wait(500) End if Next End Sub Немного сбился тут, в инже подправите = ) Чуть позже выложу резалку сапогов. И мб прикручу реконектор
  6. Пример, идея ... вот я, например, не знаю о том, что придумали краснодарцы ... В НТ(нуби таун) стоит нпц, который, при произнесении определенных фраз (harvest и т д) выдает кучу хлама для добычи реса, арморы и т д ... Можно было бы заселить гостиницы (по городам их довольно много раскинуто ...)... иль что-то типа того ... Ну к примеру, ты нуб до 2 лвл (включительно) ... при старте у тя и так есть 500 гп ... сделать гостиничные номера ... 100 гп в сутки и номер твой ... и живи там ... хоть чайна-таун устрой там .. толпой нубов иль хз ...(правда обязательно найдется придурок, который все номера скупит нубами ... или будет их перепродавать ) по 120 гп в сутки )) ) Было бы веселее ... в городах возня бы началась ... опять ... а то тусуются по пиратским бухтам, болотам да по шахтам с лесами и у крестов на макрах стоят постоянно ... Насчет инфы - согласен, пожалуй пора полностью обновить\проверить информацию на сайте, да и опрос сделать всех игроков, кому - что не понятно, и по результатам сварганить что-то типа FAQ. Правда ... на сайт многие даже не заглядывают )
  7. "подобное" в смысле "но макрос" в ГЗ? то есть любого, кто на макросе будет копать - джайл и т д ? = )
  8. Как интересно, неоднократно наблюдал от тебя "предупреждения" другим игрокам за более серьезные нарушения, и они были устными. А тут сразу 3 к в качестве "предупреждения" ... что же будет, даже страшно спросить, если, не дай бог, мой чар опять будет ".guards прописывалось усиленно часто" ???
  9. Хмм, очень интересно, куча чаров в шахте на макросе при появлении крима орут гвардс, а сажают только участников флешмоб-движения ? И, Jackpot, в 13-24 Ваш пост появился сдесь ... на момент 18-50 в ветке для указания причин бана и т д "Баны, jail и наказания", отсутствуют какие-либо упоминания об этом чаре. О сроках освобождения, причинах, и хотелось бы увидеть скрин, на котором отчетливо виден флуд.
  10. А что тебе не нравится ? Законов тут никаких не нарушено ... А то, что у кого-то руки умеют кодить ... ну извиняйте ...
  11. blind(00apm)

    Rimmon и его WMZ

    Очередной олигофрен, иди поработай ... вмз его харит ... шард БЕСПЛАТНЫЙ, и на его существование по-любому нужны бабки ... сколько не бегал ... мимо этих гифтованных, когда пробегал ни разу не аттачили, а у тя жаба артирии пережала. Мол как так ... ни фига пацаны экономику подорвут... выбьют за месяц себе скроллов с десяток - другой ... а когда багом бабло дюпали и прочие итемы, ты что-то тут не разорялся. Хотя экономику тот баг подорвать мог гораздо сильнее ... Так что не надо ля-ля, если в башке не тесно и гладко - пойди делами займись, мб поможет ... Я считаю что с донатом тут все ровно, всегда больше всех воняли те, у кого с бабками напряг ... или с головой, вот и все ... те-же у кого с бабками все норм, но он по своим убеждениям считает донат для себя не целесообразным, спокойно к нему у других игроков относится ...
  12. blind(00apm)

    PoD

    1 - PoD 2 - Motanga 3 - 7.04.09 с 11-00 по 18-00 4 - убийство новичка (под защитой) в шахте минока(защита там работает) чар не крим не приступник, в чате, в информации об оружии которым был убит чар - эррор 5 - http://s39.radikal.ru/i083/0904/f2/5d7223d38e13.jpg
×
×
  • Создать...