filter

p=peripheral.wrap('bottom')

junk = {'Dirt', 'Cobblestone', 'Sand',
'Andesite', 'Diorite', 'Granite', 'Limestone',
 'Marble', 'Gravel'}
process = {'Iron Ore', 'Copper Ore', 'Uranium Ore',
'Aluminum Ore', 'Silver Ore', 'Lead Ore',
'Gold Ore', 'Yellorite Ore', 'Tin Ore'}

function set(list)
   result = {}
   for k,v in pairs(list) do
      result[v] = true
   end
   return result
end

function has(s, e)
   return s[e] ~= nil
end

junk = set(junk)
process = set(process)

function filter()
for i = 1, 27 do
   stack = p.getStackInSlot(i)
   if stack ~= nil then
      name = stack.display_name
      if has(junk, name) then
         p.destroyStack(i)
      elseif has(process, name) then
         p.pushItem('down', i)
      else
         p.pushItem('south', i)
      end
   end
end
end

filter()
while true do
   os.sleep(10)
   filter()
end