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

Резка рыбы
http://forum.yoko.com.ua/viewtopic.php?f=17&t=14493		 Page 1 of 1
Author:  felkon [ 2009-03-02 20:50:17 ]
Post subject:  Резка рыбы
На форуме не нашел...
От скрипта нужно малое...
1. в паке есть рыбы разная (4 или 5 видов)
2. в руке есть даггер
3. скрит ищет тип рыбки и режет его
4. потом нарезанное скидывает в сундук

если не сложно... будте добры...
Author:  Kynep [ 2009-03-02 22:11:11 ]
Post subject:  Re: Резка рыбы
felkon wrote:
На форуме не нашел...
От скрипта нужно малое...
1. в паке есть рыбы разная (4 или 5 видов)
2. в руке есть даггер
3. скрит ищет тип рыбки и режет его
4. потом нарезанное скидывает в сундук

если не сложно... будте добры...

Code:
sub fish_rezka()
   VAR sunduk = '0x00000000' #ID сундука для стейков
   VAR dagger = '0x00000000' #ID даггера
   VAR i, stake = '0x0000'   #Тип порезаных котлеток

   DIM fish[5]               #Массив типов рыбы
   fish[0] = '0x0000'
   fish[1] = '0x0000'
   fish[2] = '0x0000'
   fish[3] = '0x0000'
   fish[4] = '0x0000'

   for i = 0 to 4
      UO.FindType(fish[i], '-1', 'backpack')
      If UO.FindCount() > 0 then
         repeat
            UO.Print('Режем рыбу типа ' + fish[i])
            UO.WaitTargetObject('finditem')
            UO.UseObject(dagger)
            wait(1000)
            UO.FindType(fish[i], '-1', 'backpack')
         until NOT UO.FindCount()
      endif
   next 
   UO.Print('Порезали, выкладываем')
   UO.FindType(stake, '-1', 'backpack')
   If UO.FindCount() > 0 then
      repeat
         UO.MoveItem('finditem', '-1', sunduk)
         wait(1000)
         UO.FindType(stake, '-1', 'backpack')
      until NOT UO.FindCount()
   endif
   UO.Print('Закончили, выход')
end sub


Пробуй.
Author:  felkon [ 2009-03-03 21:09:28 ]
Post subject: 
спасибо огромное!!! работает.
Author:  Kynep [ 2009-03-03 21:13:56 ]
Post subject: 
felkon wrote:
спасибо огромное!!! работает.

Хорошо, а то писал в окне, даже не запускал :roll: :oops:
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/