Если нетрудно!

Anything and all.

Moderators: Murderator+, Murderator

Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Если нетрудно!

Post by Shadowdancer »

Короче такая просьба к вам...


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

И так неогрониченое количество времени... :!:



Зарание, спасибки...
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

Ну помогите люди :((( :(
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Code: Select all

sub max() 
   VAR VesPrirost=120
   VAR RespDelay=1140000 ;19 min resp 20

   UO.Set('buydelay','1000') ; 1000 - zaderjka na pokupku
   UO.Set('injectecho','1')

   While 1==1
      UO.DeleteJournal()
      UO.Buy('tt2') ; tt2 - buylist s tkaniyu
UO.Say("guards")
      Repeat
         UO.Exec('warmode 0')
         UO.Exec('warmode 0')
;         UO.UseSkill('Stealth')
         UO.UseSkill('Hiding')
         wait(4000)
      Until UO.Hidden()
      IF UO.InJournal("No item") Then
         UO.Print("OOpS!")
         wait(20000) ; 20 sec
      Else
         wait(RespDelay)
      EndIf
   Wend
end sub
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

Это типа в скрипт закинуть и все ???

А как там изменить что бы скупал определеные реги ?
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Это никуда закидывать не надо. Это уже скрипт готовый.

Code: Select all

...
      UO.Buy('tt2') ; tt2 - buylist s tkaniyu
...

Изменяй tt2 на твой лист покупки.
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

Допустим мне нужны реги Black Pearl, Nigshade, Blood Moss как это будет выглядить ? :)
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Открываешь закладку Main, ищешь наверху кнопку Buy/Sell.
Жмёшь на неё. В поле Name вводишь название листа покупки (любое). Подходишь к вендору, пишешь buy, в правой колонке появится список товаров у вендора, выбераешь нужные и жмёшь на кнопку Done. Дальнейшие действия описаны в моём предыдущем посте.
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

А то что ты раньше писал тот скрипт кидать в закладку скриптс ? :_))
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Shadowdancer wrote:А то что ты раньше писал тот скрипт кидать в закладку скриптс ? :_))

Где?
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

### серезно немогу врубиться ### :(((((((

Можешь все обяснить еще раз попорядку!


Благодарю ) :lol:

[Тока без мата. Leo]
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Я свои посты не удалял. Если не понятно, попробуй перечитать ещё разочек :wink:
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

:))) я тока непонял что делать после того как я имя вендора напишу что дальше Бай кнопку нажимать и тот скрипт что ты скинул, кидать в закладку СКРИПТЫ в инже ??? :oops:
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Создал лист покупки, изменил в скрипте название листа покупки, запустил скрипт и всё.
Уж как запустить скрипт, надеюсь разберёшься.
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

Вотакой скрипт вышел!

Code: Select all

sub max() 
   VAR VesPrirost=120
   VAR RespDelay=1140000 ;19 min resp 20

   UO.Set('buydelay','1000') ; 1000 - zaderjka na pokupku
   UO.Set('injectecho','1')

   While 1==1
      UO.DeleteJournal()
      UO.Buy('Nighshade,Blood Moss,Black Pearl') ; tt2 - buylist s tkaniyu
UO.Say("guards")
      Repeat
         UO.Exec('warmode 0')
         UO.Exec('warmode 0')
;         UO.UseSkill('Stealth')
         UO.UseSkill('Hiding')
         wait(4000)
      Until UO.Hidden()
      IF UO.InJournal("No item") Then
         UO.Print("OOpS!")
         wait(20000) ; 20 sec
      Else
         wait(RespDelay)
      EndIf
   Wend
end sub



А можно в этот скрипт както закинуть имя вендора ?

Что бы тока в скрипте имя вендора менять!

Что бы тока скрипт включил и он работал! ненадо было по закладкам лазить :!: :?:
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Скажи честно, ты издеваешься? :shock:
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

я просто убитый до меня долго доходит :))))


Ну обесни
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Перечитывай мои посты пока не дойдёт.
Shadowdancer
Posts: 96
Joined: 2005-08-25 23:35:29

Post by Shadowdancer »

Ты гонешь!
Я все зделал, обясни мне что делать после того как я лист выбрал что покупать! Потом нажимаю Доне а потом получаеться такая ### типа НПс Нейм я вписую имя вендора! с лева Бай а с права Селл я нажимаю бай а потом тот скрипт что ты мне дал кидаю в скрипты и запускаю ? Правильно ###?
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post by Leo »

Надоело твой мат читать. Я всё написал ранее, включай голову и всё получится.
Behemot
Posts: 4
Joined: 2006-02-27 14:20:35

Post by Behemot »

Не работает ни черта на drw.ru
Выставлял delay до 30000
СПИСОК составлен КОРРЕКТНО!
и всё равно - скотина пишет мине клиент:

[UNSP] Detected corrupt vendor sell packet

Чё это за фигня?!..

Code: Select all

sub buy_reg()
UO.Set('buydelay','30000')
UO.Buy('regi','Violet')
end sub


в списке "regi" 10 Ginseng, пробовал писать вместо имени веника его ID
Post Reply