View difference between Paste ID: v7WTk5Tt and uUkZBnqD

 -- ** Stripmining Programm **
 -- ** © 2013 SemOnLP       **
 -- **************************
 
 --start: block der verhindert das der hautpfad unterborchen wird
 function Sicherheitspfad()
 	if turtle.detectDown() == false then -- wen kein block unter der turel ist
 		turtle.select(1) -- slot 1 auswaehlen
     	turtle.placeDown() -- und unter die turel setzten
 	end
 end
 --end: block der verhindert das der hautpfad unterborchen wird
 
 --start: hier wird der Hauptgang gegraben
 function Mittelgang()
 	NachVorne() -- 1 block nach vorne mit der pruefung ob die Turel fahren konnte
 	Sicherheitspfad() -- wird nur im Hauptgang gemacht, prueft ob unter der Turtel ein Block ist wen nein setzt sie einen aus slot 1
 	KiesUp() -- haut den block uebersich weg, koennt sein das dan noch kies nach faellt
 
 	NachVorne() -- 1 block nach vorne mit der pruefung ob die Turel fahren konnte
 	Sicherheitspfad() -- wird nur im Hauptgang gemacht, prueft ob unter der Turtel ein Block ist wen nein setzt sie einen aus slot 1
 	KiesUp() -- haut den block uebersich weg, koennt sein das dan noch kies nach faellt
 
 	Fackel() -- fackel auf der rechten seite setzten
 	NachVorne() -- 1 block nach vorne mit der pruefung ob die Turel fahren konnte
 	Sicherheitspfad() -- wird nur im Hauptgang gemacht, prueft ob unter der Turtel ein Block ist wen nein setzt sie einen aus slot 1
 	KiesUp() -- haut den block uebersich weg, koennt sein das dan noch kies nach faellt
 end
 --end: hier wird der Hauptgang gegraben
 
 --start: baut einen Seitengang
 function Seitengang()
 	for b = 0, 4, 1 do -- grabe dich in den gang
 		NachVorne() -- 1 block nach vorne mit der pruefung ob die Turel fahren konnte
 		KiesUp() -- haut den block uebersich weg, koennt sein das dan noch kies nach faellt
 	end
 
 	turtle.turnRight() -- umdrehen
 	turtle.turnRight() -- umdrehen
 	for b = 0, 4, 1 do -- komm zur mitte zurueck
 		NachVorne() -- 1 block nach vorne mit der pruefung ob die Turel fahren konnte
 	end
 end
 --end: baut einen Seitengang
 
 --start: geht 1 block nach vorne
 function NachVorne()
 	while turtle.detect() do -- prueft ob ein block vor der turel ist
 		turtle.dig()
 		sleep(0.25)
 	end
 
 	while(turtle.forward() == false) do --wenn er nicht fahren konnte
 		turtle.dig()  -- einmal abbauen
 		turtle.attack() -- einmal zuschlagen
 	end
 end
 --end: geht 1 block nach vorne
 
 --start: beim abbauen uebersich ob kies nachfaell, wen ja solange abbauen bis nichts mehr kommt
 function KiesUp()
 	while turtle.detectUp() do -- prueft ob ueber ihm noch etwas ist
 		turtle.digUp() -- haut den block ueber sich ab
 		sleep(0.25) -- wartet, funktioniert nur wen der block direck nachfaellt ist ein block
 	end
 end
 --end: beim abbauen uebersich ob kis nachfaell, wen ja solange abbauen bis nichts mehr kommt
 
 --start: plaziert die Fackel
 function Fackel()
 	if (turtle.back()) then-- plaziert die fackel wen er 1 block zurueck fahren konnte
 		turtle.select(16) -- waehlt die Fackeln aus
 		turtle.placeUp() -- plaziert die Fackel ueber sich
 		NachVorne() -- geht wieder nach vorne
 	end
 	turtle.select(1) -- waehlt wieder slot 1 oder den ersten der dan frei ist
 end
 --end: plaziert die Fackel
 
 --start: Steuerung fuer Hauptgang und Seitengang
 function Strip()
 	Mittelgang() -- hier wird der Hauptgang gegraben
 	turtle.turnRight() -- startposition fuer die linke seite
 	Seitengang() -- graebt den ersten seitengang und kommt zurueck zur mitte
 	Seitengang() -- graebt den zweiten seitengang und kommt zurueck zur mitte
 end
 --end: Steuerung fuer Hauptgang und Seitengang
 
 --start: entleere das inventar in die endertruhe
 function enderTruhe()
 	if (endertruhe == 0) then -- wen keine kiste ausgewaehlt ist nicht in endertruhe leeren
 		return
 	end
 	while turtle.detect() do -- die Truhe braucht platz um hingestell werden zu koennen also wird solange gegraben bis platz da ist
 		turtle.dig()
 		sleep(0.5)
 	end
 	turtle.select(15) -- Truhe auswaehlen
 	turtle.place() -- Truhe plazieren
 	for k = 1,14 do -- k dient hier als zaehler um jeden platz leer zu machen
 		turtle.select(k)
 		if turtle.getItemCount(k) == 0 then
 			break -- hier wird abgebrochen wenn der slot leer ist
 			      -- eine schneller entladung der kist ist somit gegeben ^^
 		end
 		turtle.drop() -- legt die items in aus dem slot in die truhe
 	end
 	turtle.select(15) -- waehlt slot 15 aus
 	turtle.dig() -- und nimmt die truhe wieder auf
 	turtle.select(1) -- waehlt wieder slot 1 oder den ersten der dan frei ist
 end
 --end: entleere das inventar in die endertruhe
 
 --start: graebt den Tunnel solange wie eingegeben wurde
 function tunnel()
 	bildschirmRun() -- bereinigt den Bildschirm beim Start des Tunnelgrabens
 	kistenabstand = 3 -- nach diesem gang wird das 1 mal die truhe geleert
 	for aktuellergang = 1, ganganzahl, 1 do -- schleife die soviele gaenge macht wie eingeben
 		Strip() -- hier wird der hauptgang mit einem Tunnel links und rechts gegraben
 		-- entwerder nur nach links drehen oder nach links drehen und die kiste setzten
 		if (aktuellergang  == kistenabstand and aktuellergang ~= ganganzahl) then
 			turtle.turnLeft() -- gehe einmal nach links
 			kistenabstand = kistenabstand + 3 -- kistenabstand wieder 3 hoch
 			enderTruhe() -- entleer die in die Enertrue
 		elseif (aktuellergang  == ganganzahl) then -- letzter gang nach rechts gehen und in die Truhe entlehren
 			turtle.turnRight() -- zurueck in gang drehen fuer die fahrt zur Ausgangsposition
 			enderTruhe() -- es war der letzte gang, sprich stell die kist das letzte mal und entleeren
 		else
 			turtle.turnLeft() -- gehe nur einmal nach lings und mach mit dem hauptgan weiter
 		end
 		statusBildschirm(aktuellergang) -- Aktuallisierung des Bildschirms wenn ein Gang gegraben wurde (aktuellergang muss uebergeben werden)
 	end
 end
 --end: graebt den Tunnel solange wie eingegeben wurde
 
 --start: Zurueck zur Ausgangsposition
 function back()
 	for a = 1,ganganzahl * 3 do
 		NachVorne()
 	end
 end
 --end: Zurueck zur Ausgangsposition
 
 --start: Aktuallisierung des Bildschirms wenn ein Gang gegraben wurde
 function statusBildschirm(aktuellergang)
 	-- start: Zeigt das Fuel-Level an
 	term.setCursorPos( 1, 3)
 	term.clearLine()
 	fuellevel = turtle.getFuelLevel()
 	print("Fuel-Level: " .. fuellevel)
 
 	-- start: Zeigt die anzahl der Fakeln an
 	term.setCursorPos( 1, 5)
 	term.clearLine()
 	fackeln = turtle.getItemCount(16)
 	print("Fackeln   : " .. fackeln)
 
 	term.setCursorPos(1,7)
 	term.clearLine()
 	print("Gang " .. aktuellergang .. " von " .. ganganzahl .. " wurde fertiggestellt!")
 end
 --end: Aktuallisierung des Bildschirms wenn ein Gang gegraben wurde
 
 
 --START: Programmsteuerung eingabe
 --start: Aktuellisuerung des Status fuer Fakeln, Endertruhe, und Fullevel
 local function checkStatus()
 	local blink = 0 -- wird benoetigt fuer das blinken der Warnung das das Fuellevel nidrig ist
 	while true do --prueft endlos den status
 		time() -- zeit die Uhrzeit oben rechts an
 
 		-- start: Zeigt das Fuel-Level an
 		term.setCursorPos( 1, 3)
 		term.clearLine()
 		fuellevel = turtle.getFuelLevel()
 		if (fuellevel < 500 and blink == 0) then
   			print("Fuel-Level: " .. fuellevel .. " !! Warnung !!")
   			blink = 1 -- setz blinken der Warnung zurueck
 		else
 			print("Fuel-Level: " .. fuellevel)
 			blink = 0 -- setz blinken der Warnung zurueck
 		end
 		-- end: Zeigt das Fuel-Level an
 		-- start: Zeigt die aufladung des Fuel-Level an
 		term.setCursorPos( 1, 7)
 		term.clearLine()
 		term.clearLine()
 		ladeeinheiten = turtle.getItemCount(13) -- Einheiten zum Aufladen aus slot 13
 		if (ladeeinheiten == 1) then
 			print("Hinweis: Fuelaufladung um eine Einheit")
 		elseif (ladeeinheiten > 1) then
 			print("Hinweis: Fuelaufladung um " .. ladeeinheiten .. " Einheiten")
 		end
 		-- end: Zeigt die aufladung des Fuel-Level an
 
 		-- start: Pruefung fuer die Endertruhe
 		term.setCursorPos( 1, 4)
 		term.clearLine()
 		endertruhe = turtle.getItemCount(15)
 		if (endertruhe == 1) then
 			print("Endertruhe: Ja")
 			endertruhe = 1 --braucht man nicht ist nur zur sicherheit
 		elseif (endertruhe > 1) then
 			print("Endertruhe: Bitte nur 1 Kiste")
 			endertruhe = 0
 		else
 			print("Endertruhe: Nein")
 			endertruhe = 0
 		end
 		-- end: Pruefung fuer die Endertruhe
 
 		-- start: Zeigt die anzahl der Fakeln an
 		term.setCursorPos( 1, 5)
 		term.clearLine()
 		fackeln = turtle.getItemCount(16)
 		if (fackeln == 0) then
 			print("Fackeln   : Keine")
 		elseif (fackeln == 1) then
 			print("Fackeln   : " .. fackeln .. " (Eingabe 0 = ein Gang)")
 		else
 			print("Fackeln   : " .. fackeln .. " (Eingabe 0 = " .. fackeln .." Gaenge)")
 		end
 		-- end: Zeigt die anzahl der Fakeln an
 
 		term.setCursorPos(36, 12) -- setzt angezeigte curser zurueck zur eingabe
 		sleep(0.4) -- minecraft minute dauert 0.8 Sekunden
 	end
 end
 --end: Aktuellisuerung des Status fuer Fakeln, Endertruhe, und Fullevel
 
 --start: Eingabe der Fackeln und Pruefung ob 0 oder zwischen 1 und 999
 local function eingabeTunnellaenge()
 	while true do -- ergibt eine endlosschleife bis man auf return kommt
 		term.setCursorPos(1, 12) -- setzt den curser hier her
 		term.clearLine() -- loescht eventuell den Hilfetext
 		term.setCursorPos(1, 12) -- setzt den curser hier her
 		print("Anzahl Gaenge? (0 = Fackelanzahl) :") -- anzeige des Hilfetextes
 		term.setCursorPos(36, 12) -- setzt position auf eingabe
 
 		local inputstring = read() -- auswertung der eingabe
 		if (tonumber(inputstring) ~= nil) then -- prueft ob eine Zahl eingegeben wurde
 		   	ganganzahl = tonumber(inputstring) --macht aus dem Strin ein zahl
 			if (ganganzahl >= 0 and ganganzahl <= 999) then -- wen die zahl zwischen 0 und 999 liegt alles ok
 				if (ganganzahl == 0) then
 					ganganzahl = fackeln
 			    end
 				return -- wenn alles ok ist, beende die eingabe
 			end
 		end
 		term.setCursorPos(1, 12) -- setzt den curser hier her
 		term.clearLine()
 		print("0 = Fakelanzahl oder 1-999 moeglich")
 		sleep(1.5) -- zeit fuer die anzeigt des Hilfetextets
 	end
 end
 --end: Eingabe der Fackeln und Pruefung ob 0 oder zwischen 1 und 999
 
 --start: Uhrzeit und Tag in Minecraft auslesen und anzeigen
 function time()
 	term.setCursorPos( 29, 1) -- position auf Zeit setzten
 	local day -- locale Variable fuer den Tag in Minecraft
 	local zeit -- locale Variable fuer die Uhrzeit in Minecraft
 	day = os.day() -- nicht im Gebrauch!
 	zeit = textutils.formatTime(os.time(), true) -- wandelt die anzeige in das 24 Stunden Format
 	if (string.len(zeit) == 4) then -- zeit Anzeigt vor oder nach 10 Uhr
 		print("Zeit:  " .. zeit) -- vor 10 Uhr, es geht um die laenge
 	else
 		print("Zeit: " .. zeit) -- nach 10 Uhr
 	end
 end
 --start: Uhrzeit und Tag in Minecraft auslesen und anzeigen
 --end: Programmsteuerung eingabe
 
 --start: bereinigt den Bildschirm und baut das eingabe Fenster auf
 function bildschirmStart()
 	shell.run("clear") -- löscht allties auf dem Bildschirm
 	print("Systemhinweis")
 	print("=======================================")
 	term.setCursorPos(1,6)
 	term.clearLine()
 	print("---------------------------------------")
 	term.setCursorPos(1,11)
 	print("---------------------------------------")
 end
 --end: bereinigt den Bildschirm und baut das eingabe Fenster auf
 
 --start: zeigt an das die Turel fertig sit
 function zeigtFertig()
 	term.setCursorPos(1,10) -- zeile 10 fuer anzeige bereinigen
 	term.clearLine() -- zeile 10 fuer anzeige bereinigen
 	print("!!!Fertig - Programm beendet!!!") -- fertig meldung
 	term.setCursorPos(1,12) -- letzte zeile bereinigen
 	term.clearLine() -- letzte zeile bereinigen
 end
 --end: zeigt an das die Turel fertig sit
 
 --start: bereinigt den Bildschirm wen die turtel loslaeuft
 function bildschirmRun()
 	term.setCursorPos(1,7)
 	term.clearLine()
 	term.setCursorPos(1,12)
 	term.clearLine()
 	turtle.select(1) -- waehlt zum start slot 1 aus
 end
 --end: bereinigt den Bildschirm wen die turtel loslaeuft
 
 --**Hauptprogrammsteuerung
 --Setzen der globale Variablen (diese sind ueberall verfuegbar)
 endertruhe = 0    -- Endertruhe = nein
 fackeln = 0       -- Fackeln = 0
 ganganzahl = 0    -- Anzahl Gaenge = 0
 fuellevel = 0     -- Fuel-Level = 0
 
 -- bereinigt den Bildschirm und baut das eingabe Fenster auf
 bildschirmStart()
 
 -- fuerht 2 funktionen gleichzeitig aus, eingab und aktuellisuerung der Fakeln, Endertruhe, und Fullevel
 parallel.waitForAny(eingabeTunnellaenge, checkStatus)
 
 --Laed die Turtel vor dem start wieder auf wen etwas in slot 13 abgelegt wurde
 	turtle.select(13) -- Slot 13 auswaehlen
 	turtle.refuel(turtle.getItemCount(13)) -- auffuellung mit der anzahl Items in Slot 13
 
 -- hier wird der tunnel gegraben
 if (ganganzahl ~= 0) then -- mach das nur wen du auch wirklich was gemacht hast
 	tunnel() -- vielleicht so oder doch ueber einen extra status anzeige
 	back() -- hier komm die turtel wieder zurueck zum ausgangspunkt
 end
 --zeit an das die Turtel fertig ist
 zeigtFertig()