Forum Gildii Wielkiego Bractwa Sosarii (WBS)

display ok Wskaz pojemnik na produkty
set #TARGCURS 1
repeat
until #TARGCURS = 0
set %pojemnik #LTARGETID

repeat
      {
      finditem * C_ , #BACKPACKID
      ignoreitem #FINDID
      }
until #FINDID = x

petla:
finditem * C_ , #BACKPACKID
if #FINDID <> x
      {
      exevent drag #FINDID #FINDSTACK
      exevent dropc %pojemnik
      }
goto petla