smelt

local a=8;local b=8;local c={}function selectNext()for d=1,16 do if turtle.getItemCount(d)~=0 then turtle.select(d)return true end end;return false end;while turtle.suck()do for d=2,b do table.insert(c,0)if not turtle.suck()then break end end;for e,f in pairs(c)do turtle.back()c[e]=turtle.getItemCount()turtle.dropDown()end;while turtle.forward()do end;turtle.select(1)turtle.down()for e,f in pairs(c)do turtle.suck(math.ceil(f/8))end;turtle.down()local g=0;for e,f in pairs(c)do if f>g then g=f end;turtle.back()turtle.dropUp(math.ceil(f/8))end;sleep(g*10)for e,f in pairs(c)do turtle.suckUp()turtle.forward()end;while selectNext()do turtle.drop()end;turtle.up()turtle.up()turtle.select(1)end