Yoko

Posted: **2006-06-09 17:20:08**

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

Posted: **2006-06-09 17:36:21**

можно проще... когда осмотрел вендора- скажы bye (пока) и иди к следущему и говори buy

Posted: **2006-06-09 18:14:27**

ну я же сказал подходя к вендору у меня открываеца любой вендор в зоне досягаемости даже если я в упор к нужному стою!

Posted: **2006-06-09 18:31:48**

Есть такая бодяга, токо крашит с нее очень сильно, рекомендую после закупок перезаходить. Биндишь на любимую кнопку exec buyengine
1 раз нажал и запущено, стаскиваешь статус вендора потом следующего. Второй раз нажал - выключено.

Code: Select all

sub buyengine()
   If UO.GetGlobal('BuyScript')=='Off' Then
      UO.SetGlobal('BuyScript','On')
      UO.Print("Buy Engine activated!")
      UO.Exec('exec buylastattack')
   Else
      UO.SetGlobal('BuyScript','Off')
      UO.Print("Buy Engine deactivated!")
      UO.Exec('terminate buylastattack')
   Endif
end sub


sub buylastattack()
   VAR Name="", SerialLast='0x00000000', SerialNew='0x00000000'
   
   While TRUE
      SerialNew=UO.GetSerial('laststatus')
   
      If SerialNew<>SerialLast AND SerialNew>0 Then
         UO.Click(SerialNew)
         wait(1000)
         Name=UO.GetName(SerialNew)
         UO.Print(Name)
         UO.Say(Name+" buy")
         SerialLast=SerialNew
      Else
         wait(1000)
      Endif
   wend
end sub

Posted: **2006-06-10 05:10:46**

поюзай поиск лутче видел =)

Posted: **2006-06-10 11:00:00**

Попробуй, безотказно пашет

Code: Select all

Uo.msg('bye')
Uo.msg('bye')
Uo.msg('buy')

Posted: **2006-06-10 18:08:42**

вы не понимаете мне нужно именно так как я рассказал!

Posted: **2006-06-10 19:33:50**

Если на шарде есть команда .buy - пользуй ее, она именно так и работает.

Posted: **2006-06-11 09:12:37**

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

Posted: **2006-06-11 16:48:07**

Помоему всё просто ...

Code: Select all

sub buying()
  uo.Say('bye')
  uo.Exec('addobject Vendor')
  while uo.Targeting()
    wait(100)
  wend 
  uo.Say(UO.GetName('Vendor') + ' buy')
end sub

Posted: **2006-06-11 17:29:14**

BoBBaH wrote:ну блин во первых шард дрв во вторых не нужна мне эта команда мне отдельный скрипт нужен на рынках их 3 на дрв столько вендоров что при написании просто купить может самый дальний вендор откликнуца! в скрипте данном выше я не врубаю толк его работы он то срабатывает то нет

Если не знаешь - команда сферы .buy генерит прицел, которым ты указываешь вендора и открывает окно покупки с ним. Если же у тебя в инжекте настроен бай-лист - то окно покупки не открывается, а сразу совершается покупка у того вендора, на которого ты указал прицелом. Команду же забиндить - две секунды. Хоть в инжекте, хоть в самом клиенте. Разрешена ли к использованию игроками эта команда на ДРВ - не знаю, я там не играю.

Ну не суть, если тебе больше нравится вместо бинда в одну команду юзать скрипт - флаг в руки, Мастдай тебе дал правильный скрипт.

Posted: **2006-06-13 23:12:15**

ыыы на богом забытом сайте нашо это -

Code: Select all

sub say()
 var name=uo.getname['aim']
  if name<> "" then
 uo.fontcollor('09eb')
 uo.say('*' + name '*')
end sub

шо це?

Posted: **2006-06-13 23:13:43**

кста маст чтобы я не вводил в поиске - пишет

no topics or posts mer searched in your criteria :roll:

Posted: **2006-06-13 23:17:47**

CONDOMchick wrote:кста маст чтобы я не вводил в поиске - пишет

no topics or posts mer searched in your criteria

А ты никогда не пробовал полистать страничку Scripts? Хотя бы 1-2 листа... а потом уже постить.

Posted: **2006-06-14 00:29:37**

sub marketbuy()
VAR vend, ven='vendor'
UO.Exec('addobject vend')
while uo.Targeting()
wait(200)
wend
UO.Click('vend')
ven=UO.GetName('vend')
UO.Say(ven + ' buy')
end sub

На держи, всё как ты написал, запускаешь скрипт таргетом на вендора и всё!

Posted: **2006-06-14 09:58:28**

спасибо только вот поправь свой скрипт я хз где говорит имя вендора буй только после того как 2 раза нажав на этого вендора просто скажет буй

Posted: **2006-06-14 10:11:34**

Code: Select all

sub marketbuy() 
VAR vend, ven='vendor' 
UO.Exec('addobject vend') 
while uo.Targeting() 
wait(200) 
wend 
UO.Click('vend') 
wait(500)
ven=UO.GetName('vend') 
UO.Say(ven + ' buy') 
end sub

TWI = On

Yoko

Скрипт

Скрипт