FindUran

ServerID= 0
rednet.open('right')
function findUran()
   turtle.select(16)
   if (turtle.compare()) then
      rednet.send(ServerID,'Find')
      turtle.dig()
   end
   turtle.turnLeft()
   if (turtle.compare()) then
      rednet.send(ServerID,'Find')
      turtle.dig()
   end
   turtle.turnLeft()
   if (turtle.compare()) then
      rednet.send(ServerID,'Find')
      turtle.dig()
   end
   turtle.turnLeft()
   if (turtle.compare()) then
      rednet.send(ServerID,'Find')
      turtle.dig()
   end
   turtle.turnLeft()
end
Level= 64
while true do
   findUran()
   turtle.digDown()
   Level= Level-1
   turtle.down()
   if (Level < 10) then
      for i=Level,64 do
         turtle.up()
      end
      turtle.dig()
      turtle.forward()
      turtle.dig()
      turtle.forward()
      turtle.dig()
      turtle.forward()
      Level= 64
   end
end