DRW Выкладывание на вендора однотипных предметов.

[Savage]

Значит скрипт не полностью автоматический, прийдется перед запуском править вручную цену товара.

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

Скрипт обращается к сундуку вендора по lastcontainer, поэтому не следует открывать всякие мешки после команды stock.

Code: Select all

sub price()
   VAR Exit=0

   UO.AddObject('Tovar')
   While UO.Targeting()
      wait(500)
   Wend
   While Exit<>1
      UO.FindType(UO.GetGraphic('Tovar'),UO.GetColor('Tovar'),'backpack')
      If UO.FindCount() Then
         UO.MoveItem('finditem',1,'lastcontainer')
         UO.WaitTargetObject('finditem')
         UO.Say('Paul price 15000') ;исправить имя и цену!
      Else
         Exit=1
      Endif
      wait(800)
      CheckLag()
   Wend
end sub

#==============================================================
#  CheckLag() - click on backpack and awaiting "backpack"
#               message in journal.
#
#  Journal has been deleted!!!
#--------------------------------------------------------------
sub CheckLag()
   UO.DeleteJournal()
   UO.Click('backpack')

   repeat
      wait(500)
   until UO.InJournal('backpack')
end sub

[Sergant]

спасибо.... чета раньще даж мысли такой не было про этот скрипт... а вот выкладывать хауссейфы и прочую тинкерню)) удобно.. спасибо