billyAndBenMiningTurtle1

url = "http://192.168.1.2:92/cc/variables/"
p=peripheral.wrap("right") -- keeps turtle loaded with the chunk loader mod
var1 = "billyAndBenMiningTurtle1out"
var2 = "billyAndBenMiningTurtle1state"
var3 = "billyAndBenMiningTurtle1fuel"

print("this program uses the CC variables table")
print("fuel chest left")
print("item chest right")
print("block above to hold turtle")

out = 0 --how far out to tunnel (web altered)

rightDis = 20 -- haw far right to go each time

while type(http.get(url .. "altervariable.php?cmd=set&var=" .. var2)) ~= "table" do
    sleep(1)
end

function cycle()
    while turtle.detectUp() do
        while type(http.get(url .. "altervariable.php?cmd=set&val=blockAboveWaiting&var=" .. var2)) ~= "table" do
            sleep(1)
        end
        print("There is a block above me.")
        sleep(5)
    end
    while type(http.get(url .. "altervariable.php?cmd=add&var=" .. var1)) ~= "table" do
        sleep(1)
    end
    while type(http.get(url .. "altervariable.php?cmd=set&val=startingCycle&var=" .. var2)) ~= "table" do
        sleep(1)
    end
    while type(http.get(url .. "altervariable.php?cmd=get&var=" .. var1)) ~= "table" do
        sleep(1)
    end
    out = http.get(url .. "altervariable.php?cmd=get&var=" .. var1).readAll()
    turtle.turnLeft()
    while turtle.getFuelLevel() < out*2+49 do
        turtle.suck(64)
        turtle.refuel(64)
        sleep(5)
        print("waiting for fuel")
        while type(http.get(url .. "altervariable.php?cmd=set&val=needsFuel&var=" .. var2)) ~= "table" do
            sleep(1)
        end
    end
    turtle.turnRight()
    while type(http.get(url .. "altervariable.php?cmd=set&val=goingToDig&var=" .. var2)) ~= "table" do
        sleep(1)
    end
    for n=1,out do
        while turtle.detect() do
            turtle.dig()
            --turtle.digUp()
        end
        turtle.forward()
    end
    turtle.turnRight()
    while type(http.get(url .. "altervariable.php?cmd=set&val=digging&var=" .. var2)) ~= "table" do
        sleep(1)
    end
    for n=1,rightDis do
        while turtle.detect() do
            turtle.dig()
            --turtle.digUp()
        end
        turtle.forward()
    end
    turtle.turnRight()
    turtle.turnRight()
    for n=1,rightDis do
        while turtle.detect() do
            turtle.dig()
            --turtle.digUp()
        end
        turtle.forward()
        while type(http.get(url .. "altervariable.php?cmd=set&val=" .. turtle.getFuelLevel() .. "&var=" .. var3)) ~= "table" do
            sleep(1)
        end
    end
    turtle.turnLeft()
    for n=1,out do
        while turtle.detect() do
            turtle.dig()
            --turtle.digUp()
        end
        turtle.forward()
        while type(http.get(url .. "altervariable.php?cmd=set&val=" .. turtle.getFuelLevel() .. "&var=" .. var3)) ~= "table" do
            sleep(1)
        end
    end
    turtle.turnLeft()
    while type(http.get(url .. "altervariable.php?cmd=set&val=dumpingItems&var=" .. var2)) ~= "table" do
        sleep(1)
    end
    for i = 1, 16 do
      turtle.select(i)
      turtle.drop()
    end
    turtle.select(1)
    turtle.turnLeft()
end

while true do
    cycle()
end