Yoko
http://forum.yoko.com.ua/

DRW Выкладывание на вендора однотипных предметов.
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2950		 Page 1 of 1
Author:  Savage [ 2005-02-02 16:29:12 ]
Post subject:  DRW Выкладывание на вендора однотипных предметов.
Значит скрипт не полностью автоматический, прийдется перед запуском править вручную цену товара.

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

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

Code:
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
Author:  Sergant [ 2005-02-02 22:53:16 ]
Post subject: 
спасибо.... чета раньще даж мысли такой не было про этот скрипт... а вот выкладывать хауссейфы и прочую тинкерню)) удобно.. спасибо
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/