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

Помогите со скриптом?
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1489		 Page 1 of 1
Author:  neo007 [ 2004-09-28 20:08:31 ]
Post subject:  Помогите со скриптом?
sub tailoring()
while 1
if uo.count(0x175D)<30 then
move_clothes_to_pack()
uo.findtype('0x175D',-1,0x40272F96)
uo.grab('300','finditem')
wait(1000)
end if
do_robes()
wait(10500)
wend
end sub
sub do_robes()
uo.waitmenu('Cloth','Headwear','Headwear','skullcap')
uo.usetype('0x0F9D')
uo.waitmenu('What do you want to use the sewing kit on?')
uo.waittargettype('0x175D')
end sub
sub move_clothes_to_pack()
uo.findtype('0x1543',-1,'0x4007477A')
if uo.findCount()>0 then
for var i=0 to uo.findCount()-1
uo.findtype('0x1543',-1,'my')
uo.usetype('0x0F9E')
uo.waitmenu('What do you want to use this on?')
uo.waittargettype('0x1543')
wait(700)
next
endif
endsub
sub to_30()
while 1
if uo.count(0x1515)<5 then
move_staffs_to_pack()
uo.findtype('0x1515',-1,0x400CE918)
uo.grab('30','finditem')
wait(1000)
end if
do_robes()
wait(1000)
wend
endsub


Вот скрипт работает правильно но нехочет резать изделие на бинты помогите исправьте или дайте какойнибуть другой скрипт чтобы прокачать тейлоринг до 59% штобы робы делать можно было.
Плиззз помогите!!!
Author:  DEad_boy [ 2004-09-29 00:08:45 ]
Post subject: 
sub tailoring()
UO.CancelMenu()
var counterr , cont=20 , Meshochek , Bochka1=0x400911E7 , Bochka2=0x40092676
UO.AutoMenu('Cloth','Shirts')
UO.AutoMenu('Shirts','Robe')
repeat
UO.FindType(0x175D,-1,1)
UO.Grab('220','finditem')
wait(1000)
if cont>15 then
UO.FindType(0x0E76,-1,Bochka1)
Meshochek=UO.GetSerial('finditem')
wait(500)
UO.Grab(0,Meshochek)
wait(1000)
UO.MoveItem(Meshochek,0,Bochka2)
cont=0
end if
cont=cont+1

while UO.Count(0x175D)>20
UO.FindType(0x1F03,-1,2);Robe
;UO.FindType(0x1515,-1,2);Cape
if UO.FindCount()>0 then
UO.MoveItem('finditem',0,Meshochek) ; Если нужно резать на бинты меняем эту строчку на UO.WaitTargetObject('Finditem') и UO.UseObject('nognitsi')
wait(500)
end if

UO.WaitTargetType(0x175D)
UO.UseObject(0x40074DC4)
while not (UO.InJournal('put the')or UO.InJournal('Tailoring failed') or counterr>20)
wait(500)
counterr=counterr+1
wend
counterr=0
UO.DeleteJournal()
wend
until False
end sub
Author:  neo007 [ 2004-09-29 22:11:11 ]
Post subject: 
Я немогу робы делать тейлор 41% дайте плизз на чтонибуть што я могу делать!!!
СПАСИБО!
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/