Yoko

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

2 AlexTech
в ЛС сходи, да?

Дык

решил проблему с ID, и всё осталное, мой скрипт на скупку 99.8% гатов

с ID проблему решить недостаточно... как оказалось

Я не понимаю ваших проблем, неужели так сложно определить список всех имен вендоров? Их же сервер не придумывает каждый раз... Вот могу дать свой старенький скрипт на шард Цитадель с использованием массива имен. Скрипт древний, тут не делается поиск вендоров, а используется "фича" инжи по скрытию флуда...

#####################################################################
; BUYREGS
; Скупка регов по байлисту
; v.1.01b (с) Edred
sub buyregs()
   VAR i
   DIM vendors[29]
   vendors[0] = 'Kaspar'
   vendors[1] = 'Austin'
   vendors[2] = 'Reese'
   vendors[3] = 'Alessa'
   vendors[4] = 'Akina'
   vendors[5] = 'Aileen'
   vendors[6] = 'Alula'
   vendors[7] = 'Kevin'
   vendors[8] = 'Ainhoa'
   vendors[9] = 'Aderes'
   vendors[10] = 'Cassidy'
   vendors[11] = 'Gideon'
   vendors[12] = 'Canton'
   vendors[13] = 'Alaqua'
   vendors[14] = 'Doyle'
   vendors[15] = 'Ali'
   vendors[16] = 'Alake'
   vendors[17] = 'Jabir'
   vendors[18] = 'Beau'
   vendors[19] = 'Morris'
   vendors[20] = 'Aleka'
   vendors[21] = 'Akili'
   vendors[22] = 'Tremain'
   vendors[23] = 'Terence'
   vendors[24] = 'Brock'
   vendors[25] = 'Alumit'
   vendors[26] = 'Redmond'
   vendors[27] = 'Adoncia'
   vendors[28] = 'Rudyard'
   ;
   UO.UseSkill( 'Meditation' )
   wait(100)
   UO.DeleteJournal()
   For i = 0 To 28
      UO.Buy( 'magic', vendors[i] )
      wait(1000)
      If UO.InJournal( 'I thank thee for thy' ) Then
         UO.SayU( 'bye' )
         return
      Endif
   Next
endsub

Кто хочет - может сделать реколлы, поиск НПС вокруг, взятие их имен, сравнение с массивом - если совпадает - можно покупать.

Но откуда можно узнать такое количество имён?

в чём проблема тогда?

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

[quote="Sfagnum"][/quote]
Сфаги стукни мне 310995454 на счет скрипта погворить.

2Edred Список имён гораздо больше к сожалению.
Эта идея у меня тоже была в самом начале.
Например Lindsey и Benson у тебя в списке уже нету вендоров.
Это просто частный случай.
Это имена моих вендоров.

Вот для примера как выглядела моя процедурка:

sub CheckVendor(vn)
Var a
Dim VName[100]
VName[1]='Bruce'
VName[2]='Charlotte'
VName[3]='Jarman'
VName[4]='Marc'
VName[5]='Rufus'
VName[6]='Edlyn'
VName[7]='Frida'
VName[8]='Dacio'
VName[9]='Avella'
VName[10]='Gunnar'
VName[11]='Neron'
VName[12]='Nathaniel'
For a=1 To 12
if VName[a]==vn then
return 1
end if
next
return 0
end sub

Не эстетично, но зато дёшего, надёжно и практично.

_________________
Сделал дело - флуди смело !!!

Проблема в том, что не отличить вендора от игрока

А почему не юзать Mage buy, Alchemist buy и т.п.? чем энто вас не устраивает?

Потому что вендор тебе что-то продаст, когда ты рядом с ним. Вообще можно просто сделать функцию облёта по рунам и таргетом указывать на вендоров. Дело 1 минуты.
Я, кстати, сегодня наблюдал такую картину в магическом магазине. Прилетел чар Сфагнума и отоварился у вендора за 1 секунду. Причём вендор сказал ему спсибо за покупку на такуе-то сумму. Но ведь на ДРВ сделали задержку на покупку...

Дык я же говорил про имена вендоров на Цитадели. И привел просто пример. Никто не мешает иметь список имен хоть в тысячу штук длиной.

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

И как же всё это провернуть за секунду?

быстро

Но подорвать успевают...

Сфаг он старый читтер блин.

_________________
Сделал дело - флуди смело !!!

Дровосек - чар Кока - ГМ гильды Психи... Ща еще на один твой вопросец отвечу...