Yoko :: помогите разобраться

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

помогите разобраться http://forum.yoko.com.ua/viewtopic.php?f=3&t=3154	Page 1 of 1

Author:

Stranger[BV] [ 2005-02-20 02:18:09 ]

Post subject:

помогите разобраться

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

Code:

sub arrowgrab()
               Dim Item[9]
   Item[0]='0x0E79' ;Arrows
   Item[1]='0x0EED' ;Gold
   Item[2]='0x0F7B' ;bm
   Item[3]='0x0F7A' ; BP
   Item[4]='0x0F90' ;deadwood
   Item[5]='0x0F7E' ;bones
   Item[6]='0x0F87' ;Eyes of newt
   Item[7]='0x1BDD' ;Logs
   Item[8]='0x1BFB' ;?bolts 
   Item[9]='0x0F8E' ; ??????? ???????
Var i
   for i=0 to 9
      if Item[i]<>'' then
         uo.Findtype(Item[i],-1,ground)
         if uo.GetQuantity('finditem') then
            uo.MoveItem('finditem')
            CheckLag()
            wait(700)
         endif
      endif
end sub

Author:

Goggy [ 2005-02-20 03:10:45 ]

Post subject:

Code:

sub arrowgrab() 
               Dim Item[9] 
   Item[0]='0x0E79' ;Arrows 
   Item[1]='0x0EED' ;Gold 
   Item[2]='0x0F7B' ;bm 
   Item[3]='0x0F7A' ; BP 
   Item[4]='0x0F90' ;deadwood 
   Item[5]='0x0F7E' ;bones 
   Item[6]='0x0F87' ;Eyes of newt 
   Item[7]='0x1BDD' ;Logs 
   Item[8]='0x1BFB' ;?bolts 
   Item[9]='0x0F8E' ; ??????? ??????? 
Var i 
   for i=0 to 9 
      if Item[i]<>'' then 
         uo.Findtype(Item[i],-1,'ground') 
         if uo.GetQuantity('finditem') then 
            uo.grab('all','finditem') 
            CheckLag() 
            wait(700) 
         endif 
      endif 
end sub

Попробуй так

Author:	Stranger[BV] [ 2005-02-23 04:24:33 ]
Post subject:
все уже перепробывал закономерность такая поставил граунд в кавычки подбирает стрелы и только поставил -1 в кавычки бодбирает только золото и все в чем прикол понять не могу

Author:

Sfagnum [ 2005-02-23 09:13:38 ]

Post subject:

Re: помогите разобраться

Stranger[BV] wrote:

Code:

sub arrowgrab()
               Dim Item[10]
   Item[0]='0x0E79' ;Arrows
   Item[1]='0x0EED' ;Gold
   Item[2]='0x0F7B' ;bm
   Item[3]='0x0F7A' ; BP
   Item[4]='0x0F90' ;deadwood
   Item[5]='0x0F7E' ;bones
   Item[6]='0x0F87' ;Eyes of newt
   Item[7]='0x1BDD' ;Logs
   Item[8]='0x1BFB' ;?bolts 
   Item[9]='0x0F8E' ; ??????? ???????
Var i
   for i=0 to 9
      uo.Findtype(Item[i],'0x0000','ground')
      if uo.FindCount()>0 then
         uo.MoveItem('finditem','-1','backpack')
         CheckLag()
         wait(700)
      end if
   next
end sub

пробуй

Author:	Goggy [ 2005-02-23 17:24:50 ]
Post subject:
гыы сто пудов и как я незаметил.... ведь самая распространённая ошибка ламера во всех языках

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/