Yoko
http://forum.yoko.com.ua/

Плавка не меньше 10
http://forum.yoko.com.ua/viewtopic.php?f=3&t=13240		 Page 1 of 2
Author:  Shadowdancer [ 2008-02-13 21:03:29 ]
Post subject:  Плавка не меньше 10
Кому не сложно напишите плиз простенькую плавку что бы плавил кучку руды там где 10 и больше, ( всю оставшуюсю плавленую и нет кидал в сундук.)
Author:  Nmy [ 2008-02-13 21:43:07 ]
Post subject: 
Поищи в поиске "smelting" и переделай иго.
Author:  Shadowdancer [ 2008-02-13 22:55:23 ]
Post subject: 
заепался уже переделывать тут мрачные плавки :(
Author:  Grin [ 2008-02-13 22:57:43 ]
Post subject: 
ну чего сложного то?
про бегаешься по всей руде... смотришь ее колво
если больше то двой ной клик и ждешь пока куча исчезнет (можно проверять по кординате предмета)
Author:  Shadowdancer [ 2008-02-13 23:11:27 ]
Post subject: 
дружище эт несложно для тех кто понимает, я разбераюсь чуть но написать немогу. Нельзя быть во всех делах Грандмастером :)))

черкни пожалуйста! можно прям в этом топике :)
http://forum.yoko.com.ua/viewtopic.php?t=13242
Author:  Grin [ 2008-02-13 23:19:52 ]
Post subject: 
как увас плавка происходит?
Author:  Shadowdancer [ 2008-02-13 23:22:17 ]
Post subject: 
Просто стоишь возле форжи 2 раза на руду но нужно что бы не меньше 10 руды было!
Author:  Grin [ 2008-02-13 23:31:36 ]
Post subject: 
Code:
sub SmeltOre()
   
   uo.IgnoreReset()
   uo.FindType('')
   while uo.FindCount()
      if uo.GetQuantity('finditem') > 9 then
         uo.UseObject('finditem')
         while uo.GetX('finditem')
            wait(100)
         wend
      else
         uo.Ignore('finditem')
      end if
      uo.FindType('')
   wend

end sub
Author:  Shadowdancer [ 2008-02-13 23:56:28 ]
Post subject: 
пасиб завтра зделаю тест
Author:  Grin [ 2008-02-13 23:59:30 ]
Post subject: 
не за будь там типы прописать...
+ скрипт не у читывает если ты сфейлишь переплавку
Author:  Shadowdancer [ 2008-02-14 13:12:02 ]
Post subject: 
а что это за строчка ?

sub SmeltIron()
var tmp,i;
uo.IgnoreReset()
uo.FindType('')
Author:  Destruction [ 2008-02-14 13:15:05 ]
Post subject: 
Shadowdancer wrote:
а что это за строчка ?

sub SmeltIron()
var tmp,i;
uo.IgnoreReset()
uo.FindType('')

viewtopic.php?t=805

Хотя бы ФАК прочитать можно было :!:
Author:  Grin [ 2008-02-14 13:18:59 ]
Post subject: 
дурдом какой то;)
Блин... Дест давай какие нибудь умные вопросы уже задавай...
Author:  Shadowdancer [ 2008-02-14 13:39:40 ]
Post subject: 
а можно попроше обьяснить ? :))

пасиб уже сам разобрался :)
Author:  Grin [ 2008-02-14 13:42:23 ]
Post subject: 
зачем?
Author:  Destruction [ 2008-02-14 14:09:46 ]
Post subject: 
Grin wrote:
дурдом какой то;)
Блин... Дест давай какие нибудь умные вопросы уже задавай...

Легко. Сек, найду темку :)
Author:  Shadowdancer [ 2008-02-14 14:11:07 ]
Post subject: 
Жадина :(
Author:  Shadowdancer [ 2008-02-14 23:19:29 ]
Post subject: 
Grin wrote:
Code:
sub SmeltOre()
   
   uo.IgnoreReset()
   uo.FindType('')
   while uo.FindCount()
      if uo.GetQuantity('finditem') > 9 then
         uo.UseObject('finditem')
         while uo.GetX('finditem')
            wait(100)
         wend
      else
         uo.Ignore('finditem')
      end if
      uo.FindType('')
   wend

end sub



А можно зделать если физл то еще раз плавит!?
Author:  Grin [ 2008-02-14 23:56:25 ]
Post subject: 
Люди! будте разумны...
Code:
sub SmeltOre()
  
   var orecount = 0
   
   uo.IgnoreReset()
   uo.FindType('')
   while uo.FindCount()
      orecount = uo.GetQuantity('finditem')
      while orecount > 9
         uo.UseObject('finditem')
         while orecount == uo.GetQuantity('finditem')
            wait(100)
         wend
         orecount = uo.GetQuantity('finditem')
      wend
      if orecount then
         uo.Ignore('finditem')
      end if
      uo.FindType('')
   wend

end sub
Author:  Shadowdancer [ 2008-02-15 14:20:04 ]
Post subject: 
вот у меня скрипт, почему нехочет енд саб ставить ? пишет ошибка ТМР
а без енда он плавит бесконечно!

Code:
sub SmeltIron()
var tmp,i;
  
  var orecount = 0 
    
   uo.IgnoreReset() 
   uo.FindType('0x19B9') 
   while uo.FindCount() 
      orecount = uo.GetQuantity('finditem') 
      while orecount > 9 
         uo.UseObject('finditem') 
         while orecount == uo.GetQuantity('finditem') 
            wait(100) 
         wend 
         orecount = uo.GetQuantity('finditem') 
      wend 
      if orecount then 
         uo.Ignore('finditem') 
      end if 
      uo.FindType('0x19B9') 
wend
Page 1 of 2 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/