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