Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

Search found 58 matches

by Nearga
03.05.2012 11:57
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

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

kolvo = 999, или где-то там.. определенно больше, чем есть у торговца..
хммм.. думаете, в этом проблема?
by Nearga
30.04.2012 17:17
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

4.0.3 Он как-то странно скупает.. будто не по айдишнику ("купи-ка шмотку с айди ХХХ"), а по номеру ("возьми третью вещь, пофиг, что это"). Например, перед покупкой я вывожу в лог количество вещей у торговца..иногда бывает, что скупает не все: если скупить все, что нужно, у продав...
by Nearga
30.04.2012 13:11
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Поставил на ночь... в принципе, все ок - поскупал более-менее.. но сейчас проверяю - скупает не все, что нужно (
слава яйцам, хоть абсолютно все не скупает, как раньше :)
by Nearga
30.04.2012 1:04
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

На 4.0.3 и пробую... может наоборот, раннюю попробовать... ибо спеллбуков накупил уже сотни две
by Nearga
29.04.2012 18:01
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Фигня какая-то... иногда покупает то, что нужно, иногда недобирает, иногда гребет все подряд... что за хрень? ((((
by Nearga
29.04.2012 13:13
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Запилил вот так SetAutoBuyDelay(15); AddToSystemJournal('Step 1'); for i:=1 to rmax do AutoBuy(buy[i],$0000,kolvo); AddToSystemJournal('Step 2'); UOSay(vname+' buy'); Wait(15000); AddToSystemJournal('Step 3'); for i:=1 to rmax do AutoBuy(buy[i],$0000,0); Скупил абсолютно все, что у вендора есть :( З...
by Nearga
29.04.2012 12:59
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Пока остановился на таком варианте, вполне рабочий... но хотелось бы увидеть нормальный, без костылей AddToSystemJournal('Подошли к ' + vname); a := TStringList.Create; UOSay(vname+' buy'); wait(500); GetShopList(a); SetSilentMode(False); AddToSystemJournal('Вещей у вендора:' + inttostr(a.count)); i...
by Nearga
29.04.2012 12:40
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

В принципе, самый первый вариант вполне сносно работает... Долговато, правда, но скупает то, что нужно. По крайней мере, пока у торговца есть товары.. если запустить скрипт еще раз - скупает абсолютно левое барахло (почему?). Есть мысля поиграться с GetShopList(); и смотреть длинну списка, если мало...
by Nearga
29.04.2012 12:28
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Пробовал так, как вы советовали - все равно пишет, "Oh..You were so fast. Please repeat your order slower." Добавил for i:=1 to rmax do begin AutoBuy(buy[i],$0000,kolvo); wait(1000); end; UOSay(vname+' buy'); AddToSystemJournal(inttostr(i)); Wait(4500); for i:=1 to rmax do AutoBuy(buy[i],$...
by Nearga
29.04.2012 12:16
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

for i:=1 to rmax do begin AddToSystemJournal(inttostr(i)); AutoBuy(buy[i],$0000,kolvo); wait(5000); UOSay(vname+' buy'); Wait(5000); AutoBuy(buy[i],$0000,0); Wait(5000); end; Вообще ничего не покупает 0_0 Пишет, "Oh..You were so fast. Please repeat your order slower."
by Nearga
29.04.2012 11:50
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Та же фигня, если у вендора уже скуплен товар. Опять барахла закупил.
by Nearga
29.04.2012 11:31
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Оки, пасиб, попробую в обратном порядке... он вроде как и рабочий, но иногда или не все скупает, или скупает не то, что нужно.
by Nearga
29.04.2012 5:10
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Еще и кляп получил - видать, сильно часто дергал продавца :)

ЗЫ: а, это фигня: с паузой и BuyDelay игрался )
by Nearga
29.04.2012 4:43
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

Re: [Drw] Скупка

Забодяжил

Code: Select all

GetShopList(a); SetSilentMode(True); // GetFindedList(a); 
  for i := 0 to a.Count - 1 do
    begin
     StrBreakApart(a.Strings[i],'|', str);
     AddToSyStemJournal(intTostr(i)+' '+str[4]+' '+str[14]); 
    end;
проверил айдишники у продавца - такиеже, как и у меня.
by Nearga
29.04.2012 3:09
Forum: Помощь по скриптам
Topic: [Drw] Скупка
Replies: 21
Views: 16640

[Drw] Скупка

Пробежался поиском, нашел пару устаревших методов.. начал методом тыка подбирать - вроде таки заработало. for i:=1 to rmax do begin UOSay(vname+' buy'); AddToSystemJournal(inttostr(i)); AutoBuy(buy[i],$0000,kolvo); Wait(4500); AutoBuy(buy[i],$0000,0); end; Затестил, первые пару раз было все ок. Пока...