Готовка тотлов
Posted: 2004-12-11 09:42:30
У кого нить есть скрит на изготвление тотлов чар берет глаза и пустые бутылки делат тотлы и кладет тотлы обратно в сундук...
Page 1 of 1
Posted: 2004-12-14 13:47:55
Че нету ни у кого?
Posted: 2004-12-14 13:55:25
Возьми из другого раздела "скриптов".и поменяй строчки.По-моему это может каждый 
.
.Re: Готовка тотлов
Posted: 2004-12-15 21:36:12
zarg wrote:У кого нить есть скрит на изготвление тотлов чар берет глаза и пустые бутылки делат тотлы и кладет тотлы обратно в сундук...
поменяй 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