StripMine.lua

partnerID = 10
timeout = 0.5
onState = true
movedBlocks = 0
task = "idle"

function ivFull()
    for i = 1,16 do
        if turtle.getItemCount(i) == 0 then
            return false
        end
    end
    return true
end

function stripMineStart()
    for i = 0,8 do
        if ivFull() == false then
            if turtle.compare() then
                turtle.select(2)
                turtle.dig()
                turtle.select(1)
                sleep(2)
            else
                turtle.forward()
                movedBlocks = movedBlocks + 1
                rednet.send(partnerID,"Move")
                turtle.dig()
                turtle.digUp()
            end
        else
            turtle.turnLeft()
            turtle.dig()
            turtle.place()
            for i = 3,16 do
                turtle.select(i)
                turtle.drop()
            end
            turtle.turnRight()
            turtle.select(1)
        end
        select(1)
        if turtle.getItemCount(1) == 0 then
            task = "return"
        end
    end
end


function returnPoint()
    turtle.digUp()
    rednet.receive()
    turtle.up()
    turtle.back()
    turtle.back()
    rednet.send(partnerID,"Begin")
    rednet.send(partnerID,"Up")
    for i = 0,movedBlocks -3 do
        turtle.back()
        rednet.send(partnerID,"Back")
    end
    rednet.send(partnerID,"Break")
    onState = false
end


function checkTask()
    if task == "mine" then
        stripMineStart()
    elseif task == "return" then
        returnPoint()
    end
end

rednet.open("left")

while onState do
    checkTask()
    rednet.send(3,"Send")
    id,msg,prot = rednet.receive(timeout)
    if msg == "back" then
        task = "return"
    end
    if msg == "start" then
        task = "mine"
    end
    if msg == "stop" then
        break
    end
    checkTask()
end