pomogite s alchemy

Ask for help

Moderators: Murderator+, Murderator

Post Reply
kapatuct
Posts: 26
Joined: 2007-12-03 20:11:19

pomogite s alchemy

Post by kapatuct »

Code: Select all

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.budu ochen blogodaren uzhe 3 den golovu lamaju kak zdelat i ne kak ne poluchaetsa



Code: Select all

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 . pozhalusto pomogite.v obide ne ostavlu
Mazer
Posts: 125
Joined: 2007-11-13 00:39:14

Post by Mazer »

Code: Select all

uo.findtype('0x182F','all','backpack')
uo.moveitem('0x182F','1','ground')
UO.UseType('0x0F88')
wait(200)

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

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

Try this :D that should work :)
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

Mazer wrote:

Code: Select all

uo.findtype('0x182F','all','backpack')
uo.moveitem('0x182F','1','ground')
UO.UseType('0x0F88')
wait(200)

Try this :D that should work :)


Не вижу смысла в этом поиске:

Code: Select all

uo.findtype('0x182F','all','backpack')
uo.moveitem('0x182F','1','ground')


Вот если так, еще можно что то понять:

Code: Select all

uo.findtype('0x182F','-1','backpack')
if UO.FindCount() > 0 then
uo.moveitem('finditem','1','ground')
else
wait(50)
endif


А если по старому, то ваапще можно без поиска...
kapatuct
Posts: 26
Joined: 2007-12-03 20:11:19

Post by kapatuct »

bolshoe sposibo za pomosch ! no vsioravno nefiga ne poluchaetsa ... :/
Post Reply