View difference between Paste ID: pk6NUgbg and TL4ptrYd

--- TL4ptrYd
+-- pk6NUgbg
-local tArgs = { ... }
+--local tArgs = { ... }
-if #tArgs ~= 1 then
+--if #tArgs ~= 1 then
-	print( "Usage: tunnel <length>" )
+--	print( "Usage: tunnel <length>" )
-	return
+--	return
 --end
 term.clear()
 print( " Diese Programm dient zum Faellen eine Mammuts Baum")
-local length = tonumber( tArgs[1] )
+print()
-if length < 1 then
+write( " Wie hoch ist der Baum ? ")
-	print( "Tunnel length must be positive" )
+length=io.read()
-	return
+print()
 print( " Wir gehen "..length.." Bloecke hoch um den Baum zu faellen.")
 
 -- Mine in a quarry pattern until we hit something we can't dig
 --local length = tonumber( tArgs[1] )
 --if length < 1 then
 --	print( "Tunnel length must be positive" )
 --	return
 --end
 
 local depth = length
 local collected = 0
 
 local function collect()
 	collected = collected + 1
 	if math.fmod(collected, 25) == 0 then
 		print( "Mined "..collected.." items." )
 	end
 end
 
 local function tryDig()
 	while turtle.detect() do
 		if turtle.dig() then
 			collect()
 			sleep(0.5)
 		else
 			return false
 		end
 	end
 	return true
 end
 
 local function tryDigUp()
 	while turtle.detectUp() do
 		if turtle.digUp() then
 			collect()
 			sleep(0.5)
 		else
 			return false
 		end
 	end
 	return true
 end
 
 local function refuel()
 	local fuelLevel = turtle.getFuelLevel()
 	if fuelLevel == "unlimited" or fuelLevel > 0 then
 		return
 	end
 
 	local function tryRefuel()
 		for n=1,16 do
 			if turtle.getItemCount(n) > 0 then
 				turtle.select(n)
 				if turtle.refuel(1) then
 					turtle.select(1)
 					return true
 				end
 			end
 		end
 		turtle.select(1)
 		return false
 	end
 
 	if not tryRefuel() then
 		print( "Add more fuel to continue." )
 		while not tryRefuel() do
 			sleep(1)
 		end
 		print( "Resuming Tunnel." )
 	end
 end
 
 local function tryUp()
 	refuel()
 	while not turtle.up() do
 		if turtle.detectUp() then
 			if not tryDigUp() then
 				return false
 			end
 		elseif turtle.attackUp() then
 			collect()
 		else
 			sleep( 0.5 )
 		end
 	end
 	return true
 end
 
 local function tryDown()
 	refuel()
 	while not turtle.down() do
 		if turtle.detectDown() then
 			if not turtle.digDown() then
 				return false
 			end
 		elseif turtle.attackDown() then
 			collect()
 		else
 			sleep( 0.5 )
 		end
 	end
 	return true
 end
 
 local function tryForward()
 	refuel()
 	while not turtle.forward() do
 		if turtle.detect() then
 			if not tryDig() then
 				return false
 			end
 		elseif turtle.attack() then
 			collect()
-print( " Fackeln in Slot 15 ")
+
-print( "Tunnelling..." )
+
 		end
 	end
-        pro = 100/length*n
+
-	turtle.placeDown()
+
-	tryDigUp()
+
 
-	for UP=1,25 do
+print( " Baum faellen..." )
-	tryDig()
+
 for nu=1,length do
 	tryUp()
-	tryDig()
+
-	turtle.turnRight()
+
-	turtle.turnRight()
+    pro = 100/length*n
-	tryForward()
+	for Flaeche=1,6 do
-	for DW=1,25 do
+		for go1=1,12 do
-	tryDig()
+			tryDig()
 			tryForward()
 		end
-        tryDig()
+		turtle.turnRight()
-	j = j+1
+--		print("1")
-	if j == 5 then
+
-	    turtle.select(15)
+--		print("2")
-	    turtle.placeDown()
+		tryForward()
-	    j = 0
+--		print("3")
-        end
+		turtle.turnRight()
 --		print("4")
 		for go2=1,12 do
 			tryDig()
-	tryForward()
+			tryForward()
-	turtle.turnRight()
+
 		turtle.turnLeft()
-	if n<length then
+
 		tryForward()
-		if not tryForward() then
+		turtle.turnLeft()
-			print( "Aborting Tunnel." )
+
-			break
+	for go3=1,12 do
 		tryDig()
-	else
+		tryForward()
-		print( "Tunnel complete." )
+
 	turtle.turnLeft()
 	turtle.turnLeft()
 	tryDown()
 	term.setCursorPos(1,6)
 	term.clearLine()
-print( "Mined "..collected.." items total." )
+
 end
 --if n<length then
 --	if not tryDown() then
 --		print( "Aborting Tunnel." )
 --		break
 --	end
 --else
 --		print( "Tunnel complete." )
 --end
 
 
 print( "Tunnel complete." )
 --print( "Mined "..collected.." items total." )