Tunnel

hoch = 0                  -- H?8�B6?8�87he des Tunnels
hoch2 = 0                 -- Hilfsvariable f?8�B6�r die Fackeln
breit = 0                 -- Breite des Tunnels
lang = 0                  -- L?8�B6�A5A7nge des Tunnels
arbeit = 0                -- Anzahl der Felder die abgebaut werden
weg = 0                   -- Zur?8�B6�ckgelegte Strecke
fackel = 0                -- Abstand der Fackeln
kiste = 0                 -- Pr?8�B6�ft ob Platz im Inventar ist
kiste2 = 0                -- Hilfsvariable f?8�B6�r Kiste
position = "unten"        -- Standort des Turtle
ausrichtung = "rechts"    -- Gr?8�B6�A5A7bt er nach links oder rechts

function Titel()
term.clear()
term.setCursorPos(1,1)
print("______________________________________")
print("{                                    }")
print("{           Tunnel graben            }")
print("{       Kohle in Slot 16 legen       }")
print("{       Fackeln in Slot 15 legen     }")
print("{       Kiste in Slot 14 legen       }")
print("{                                    }")
print("--------------------------------------")
print()
end

function Ausrichtung()
if ausrichtung == "links" then
turtle.turnLeft()
Warten()
Tanken()
turtle.forward()
turtle.turnRight()
else if ausrichtung == "rechts" then
turtle.turnRight()
Warten()
Tanken()
turtle.forward()
turtle.turnLeft()
end
end
end

function Wechsel()
if ausrichtung == "links" then
ausrichtung = "rechts"
else if ausrichtung == "rechts" then
ausrichtung = "links"
end
end
end

function Graben()
if position == "unten" then
Hoch()
else if position == "oben" then
Runter()
end
end
end

function Tanken()
tank = turtle.getFuelLevel()
if tank == 0 then
turtle.select(16)
turtle.refuel(1)
turtle.select(1)
end
end

function Warten()
while turtle.detect() do
turtle.dig()
sleep(0.6)
end
end

function Hoch()
if not turtle.detectDown() then
turtle.select(1)
turtle.placeDown()
end
hoch1 = hoch-1
while hoch1 > 0 do
turtle.dig()
Warten()
turtle.digUp()
arbeit = arbeit-1
Kiste()
Titel()
print("    "..arbeit.." Felder werden ausgegraben")
Warten()
Tanken()
turtle.up()
turtle.dig()
Warten()
hoch1 = hoch1-1
Kiste()
position = "oben"
end
if not turtle.detectUp() then
turtle.select(1)
turtle.placeUp()
end
arbeit = arbeit-1
Titel()
print("    "..arbeit.." Felder werden ausgegraben")
hoch1 = hoch
end

function Runter()
if not turtle.detectUp() then
turtle.select(1)
turtle.placeUp()
end
runter = hoch-1
while runter > 0 do
turtle.dig()
Warten()
turtle.digDown()
arbeit = arbeit-1
Kiste()
Titel()
print("    "..arbeit.." Felder werden ausgegraben")
Warten()
Tanken()
turtle.down()
turtle.dig()
turtle.digDown()
Warten()
runter = runter-1
Kiste()
position = "unten"
end
if not turtle.detectDown() then
turtle.select(1)
turtle.placeDown()
end
arbeit = arbeit-1
Titel()
print("    "..arbeit.." Felder werden ausgegraben")
runter = hoch
end

function Fackel()
if weg == fackel then
turtle.select(15)
turtle.turnRight()
turtle.turnRight()


if ausrichtung =="rechts" then

  if position == "unten" then
  turtle.place()
  end
  if position == "oben" then
    while hoch2 > 1 do
    turtle.down()
    hoch2 = hoch2-1
    end
    hoch2 = hoch
    turtle.place()
    while hoch2 > 1 do
    turtle.up()
    hoch2 = hoch2-1
    end
    hoch2 = hoch
    --turtle.place()
  end

end
if ausrichtung =="links" then

  if position == "unten" then
  turtle.place()
  end
  if position == "oben" then
    while hoch2 > 1 do
    turtle.down()
    hoch2 = hoch2-1
    end
    hoch2 = hoch
    turtle.place()
    while hoch2 > 1 do
    turtle.up()
    hoch2 = hoch2-1
    end
    hoch2 = hoch
    --turtle.place()
  end

end

turtle.turnLeft()
turtle.turnLeft()
turtle.select(1)
weg = 0
end
end

function Kiste()
kiste = tonumber(turtle.getItemCount(13))
if kiste > 0 then

 while not turtle.detectDown() do
 turtle.down()
 kiste2 = kiste2+1
 end

turtle.select(14)
turtle.turnLeft()
turtle.turnLeft()
turtle.dig()
turtle.place()
for i = 1,13,1 do
turtle.select(i)
turtle.drop()
end
turtle.turnRight()
turtle.turnRight()
  while kiste2 > 0 do
  turtle.up()
  kiste2 = kiste2-1
  end
end
turtle.select(1)
end




Titel()
print("Wie hoch soll Dein Tunnel sein?")
write("Hoehe : ")
hoch = tonumber(io.read())
hoch2 = hoch              -- Hilfsvariable f?8�B6�r die Fackeln
Titel()
print("Wie breit soll Dein Tunnel sein?")
write("Breite : ")
breit = tonumber(io.read())
Titel()
print("Wie lang soll Dein Tunnel sein?")
write("L?8�B6�A5A7nge : ")
lang = tonumber(io.read())
Titel()
print("In welchem Abstand sollen die Fackeln sein?")
write("Abstand : ")
fackel = tonumber(io.read())
arbeit = hoch*breit*lang
Titel()
print("    "..arbeit.." Felder werden ausgegraben")
sleep(1)

breit1 = breit

while lang > 0 do

while breit1 >= 1 do
Graben()
breit1 = breit1-1
if breit1 > 0 then
Ausrichtung()
end

end
breit1 = breit
Wechsel()
turtle.dig()
Warten()
turtle.forward()
lang = lang-1
weg = weg+1
Fackel()
end