tillapiCrafty

local actualPosition = {}
local homePos = {}

function offsetGoTo(x4,y4,z4)
    local offset = getHomePosition()
    local x5,y5,z5 = gps.locate()
    if (z5-offset["z"])<2 then
        goTo(x5,y5,offset["z"]+2,offset["facing"])
    end
    goTo(offset["x"]+x4,offset["y"]+y4,offset["z"]+z4,offset["facing"])
end

function goTo(x3,y3,z3,facing3)
    if actualPosition["y"] == nil then
        print("getting actual position")
        getActualPosition()
    end
    while actualPosition["y"]> y3 do
        forceMoveDown()
    end
    while actualPosition["y"]< y3 do
        forceMoveUp()
    end
    while actualPosition["x"]< x3 do
        turnToFacing(2)
        forceMoveForward()
    end
    while actualPosition["x"]> x3 do
        turnToFacing(2)
        forceMoveBack()
    end
    while actualPosition["z"]< z3 do
        turnToFacing(1)
        forceMoveBack()
    end
    while actualPosition["z"]> z3 do
        turnToFacing(1)
        forceMoveForward()
    end
    turnToFacing(facing3)
end

function forceMoveForward()
    turtle.dig()
    --fuelCheck()
    turtle.forward()
    if actualPosition["facing"]==1 then
        actualPosition["z"]=actualPosition["z"]-1
    elseif actualPosition["facing"]==2 then
        actualPosition["x"]=actualPosition["x"]+1
    elseif actualPosition["facing"]==3 then
        actualPosition["z"]=actualPosition["z"]+1
    elseif actualPosition["facing"]==4 then
        actualPosition["x"]=actualPosition["x"]-1
    end
end

function forceMoveBack()
    turtle.back()
    if actualPosition["facing"]==1 then
        actualPosition["z"]=actualPosition["z"]+1
    elseif actualPosition["facing"]==2 then
        actualPosition["x"]=actualPosition["x"]-1
    elseif actualPosition["facing"]==3 then
        actualPosition["z"]=actualPosition["z"]-1
    elseif actualPosition["facing"]==4 then
        actualPosition["x"]=actualPosition["x"]+1
    end
end

function moveTurnLeft()
    turtle.turnLeft()
    actualPosition["facing"]=actualPosition["facing"]-1
    if actualPosition["facing"]==0 then
        actualPosition["facing"]=4
    end
end

function moveTurnRight()
    turtle.turnRight()
    actualPosition["facing"]=actualPosition["facing"]+1
    if actualPosition["facing"]==5 then
        actualPosition["facing"]=1
    end
end



function forceMoveUp()
    turtle.digUp()
    --fuelCheck()
    turtle.up()
    actualPosition["y"]=actualPosition["y"]+1
end

function forceMoveDown()
    turtle.digDown()
    --fuelCheck()
    turtle.down()
    actualPosition["y"]=actualPosition["y"]-1
end

function turnToFacing(facing1)
    local diff = facing1 - actualPosition["facing"]
    if diff < 0 then diff = diff + 4 end
    if diff==1 then
        moveTurnRight()
    else
        while actualPosition["facing"]~=facing1 do
            moveTurnLeft()
        end
    end
end

function getFacing()
    local x0,y0,z0 = gps.locate()
    if turtle.back() then
        x1,y1,z1 = gps.locate()
        turtle.forward()
        if x0 > x1 then
            return 2
        elseif x0 < x1 then
            return 4
        elseif z0 > z1 then
            return 3
        elseif z0 < z1 then
            return 1
        end
    else
        print("unable to get facing")
    end
end

function getActualPosition()
    local x,y,z = gps.locate()
    local facing =  getFacing()
    actualPosition["x"]=x
    actualPosition["y"]=y
    actualPosition["z"]=z
    actualPosition["facing"]=facing
    return actualPosition
end

function printActualPosition()
    print(textutils.serialize(actualPosition))
end

function setHomePosition()
    if fs.exists("homePosition") then
        fs.delete("homePosition")
    end
    local file = fs.open("homePosition","w")
    file.write( textutils.serialize ( getActualPosition() ) )
    file.flush()
    file.close()
end

function getHomePosition()
    if fs.exists("homePosition") then
        local file0 = fs.open("homePosition","r")
        local homePosition0 = {}
        homePosition0 = textutils.unserialize(file0.readAll())
        homePos = homePosition0
        print(textutils.serialize(homePosition0))
        return homePosition0
    else
        print("no home position was set ...")
        return
    end
end

function homePositionDialog()
    print("press any key to set current position to home position ...")
    local timer1 = os.startTimer(4)
    while true do
        local event, param = os.pullEvent()
        if event=="timer" and param==timer1 then
            print("no new home position was set ...")
            break
        end
        if event=="key" then
            setHomePosition()
            print("a new home position was set...")
            break
        end
     end
end

function checkIfActualPositionIsHomePosition()
    actualPosition = getActualPosition()
        homePos = getHomePosition()
        if textutils.serialize(actualPosition)==textutils.serialize(homePos) then
            print("i am at my home position")
        else
            print("i am going to my home position")
            goTo(homePos["x"], homePos["y"], homePos["z"], homePos["facing"])
        end
end

function fuelCheck()
    print("checking for fuel ...")
    if turtle.getFuelLevel()<10000 then
        local detail3 = turtle.getItemDetail(16)
        if detail3~=nil and detail3["name"]=="EnderStorage:enderChest" then

            turtle.digUp()
            turtle.select(16)
            turtle.placeUp()
            turtle.select(12)
            turtle.drop()
            turtle.suckUp(64)
            turtle.refuel()
            turtle.select(16)
            turtle.digUp()
        else
            print("put a fuel chest in slot 16")
        end
    end
end

function craftRefuel()
    if turtle.getFuelLevel() < 8000 then
        while turtle.getFuelLevel() < 10000 do
            turtle.select(16)
            redstone.setOutput("top",true)
            sleep(1)
            redstone.setOutput("top",false)
            sleep(1)
            for i=1,16 do
                turtle.select(i)
                turtle.refuel()
            end
        end
    end
end

function itemCheck()
    print("checking for items ...")
    if turtle.getItemCount()<=4 then
      local slot = turtle.getSelectedSlot()
        local detail4 = turtle.getItemDetail(slot+12)
        --print(detail4)
        if detail4~=nil and detail4["name"]=="EnderStorage:enderChest" then
            turtle.select(slot+12)
            turtle.digUp()
            turtle.placeUp()
            turtle.select(slot)
                while turtle.getItemCount(slot)<64 do
                    turtle.suckUp(64-turtle.getItemCount(slot))
                    sleep(1)
                end
            turtle.select(slot+12)
            turtle.digUp()
            turtle.select(slot)
        else
            print("no refill chest in slot " ..(slot+12))
        end
    end
end