I need scp

[The One]

In my box are about 150 Bags, in each are reagents, and i can't find here script for moving reagents from bags to some other bag or chest.
Can somebody help?

[Scripts Writer]

without testing

Code: Select all

sub Sort_Regs()

var Sunduk= #id where are bags
var Sunduk2= #id where to put regs
var bag= #type of bags
var i, bagg

DIM reg[9]

reg[0]= #type of reg
reg[1]= #type of reg
...
reg[8]= #type of reg


uo.FindType(bag,'-1',Sunduk)
while uo.FindCount()
 if uo.FindCount() then
  uo.moveitem('finditem')
  wait(500)
  uo.UseObject('finditem')
  wait(500)
  bagg=uo.GetSerial('finditem')
  for i=0 to 8
    uo.FindType(reg[i],'-1',bagg)
    if uo.FindCount() then
      uo.moveitem('finditem','all',Sunduk2)
      wait(1000)
    end if
    wait(500)
  next
 end if
 uo.FindType(bag,'-1',Sunduk)
wend

end sub

[The One]

thank u it really works!

[Scripts Writer]

ok