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

Продать+Купить
http://forum.yoko.com.ua/viewtopic.php?f=17&t=13198
Page 1 of 1

Author:  m0nYa [ 2008-02-06 16:10:32 ]
Post subject:  Продать+Купить

Доброго врмени суток , инжектом пользуюсь давно ... но на етом форуме только вот сейчас очутился ... Вобзем возникла проблема ... нужен скрипт который бы быстро скупал у вендора животных указаных по тайпу а потом так-же по тайпу продавал ....
Есле есть кому новичку помочь помогите буду благодарен ...
П.С - заранее спасибо откликнувшимся на просьбу . Exclamation
(script под POL-95)


Ну подскажите хоть ктото чтонибудь ... :cry:

Author:  AGRS [ 2008-02-06 19:32:22 ]
Post subject: 

Покупка осущиствляется по шоп листу. А шоп лист формируется ручками. Если не ошибаюсь, там по имени, а не по графич типу.

Author:  m0nYa [ 2008-02-07 10:07:27 ]
Post subject: 

А с продажей как быть ? мне нужно продавать всех животных .... они все одинаковые ....

Author:  Kynep [ 2008-02-07 10:12:51 ]
Post subject: 

m0nYa wrote:
А с продажей как быть ? мне нужно продавать всех животных .... они все одинаковые ....


Опиши подробнее как у Вас на шарде происходит процесс продажи.

Author:  m0nYa [ 2008-02-07 10:14:59 ]
Post subject: 

Пишеш sell повялеться курсор , тыкаеш на животное и вуаля оно продано ... =)
Просто на сервере есть не пофикшеная тема с куплей продажей животных ... хоченться заработать денег :-) весь скрипт должен заключаться в том что чар покупает по бай листу а продает животных по ID вид животных всего 1 ... но как мне кажеться ето какойто проблематичный скрипт так как браться некто не хочет :-) хотябы насоветовали .... for new scripter :-)

Author:  Kynep [ 2008-02-07 10:22:53 ]
Post subject: 

m0nYa wrote:
Пишеш sell повялеться курсор , тыкаеш на животное и вуаля оно продано ... =)


Code:
sub sell()
  VAR chto = '' #Тип товара
  VAR ser
  UO.Set('finddistance', '4')
  start:
  UO.FindType(chto, '-1', 'ground')
  If UO.FindCount() > 0 then
    repeat
      ser = UO.GetSerial('finditem')
      wait(100)
      UO.WaitTargetObject(ser)
      wait(100)
      UO.Say('Sell')
      wait(2000)
      UO.FindType(chto, '-1', 'ground')
    until not UO.FindCount()
    UO.Print('Все продано!!!')
  else
    UO.Buy('list') #Имя байлиста
    wait(4000)
    goto start
  end if
end sub

Author:  m0nYa [ 2008-02-07 10:27:32 ]
Post subject: 

Kynep wrote:
m0nYa wrote:
Пишеш sell повялеться курсор , тыкаеш на животное и вуаля оно продано ... =)


Code:
sub sell()
  VAR chto = '' #Тип товара
  VAR ser

  UO.FindType(chto, '-1', 'backpack')
  If UO.FindCount() > 0 then
    repeat
      ser = UO.GetSerial('finditem')
      wait(100)
      UO.WaitTargetObject(ser)
      wait(100)
      UO.Say('Sell')
      wait(2000)
      UO.FindType(chto, '-1', 'backpack')
    until not UO.FindCount()
    UO.Print('Все продано!!!')
  end if
end sub

Я еще не пробовал ... но меня смущает строка find backpack животное то не в бакпаке ... будт ли он искать животное на расстоянии кпримеру 4 шага ... ?

Author:  Kynep [ 2008-02-07 10:34:56 ]
Post subject: 

m0nYa wrote:
Я еще не пробовал ... но меня смущает строка find backpack животное то не в бакпаке ... будт ли он искать животное на расстоянии кпримеру 4 шага ... ?


Поправил, смотри выше.
Добавил скупку. Тестируй.

Author:  Edred [ 2008-02-07 11:35:53 ]
Post subject: 

m0nYa wrote:
но как мне кажеться ето какойто проблематичный скрипт так как браться некто не хочет :-) хотябы насоветовали .... for new scripter :-)


For new bugger - ты хотел сказать... Потому и не хотят браться, что читеры здесь не особо приветствуются.

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/