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

Готовка тотлов
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2215
Page 1 of 1

Author:  zarg [ 2004-12-11 09:42:30 ]
Post subject:  Готовка тотлов

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

Author:  zarg [ 2004-12-14 13:47:55 ]
Post subject: 

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

Author:  Bloodmoon [ 2004-12-14 13:55:25 ]
Post subject: 

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

Author:  maximka4 [ 2004-12-15 21:36:12 ]
Post subject:  Re: Готовка тотлов

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


поменяй type и id

Code:
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

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/