Poisoning для дрв

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
_ALF_
Posts: 24
Joined: 2005-04-16 17:40:14

Poisoning для дрв

Post by _ALF_ »

А нетли у кого скрипта для прокачи поизона на дрв то есть в сундуке лежать нс и бутылки он делает lesser poison и наазывает на даггер.
_ALF_
Posts: 24
Joined: 2005-04-16 17:40:14

Post by _ALF_ »

Впринците вот один похожего действия но он крафтит максимально возможный в соответствии со скилом алхимия а так как алхимию я прокачал он крафтит дедли поизон который я не могу назамать на даггер. Помогите плиз чтоб делал лесерр поизоны

Code: Select all

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','0x40145721') ; Контейнер с бутылками (bottle, container) 
wait(1000) 
uo.Grab('500','finditem') 
wait(100) 
end if 
uo.FindType('0x0F88','0x0000','backpack') ; Найт шейд 
if uo.GetQuantity('finditem')<20 then 
uo.FindType('0x0F88','0x0000','0x4015ABDF') ; Найт шейд , Контейнер 
wait(1000) 
uo.Grab('1000','finditem') 
wait(500) 
end if 
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('0x4018A3B3','finditem') ; Даггер 
wait(4000) 
else 
TryToPoison=0 
end if 
end if 
uo.UseSkill('Spirit Speak') 
wait(3000) 
wend 
end sub 
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

_ALF_ wrote:Впринците вот один похожего действия но он крафтит максимально возможный в соответствии со скилом алхимия а так как алхимию я прокачал он крафтит дедли поизон который я не могу назамать на даггер. Помогите плиз чтоб делал лесерр поизоны

Code: Select all

uo.WaitMenu('What','lesser') ; Меню 
так пробуй.
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

Sfagnum wrote:
_ALF_ wrote:Впринците вот один похожего действия но он крафтит максимально возможный в соответствии со скилом алхимия а так как алхимию я прокачал он крафтит дедли поизон который я не могу назамать на даггер. Помогите плиз чтоб делал лесерр поизоны

Code: Select all

uo.WaitMenu('What','lesser') ; Меню 
так пробуй.
или так uo.WaitMenu('What','(1)')
Сделал дело - флуди смело !!!
Post Reply