Yoko

Code:
sub alchemy()
# BETEP™ #
VAR Exit=0, LastTimer
uo.print('Nokaoz n sacagc c ionuezagc')
uo.exec('addobject Bag')
while uo.targeting()
wait(100)
wend
uo.print('Nokaoz zoaa ionuezc isinanu')
uo.exec('addobject Bag2')
while uo.targeting()
wait(100)
wend
while Exit<>1
UO.DeleteJournal()

UO.FindType('0x0F0E','0x0998','backpack')
If UO.GetQuantity('finditem')>0 Then
UO.SetReceivingContainer('Bag2')
wait(1000)
UO.Grab('200','finditem')
wait(1000)
UO.UnSetReceivingContainer()
Endif

UO.FindType('0x0F0E',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0F0E','0x0000','Bag')
wait(1000)
UO.Grab('100','finditem')
wait(1000)
Endif

UO.FindType('0x0F88','0x0000','backpack')
If UO.GetQuantity('finditem')<20 then
UO.FindType('0x0F88','0x0000','Bag')
wait(1000)
UO.Grab('400','finditem')
wait(1000)
Endif

LastTimer=UO.Timer()
UO.DeleteJournal()

UO.UseType('0x0F88')
UO.WaitMenu('What','Poison')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed")
wait(500)
wend
If UO.InJournal("You toss the failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100
Else
EndIf
wend
end sub


eto script na weak poison kak mne zdelat chtob posle etago kak on zdelal butilku,butilku srazu vikidyval na pol.


Code:
sub dq()
uo.findtype('0x182F','all','backpack')
uo.moveitem('0x182F','1','ground')
wait(200)
endsub



vot v forume nashol script katorij vikidyvaet poisony. no kak k craftu ego prisiedinit .pomogite.v obide ne ostavlu

UO.UseType('0x0F88') 
UO.WaitMenu('What','Poison')        
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed") 
wait(500) 
wend 
If UO.InJournal("You toss the failed") then 
repeat 
wait(100) 
until UO.Timer()>=LastTimer+100 
Else 
EndIf

uo.findtype('0x182F','all','backpack') 
if uo.findcount() > 0 then
uo.moveitem('finditem','1','ground') 
wait(200) 
else
wait(50)
endif

wend    
end sub  

Попробуй так