Poisoning Oskom Free

Hydromarine · Post by **Hydromarine** » 2009-03-16 12:04:37

Проблема следующая. Делает поушены, но не работает поисонинг соответственно в бакпаке скапливается куча бутылок которые приходится перекладывать куда нибудь руками.
Знающих людей прошу помоч разобраться.

sub Poison()
var exit=0,LastTimer

var BottleType='0x0F0E' ## - Òèï áóòûëîê.
var RegType='0x0F88' ## - Òèï ðåãîâ.
var Chest='0x4032A7CA' ## - ID ñóíäóêà.
var dagger='0x402288D1' ## - ID äàããåðà
var TryToPoison=1

while exit<>1
uo.DeleteJournal()

uo.FindType(BottleType,-1,'backpack')
if uo.GetQuantity('finditem')<10 then
uo.FindType(BottleType,'0x0000',Chest)
wait(1000)
uo.Grab('500','finditem')
wait(100)
end if
uo.FindType(RegType,'0x0000','backpack')
if uo.GetQuantity('finditem')<20 then
uo.FindType(RegType,'0x0000',Chest)
wait(1000)
uo.Grab('1000','finditem')
wait(500)
end if
LastTimer=uo.Timer()
uo.WaitMenu('What','(last)')
uo.UseType(RegType)

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
if TryToPoison==1 then
repeat
uo.FindType('0x0F0E','0x0998','my')
if uo.GetQuantity('finditem')>0 then
uo.UseSkill('Poisoning')
uo.WaitTargetObject(dagger,'finditem')
wait(4000)
else
end if
end if
end if
uo.UseSkill('Spirit Speak')
wait(3000)
wend
end sub

Millerbeer · Post by **Millerbeer** » 2009-03-16 15:06:26

Code: Select all

sub Poison() 
var exit=0,LastTimer 

var BottleType='0x0F0E' ## - Òèï áóòûëîê. 
var RegType='0x0F88' ## - Òèï ðåãîâ. 
var Chest='0x4032A7CA' ## - ID ñóíäóêà. 
var dagger='0x402288D1' ## - ID äàããåðà 
var TryToPoison=1 

while exit<>1 
uo.DeleteJournal() 

uo.FindType(BottleType,-1,'backpack') 
if uo.GetQuantity('finditem')<10 then 
uo.FindType(BottleType,'0x0000',Chest) 
wait(1000) 
uo.Grab('500','finditem') 
wait(100) 
end if 
uo.FindType(RegType,'0x0000','backpack') 
if uo.GetQuantity('finditem')<20 then 
uo.FindType(RegType,'0x0000',Chest) 
wait(1000) 
uo.Grab('1000','finditem') 
wait(500) 
end if 
LastTimer=uo.Timer() 
uo.WaitMenu('What','(last)') 
uo.UseType(RegType) 

   while not uo.InJournal('You put') and not uo.InJournal('You toss the failed') 
       wait(500) 
   wend 
   while uo.count('0x0F0E','0x0998') and TryToPoison==1
          uo.findtype('0x0F0E','0x0998','2') 
          uo.WaitTargetObject(dagger,'finditem') 
          uo.UseSkill('Poisoning')
          wait(4000) 
          uo.UseSkill('Spirit Speak') 
          wait(3000)
   wend 
wend 
end sub

Hydromarine · Post by **Hydromarine** » 2009-03-16 15:07:33

Жду впринципе любых предложений дабы избавиться от скопления банок с пойзоном в паке.
Мне совершенно не критична прокачка двух скилов одновременно.

Hydromarine · Post by **Hydromarine** » 2009-03-16 15:18:32

Все равно не хочет он поизонить даггер.
Как еще можно избавиться от бутылок из пака чтобы хватало веса взять еще регов и банок когда они закончатся?

Millerbeer · Post by **Millerbeer** » 2009-03-16 15:22:32

а у тебя серийник даггера правильно указан?
var dagger='0x402288D1'

Hydromarine · Post by **Hydromarine** » 2009-03-16 15:26:16

Millerbeer wrote:а у тебя серийник даггера правильно указан?
var dagger='0x402288D1'

Правильно, только что еще раз перепроверил.
Уже даже не знаю на что и думать....

Millerbeer · Post by **Millerbeer** » 2009-03-16 15:29:19

а галка в инже во вкладке main случайно не включена?
Poisoning: bottle then obj?

Hydromarine · Post by **Hydromarine** » 2009-03-16 15:36:23

Millerbeer wrote:а галка в инже во вкладке main случайно не включена?
Poisoning: bottle then obj?

Стояла галка, каюсь.
Снял все равно не работает.
Он делает бутылки, пак в итоге преполняется он хапает найт и пустые бутылки и все в итоге оказывается на полу под ногами.
Вобщем полный трэш.

Millerbeer · Post by **Millerbeer** » 2009-03-16 15:44:24

а если ручками травить, а не скриптом, как процесс происходит? скрипт заточен под: юзаешь скилл, появляется прицел с вопросом, чего травить, показываешь на предмет, появляется прицел с вопросом, чем травить, показываешь на яд, мож у вас на шарде по другому травится?

Hydromarine · Post by **Hydromarine** » 2009-03-16 15:49:14

Millerbeer wrote:а если ручками травить, а не скриптом, как процесс происходит? скрипт заточен под: юзаешь скилл, появляется прицел с вопросом, чего травить, показываешь на предмет, появляется прицел с вопросом, чем травить, показываешь на яд, мож у вас на шарде по другому травится?

Юзаю скил поизон, появляется таргет просит указать дагер, следом таргет на пузырек.

Millerbeer · Post by **Millerbeer** » 2009-03-16 15:52:10

а сообщения какие, когда удачно отравил и когда неудачно?

Hydromarine · Post by **Hydromarine** » 2009-03-16 15:55:13

You fail to apply ......
You apply the poison.

Millerbeer · Post by **Millerbeer** » 2009-03-16 16:04:36

Code: Select all

sub Poison() 
var exit=0,LastTimer 

var BottleType='0x0F0E' ## - Òèï áóòûëîê. 
var RegType='0x0F88' ## - Òèï ðåãîâ. 
var Chest='0x4032A7CA' ## - ID ñóíäóêà. 
var dagger='0x402288D1' ## - ID äàããåðà 
var TryToPoison=1 

while exit<>1 
uo.DeleteJournal() 

uo.FindType(BottleType,-1,'backpack') 
if uo.GetQuantity('finditem')<10 then 
uo.FindType(BottleType,'0x0000',Chest) 
wait(1000) 
uo.Grab('500','finditem') 
wait(100) 
end if 
uo.FindType(RegType,'0x0000','backpack') 
if uo.GetQuantity('finditem')<20 then 
uo.FindType(RegType,'0x0000',Chest) 
wait(1000) 
uo.Grab('1000','finditem') 
wait(500) 
end if 
LastTimer=uo.Timer() 
uo.WaitMenu('What','(last)') 
uo.UseType(RegType) 

   while not uo.InJournal('You put') and not uo.InJournal('You toss the failed') 
       wait(500) 
   wend 
   while uo.count('0x0F0E','0x0998') and TryToPoison==1 
          uo.deletejournal()
          uo.findtype('0x0F0E','0x0998','2') 
          uo.WaitTargetObject(dagger,'finditem') 
          uo.UseSkill('Poisoning') 
                repeat
                    wait(300)
                until uo.injournal('You fail|You apply')
   wend 
wend 
end sub

Millerbeer · Post by **Millerbeer** » 2009-03-16 16:06:40

должон травить, сам точно так же травил, на крайняк перезапустить инжу, ибо часто бывает, в скрипте вылетает ошибка, её исправляешь, запускаешь скрипт по новой, а ошибка остаётся, только перезапуск инжи помогает

Hydromarine · Post by **Hydromarine** » 2009-03-16 16:13:39

Тоже самое.
А есть какой нибудь вариант прокачки алхимии чтобы избежать засорения пака?

Millerbeer · Post by **Millerbeer** » 2009-03-16 16:21:01

а что за инжа, какая версия?

Hydromarine · Post by **Hydromarine** » 2009-03-16 16:21:28

Millerbeer wrote:должон травить, сам точно так же травил, на крайняк перезапустить инжу, ибо часто бывает, в скрипте вылетает ошибка, её исправляешь, запускаешь скрипт по новой, а ошибка остаётся, только перезапуск инжи помогает

Я не могу понять на каком моменте он вобще должен начинать поизонить....

Hydromarine · Post by **Hydromarine** » 2009-03-16 16:22:25

Millerbeer wrote:а что за инжа, какая версия?

505.18

Millerbeer · Post by **Millerbeer** » 2009-03-16 16:25:12

мож из-за этого, у меня 702.11, больше не представляю, почему не травит, а как ты ещё алхимию прокачаешь, тока зелья смешивать

Hydromarine · Post by **Hydromarine** » 2009-03-16 16:26:05

Millerbeer wrote:мож из-за этого, у меня 702.11, больше не представляю, почему не травит, а как ты ещё алхимию прокачаешь, тока зелья смешивать

а откуда слить твою версию можно не подскажешь?