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

blind(00apm)

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

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

  • Посещение

Сообщения, опубликованные blind(00apm)


  1. Кто таки юзает скрипты на хаммер подскажите - почему не определяет скилл Detect Hidden вообще никак? То есть: если HR.UseSkill("Hiding"); то хидится и все нормально, а если HR.UseSkill("'Detect Hidden"); то пишет Skill not found. Пробовал массу вариантов - но нету типа вообще такого скилла. И еще вопрос: какая команда чтоб клавишу нажал? Допустим нужно чтоб в уо нажал F1.

    У тя тут ошибка ) HR.UseSkill("'Detect Hidden") не хватает одной ' .

     

    [hr.CastSpell]

    Кастует заклинание

    HR.CastSpell ("Название заклинания");

    Примечание: Если название содержит 2 Слова, Например Flame Strike, то пишем HR.CastSpell("'Flame Strike'");

    [hr.UseSkill]

    Использует навык

    UseSkill [Имя навыка];

    Все по аналогии с CastSpell, если навык состоит из двух слов или более (что мало вероятно), то пишем его через ' '

    (С) пёрто.


  2. И если можно на добычу бп!!а то фишинг не переделывается!!!

    ,tileinfo и тык на воду у берега ... в море и у берега разные типы тайлов (в строке определения таргета для удочки, нужно поменять номер тайла) ... и поэтому не хочет ловить у берега скрипт, который гуд ловит в море.


  3. И, кстати, тоже сейчас специально проверял - у меня в рюкзаке пачка харм скроллов. Бью мобов этим хармом, при этом за 1 An Mani исчезают 2 харм скролла. Это нормально?

     

    Да, при использовании свитка, расходуется 2, = ) выбирай .. либо реги, либо свитки ...


  4. А это где, если не секрет?

    И где взять лопату чтобы копать Sulfur Ash? - у NPC тинкера в Брите я лопату не нашел - её вообще можно купить у NPC, или только скрафтить?

    Можно чаром 0 лвл, в НТ(нуби таун) у дяди , что у банкира стоит, прописать слово harvest, и он те выдаст кучу барахла, с лопатой.


  5. попробуй мой

    ставишь кораблик:

    нос->нижний правый угол

    зад->верхий левый

    ставишь чара на верхний левый тайл коробля (вообщем в жопу коробля)

     

    скрипт до боли элементарен, но работает без косяков...

    если надо, то добавь скидывание ботов на пол, ну или я сам добавлю, если время будет и желание

     

    Один косяк, при свернутом клиенте бывает тупит и не ловит(не кликает по коордам).

     

    Вот мой... ему все равно как стоит корабль, главное чтоб в море и чтоб чар стоял у трюма ... ну и пару требований ) но это для 100% профита :P

    Можно стоять сутками и ловить, не опасаясь того, что сумка переполнится сапогами, либо весом.

    Сапоги потом дома режутся на кожу... Раньше еще и сети резал на ткань ... но это какая то сомнительная выгода =) только время тратить ... и я это дело выпилил.

    ##
    #    Становимся на нос корабля(или в другом месте, но рядом с трюмом).
    #В трюм кладем:
    # 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

    Немного сбился тут, в инже подправите = )

    Чуть позже выложу резалку сапогов. И мб прикручу реконектор :P


  6. ну и вроде вон ребята из краснодара чет с операторами придумали(красавцы)!!

     

    короче развивайте идею краснодарцев!!

     

    еще раз повторяю следуйте примеру краснодарцев!!

     

    Пример, идея ... вот я, например, не знаю о том, что придумали краснодарцы ...

     

    и вот я еще смотрю,на других шардах если регишься тебе дают там разные бонусы,вещи необходимые на первое время,а у нас создал чара и на тебе 100 монет и факел иди покаряй британию!!!

     

    В НТ(нуби таун) стоит нпц, который, при произнесении определенных фраз (harvest и т д) выдает кучу хлама для добычи реса, арморы и т д ...

     

    Можно было бы заселить гостиницы (по городам их довольно много раскинуто ...)... иль что-то типа того ...

    Ну к примеру, ты нуб до 2 лвл (включительно) ... при старте у тя и так есть 500 гп ... сделать гостиничные номера ... 100 гп в сутки и номер твой ... и живи там ... хоть чайна-таун устрой там .. толпой нубов иль хз ...(правда обязательно найдется придурок, который все номера скупит нубами ... или будет их перепродавать ) по 120 гп в сутки )) )

    Было бы веселее ... в городах возня бы началась ... опять ... а то тусуются по пиратским бухтам, болотам да по шахтам с лесами и у крестов на макрах стоят постоянно ...

     

    И нубам нужна подроная информация по прокачке своего класса!!И информвция кого лучше качать сначала!!а то все в детстве хотели стать волшебниками и выбирают себе магов и качают их 2 месяца до 2 лвл и бросают!!!пусть качают арчей файтов ренжей!

     

    Насчет инфы - согласен, пожалуй пора полностью обновить\проверить информацию на сайте, да и опрос сделать всех игроков, кому - что не понятно, и по результатам сварганить что-то типа FAQ. Правда ... на сайт многие даже не заглядывают )

     


  7. Я прилетел по паге. У одного из твоих майнеров .guards прописывалось усиленно часто. Я спрашивал в общий чат - чьи чары. Ответа не последовало. Его я кинул на каторгу на 3к в качестве предупреждения, т.к. флуд .guards запрещен в шахте Минок.

    Настрой свой скрипт нормально и копай сколько влезет.

    Как интересно, неоднократно наблюдал от тебя "предупреждения" другим игрокам за более серьезные нарушения, и они были устными. А тут сразу 3 к в качестве "предупреждения" ... что же будет, даже страшно спросить, если, не дай бог, мой чар опять будет ".guards прописывалось усиленно часто" ???


  8. В центре шахты установлен белый орел. На нем надпись - Частое повторение .guards грозит тюрьмой.

    Владелец чаров с никами "Black Slave" игнорирует это правило шахты Минок.

    Чтобы привлечь его внимание, я посадил самого активного участника этого флешмоб-движения.

    Надеюсь он исправится и выключит этот флуд.

     

    Хмм, очень интересно, куча чаров в шахте на макросе при появлении крима орут гвардс, а сажают только участников флешмоб-движения ?

     

    И, Jackpot, в 13-24 Ваш пост появился сдесь ... на момент 18-50 в ветке для указания причин бана и т д "Баны, jail и наказания", отсутствуют какие-либо упоминания об этом чаре. О сроках освобождения, причинах, и хотелось бы увидеть скрин, на котором отчетливо виден флуд.


  9. Забежал в шахту минока и чуть не упал.

    В шахте 9, а то может и больше чаров с одинаковым ником и бродят ,копают по одной траектории.

    Я так думаю, что такое как то нужно пресекать. Глядя на такое возникает желание о прекращении игры на серваке. Этим онлайн точно не повысишь.

    А что тебе не нравится ? Законов тут никаких не нарушено ... А то, что у кого-то руки умеют кодить ... ну извиняйте ...


  10. Понятное дело - Риман будет ВМЗешников защищать(((

     

    Ребят я, просто предлагаю - их гнобить и засирать всячески. Уводить мобов, чтобы они не могли вызывать следущий круг чемпа, тырить скролы, убивать лошадей. Все в наших силах! Изгоним ВМЗ с шарда!=)))

     

    у да те кто помогает шарду не умереть в риоритете, а тупо подорвать экономику и создать дисбаланс...

    ну вот ребята читайте делайте выводы.

     

    мое мнение такое:

    1. кто бабло платит того римон и защищает ( ну тут понятно, обычный плеер и вмз плерер, а если у 2х вмзшников терка произайдет, кому римон защиту придоставит? )

    2. если мы увидели ни дай бог WMZ плеера, ну там или на гв или на чемпе или на обычных мобах добывая ресурсы, парни делайте рекол, а то WMZ плеера будут в нубирезистэвейде с вами драца, они будут защищать свой лут.

    3. никогда не спорте с админом шарда это может оказаться баном.

    4. если вы оказались в бане и у вас нету WMZ парни вздохните с облегчением наконец таки вы сможете встать из за компа и начать новую жизнь))))) Спасибо за внимание!

     

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

    Так что не надо ля-ля, если в башке не тесно и гладко - пойди делами займись, мб поможет ...

    Я считаю что с донатом тут все ровно, всегда больше всех воняли те, у кого с бабками напряг ... или с головой, вот и все ... те-же у кого с бабками все норм, но он по своим убеждениям считает донат для себя не целесообразным, спокойно к нему у других игроков относится ...


  11. 1 - PoD

    2 - Motanga

    3 - 7.04.09 с 11-00 по 18-00

    4 - убийство новичка (под защитой) в шахте минока(защита там работает) чар не крим не приступник, в чате, в информации об оружии которым был убит чар - эррор

    5 - http://s39.radikal.ru/i083/0904/f2/5d7223d38e13.jpg

×
×
  • Создать...