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

хелп ми скрипт нероботоет
http://forum.yoko.com.ua/viewtopic.php?f=17&t=12934		 Page 1 of 1
Author:  kapatuct [ 2007-12-20 00:23:08 ]
Post subject:  хелп ми скрипт нероботоет
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(600)
wend
If UO.InJournal("You toss the failed") then

uo.findtype( '0x0F88', '0x0998', 'backpack' )
if uo.findcount()>30 then
uo.moveitem( 'finditem', 'all', '0x40068DCC' )
wait(600)
endif
repeat
wait(100)
until UO.Timer()>=LastTimer+100
Else
EndIf
wend
end sub




незнаю почему банки "поисон" в мешок не скидываютса,помогите а то уже нерви не видерживают
Author:  stickman [ 2007-12-20 23:37:41 ]
Post subject: 
id менял?
Author:  kapatuct [ 2007-12-21 16:54:19 ]
Post subject: 
da. neskolko raz :(
Author:  Kynep [ 2007-12-21 17:12:57 ]
Post subject: 
kapatuct wrote:
da. neskolko raz :(


Попробуй так:
Code:
 uo.findtype( '0x0F88', '0x0998', 'backpack' ) 
if uo.GetQuantity('finditem') > 30 then 
uo.moveitem( 'finditem', 'all', '0x40068DCC' )
Author:  kapatuct [ 2007-12-21 22:50:40 ]
Post subject: 
bolshoe sposibo za pomosch ! no vsioravno nefiga ne poluchaetsa ... :/
Author:  Kynep [ 2007-12-24 09:56:21 ]
Post subject: 
kapatuct wrote:
bolshoe sposibo za pomosch ! no vsioravno nefiga ne poluchaetsa ... :/


Блин как я не доглядел?!?!
Code:
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
wait(50) 
EndIf 

uo.findtype( '0x0F88', '0x0998', 'backpack' ) 
if uo.GetQuantity('finditem') > 30 then 
uo.moveitem( 'finditem', 'all', '0x40068DCC' ) 
wait(600)
else
wait(50) 
endif

wend 
end sub


Все, теперь будет работать.
Author:  kapatuct [ 2007-12-26 22:42:24 ]
Post subject: 
nerabotaet :/
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/