TurtleServer

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

local modem = peripheral.find("modem")

modem.open(20)

modem.transmit(10,20,{"GET","Pos"})

local turtleX = 0
local turtleX = 0
local turtleX = 0
local bcount = 0
local mineHeight = 11
local mining_dir = {{1,0,0},{0,0,1},{-1,0,0},{0,0,-1}}
local mineIndex = 1

function getTurltePos()
    local _,side,rc,sc,data = os.pullEvent("modem_message")
    turtleX = data[1]
    turtleY = data[2]
    turtleZ = data[3]
end

function goToMine()
    local payload = {"cmd","moveRH",{0,-(turtleY-mineHeight),0}}
    modem.transmit(10,20,payload)
    local _,side,rc,sc,data = os.pullEvent("modem_message")
    if(data[1]) then
        print("HAPPY TO LIVE")
    end
end

function Mine()
    while(true) do
        local payload = {"cmd","moveRP",mining_dir[mineIndex]}
        bcount = bcount + 1
        modem.transmit(10,20,payload)
        local _,side,rc,sc,data = os.pullEvent("modem_message")
        if(data[1] == "Value") then
            print(data[2])
            local payload = {"cmd","vein",1}
            modem.transmit(10,20,payload)
            local _,side,rc,sc,data = os.pullEvent("modem_message")
        elseif(data[1] == "FULL" or bcount >= 50) then
            local payload = {"cmd","home",1}
            modem.transmit(10,20,payload)
            local _,side,rc,sc,data = os.pullEvent("modem_message")
            local payload = {"cmd","chest",1}
            modem.transmit(10,20,payload)
            local _,side,rc,sc,data = os.pullEvent("modem_message")
            if(mineIndex == 4) then
                mineHeight = mineHeight + 2
                if(mineHeight >= 60) then
                    return
                end
                mineIndex = 0
            end
            mineIndex = mineIndex + 1
            bcount = 0
            goToMine()
        end
    end
end

getTurltePos()
goToMine()
Mine()