fdig

-- Made by The_Cat(Computer Craft forums Name) AKA Maxidoo(Minecraft IGN)
-- Version 1.0 --
function tryForward() --Loops to dig infront and checks for gravel and moves forward
    while turtle.detect() == true do
        turtle.dig()
        sleep(.25)
    end
    turtle.forward()
end


function checkUp() --Checks for gravel and digs up and down for 3x3
    while turtle.detectUp() == true do
        turtle.attackUp()
        turtle.digUp()
        turtle.digDown()
        sleep(.25)
    end
    turtle.digUp()
    turtle.digDown()
end

function tDig() --Digs the main 3x3 tunnel
    tryForward()
    checkUp()
    turtle.turnLeft()
    tryForward()
    checkUp()
    tryForward()
    checkUp()
    turtle.turnRight()
    tryForward()
    checkUp()
    turtle.turnRight()
    tryForward()
    checkUp()
    tryForward()
    checkUp()
    turtle.turnLeft()
end

function digRight() --Digs right on the strip mining
    tryForward()
    checkUp()
    for i = 1, inputStripMineLength do
        tryForward()
        checkUp()
        comeBack = i + 1
    end
    for g = 1, comeBack do
        turtle.back()
    end
    turtle.turnLeft()
end

function digLeft() --Digs left on the strip mining
    tryForward()
    checkUp()
    for v = 1, inputStripMineLength do
        tryForward()
        checkUp()
        comeBack = v + 1
    end
    for x = 1, comeBack do
        turtle.back()
    end
    turtle.turnRight()
end

function rePos() --This alligns the turtle to the middle of the 3x3 then sends back to the start of the main tunnel
    turtle.turnLeft()
    turtle.forward()
    turtle.turnRight()
    for i = 1, inputTunnelLength do
        turtle.back()
    end
end

term.clear()
term.setCursorPos(1,1)

write("Enter the length of the main tunnel(3x3): ")
inputTunnelLength = read() --Takes input for the main tunnel length

write("\nDo you want strip mining?(y/n): ")
inputStripMining = read() --Takes input for stip mining is y or n

if inputStripMining == "y" then
    write("\nHow long would you like the strip mine to be? ")
    inputStripMineLength = read() --Takes in the length of the strip mine
end

for i = 1, inputTunnelLength / 2 do --Loops whole code I divided by 2 becuase the "tDig" function move two spaces forward
    tDig()
    if inputStripMining == "y" and i == inputTunnelLength / 2 then -- checks to see if strip mining is set to yes or no
        rePos() --Returns Turtle to start of the mine to start stip mining
        for i = 1, inputTunnelLength / 2 do --Loops the stip mining until it reaches the same length as the tuneel Only even numbers work well for this
            turtle.forward()
            turtle.forward()
            turtle.turnRight()
            digRight()
            turtle.turnLeft()
            digLeft()
        end
    end
end