sugarcanefarm

--Sugarcane farm
local function move()
    turtle.dig()
    while not turtle.forward() do
                    sleep(1)
    end
end
local function move2()
    while not turtle.forward() do
                    sleep(1)
    end
end
local function harvest()
    while not turtle.up() do
                    sleep(1)
    end
    turtle.turnLeft()
    move2()
    turtle.turnRight()
    for i = 1,5 do
        move()
    end
    turtle.turnRight()
    move2()
    move()
    turtle.turnRight()
    for i = 1,4 do
        move()
    end
    turtle.turnLeft()
    move()
    turtle.turnLeft()
    for i = 1,4 do
        move()
    end
    --return home
    turtle.turnLeft()
    move()
    move2()
    turtle.turnLeft()
    for i = 1,5 do
        move2()
    end
    while not turtle.down() do
                    sleep(1)
    end
    turtle.turnLeft()
    turtle.turnLeft()
end
local iRepeat = 0
local iMin = 10
local iCount = 0
local spacer = ""
while true do
    term.clear()
    term.setCursorPos(1,4)
    print("Fuel Remaning : "..tostring(turtle.getFuelLevel()))
    term.setCursorPos(1,1)
    iRepeat = iRepeat+1
    print("Harvesting   :"..iRepeat)
    --Refuel
    local fuelLevel = turtle.getFuelLevel()
        if (fuelLevel < 100) then
            turtle.select(16)
            turtle.refuel(2)
        end
    --Harvest
    harvest()
    turtle.turnRight()
    for slot=1,15 do
         turtle.select(slot)
         sleep(0.1)
         turtle.drop()
    end
    turtle.turnLeft()
    term.setCursorPos(1,4)
    print("Fuel Remaning : "..tostring(turtle.getFuelLevel()))
    iCount = iMin
    while true do
                    iCount = iCount-1
                    term.setCursorPos(1,2)
                    term.clearLine()
                    print("sleeping "..iMin.." minuites")
                    for i = 59,0,-1 do
                                    sleep(1)
                                    term.setCursorPos(1,3)
                                    term.clearLine()
                                    if i < 10 then
                                                    spacer = "0"
                                    else
                                                    spacer = ""
                                    end
                                    write("To go    "..iCount..":"..spacer..i)
                    end
                    if iCount == 0 then
                                    break
                    end
    end
end