Page 1 of 1

Выложить предмет из пака в сумку

Posted: 2014-01-31 10:20:33
by TBAPb
Подскажите, в чем тут ошибка?
Этот скрипт выкидывает стрелы из backpack в мешок, лежащий на полу.
При запуске скрипта, стрелы он перекладывает, но выдает ошибку в 9 строке.

Code: Select all

sub strela() 
   VAR i,Exit  
   DIM Loot[1]
      Loot[0]=0x0F3F 
      UO.SetReceivingContainer('0x40448BBC') ; ID Meshka na polu 
     For i=0 to 1 
      Exit=0 
      repeat 
       UO.FindType(Loot[i],-1,'backpack')            
        if UO.GetQuantity('finditem') then 
         UO.Grab('0','finditem') 
          wait(650) 
          Else 
         Exit=1 
        endif 
      until Exit==1 OR uo.injournal("loot") 
   Next  
UO.UnSetReceivingContainer() 
end sub

Re: Выложить предмет из пака в сумку

Posted: 2014-02-06 01:09:01
by tylllkah
TBAPb wrote:Подскажите, в чем тут ошибка?
Этот скрипт выкидывает стрелы из backpack в мешок, лежащий на полу.
При запуске скрипта, стрелы он перекладывает, но выдает ошибку в 9 строке.

Code: Select all

sub strela() 
   VAR i,Exit  
   DIM Loot[1]
      Loot[0]=0x0F3F 
      UO.SetReceivingContainer('0x40448BBC') ; ID Meshka na polu 
     For i=0 to 1 
      Exit=0 
      repeat 
       UO.FindType(Loot[i],-1,'backpack')            
        if UO.GetQuantity('finditem') then 
         UO.Grab('0','finditem') 
          wait(650) 
          Else 
         Exit=1 
        endif 
      until Exit==1 OR uo.injournal("loot") 
   Next  
UO.UnSetReceivingContainer() 
end sub
Пробуй так...

Code: Select all

sub strela() 
   VAR i,Exit  
   VAR Loot='0x0F3F' 
      UO.SetReceivingContainer('0x40448BBC') ; ID Meshka na polu  
      Exit=0 
      repeat 
       UO.FindType(Loot,-1,'backpack')            
        if UO.GetQuantity('finditem') then 
         UO.Grab('0','finditem') 
          wait(650) 
          Else 
         Exit=1 
        endif 
      until Exit==1 OR uo.injournal("loot") 
   Next  
UO.UnSetReceivingContainer() 
end sub