Tunnel 3x1 without fun and enderchest!

i=8
h=0
a=0
m=0
function NeedChest()
    if turtle.getItemCount(2)==0 then
        term.clear()
        print("Give me Chests in 2nd slot!")
        sleep(10)
        NeedChest()
    end

end
function checkForLava()
    success, data = turtle.inspectDown()
    if success then
        if data.name == "minecraft:lava" or data.name == "minecraft:flowing_lava" then
            turtle.select(3)
            turtle.placeDown()
            turtle.refuel()
            turtle.select(4)
        end
    end
end
function NeedTorch()
    if turtle.getItemCount(1)==0 then
        term.clear()
        print("Give me Torches in 1st slot!")
        sleep(10)
        NeedTorch()
    end

end
function GravelAhead()
    m=1
    while m==1 do
            if turtle.detect() then
                turtle.dig()
                sleep(0.5)
            end
            if turtle.detect()==false then
                m=0
            end
    end
end
function GravelUp()
    m=1
    while m==1 do
            if turtle.detectUp() then
                turtle.digUp()
                sleep(0.5)
            end
            if turtle.detectUp()==false then
                m=0
            end
    end
end
function chest()
  if turtle.getItemCount(16)>0 then
    turtle.digDown()
    turtle.down()
    turtle.digDown()
    turtle.select(2)
    turtle.placeDown()

    for h=1,13 do
       turtle.select(h+3)
       turtle.dropDown()
    end
    turtle.up()
  end
  turtle.select(4)
  NeedChest()
end


function torch()
  while i==0 do
    turtle.select(1)
    turtle.turnLeft()
    turtle.dig()
    turtle.place()
    turtle.turnRight()
    i=i+8
    NeedTorch()
  end
  turtle.select(4)
end


function Mine()
while true do
  if i>0 then
    turtle.dig()
    chest()
    turtle.forward()
    checkForLava()
    GravelAhead()
    turtle.digUp()
    GravelUp()
    chest()
    turtle.digDown()
    chest()
    i=i-1
    torch()
  end
end
end

term.clear()
print("Give me some torches please in 1st slot and some chests in 2nd slot!")
NeedTorch()
NeedChest()
Mine()