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

Tailoring
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12263		 Page 1 of 1
Author:  Narv [ 2007-07-29 14:30:07 ]
Post subject:  Tailoring
Искал но не нашел на форуме. мне надо скрипт на тайлоринг :
Покупает у вендора 1 bolt of cloth, выберает ножницы режит Bolt на ткань выберает Sewing kit делает Sash , когда ткань заканчивается продает Sash`i вендору и опять покупает 1 Bolt.

Очень надеюсь на вашу помощ :wink:
Author:  Scripts Writer [ 2007-07-30 23:34:04 ]
Post subject: 
Помоему элементарный скрипт-ты уже всё расписал. Осталось перевести на язык программирования и собрать воедино. Дерзай
Author:  Narv [ 2007-07-30 23:47:21 ]
Post subject: 
Scripts Writer wrote:
Помоему элементарный скрипт-ты уже всё расписал. Осталось перевести на язык программирования и собрать воедино. Дерзай

Я немогу написать если заканчивается ткань то покупать у вендора :(
Author:  Scripts Writer [ 2007-07-31 08:47:33 ]
Post subject: 
Code:
var cloth= #type of cloth
  uo.FindType(cloth,'-1','backpack')
  if uo.FindCount()
    ... # основное действие скрипта
  else
    uo.Buy('name of buy list with clothes')
  end if
Author:  Narv [ 2007-07-31 10:20:04 ]
Post subject: 
Scripts Writer wrote:
Code:
var cloth= #type of cloth
  uo.FindType(cloth,'-1','backpack')
  if uo.FindCount()
    ... # основное действие скрипта
  else
    uo.Buy('name of buy list with clothes')
  end if


Очень блогодарю за помощ. Но я бы был очен признателен еслиб вы соеденили мой скрипт с этим и там 2 вендора ,можно дописать как то если нет у одного ткани то он покупает у второго.

Code:

sub main()
start:
 UO.Say(',sell a')   
wait(500)
   UO.UseType("0x0F9D") 
      wait(500)
      checklag()
wait(50)
        UO.LClick(158,471) 
      wait(500)
UO.DeleteJournal()
          while not UO.InJournal("failed") and not UO.InJournal("You put")
         wait(500)
end if 
   wend
goto start

end sub

sub checklag()
uo.deletejournal()
uo.click('backpack')
repeat
wait(100)
until uo.injournal('backpack')
end sub

очень надеюсь на вашу помощ.
Author:  Scripts Writer [ 2007-07-31 11:39:46 ]
Post subject: 
А что за
Code:
LClick
-?

Какого его предназначение?
Author:  Narv [ 2007-07-31 12:13:40 ]
Post subject: 
Scripts Writer wrote:
А что за
Code:
LClick
-?

Какого его предназначение?


Это крафт таблица такая там кнопка есть make last вот на нее и тиркает :)
Author:  Scripts Writer [ 2007-07-31 12:35:19 ]
Post subject: 
Code:

sub main() 
var cloth=
repeat

uo.FindType(cloth,'-1','backpack')
if uo.FindCount() then
  UO.Say(',sell a')    
  wait(500) 
  UO.UseType("0x0F9D") 
  wait(500) 
  checklag() 
  wait(50) 
  UO.LClick(158,471) 
  wait(500) 
  UO.DeleteJournal() 
  while not UO.InJournal("failed") and not UO.InJournal("You put") 
    wait(500)
  wend 
else
  uo.Buy('name of buylist')
end if 

until uo.Dead() 

end sub 

sub checklag() 
uo.deletejournal() 
uo.click('backpack') 
repeat 
wait(100) 
until uo.injournal('backpack') 
end sub
Author:  Narv [ 2007-07-31 13:58:39 ]
Post subject: 
А что сдесь писать надо var cloth=
?
Author:  Rivory [ 2007-07-31 15:24:37 ]
Post subject: 
тип ткани
Author:  Narv [ 2007-07-31 17:07:10 ]
Post subject: 
ВСе работает большое спасибо. :)
Author:  TarantuL [ 2007-11-30 13:45:21 ]
Post subject: 
У меня была проблема с UO.Findcount, я хотел проверять если тряпок больше 15 - чтобы шил, а если меньше - покупал. Ковырялся, ковырялся, так и не получилось!! Пришлось обратиться к ВЕТЕРАНу, посредством всемирного интернет пейджера ICQ :lol: , который подсказал мне замечательную функцию If UO.GetQuantity('finditem') > 15 Then bla bla bla o_O .. Показываю что получилось, может кому пригодится..

Code:
sub main()
repeat
checklag()
uo.FindType('0x175D',-1,'backpack')
If UO.GetQuantity('finditem') > 15 Then
  UO.Say(',sell a')  
    checklag()
UO.CancelMenu()
UO.WaitMenu ('Cloth', 'Shirts', 'Shirts', 'robe' )
  uo.waittargettype("0x175D")
  UO.UseType("0x0F9D")
  checklag()
   
   UO.DeleteJournal()
  while not UO.InJournal("failed") and not UO.InJournal("You put")
    checklag()
  wend
checklag()
else
  uo.say(',buy b')
  wait(300)
    uo.waittargettype("0x0F95")
    checklag()
  uo.usetype("0x0F9E")
  checklag()
end if

until uo.Dead()

end sub

sub checklag()
uo.deletejournal()
uo.click('backpack')
repeat
wait(100)
until uo.injournal('backpack')
end sub


Выражаю огромное спасибо замечательному ВЕТЕРАНу!
Author:  -=#MIB#=- [ 2009-06-10 14:26:23 ]
Post subject: 
TarantuL wrote:
У меня была проблема с UO.Findcount, я хотел проверять если тряпок больше 15 - чтобы шил, а если меньше - покупал. Ковырялся, ковырялся, так и не получилось!! Пришлось обратиться к ВЕТЕРАНу, посредством всемирного интернет пейджера ICQ :lol: , который подсказал мне замечательную функцию If UO.GetQuantity('finditem') > 15 Then bla bla bla o_O .. Показываю что получилось, может кому пригодится..

Code:
sub main()
repeat
checklag()
uo.FindType('0x175D',-1,'backpack')
If UO.GetQuantity('finditem') > 15 Then
  UO.Say(',sell a')  
    checklag()
UO.CancelMenu()
UO.WaitMenu ('Cloth', 'Shirts', 'Shirts', 'robe' )
  uo.waittargettype("0x175D")
  UO.UseType("0x0F9D")
  checklag()
   
   UO.DeleteJournal()
  while not UO.InJournal("failed") and not UO.InJournal("You put")
    checklag()
  wend
checklag()
else
  uo.say(',buy b')
  wait(300)
    uo.waittargettype("0x0F95")
    checklag()
  uo.usetype("0x0F9E")
  checklag()
end if

until uo.Dead()

end sub

sub checklag()
uo.deletejournal()
uo.click('backpack')
repeat
wait(100)
until uo.injournal('backpack')
end sub


Выражаю огромное спасибо замечательному ВЕТЕРАНу!


Уважаемые авторы скрипта,объясните для чего используется UO.CancelMenu() ?
Author:  Savage [ 2009-06-10 15:19:55 ]
Post subject: 
Отменяет ловушки вайтменю и автоменю. Здесь эта команда лишняя. Ставят её в скрипт в процессе отладки, убирать забывают.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/