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

Алхимия
http://forum.yoko.com.ua/viewtopic.php?f=20&t=1867		 Page 1 of 1
Author:  Liga [ 2004-11-06 14:39:07 ]
Post subject:  Алхимия
Вот скачал тут скрипт на алхимию, короче мне нада что бы он делал обычные пойзоны, а он в зависимости от скила лепит поушены.
Я вроде вместо Last вставлял Poison, а он вместо этого лессеры делал, короче помогите люди

;Скрипт на Alchemy/Poison --> Dagger//SpiritSpeak

sub AlchemyPoison()
VAR Exit=0, LastTimer, TryToPoison
while Exit<>1
UO.DeleteJournal()

UO.FindType('0x0F0E',-1,'backpack') ; Бутылки
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0F0E','0x0000','0x401AA1B6') ; Контейнер с бутылками (bottle, container)
wait(1000)
UO.Grab('500','finditem')
wait(100)
Endif
UO.FindType('0x0F88','0x0000','backpack') ; Найт шейд
If UO.GetQuantity('finditem')<20 then
UO.FindType('0x0F88','0x0000','0x401AA1B6') ; Найт шейд , Контейнер
wait(1000)
UO.Grab('1000','finditem')
wait(500)
Endif
LastTimer=UO.Timer()
UO.WaitMenu('What','(last)') ; Меню
UO.UseType(0x0F88) ; Найт Шейд

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
TryToPoison=1
repeat
UO.FindType('0x0F0E','0x0998','my')
If UO.GetQuantity('finditem')>0 then
UO.UseSkill('Poisoning')
UO.WaitTargetObject('0x400A31F7','finditem') ; Даггер
; UO.UseSkill('Poisoning')
wait(4000)
Else
TryToPoison=0
Endif
EndIf
UO.UseSkill('Spirit Speak')
wait(3000)
wend
end sub
Author:  AGRS [ 2004-11-06 14:41:18 ]
Post subject: 
UO.WaitMenu('What','(last)') ; Меню
Ласт как правило и есть самое лучшее что ты можешь сделать

У нас на ДРВ это будет выглядеть как UO.WaitMenu('What','(2)')
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/