Yoko

Posted: **2006-05-26 00:34:54**

Ребята помогите,если есть у кого нить скрипт,который делает армс лорэ на арм,если новый кидает в одну сумку,если нет в другую.

Posted: **2006-05-26 00:40:23**

скрипт на 3 строчки... сам попробуй напиши :wink:

Posted: **2006-05-26 00:41:54**

попробывал

Хня получилась

Не запускается даже!

Posted: **2006-05-26 11:07:15**

Напиши какие месаги и т.д. выложу.

Posted: **2006-05-26 11:15:56**

Code: Select all

sub rasklad()
  var arm=' type of armor '
  var pack1=' ID of pack where are full repeared armors '
  var pack2=' ID of pack where are badly damaged armors '
  var sunduk=' ID of pack-where are all arms '
  var msg1=' msg of full repeared arms '
  var msg2=' msg of badly demaged armors '
  var k
  uo.FindType(arm,'-1',sunduk)
  while uo.FindCount()
    uo.FindType(arm,'-1',sunduk)   
    uo.WaitTargetObject('finditem')
    uo.UseSkill('Arms Lore')
    k = 0
    uo.DeleteJournal()
    repeat
      wait(100) 
      k = k + 1
    until uo.InJournal(msg1) or uo.InJournal(msg2) or k(>50)
    if uo.InJournal(msg1) then
      uo.MoveItem('finditem','-1',pack1)
      wait(1000)
    end if
    if uo.InJournal(msg2) then
      uo.MoveItem('finditem','-1',pack2)
      wait(1000)
    end if   
  wend
end sub

Писал в окне ответа.Не проверял, посмотри .

Posted: **2006-05-27 16:46:20**

until uo.InJournal(msg1) or uo.InJournal(msg2) or k(>50)

в этой строке ошибку выдает!

Posted: **2006-05-27 16:54:07**

ilove_skazi wrote:until uo.InJournal(msg1) or uo.InJournal(msg2) or k(>50)

в этой строке ошибку выдает!

либо ты мсг неправильно прописал либо k > 50 должен быть так

Posted: **2006-05-27 17:13:19**

Code: Select all

sub unload()
  var n
  var pack1=' ID of pack where are full repeared armors '
  var pack2=' ID of pack where are badly damaged armors '
  var sunduk=' ID of pack-where are all arms '
  var msg=' msg of full repeared arms '
Dim arm[7]
arm[1] = '0x1412' #helm
arm[2] = '0x1413' #gorget
arm[3] = '0x1410' #arms
arm[4] = '0x1414' #gauntlets
arm[5] = '0x1415' #platemail
arm[6] = '0x1411' #legs
arm[7] = '0x1B76' #heater

For n=1 To 7
  repeat
    uo.FindType(arm[n],'-1',sunduk)
    if uo.findcount() then
    uo.deletejournal()
    uo.WaitTargetObject('finditem')
    uo.UseSkill('Arms Lore')
    if uo.InJournal(msg) then
      uo.MoveItem('finditem','-1',pack1)
      wait(1000)
      else
      uo.MoveItem('finditem','-1',pack2)
      wait(1000)
     until uo.findcount()==0
      next
    end if   
   end if
end sub

пробуй...

Posted: **2006-05-27 17:27:26**

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

Posted: **2006-05-27 17:32:06**

ilove_skazi wrote:Можешь добавить, чтоб проверяллось не по месаге о состоянии арма.... а по цыфре дефенса выдаваемой арм лором.... т.е. там пишется сначало уровень дефенса арма, а потом ток фулл репеер или велл вронг и тд!

зделай пару армс лоре и напишы ,showjournal потом сюда копируй

Posted: **2006-05-27 17:48:38**

когда пишу showjournal просит линию и номер:)

Posted: **2006-05-27 17:55:00**

------Journal [10]------
What would you like to evaluate?
Defense [42].This item is a bit worn. It is not repairable.
What would you like to evaluate?
Defense [56].This item is a bit worn. It is not repairable.
Select Target
Targeting Cancelled
Select Target

написал showjournal all

Posted: **2006-05-27 17:57:35**

просто пропишы var msg='fuly repair' и все

Posted: **2006-05-27 18:05:54**

Мне почти новые тож надо оставлять.....Если новый арм дает 23 арма, то до 20 арма можно оставлять вещь!

What would you like to evaluate?
You must wait to perform another action
Defense [42].This item is a bit worn. It is not repairable.
What would you like to evaluate?
Defense [45].This item is a bit worn. It is not repairable.
What would you like to evaluate?
You must wait to perform another action
Defense [53].This item is a bit worn. It is not repairable.
What would you like to evaluate?
Defense [57].This item is in full repair. It is not repairable.
What would you like to evaluate?
Defense [39].This item is a bit worn. It is not repairable.
What would you like to evaluate?
Defense [29].This item is a bit worn. It is not repairable.
What would you like to evaluate?
Defense [23].This item is well worn. It is not repairable.
What would you like to evaluate?
Defense [42].This item is a bit worn. It is not repairable.
What would you like to evaluate?
Defense [56].This item is a bit worn. It is not repairable.
Select Target

Posted: **2006-05-27 18:06:47**

Defense [56] это не реальный дефенс

У этого 56 реальный девесн 22

Posted: **2006-05-27 18:10:12**

Code: Select all

var msg='This item is in full repair'

Posted: **2006-05-27 18:24:04**

Блин.....

Мне надо в сумку отклыдвать не только полностью новые арморы, но и чуть-чуть побитые.... а средне побитые и сильно побитые в другую!

Posted: **2006-05-27 18:29:02**

Тогда тут надо сообщения обрабатывать... Удачи =)

Posted: **2006-05-27 18:29:47**

Code: Select all

var msg='full repair|bit worn'

Posted: **2006-05-27 19:33:23**

Бит ворн идет от армора по котрому 10 раз с меча ударили до велл ворна... а велл ворн уже не дает почти армора!

Yoko

Проверка армора и раскладка

Проверка армора и раскладка