Yoko

Posted: **2006-02-16 07:53:50**

господа мегаотцы-скриптеры, дружно помогаем, пожалуйста ...
значит беда в следующем, ни один из прежде рабочих скриптов сейчас почемуто отказывается делать простые Пойзоны (гонит Лессеры) ...

например:

sub Alchemy(Reagent,MinimumReags,Choice)
while uo.Count('0x0F0E','0x0000')>0 and uo.Count(Reagent)>=MinimumReags
uo.DeleteJournal()
uo.Exec("waitmenu 'What sort of potion do you want to' "+Choice)
uo.UseType(reagent)
while not uo.InJournal('You put') and not uo.InJournal('You toss the failed')
wait(300)
wend
wend
end sub

sub LesserPoison()
alchemy('0x0F88', 1, "'Lesser Poison'")
end sub

sub Poison()
alchemy('0x0F88', 2, "'Poison'")
end sub

в обоих случаях мешает Лессеры.
а ведь раньше делал

P.S. DRW

Posted: **2006-02-16 08:11:05**

Пробуй в таком виде записать:

Code: Select all

sub LesserPoison() 
alchemy('0x0F88', 1, "(1)") 
end sub 

sub Poison() 
alchemy('0x0F88', 2, "(2)") 
end sub 

sub GreaterPoison() 
alchemy('0x0F88', 4, "(3)") 
end sub 

sub DeadlyPoison() 
alchemy('0x0F88', 8, "(4)") 
end sub

Posted: **2006-02-16 08:16:55**

Arsuri, дружище !!! Респект !!!
работает, спасибо ...

Yoko

Алхимия - не делает Пойзоны ....

Алхимия - не делает Пойзоны ....