Скупка регов на ДРВ

Anything and all.

Moderators: Murderator+, Murderator

Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Leo wrote:У меня вопрос, летаете ли вы по городам, где нету ГЗ?
никто наскольок я в курсе. слишком велики трудозатраты, а гарантий никто даже минимальных обеспечить не может.
Leo wrote:И, кстати, не так уж и часто меняются имена и ID вендоров...
кажный раз кодыть киляют...

2 AlexTech
в ЛС сходи, да?
AlexTech
Posts: 28
Joined: 2005-02-09 12:02:08

Post by AlexTech »

Дык :D
Ruzhix
Posts: 30
Joined: 2005-05-11 15:57:57
Location: *LV*
Contact:

Post by Ruzhix »

решил проблему с ID, и всё осталное, мой скрипт на скупку 99.8% гатов :)
AlexTech
Posts: 28
Joined: 2005-02-09 12:02:08

Post by AlexTech »

с ID проблему решить недостаточно... как оказалось :(
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

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

Code: Select all

#####################################################################
; 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


Кто хочет - может сделать реколлы, поиск НПС вокруг, взятие их имен, сравнение с массивом - если совпадает - можно покупать.
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Но откуда можно узнать такое количество имён?
Ruzhix
Posts: 30
Joined: 2005-05-11 15:57:57
Location: *LV*
Contact:

Post by Ruzhix »

AlexTech wrote:с ID проблему решить недостаточно... как оказалось :(
в чём проблема тогда?
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

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


Дык один разок пробежаться по всем магазинам, например, в брите (городе) - и ты получишь более-менее полный список имен вендоров.
zarg
Posts: 116
Joined: 2004-08-29 08:33:44

Post by zarg »

[quote="Sfagnum"][/quote]
Сфаги стукни мне 310995454 на счет скрипта погворить.
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

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

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

Code: Select all

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

Не эстетично, но зато дёшего, надёжно и практично.
Сделал дело - флуди смело !!!
AlexTech
Posts: 28
Joined: 2005-02-09 12:02:08

Post by AlexTech »

Ruzhix wrote:
AlexTech wrote:с ID проблему решить недостаточно... как оказалось :(
в чём проблема тогда?


Проблема в том, что не отличить вендора от игрока
gods
Posts: 5
Joined: 2005-03-20 09:14:47

Post by gods »

А почему не юзать Mage buy, Alchemist buy и т.п.? чем энто вас не устраивает?
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Потому что вендор тебе что-то продаст, когда ты рядом с ним. Вообще можно просто сделать функцию облёта по рунам и таргетом указывать на вендоров. Дело 1 минуты.
Я, кстати, сегодня наблюдал такую картину в магическом магазине. Прилетел чар Сфагнума и отоварился у вендора за 1 секунду. Причём вендор сказал ему спсибо за покупку на такуе-то сумму. Но ведь на ДРВ сделали задержку на покупку...
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

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


Дык я же говорил про имена вендоров на Цитадели. И привел просто пример. Никто не мешает иметь список имен хоть в тысячу штук длиной.
AlexTech
Posts: 28
Joined: 2005-02-09 12:02:08

Post by AlexTech »

Leo wrote:---Убито нах---
Прилетел чар Сфагнума и отоварился у вендора за 1 секунду. Но ведь на ДРВ сделали задержку на покупку...

У Сфагнума походу задержка меняется динамически, начинает с маленькой и если вендор говорит, что слишком быстро, то задержка увеличивается, и так до полного удовлетворения.
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

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

И как же всё это провернуть за секунду?
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

Leo wrote:И как же всё это провернуть за секунду?
быстро ;)
Arsuri
Posts: 62
Joined: 2005-02-25 13:31:26
Location: DRW, [Hussars]
Contact:

Post by Arsuri »

Sfagnum wrote:быстро ;)


Но подорвать успевают...
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

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

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

Сфаг он старый читтер блин.
Сделал дело - флуди смело !!!
BasOff
Posts: 10
Joined: 2005-04-02 03:23:26

Post by BasOff »

AlexTech wrote:Asher ))
Я вообще то думал что дровосек твой второй чар :shock:
у него скрипт внешне такой же как у тебя


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