Extended Turtle API v1.11a

--Extended Turtle API ("turt") - k8NAxnFc
--Developed by UltraNoobian
--version = v1.11a

if not turtle then
    error( "Cannot load turtle API on computer" )
end

function cut() --Simple dig() with block detection
    while turtle.detect() == true do
        turtle.dig()
        sleep(0.45)
    end
end
function dirCut(direction)
    if string.match(string.sub(direction, 1, 1), '[uU]') then
        while turtle.detectUp() == true do
            turtle.digUp()
            sleep(0.45)
        end
    elseif string.match(string.sub(direction, 1, 1), '[dD]') then
        while turtle.detectDown() == true do
            turtle.digDown()
            sleep(0.45)
        end
    elseif string.match(string.sub(direction, 1, 1), '[fF]') then
        while turtle.detect() == true do
            turtle.dig()
            sleep(0.45)
        end
    end
end
function cyclicCut()
    dirCut("u")
    cut()
    dirCut("d")
end

function moveForward(arg1)
    local movement = 0
    local distance = 0
    if arg1 then
        distance = tonumber(arg1)
        while movement < distance do
            if turtle.forward() then
                movement = movement + 1
            elseif turtle.detect() then
                turtle.dig()
            else
                turtle.attack()
            end
        end
    end
end

function moveRight(arg1)  --Shift 'arg1' to the right
    turtle.turnRight()
    if arg1 then
        moveForward(arg1)
    else
        turtle.forward()
    end
    turtle.turnLeft()
end
function moveLeft(arg1)  -- Shift 'arg1' to the left
    turtle.turnLeft()
    if arg1 then
        moveForward(arg1)
    else
        turtle.forward()
    end
    turtle.turnRight()
end
function turnAround() --Rotate
    turtle.turnRight()
    turtle.turnRight()
end
function reverseRight()
    turtle.turnRight()
    cut()
    turt.moveForward(1)
    turtle.turnRight()
end

function reverseLeft()
    turtle.turnLeft()
    cut()
    turt.moveForward(1)
    turtle.turnLeft()
end

function straightCut(xheight) --Advanced vertical dig()
    local reqHeight = 0
        local currHeight = 1

    reqHeight = tonumber(xheight)

    if reqHeight < 1 then
        term.clear()
            term.setCursorPosition(1,1)
            print("BAKA BAKA BAKA BAKA!!!")
            print("ps. That means idiot in japansese...idiot")
    end --Guarenteed to not dig negative number.

    --Initial positioning
    while turtle.detect() do
        checkSpace(currHeight)
            turtle.dig()
        sleep(0.45) --Wait for any falling blocks to fall
    end
    while not turtle.forward() do
            turtle.attack()
            os.sleep(0.1)
        end
    --End Initial positioning

    --Start Digging
    while currHeight < reqHeight do
        while turtle.detectUp() do
                checkSpace(currHeight)
                turtle.digUp()
                sleep(0.45)
            end
            if currHeight == reqHeight - 1 then
        break
            end
            if turtle.up() then
            currHeight = currHeight + 1
            else
        turtle.attackUp()
        end
    end

    --Lowering back down
    while currHeight > 1 do
        if turtle.down() == true then
        currHeight = currHeight - 1
        else
               turtle.digDown()
                turtle.attackDown()
        end
    end
end

function hasModem() --Simple peripheral check
    if peripheral.getType("right") == "modem" then
        return true
    else
        return false
    end
end

function checkSpace(currHeight) --Placeholder: Simple check for slot 15.
    if turtle.getItemSpace(15) < 64 then
        dropBox(currHeight)
    end
end

function dropBox(currHeight)
    local xHeight = currHeight
    while xHeight > 1 do
        if turtle.down() == true then
            xHeight = xHeight - 1
        else
            turtle.digDown()
        end
    end
    turtle.select(16)
    turnAround()
    turtle.place()
    for slot = 1, 15, 1 do
        turtle.select(slot)
        turtle.drop()
    end
    turtle.select(1)
    turnAround()
    while xHeight < currHeight do
        if turtle.up() == true then
            xHeight = xHeight + 1
        else
            turtle.dig()
        end
    end
end
function straightUp(xheight)
    local reqHeight = 0
    local currHeight = 1
    reqHeight = tonumber(xheight)

    if reqHeight < 1 then
        print "HALT"
        print "Exception: Invalid Number (Must be 1 or greater)"
        print "Press any key to Continue."
        read()
    end

    --Initial positioning
    while turtle.detect() do --Block Detection
        checkSpace(currHeight)
        turtle.dig()
        sleep(0.5)
    end
    if not turtle.forward() then --Mob Detection
        turtle.attack()
    end

    while currHeight < reqHeight do
    while turtle.detectUp() do
            checkSpace(currHeight)
            turtle.digUp()
            sleep(0.5)
        end
        if turtle.up() then
        currHeight = currHeight + 1
        else
        turtle.attackUp()
    end
    end
end

function straightDown(xdepth)
    local reqDepth = 0
    local currDepth = 1
    reqDepth = tonumber(xdepth)

    if reqDepth < 1 then
    print "HALT"
    print "Exception: Invalid Number (Must be 1 or greater)"
    print "Press any key to Continue."
    read()
    end

    --Initial positioning
    while turtle.detect() do
    checkSpace((reqDepth-currDepth + 1))
        turtle.dig()
    sleep(0.45) --Wait for any falling blocks to fall
    end
    if not turtle.forward() then
        turtle.attack()
    end
    --Start Digging
    while currDepth < reqDepth do
    while turtle.detectDown() do
            checkSpace((reqDepth-currDepth + 1))
            turtle.digDown()
        end
        if turtle.down() then
        currDepth = currDepth + 1
        else
        turtle.attackDown()
    end
    end
end