Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local tArgs = { ... }
- if #tArgs ~= 2 then
- print( "Usage: tunnel <length> <diameter>" )
- return
- end
- -- Mine in a quarry pattern until we hit something we can't dig
- local length = tonumber( tArgs[1] )
- local diameter = tonumber(tArgs[2])
- if length < 1 then
- print( "Tunnel length must be positive" )
- return
- end
- if diameter < 1 then
- print( "Tunnel diameter must be positive" )
- return
- end
- if diameter % 2 == 0 then
- print("Diameter must be uneven")
- return
- end
- local depth = 0
- 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 tryDigDown()
- while turtle.detectDown() do
- if turtle.digDown() 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
- os.pullEvent( "turtle_inventory" )
- 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 tryDigDown() 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()
- else
- sleep( 0.5 )
- end
- end
- return true
- end
- print( "Tunnelling..." )
- local function dig_forward()
- for w=1,((diameter-1)/2) - 1 do
- print("Going forward 1")
- tryDig()
- turtle.forward()
- -- tryForward()
- end
- tryDig()
- for w=1,((diameter-1)/2) - 1 do
- print("Going back 1")
- turtle.back()
- end
- end
- local function dig_column(direction)
- for h=1,diameter-1 do
- dig_forward()
- if direction == "up" then
- print("Going up")
- tryUp()
- else
- print("Going down")
- tryDown()
- end
- end
- dig_forward()
- end
- local function do_iteration(n)
- print("Diameter is", diameter, "len is", length)
- if diameter > 1 then
- print("Diam is bigger than 1")
- -- Minimum diameter = 3
- dig_forward()
- turtle.turnLeft()
- dig_column("up")
- turtle.turnRight()
- turtle.turnRight()
- dig_column("down")
- dig_forward()
- turtle.turnLeft()
- end
- if n<length then
- tryDig()
- if not tryForward() then
- print( "Aborting Tunnel." )
- return false
- end
- else
- print( "Tunnel complete." )
- end
- return true
- end
- for n=1,length do
- if not do_iteration(n) then
- break
- end
- end
- --[[
- print( "Returning to start..." )
- -- Return to where we started
- turtle.turnLeft()
- turtle.turnLeft()
- while depth > 0 do
- if turtle.forward() then
- depth = depth - 1
- else
- turtle.dig()
- end
- end
- turtle.turnRight()
- turtle.turnRight()
- ]]
- print( "Tunnel complete." )
- print( "Mined "..collected.." items total." )
Add Comment
Please, Sign In to add comment