[Cana]

Code:

#lpc 1000

set %autotrashtypes WHL_GYL_PXL_DUL_BUL_UUL_NTL_XTL_RUL_QUL_VRD_QOH_AVF_ZUF_YTL_OIK_PUL_EUL
set %trashcontainer PAMASMD
set %lootcontainer BBZENSD

set %lastcont #BACKPACKID

while #TRUE
{
  if ( #CONTTYPE = IKF ) ; Chest container gump (treasure chest, bank, etc.)
  {
    set %chest #CONTID
findmore:
    finditem %autotrashtypes C_ , %chest
    if #FINDCNT > 0
    {
      Exevent Drag #findid #findstack
      Exevent Dropc %trashcontainer
      goto findmore
    }
    finditem * C_ , %chest
    if #FINDCNT > 0
    {
      Exevent Drag #findid #findstack
      Exevent Dropc %lootcontainer
    }
  }
}

%trashcontainer is ID of your mini trash can and %lootcontainer is ID of the container where you'd like to place all the loot. Whatever you define as trash type it'll trash and it'll place the rest in the container you specified. Be aware, that looting reveals you and depending on treasure level there's a chance to spawn monsters. If you use this script, you might be bum ****ed before you are done looting.