Guest User

Untitled

a guest
Aug 17th, 2019
116
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- Programm by (c) Harle79
  2. -- lets-build.tv - HarleLP
  3.  
  4. function Bild()
  5. shell.run("clear")
  6. print ("***************************************")
  7. print ("*** ***")
  8. print ("*** Query Programm ***")
  9. print ("*** ***")
  10. print ("***************************************")
  11. print("")
  12. print("")
  13. end
  14.  
  15. groesse = "n"
  16. while groesse == "n" do
  17. Bild()
  18. print ("Wie lang und Breit soll die Mine sein?")
  19. write ("Eingabe: ")
  20. laenge = io.read()
  21. print("")
  22. write ("Die Mine soll ")
  23. write (laenge)
  24. write ("*")
  25. write (laenge)
  26. write (" gross werden? (y/n)")
  27. groesse = io.read()
  28. end
  29.  
  30. Bild()
  31.  
  32. print ("Bitte mindestens 3 Platzmarker")
  33. print ("in Fach 1 legen")
  34. sleep(2)
  35. print("")
  36. write ("Soll gestartet werden? (y/n)")
  37. start = io.read()
  38.  
  39. if start == "n" then
  40. shell.run("reboot")
  41. end
  42. if start == "y" then
  43.  
  44. Bild()
  45. print("Die Platzmarker werden gestezt")
  46. print("")
  47. print("Vielen Dank Melow")
  48. print("")
  49. print("Programm by (c) EazyCheats")
  50.  
  51. function Var()
  52. a = laenge-1
  53. b = laenge-2
  54. end
  55.  
  56. function Gang()
  57. while a > 0 do
  58. while turtle.detect() == true do
  59. turtle.dig()
  60. end
  61. turtle.forward()
  62. a=a-1
  63. end
  64. end
  65.  
  66. function Fackel()
  67. turtle.back()
  68. turtle.select(1)
  69. turtle.place(1)
  70.  
  71. while b > 0 do
  72. turtle.back()
  73. b=b-1
  74. end
  75. end
  76.  
  77. turtle.dig()
  78. turtle.forward()
  79.  
  80. Var()
  81. Gang()
  82. Fackel()
  83.  
  84.  
  85. turtle.turnLeft()
  86.  
  87. Var()
  88. Gang()
  89. Fackel()
  90.  
  91. turtle.turnRight()
  92. turtle.back()
  93. turtle.place(1)
  94. end
  95. shell.run("clear")
RAW Paste Data