Pomagite Ja Umalaju.

[JustMan]

sub BlacksmithyIM()
var Exit=0, LastTimer
uo.Print('Выбери Сундук: ')
uo.Exec('addobject Chest')
while uo.Targeting()
wait(100)
wend
uo.Print('Выбери Помойку: ')
uo.Exec('addobject TrashCan')
while uo.Targeting()
wait(100)
wend
while Exit<>1
uo.DeleteJournal()
uo.FindType('0x0F51','0x0000','backpack')
if uo.GetQuantity('finditem')>0 then
uo.SetReceivingContainer('TrashCan')
wait(1000)
uo.Grab('all','finditem')
wait(1000)
uo.UnSetReceivingContainer()
end if
uo.FindType('0x1BEF ',-1,'backpack')
if uo.GetQuantity('finditem')<10 then
uo.FindType('0x1BEF ','0x0000','Chest')
wait(1000)
uo.Grab('300','finditem')
wait(1000)
end if
LastTimer=uo.Timer()
uo.DeleteJournal()
uo.UseType('0x13E3')
uo.WaitMenu ('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger')
wait(12000)
wend
end sub



Vot tut Skriptec Prastoj na BS Mne nado ctob on kupal Poka Dageri(Eto Jest)i kidal v Musornik(jest) Potomu cto pereplavit ih nelzja.. .
Sut V tom cto On 1 raz zdelajet Dager a potom Terget ne lozitsa opjat na ingi...Nu na DRW tak cto nado 2 raza na malatok i Target na ingi...Nu vot 1 raz on zdelajet dager kinet v musarnik a potom tergeting Canceled.. Podpravte Pozalusta...

[JustMan]

Nu chevo nekto i Nechevo neskazet i Daze neposmotret?

[JustMan]

Vsjo Sposiba Savage.. Owibka naidena...

Code: Select all

sub BlacksmithyIM() 
var Exit=0, LastTimer
uo.Print('Выбери Сундук: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
while Exit<>1 
uo.DeleteJournal() 
uo.FindType('0x0F51','0x0000','backpack') 
if uo.GetQuantity('finditem')>0 then 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('all','finditem') 
wait(1000) 
uo.UnSetReceivingContainer() 
end if 
uo.FindType('0x1BEF ',-1,'backpack')  
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x1BEF ','0x0000','Chest') 
wait(1000) 
uo.Grab('300','finditem') 
wait(1000) 
end if 
LastTimer=uo.Timer() 
uo.DeleteJournal() 
uo.WaitMenu ('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger')
uo.UseType('0x13E3')
wait(12000) 
wend 
end sub