Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- shell.run("clear")
- print("Stripmine program by Shibrix")
- print(" ")
- sleep(1)
- print("Wieviele Gaenge sollen gebuddelt werden?")
- write("Laenge: ")
- local L = io.read()
- sleep(1)
- print(" ")
- print("Wie Lang sollen die Gaenge auf den Seiten sein?")
- write("Ganglaenge: ")
- local G = io.read()
- sleep(1)
- print(" ")
- print("Wie groß soll der Abstand der einzelnen Gaenge sein?")
- write("Gangabstand: ")
- local B = io.read()
- sleep(1)
- shell.run("clear")
- print("Turtle wird gestartet!")
- sleep(1)
- --turtle setzt block unter sich wenn keiner da ist
- function Sichererweg()
- if turtle.detectDown() == false then
- turtle.select(1)
- turtle.placeDown()
- end
- end
- --turtle hauptgang
- function Hauptgang()
- Sichererweg()
- turtle.dig()
- repeat
- if turtle.detect() == true then
- turtle.dig()
- end
- until turtle.detect() == false
- turtle.forward()
- repeat
- if turtle.detectUp() == true then
- turtle.digUp()
- end
- until turtle.detectUp() == false
- end
- --turtle baut seitengaenge
- function Seitengang()
- turtle.turnLeft()
- for s=1, G do
- Hauptgang()
- end
- turtle.turnLeft()
- turtle.turnLeft()
- for s=1, G do
- turtle.forward()
- end
- for s=1, G do
- Hauptgang()
- end
- turtle.turnLeft()
- turtle.turnLeft()
- for s=1, G do
- turtle.forward()
- end
- turtle.turnRight()
- end
- --turtle entleert inventar
- function Inventarleeren()
- for i = 16,1,-1 do
- turtle.select(i)
- turtle.drop()
- end
- turtle.turnRight()
- turtle.turnRight()
- for z=1, 256 do
- turtle.forward()
- end
- end
- --turtle prueft ob inventar voll
- --falls voll -> geht entleeren
- function Inventarcheck()
- if turtle.getItemDetail(16) then
- turtle.turnLeft()
- turtle.turnLeft()
- for w=1, L+64 do
- turtle.forward()
- end
- Inventarleeren()
- end
- end
- --turtle geht zurueck, setzt fackeln und entleert wenn fertig
- function Ende()
- turtle.turnLeft()
- turtle.turnLeft()
- for i=1, L+256 do
- turtle.forward()
- end
- Inventarleeren()
- end
- --turtle buddelt
- for i=1, L do
- for x=1, B+1 do
- Hauptgang()
- end
- Seitengang()
- Inventarcheck()
- end
- Ende()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement