Помогите со скриптом на Tailoring
Posted: 2005-07-18 22:55:58
Скрипт отлчный то, что мне надо, всё настроил, делть он делает, а на бинты нережет=\ Просто не хочет.... помогите люди! Если бинты имеются то он их выкладывает, но вот что бы порезать штанишки=\ неа....
Поевляются надписи, что то типа- "укажите таргетом что резать", следующая строчка "таргет отменён!"=\
Поевляются надписи, что то типа- "укажите таргетом что резать", следующая строчка "таргет отменён!"=\
Code: Select all
sub Tailoring()
var Syndyk = "Syndyk"
uo.addobject(Syndyk)
while uo.Targeting()
wait(100)
wend
var Bandans ='0x152E' ;çäåñü òóïå áàíäàí
var Bandage = '0x0E21' ;çäåñü òóïå áèíòîâ
var clotch = '0x175D' ;çäåñü òóïå òêàíè
var Kol = '400' ; çäåñü ìîæíî óêàçàòü ñêîêà òêàíè áðàòü èç ñóíäóêà
repeat
while TRUE
UO.FindType( clotch, -1, Syndyk )
UO.Grab( Str( Kol ), 'finditem' )
wait( 2000 )
while UO.Count( clotch ) > 11
UO.Waittargettype('0x175D')
UO.Useobject('0x4015C11D') ; çäåñü óêàæè àéäè øâåéíîãî íàáîðà
UO.WaitMenu('Cloth','Legwear','Legwear','short pants')
uo.click('0x175D')
wait (500)
UO.DeleteJournal()
while NOT UO.InJournal('You put') AND NOT UO.InJournal('fail')
wait(300)
wend
CheckLag()
UO.InJournal("You can`t")
uo.findtype('Bandans')
if UO.Count( Bandans ) > 0 then
UO.Waittargettype('Bandans')
UO.useobject('0x402BE24F') ; çäåñü óêàæè àéäè íîæíèö
wait(2000)
UO.FindType( Bandage, -1, 'backpack' )
UO.MoveItem( 'finditem', 0, Syndyk )
UO.Print('Áèíòû ïåðåëîæåíû.')
uo.DeleteJournal()
wait(400)
end if
wend
wend
UO.UnSetReceivingContainer()
wait(200)
until UO.Dead()
end sub
sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub
играю на дрв, были и другие более проще скрипты и тоже нерезали!+\
