Page 1 of 1

skill poisoning

Posted: 2006-11-07 02:43:39
by flix-f
Ребят пожалуйсто посмотрите скриптик, писал не профессионально, но работает. Суть такая: Складываются рядом с чаром пойзон бутылки (присутствуют кусочек Edred-а ), в паке режик, берет с пола по одной бутылке, юзает скилл пойзонинг таргет на предмет таргет на бутылку.
Вот что получилось:

sub poison()
var weap = '0x400196A1'
var k
st:
uo.DeleteJournal()
UO.Exec('set finddistance 2')
UO.FindType('0x0F0E','-1','1')
If UO.FindCount() == 0 Then
UO.Print("Zelenki, net dage na polu! script terminated")
return
Endif
UO.Grab('1','finditem')
wait(2000)
uo.useskill('Poisoning')
uo.waittargetobject('0x400196A1','finditem')
k = 0
while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail') AND ( k < 30 )
k = k + 1
wait(500)
wend
goto st
end sub


Скрипт работает, но едиственный минус иногда хватает бутылку, не юзает её и хватает следущую. получается скопление в паке.
Буду благодарен если кто поможет отшлефовать скрипт.

Posted: 2006-11-07 06:29:01
by Scripts Writer
Вопервых ловушка не правильно стоит, что иногда не позволяет травить т.к. меню не найдено.

2После того как отравил или еще какого то промежутка действий, введи проверку на кол-во бутылок поизона в паке и лишнее выкладывай

Posted: 2006-11-07 08:36:29
by GimFlex
вот что-то подправил тести

Code: Select all

sub poison() 
var weap = '0x400196A1'
var k
uo.set('finddistance','2')
while not uo.dead()
 uo.DeleteJournal()
 UO.FindType('0x0F0E','-1','ground')
 If UO.FindCount() == 0 Then
  while not uo.dead()
   wait(5000)
   uo.print("pora zapravitsya")
  wend
 Endif
 uo.moveitem('finditem','1','backpack')
 wait(700)
 uo.waittargetobject(weap,'finditem')
 uo.useskill('Poisoning')
 k = 0
 while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 )
  k = k + 1
  wait(500)
 wend
 UO.FindType('0x0F0E','-1','backpack')
 if UO.GetQuantity('finditem')>5 then
  uo.moveitem('finditem','all','ground')
  wait(700)
 endif
wend
end sub

Posted: 2006-11-07 14:15:36
by Scripts Writer
Question wrote:вот что-то подправил тести

Code: Select all

sub poison() 
var weap = '0x400196A1'
var k
uo.set('finddistance','2')
while not uo.dead()
 uo.DeleteJournal()
 UO.FindType('0x0F0E','-1','ground')
 If UO.FindCount() == 0 Then
  while not uo.dead()
   wait(5000)
   uo.print("pora zapravitsya")
  wend
 Endif
 uo.moveitem('finditem','1','backpack')
 wait(700)
 uo.waittargetobject(weap,'finditem')
 uo.useskill('Poisoning')
 k = 0
 while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 )
  k = k + 1
  wait(500)
 wend
 UO.FindType('0x0F0E','-1','backpack')
 if uo.findcount()>5 then
  uo.moveitem('finditem','all','ground')
  wait(700)
 endif
wend
end sub


Не умеешь - не берись.

Code: Select all

 if uo.findcount()>5 then

Что это такое?

Он у тебя никогда не выкинет эти бутылки, потому что они будут все складываться в одну стопку . 1 < 5 !

2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 


3Это зачем?

Code: Select all

  while not uo.dead() 
   wait(5000)
   uo.print("pora zapravitsya")
  wend

Куда разумнее закрыть окно ультимы, чем тратить трафик и оставаться в риске быть убитым.

Posted: 2006-11-07 14:26:16
by Edred
You Must Die wrote:2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 



Кроме того, что тут пропущена одна закрывающая скобка - никакой другой "шедевральности" лично я не вижу. Может, пояснишь? Для меня так - стандартная динамическая пауза. Пока в журнале НЕТ сообщения об успехе И НЕТ сообщения о физле И счетчик меньше предела - стоять на паузе.

Posted: 2006-11-07 14:30:22
by GimFlex

Code: Select all

 if uo.findcount()>5 then

Что это такое?

Он у тебя никогда не выкинет эти бутылки, потому что они будут все складываться в одну стопку . 1 < 5 !

2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 


3Это зачем?

Code: Select all

  while not uo.dead() 
   wait(5000)
   uo.print("pora zapravitsya")
  wend

Куда разумнее закрыть окно ультимы, чем тратить трафик и оставаться в риске быть убитым.


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

Posted: 2006-11-07 18:22:26
by Scripts Writer
Edred wrote:
You Must Die wrote:2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 



Кроме того, что тут пропущена одна закрывающая скобка - никакой другой "шедевральности" лично я не вижу. Может, пояснишь? Для меня так - стандартная динамическая пауза. Пока в журнале НЕТ сообщения об успехе И НЕТ сообщения о физле И счетчик меньше предела - стоять на паузе.


Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.

Posted: 2006-11-07 18:24:22
by Scripts Writer
Question wrote:

Code: Select all

 if uo.findcount()>5 then

Что это такое?

Он у тебя никогда не выкинет эти бутылки, потому что они будут все складываться в одну стопку . 1 < 5 !

2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 


3Это зачем?

Code: Select all

  while not uo.dead() 
   wait(5000)
   uo.print("pora zapravitsya")
  wend

Куда разумнее закрыть окно ультимы, чем тратить трафик и оставаться в риске быть убитым.


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


ты опять судишь по себе и своему шарду. Вот на дрв никогда бутылки не раскидывались и этот скрипт никогда бы не выбросил их.

анлим решает. Тебе он решает- не спорю, но другому человеку было бы удобнее закрыть окно ультимы чем такую чушь видеть у себя на экране. Куда разумнее было переключиться на другой скрипт(тот же детект или спирит)

Posted: 2006-11-07 18:49:57
by GimFlex
You Must Die wrote:
Edred wrote:
You Must Die wrote:2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 



Кроме того, что тут пропущена одна закрывающая скобка - никакой другой "шедевральности" лично я не вижу. Может, пояснишь? Для меня так - стандартная динамическая пауза. Пока в журнале НЕТ сообщения об успехе И НЕТ сообщения о физле И счетчик меньше предела - стоять на паузе.


Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


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

Posted: 2006-11-07 19:23:06
by Scripts Writer
Question wrote:
You Must Die wrote:
Edred wrote:
You Must Die wrote:2Еще один твой шедевр. Парень не поймёт:

Code: Select all

while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 ) 



Кроме того, что тут пропущена одна закрывающая скобка - никакой другой "шедевральности" лично я не вижу. Может, пояснишь? Для меня так - стандартная динамическая пауза. Пока в журнале НЕТ сообщения об успехе И НЕТ сообщения о физле И счетчик меньше предела - стоять на паузе.


Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


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


Молчи. За умного сойдёшь.

Posted: 2006-11-07 20:32:03
by flix-f
Question wrote:вот что-то подправил тести

Code: Select all

sub poison() 
var weap = '0x400196A1'
var k
uo.set('finddistance','2')
while not uo.dead()
 uo.DeleteJournal()
 UO.FindType('0x0F0E','-1','ground')
 If UO.FindCount() == 0 Then
  while not uo.dead()
   wait(5000)
   uo.print("pora zapravitsya")
  wend
 Endif
 uo.moveitem('finditem','1','backpack')
 wait(700)
 uo.waittargetobject(weap,'finditem')
 uo.useskill('Poisoning')
 k = 0
 while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 )
  k = k + 1
  wait(500)
 wend
 UO.FindType('0x0F0E','-1','backpack')
 if UO.GetQuantity('finditem')>5 then
  uo.moveitem('finditem','all','ground')
  wait(700)
 endif
wend
end sub

Да!!!! точно спасибо=)
Только можно немножко по другому не uo.moveitem , а uo.drop или uo.drophere

Posted: 2006-11-07 21:45:35
by GimFlex
flix-f wrote:
Question wrote:вот что-то подправил тести

Code: Select all

sub poison() 
var weap = '0x400196A1'
var k
uo.set('finddistance','2')
while not uo.dead()
 uo.DeleteJournal()
 UO.FindType('0x0F0E','-1','ground')
 If UO.FindCount() == 0 Then
  while not uo.dead()
   wait(5000)
   uo.print("pora zapravitsya")
  wend
 Endif
 uo.moveitem('finditem','1','backpack')
 wait(700)
 uo.waittargetobject(weap,'finditem')
 uo.useskill('Poisoning')
 k = 0
 while NOT UO.InJournal('You apply') AND NOT UO.InJournal('You fail' AND ( k < 30 )
  k = k + 1
  wait(500)
 wend
 UO.FindType('0x0F0E','-1','backpack')
 if UO.GetQuantity('finditem')>5 then
  uo.moveitem('finditem','all','ground')
  wait(700)
 endif
wend
end sub

Да!!!! точно спасибо=)
Только можно немножко по другому не uo.moveitem , а uo.drop или uo.drophere


извени не знаю как юзать эти команды :oops:

Posted: 2006-11-07 21:47:18
by GimFlex
You Must Die wrote:
Молчи. За умного сойдёшь.


извени заразился флудом еще 4 года назад так что не дождешься :wink:

Posted: 2006-11-07 23:16:23
by Edred
You Must Die wrote:Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


Знаешь, когда меня в конец достают и я пишу какой-нибудь скрипт на форуме, я его никогда не тесчу и подобных косяков, типа пропущенной скобки и т. д. в них всегда парочка найдется. И фиг с ним - должен же проситель хоть палец о палец ударить, не все халява.

Posted: 2006-11-09 19:22:49
by DerMeister =)
Edred wrote:
You Must Die wrote:Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


Знаешь, когда меня в конец достают и я пишу какой-нибудь скрипт на форуме, я его никогда не тесчу и подобных косяков, типа пропущенной скобки и т. д. в них всегда парочка найдется. И фиг с ним - должен же проситель хоть палец о палец ударить, не все халява.


Ны дык понятно. А он (квест) всегда приписывает, что типо "100% рабочий", "я на нём уже неделю капаю", а на самом деле там ошибок полно. Тут прям пословица: "поспешишь - людей насмешишиь"

Posted: 2006-11-09 20:17:25
by Scripts Writer
DerMeister =) wrote:
Edred wrote:
You Must Die wrote:Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


Знаешь, когда меня в конец достают и я пишу какой-нибудь скрипт на форуме, я его никогда не тесчу и подобных косяков, типа пропущенной скобки и т. д. в них всегда парочка найдется. И фиг с ним - должен же проситель хоть палец о палец ударить, не все халява.


Ны дык понятно. А он (квест) всегда приписывает, что типо "100% рабочий", "я на нём уже неделю капаю", а на самом деле там ошибок полно. Тут прям пословица: "поспешишь - людей насмешишиь"


Скорее 7 раз отмерь

Posted: 2006-11-10 13:07:09
by GimFlex
DerMeister =) wrote:
Edred wrote:
You Must Die wrote:Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


Знаешь, когда меня в конец достают и я пишу какой-нибудь скрипт на форуме, я его никогда не тесчу и подобных косяков, типа пропущенной скобки и т. д. в них всегда парочка найдется. И фиг с ним - должен же проситель хоть палец о палец ударить, не все халява.


Ны дык понятно. А он (квест) всегда приписывает, что типо "100% рабочий", "я на нём уже неделю капаю", а на самом деле там ошибок полно. Тут прям пословица: "поспешишь - людей насмешишиь"


прмер в студию :roll:

Posted: 2006-11-10 16:28:56
by Scripts Writer
Question_GimFlex wrote:
DerMeister =) wrote:
Edred wrote:
You Must Die wrote:Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


Знаешь, когда меня в конец достают и я пишу какой-нибудь скрипт на форуме, я его никогда не тесчу и подобных косяков, типа пропущенной скобки и т. д. в них всегда парочка найдется. И фиг с ним - должен же проситель хоть палец о палец ударить, не все халява.


Ны дык понятно. А он (квест) всегда приписывает, что типо "100% рабочий", "я на нём уже неделю капаю", а на самом деле там ошибок полно. Тут прям пословица: "поспешишь - людей насмешишиь"


прмер в студию :roll:


5-6 тем выше бери.

Чё там было? Скупка к примеру. 20кЛогС вообще молчу.

Posted: 2006-11-10 16:52:12
by GimFlex
You Must Die wrote:
Question_GimFlex wrote:
DerMeister =) wrote:
Edred wrote:
You Must Die wrote:Понимаешь- прежде чем постить надо в лучшем случае протестить, в худшем случае пробежаться глазами. Ни того ни другова + 2 касяка.


Знаешь, когда меня в конец достают и я пишу какой-нибудь скрипт на форуме, я его никогда не тесчу и подобных косяков, типа пропущенной скобки и т. д. в них всегда парочка найдется. И фиг с ним - должен же проситель хоть палец о палец ударить, не все халява.


Ны дык понятно. А он (квест) всегда приписывает, что типо "100% рабочий", "я на нём уже неделю капаю", а на самом деле там ошибок полно. Тут прям пословица: "поспешишь - людей насмешишиь"


прмер в студию :roll:


5-6 тем выше бери.

Чё там было? Скупка к примеру. 20кЛогС вообще молчу.


:roll: лол да и только

Posted: 2006-11-10 17:12:23
by Scripts Writer
Над собой же смеёшься.