Page 1 of 1

Решриешки

Posted: 2004-11-29 21:31:10
by zarg
У кого нить есть скрипт что бы чар брал блек прел например и сто бутылок делал тотал рефрешки и клал что сделал обратно в сундук.... Заранеее благодарен

Posted: 2004-11-30 11:53:12
by drcrazy
Чтобы брал и клал - нету.. есть тока чтобы делал

Re: Решриешки

Posted: 2004-11-30 12:31:20
by Askaneli
zarg wrote:У кого нить есть скрипт что бы чар брал блек прел например и сто бутылок делал тотал рефрешки и клал что сделал обратно в сундук.... Заранеее благодарен
Где-то по моему был универсальный крафт один !!!
Его можно заточить под алхимию если потрудится маленько !!!

Posted: 2004-11-30 15:12:13
by I'm
Если неизменяет память то тамже где был этот крафт была и алхимия :)

Re: Решриешки

Posted: 2004-11-30 15:43:28
by MitAl
zarg wrote:У кого нить есть скрипт что бы чар брал блек прел например и сто бутылок делал тотал рефрешки и клал что сделал обратно в сундук.... Заранеее благодарен
Вот скрипт на стоунскин, надеюсь сможешь выкинуть все ненужное сам...

Code: Select all

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','0x401C7D02') ; empty bottles container 
wait(1000) 
UO.Grab('300','finditem') 
wait(100) 
Endif 

#garlic
UO.FindType('0x0F84','0x0000','backpack') ; reg
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F84','0x0000','0x400AB9F7'); reg's container
wait(1000) 
UO.Grab('600','finditem') 
wait(500) 
Endif 
#mandrake roots
UO.FindType('0x0F86','0x0000','backpack') ; reg
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F86','0x0000','0x400AB9F7'); reg's container
wait(1000) 
UO.Grab('600','finditem') 
wait(500) 
Endif 
#ginseng
UO.FindType('0x0F85','0x0000','backpack') ; reg
If UO.GetQuantity('finditem')<20 then 
UO.FindType('0x0F85','0x0000','0x400AB9F7'); reg's container
wait(1000) 
UO.Grab('600','finditem') 
wait(500) 
Endif 

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


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

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

UO.UseSkill('Spirit Speak') 
wait(3000) 

wend

Posted: 2004-11-30 15:58:08
by zarg
drcrazy wrote:Чтобы брал и клал - нету.. есть тока чтобы делал
ну я это имел ввиду