StripMining (1.2)

shell.run("clear")
function move3vor() --Gräbt sich 3 mal nach vorne
    for e=1,3 do
        turtle.attack()
        turtle.dig()
        while turtle.detect()==true do
            turtle.attack()
            turtle.dig()
            turtle.attack()
        end
        turtle.forward()
        turtle.attack()
        turtle.digUp()
    end
end


function turnAround()
    turtle.turnLeft()
    turtle.turnLeft()
end

function schrittvor()
    turtle.attack()
    turtle.dig()
    while turtle.detect()==true do      --Überprüft ob noch Sand, Kies oder Mob vor einem ist
        turtle.attack()
        turtle.dig()
    end
    turtle.attack()
    turtle.forward()
    turtle.attack()
    turtle.digUp()
end


function gang()         --Gräbt einen Gang in eine Richtung
    for i=1,g do
        schrittvor()
    end
    turnAround()
    for z=1,g do
        schrittvor()
        r=r+1
        if r==l+1 then
            fackel()
            r=1
        end
    end
end

function fackel()
    if turtle.getItemCount(16)==0 then  --Überprüft ob Fackel in Slot 16 ist
    else    --Wenn Fackel da ist wird Fackel gesetzt
        turnAround()
        turtle.select(16)
        turtle.place()
        turnAround()
    end
end

function ablegen()  --Legt komplettes Inventar außer den Fackelslot ab
    for d=1,15 do
        turtle.select(d)
        turtle.drop(64)
    end
end

while turtle.getFuelLevel()<200 do
 shell.run("clear")
 turtle.select(15)
 term.setTextColor(colors.red)
 print("Zu wenig Treibstoff!!!\n")
 term.setTextColor(colors.white)
 print("Fuellevel: ",turtle.getFuelLevel())
 print("Bitte fuehren Sie Treibstoff in das dick umrandete Feld ein")
 turtle.refuel(64)
 sleep(0.5)
end
shell.run("clear")
turtle.select(16)
b=1

print("Zum benutzen des Strip Programms wird eine Kiste und Fackeln benoetigt.\n")
print("Vor Beginn stelle die Kiste hinter die Turtle.")
print("Wenn vorhanden legen Sie Fackeln in das dick umrandete Feld.\n")
print("Aktuelles Fuellevel: ",turtle.getFuelLevel(),"\n")
print("Druecke Enter um fortzufahren")
read()
shell.run("clear")


print("Wie viele Gaenge?")  --Abfrage nach Ganganzahl
f=tonumber(read())

print("Wie lang sollen die Gaenge sein?")       --Abfrage nach Ganglänge
g=read()

print("Abstand der Fackeln?")   --Abfrage nach dem Abstand der Fackeln
l=read()
r=1
print("Nach wie vielen Gaengen soll entleert werden?")      --Abfrage nach der entleerung
k=read()


shell.run("clear")

for a=1,f do            --Hauptprogramm
    move3vor()
    turtle.turnLeft()
    gang()      --Linker Gang
    gang()      --Rechter Gang
    turtle.turnRight()
    b=b+1
 if turtle.getFuelLevel()<200 then
  turnAround()
  for c=a,1,-1 do
   move3vor()
  end
  while turtle.getFuelLevel()<200 do
   shell.run("clear")
   turtle.select(15)
   print("Kein Treibstoffmehr!\n")
   print("Bitte fuehren SieTreibstoff links neben dem Fackelslot rein (Slot 15)")
   turtle.refuel(64)
   sleep(0.5)
  end
  turnAround()
  for c=1,a do
   move3vor()
  end
 end
    if a==f then    --Wenn Ende dann zurück zum Ausgang
        turnAround()
        for c=a ,1,-1 do
            move3vor()
        end
        ablegen()

    else
        if b==k+1 then      --Fährt zurück zur Kiste
            turnAround()
            for c=a,1,-1 do
                move3vor()
            end
            ablegen()
            turnAround()
            for c=1,a do
                move3vor()
                b=1
            end
        end
    end
end

turnAround()
print("Programmende Strip")
print("Erwarte neue Befehle")