Farm

function turnaround()
  turtle.turnLeft()
  turtle.turnLeft()
end

function abbauen()
  turtle.digDown()
  turtle.down()
  turtle.digDown()
  turtle.up()
end

function next()
  turtle.forward()
  turtle.forward()
end

function netage()
  for k=1,6 do
    turtle.up()
  end
end

function etage1()
  for j=1,50 do
    turtle.down()
  end
end

function etage2()
  for j=1,20 do
    turtle.down()
  end
end

function oben1()
  for u=1,20 do
    turtle.up()
  end
end

function start()
  turtle.forward()
  turtle.down()
  turtle.turnLeft()
  for i=1,3 do
    turtle.forward()
  end
  turnaround()
end

function ende1()
  for i=1,4 do
    turtle.forward()
  end
  for p=1,16 do
    turtle.select(p)
    turtle.drop()
  end
  turnaround()
  for i=1,4 do
    turtle.forward()
  end
  turnaround()
end

function ende2()
  for i=1,4 do
    turtle.forward()
  end
  for p=1,16 do
    turtle.select(p)
    turtle.drop()
  end
  turnaround()
  turtle.forward()
  turtle.turnLeft()
  turtle.up()
  turtle.forward()
  turnaround()
end

function drehLinks()
  turtle.forward()
  turtle.turnLeft()
  turtle.forward()
  turtle.turnLeft()
end

function drehRechts()
  turtle.forward()
  turtle.turnRight()
  turtle.forward()
  turtle.turnRight()
end

function erechts()
  turtle.forward()
  turtle.turnRight()
  turtle.forward()
end

function linelang()
  for l=1,14 do
    abbauen()
    next()
  end
end

function etage()
  next()
  turtle.forward()
  abbauen()
  next()
  abbauen()
  next()
  turtle.turnRight()
  linelang()
  abbauen()
  erechts()
  for j=1,13 do
    for i=1,2 do
      abbauen()
      next()
    end
    abbauen()
    drehRechts()
    for i=1,2 do
      abbauen()
      next()
    end
    abbauen()
    drehLinks()
  end
  for i=1,2 do
    abbauen()
    next()
  end
  abbauen()
  turtle.turnRight()
  turtle.forward()
  turtle.turnRight()
  turtle.forward()
  abbauen()
  next()
  abbauen()
  drehLinks()
  abbauen()
  next()
  abbauen()
  next()
  turtle.turnRight()
  turtle.forward()
  turtle.turnLeft()
  next()
  turnaround()
end

start()
etage1()
for l=1,5 do
  etage()
  netage()
end
oben1()
ende1()
etage2()
for l=1,3 do
  etage()
  netage()
end
etage()
turtle.up()
turtle.up()
ende2()