[Lua][Computercraft]Stripmine Deutsch mit Enderkiste FTB

-- Erstellt von DerMarten Web: http://pastebin.com/u/DerMarten Skype: TheMartenH
-- Tutrtle Api: http://computercraft.info/wiki/Turtle_(API)
-- Variablen
local lange = 0
-- Funktionen
function dig()
   if turtle.detect() == true then
       turtle.dig()
       os.sleep(0.5)
   end
end
function digUp()
   if turtle.detectUp() == true then
       turtle.digUp()
       os.sleep(0.5)
   end
end
function digDown()
   if turtle.detectDown() == true then
       turtle.digDown()
       os.sleep(0.5)
   end
end
function forward()

    while turtle.detect() == true do
      dig()
    end
      turtle.forward()
end
function goUp()
    while turtle.detectUp() == true do
      digUp()
    end
    turtle.up()
end
function fuelleel()
write("Fuellevel: ");
print(turtle.getFuelLevel())
print("");
end
function mainstrip()
  dig();
  forward()
  digUp();
  dig();
  forward()
  digUp();
  dig();
  forward()
  digUp();
end
function sidestrip()
    turtle.turnRight()
    -- Rechten Gang graben
    dig()
    forward()--1
    digUp()
    dig()
    forward()--2
    digUp()
    dig()
    forward()--3
    digUp()
    dig()
    forward()--4
    digUp()
    dig()
    forward()--5
    digUp()
    dig()
    forward()--6
    digUp()
    -- Zurueck zum Hauptgang
    turtle.turnRight()
    turtle.turnRight()
    forward()--1
    forward()--2
    forward()--3
    forward()--4
    forward()--5
    forward()--6
    forward()--7
    -- Linken Gang graben
    digUp()
    dig()
    forward()--1
    digUp()
    --
    dig()
    forward()--2
    digUp()
    --
    dig()
    forward()--3
    digUp()
    --
    dig()
    forward()--4
    digUp()
    --
    dig()
    forward()--5
    digUp()
    -- Zurueck zum Hauptgang
    turtle.turnRight()
    turtle.turnRight()
    forward()--1
    forward()--2
    forward()--3
    forward()--4
    forward()--5
    digUp()
    forward()--6
    -- Wider Richtig Stehen
    turtle.turnLeft()
end
function setz_kiste()
    digUp()
    turtle.select(1)
    turtle.placeUp()
    turtle.select(1)
end
function break_kiste()
    digUp()
end
function in_kiste()
    zahl = 16
    zahl2 = 1
    for i = 2, zahl, 1 do
       turtle.select(i)
       turtle.dropUp()
    end
    turtle.select(1)
end
function kiste()
   setz_kiste()
   in_kiste()
   break_kiste()
end
function endpos()
   turtle.turnLeft()
   turtle.turnLeft()
   local lange2 = lange * 3
   for i = 1, lange2, 1 do
    forward();
   end
   turtle.turnLeft()
   turtle.turnLeft()
   goUp()
   goUp()
end
function input()
    shell.run("clear")
    print("Enderchest in Slot 1 legen.")
    print("Wie Lang soll der Gang sein ?")
    print("Info: Eine Einheit sind drei Bloecke im Hauptgang und auf beiden Seiten ein Nebengang.")
    write("Einheiten: ")
    lange = io.read()
end
--Programm Start
function main()
   input()
   for i = 1, lange, 1 do
      f = 0

       f = f + 1
       print(f)
      shell.run("clear")
      write("Der Turtle ist bei der ")
      write(i)
      print(" Einheit")
      fuelleel()
      mainstrip()
      sidestrip()
      kiste()
   end
   endpos()
end
main()
shell.run("clear")
print("Fertig !!!")