Готовка тотлов

[zarg]

У кого нить есть скрит на изготвление тотлов чар берет глаза и пустые бутылки делат тотлы и кладет тотлы обратно в сундук...

[zarg]

Че нету ни у кого?

[Bloodmoon]

Возьми из другого раздела "скриптов".и поменяй строчки.По-моему это может каждый .

[maximka4]

У кого нить есть скрит на изготвление тотлов чар берет глаза и пустые бутылки делат тотлы и кладет тотлы обратно в сундук...

поменяй type и id

Code: Select all

sub main()
sub Stoneskin() 
var LastTimer=0 
var Exit=0 
var TryToPoison 
while Exit<>1 
UO.DeleteJournal() 
UO.usetype(0x09F2) 
UO.unsetreceivingcontainer() 
UO.FindType('0x0F0E',-1,'backpack') ; empty bottles 
If UO.GetQuantity('finditem')<10 then 
UO.FindType('0x0F0E','0x0000','0x4023BAF4') ; empty bottles container 
wait(1000) 
UO.Grab('300','finditem') 
wait(100) 
Endif 

#garlic 
UO.FindType('0x0F88','0x0000','backpack') ; reg 
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F88','0x0000','0x4023BAF4'); reg's container 
wait(1000) 
UO.Grab('900','finditem') 
wait(500) 
Endif 
#mandrake roots 
UO.FindType('0x0F88','0x0000','backpack') ; reg 
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F88','0x0000','0x4023BAF4'); reg's container 
wait(1000) 
UO.Grab('900','finditem') 
wait(500) 
Endif 
#ginseng 
UO.FindType('0x0F88','0x0000','backpack') ; reg 
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F88','0x0000','0x4023BAF4'); reg's container 
wait(1000) 
UO.Grab('900','finditem') 
wait(500) 
Endif 

if UO.count('0x0F0E','0x0998')>110 then 
UO.FindType('0x0F0E','0x0998','backpack') 
UO.setreceivingcontainer('0x4023BAF4') ;serial sunduka s iron 
UO.Grab('0','finditem') 
wait(300) 
endif 


LastTimer=UO.Timer() 
UO.WaitMenu('What','(last)') ; menu 
UO.UseType(0x0F88) ; reg 

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You toss the failed") 
wait(500) 
wend 

UO.UseSkill('Spirit Speak') 
wait(3000) 
endif
wend
end sub