View difference between Paste ID: CJ5iY7G0 and rjLYah4D

---Stairs Down Simple Script v1
+--Tunnel Simple Script v1
 --Turtle Program Computer Craft
---by SemlerPDX(July2016)
+--by SemlerPDX(July2021)
 
 --pastebin get CJ5iY7G0 Tunnel
---torches must be in slot 1 (one for every 3rd layer dug)
+
---stairs can be in slot 2 if desired, see below
+
 --torches must be in slot 1 (one for every 8th block, 2nd row high)
---StairsDown 20 (number of stairs down) 1 (or blank -- 1 will add stairs from slot 2)
+
---example:  StairsDown 20 (makes stairs 20 deep with torches but no stair blocks)
+--Tunnel 20 (length in increments of 10)
---example2: StairsDown 20 1 (makes stairs 20 deep w/ torches and stair blocks)
+--example:  Tunnel 20 (makes tunnel 20 deep with torches)
 
 
 -- Variables --
 local args = {...}
 local d = args[1] or 0
-local s = args[2] or 0
+
 local t = turtle
 
-local lit = 2
+
 if #args ~= 1 then
   print("<error420: syntax>")
-if #args ~= 2 then
+  print("<ex: Tunnel 20 (starts digging tunnel 20 blocks deep)>")
   return
-  print("<ex: Stairs 20 1 (starts digging stairs 20 blocks deep with stair blocks in slot 2)>")
+
 
 if d == 0 then
   print("<error421: missing length>")
   print("<ex: Tunnel 20 (starts digging tunnel 20 blocks deep)>")
   return
-  print("<ex: Stairs 20 (starts digging stairs 20 blocks deep)>")
+
 
 -- Functions --
 --force forward function by CCCode
 local function forceForward()
   while not t.forward() do
     t.dig()
   end
 end
 
 --dig down, decrement lit variable
 local function fDown()
   t.digDown()
   t.down()
 end
 
-  lit = lit - 1
+--dig up, turn around
 local function fUp()
   t.digUp()
---shave 4 blocks and place torch if needed
+  t.up()
-local function fShave()
+
-  for v=1,4 do
+
-   	if v == 3 then
+local function fRow()
- 	    if lit == 0 then
+  fUp()
-	      	t.placeUp()
+  fUp()
-  	    	lit = lit + 2
+
-	        forceForward()
+    for s=1,10 do
-	     else
+      if v == 3 and s == 5 then
-       	    forceForward()
+		t.placeUp()
-	     end
+      end
-   	else
+      forceForward()
-	     forceForward()
+    end
-   	end
+    if v ~= 3 then
       t.turnLeft()
       t.turnLeft()
       fDown()
---move to next shaving position
+	end
-local function fReturn()
+
 end
-   	t.back()
+
 --return home
 local function fHome()
   t.turnLeft()
---place stairs while returning home
+
-local function fHomeS()
+
     forceForward()
     r = r -1
-  t.select(2)
+
 end
-   	t.place()
+
-   	t.up()
+
-   	t.forward()
+
-   	r = r -1
+
   term.setCursorPos(1,1)
 end
 
 -- Pre-fire scripts --
 fset()
 print("Beginning Tunnel "..tostring(d).." blocks long...")
- 	t.up()
+--t.up()
- 	t.back()
+--t.down()
- 	r = r -1
+
 
 ---- Main Loop ----
 while d ~= 0 do
 
   local function fcancel()
     local event, key = os.pullEvent("key")
   end
 
   local function fmain()
     fRow()
     d = d - 10
-print("Building staircase "..tostring(d).." blocks down...")
+
-t.digDown()
+
-t.down()
+
 
   if FunctionEnabled == 1 then
     textutils.slowPrint("Cancelling Tunnel...", 15)
     sleep(1.65)
     break
   end
 
 end
 
 -- Evaluate Ending --
-    fShave()
+
-   	fReturn()
+
-   	fDown()
+  print("Tunnel Cancelled by user")
-   	d = d - 1
+
   fset()
   print("Tunnel Completed")
   print("Returning home...")
   fHome()
   t.select(1)
-    textutils.slowPrint("Cancelling Build...", 15)
+
   print("...program complete")
 end