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

Помогите с перекладкой
http://forum.yoko.com.ua/viewtopic.php?f=20&t=5600		 Page 1 of 1
Author:  PIKACHU_Bayt [ 2006-02-09 14:21:36 ]
Post subject:  Помогите с перекладкой
Я конешно всё понимаю. Что постить много не желательно. Но я смарел скрипт на перекладку, там не то что мне надо. мне надо чтобы он перебрасывал из мешка "regi1" в "regi2" реги до 100.
Зарание спсибо :) :) :D :)
Author:  Grin [ 2006-02-09 14:41:09 ]
Post subject: 
Code:
sub movereg()
   uo.Print('Откуда брать реги?')
   uo.AddObject('srcbag')
   while uo.Targeting()
      wait(100)
   wend
   uo.Print('Куда ложить реги?')
   uo.AddObject('desbag')
   while uo.Targeting()
      wait(100)
   wend
   for var i = 3960 to 3985
      uo.FindType(i, -1, 'srcbag')
      if uo.FindCount() then
         uo.moveitem('finditem', 100, 'desbag')
         while uo.ContainerOf('finditem') <> uo.GetSerial('desbag')
            wait(100)
         wend
      end if
   next
end sub
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/