[Lua][Computercraft]Stripmine Deutsch

-- Erstellt von DerMarten Web: http://pastebin.com/u/DerMarten
-- 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()
shell.run("clear")
write("Fuellevel: ");
turtle.getFuelLevel()
print("");
end
function rednet()
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
    turtle.select(16)
    turtle.placeUp()
    turtle.select(1)
    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
    turtle.select(16)
    turtle.placeUp()
    turtle.select(1)
    forward()--3
    forward()--4
    forward()--5
    digUp()
    forward()--6
    -- Wider Richtig Stehen
    turtle.turnLeft()
end
function sendmessage()
    rednet.open("right")
    rednet.send(serverid,finishmessage,true)
    rednet.close("right")
end
function setz_kiste()
    digDown()
    turtle.select(15)
    turtle.placeDown()
    turtle.select(1)
end
function in_kiste()
    zahl = 14
    zahl2 = 1
    for i = 1, zahl, 1 do
       turtle.select(zahl2)
       turtle.dropDown()
    end
    turtle.select(1)
end
function fakel()
    turtle.select(16)
    turtle.back()
    turtle.placeUp()
    forward()
    turtle.select(1)
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("Kisten in Slot 15 legen")
    print("Fakeln in Slot 16 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
function main()
   input()
   for i = 1, lange, 1 do
      shell.run("clear")
      write("Der Turtle ist bei der ")
      write(i)
      print(" Einheit")
      mainstrip()
      fakel()
      sidestrip()
     -- setz_kiste()
     -- in_kiste()
   end
   endpos()
end
main()
--sendmessage()
shell.run("clear")
print("Der Turtle ist Fertig mit dem Stripmine Gang")