stripmine

l = 0
p = 0
a = 0

write("Laenge von Hauptgang? ")
laengeHaupt=tonumber(read())
write("Laenge von Nebengaengen? ")
laengeNeben=tonumber(read())

function fforward()
    while turtle.forward()==false) do
        turtle.dig()
    end
end

function fdigUp()
    while(turtle.detectUp()) do
        turtle.digUp()
        sleep(0.4)
    end
end

function placeTorch()
    turtle.select(2)
    turtle.place()
    turtle.select(1)
end

function graben()
    fforward()
    fdigUp()
end


function nebengang()
    turtle.turnLeft()
    while(l<laengeNeben) do
        graben()
        l=l+1
    end
    l=0
    placeTorch()
    turtle.turnRight()
    turtle.turnRight()
    while(l<laengeNeben) do
        turtle.forward()
        l=l+1
    end
    l=0
    while(l<laengeNeben) do
        graben()
        l=l+1
    end
    l=0
    placeTorch()
    turtle.turnRight()
    turtle.turnRight()
    while(l<laengeNeben) do
        turtle.forward()
        l=l+1
    end
    l=0
    turtle.turnRight()
end

function hauptgang()
        while(p<3) do
            fforward()
            p=p+1
        end
        p=0
        a=a+3
end

function stripmine()
    while(a<laengeHaupt) do
        hauptgang()
        nebengang()
    end
end

stripmine()