Page 1 of 1
Tailoring
Posted: 2007-07-29 14:30:07
by Narv
Искал но не нашел на форуме. мне надо скрипт на тайлоринг :
Покупает у вендора 1 bolt of cloth, выберает ножницы режит Bolt на ткань выберает Sewing kit делает Sash , когда ткань заканчивается продает Sash`i вендору и опять покупает 1 Bolt.
Очень надеюсь на вашу помощ

Posted: 2007-07-30 23:34:04
by Scripts Writer
Помоему элементарный скрипт-ты уже всё расписал. Осталось перевести на язык программирования и собрать воедино. Дерзай
Posted: 2007-07-30 23:47:21
by Narv
Scripts Writer wrote:Помоему элементарный скрипт-ты уже всё расписал. Осталось перевести на язык программирования и собрать воедино. Дерзай
Я немогу написать если заканчивается ткань то покупать у вендора

Posted: 2007-07-31 08:47:33
by Scripts Writer
Code: Select all
var cloth= #type of cloth
uo.FindType(cloth,'-1','backpack')
if uo.FindCount()
... # основное действие скрипта
else
uo.Buy('name of buy list with clothes')
end if
Posted: 2007-07-31 10:20:04
by Narv
Scripts Writer wrote:Code: Select all
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: Select all
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
очень надеюсь на вашу помощ.
Posted: 2007-07-31 11:39:46
by Scripts Writer
А что за
-?
Какого его предназначение?
Posted: 2007-07-31 12:13:40
by Narv
Scripts Writer wrote:А что за
-?
Какого его предназначение?
Это крафт таблица такая там кнопка есть make last вот на нее и тиркает

Posted: 2007-07-31 12:35:19
by Scripts Writer
Code: Select all
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
Posted: 2007-07-31 13:58:39
by Narv
А что сдесь писать надо var cloth=
?
Posted: 2007-07-31 15:24:37
by Rivory
тип ткани
Posted: 2007-07-31 17:07:10
by Narv
ВСе работает большое спасибо.

Posted: 2007-11-30 13:45:21
by TarantuL
У меня была проблема с
UO.Findcount, я хотел проверять если тряпок больше 15 - чтобы шил, а если меньше - покупал. Ковырялся, ковырялся, так и не получилось!! Пришлось обратиться к
ВЕТЕРАНу, посредством всемирного интернет пейджера ICQ

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

, который подсказал мне замечательную функцию
If UO.GetQuantity('finditem') > 15 Then bla bla bla o_O .. Показываю что получилось, может кому пригодится..
Code: Select all
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() ?
Posted: 2009-06-10 15:19:55
by Savage
Отменяет ловушки вайтменю и автоменю. Здесь эта команда лишняя. Ставят её в скрипт в процессе отладки, убирать забывают.