ExcavateWirelessTurtle

size = 4

shell.run("clear")
n = nil
rednet.open("right")
modem = peripheral.wrap("right")

function loka(range)
for s = 1 , range, 1 do
turtle.dig()
turtle.digUp()
turtle.forward()
end

end
function mLeft()
turtle.turnLeft()
turtle.dig()
turtle.digUp()
turtle.forward()
turtle.digUp()
turtle.turnLeft()
end

function mRight()
turtle.turnRight()
turtle.dig()
turtle.digUp()
turtle.forward()
turtle.digUp()
turtle.turnRight()
end

function digg()
loka(size)
mRight()
loka(size)
mLeft()
loka(size)
mRight()
loka(size)
mLeft()
loka(size)
turtle.turnLeft()
turtle.digUp()
shell.run("go forward " .. size)
turtle.turnLeft()
shell.run("go forward " .. size)
turtle.turnLeft()
turtle.turnLeft()
turtle.digDown()
turtle.down()
end

function getMsg()
  ID, msg = rednet.receive()
  if msg == "stop" then
    n = 1
    print("Waiting ...")
  end
end

while n == nil do
parallel.waitForAny(digg,getMsg)
end