Bedrock Endermine

--Introduction to my mining program--------------------------------------------------------------------------------------
--
--Autor: Spatzenhirn123
--
--Welcome to my turtle-mining-program!
--Feel free to use and share my program.
--
--REQUIREMENTS !!!
--1xMining-Turtle
--3xEnderchest (MOD: EnderStorage)
--	-1 for all mined blocks            // turtle-slot [1]		-Needs to be emptied!
--	-1 for refueling coal              // turtle-slot [2]		-Recommended to fill automatically
--	-1 for Bricks to build the surface // turtle-slot [3]		-Recommended to fill automatically
--
--Recommended:
--1xSpotloader in turtle-slot [4] (MOD: ChickenChunks)
--
--Set-Up:
--1. Place the turtle in the bottom-left corner of a chunk (press F9 to see borders).
--2. Fill the turtle-slots.
--3. Run: "#programname# startheight	   //like: "Mining 73"
--4. Have Fun! :D
--
-------------------------------------------------------------------------------------------------------------------------
--CODE-------------------------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------------
--Start height
	local args = {...}
	a = args[1]-5
 	b = a-1


--Startcheck: Fuel-------------------------------------------------------------------------------------------------------
function Start()
        shell.run("label set Ender-Mine")
	while turtle.getFuelLevel()<(136*a+10000) do
                turtle.select(2)
		turtle.placeUp()
		turtle.suckUp()
		shell.run("refuel all")
		turtle.select(2)
		turtle.digUp()
        end

	turtle.select(4)
	turtle.up()
	turtle.placeUp()
	turtle.select(1)
	turtle.down()

        print(" ")
        print("--------------------------------")
        print("Starting Quarry!")
        print("--------------------------------")
end



--Items to Ender-Chest---------------------------------------------------------------------------------------------------
function Item()
        turtle.dig()
        turtle.select(1)
        turtle.placeUp()
        for i=4,16,1 do
                turtle.select(i)
                turtle.dropUp()
        end
        turtle.select(1)
        turtle.digUp()
end



--End: Go back to the startposition--------------------------------------------------------------------------------------
function E()
	turtle.turnLeft()
	for e=1,15,1 do
		forward()
	end
	turtle.turnLeft()
	for e=1,15,1 do
		forward()
	end
	turtle.turnLeft()
	turtle.turnLeft()
end


--Chunkbreak-------------------------------------------------------------------------------------------------------------
function C()
	turtle.up()
	turtle.select(4)
	turtle.digUp()
	turtle.select(1)
	turtle.down()
end


--Build Flat-Ground------------------------------------------------------------------------------------------------------
--Get Bricks
function Bricks()
	while turtle.getItemSpace(4)>0 do
                turtle.select(3)
		turtle.placeUp()
		turtle.select(4)
		turtle.suckUp()
		turtle.select(3)
		turtle.digUp()
		turtle.select(4)
	end
end
--Building
function D()
	for d=1,3,1 do
		Bricks()
                for c=1,2,1 do
                        turtle.turnRight()
                        turtle.placeDown()
                        for r=1,15,1 do
                                forward()
                                turtle.placeDown()
                        end
                        turtle.turnLeft()
                        forward()
                        turtle.turnLeft()
                        turtle.placeDown()
                        for r=1,15,1 do
                                forward()
                                turtle.placeDown()
                        end
                        turtle.turnRight()
                        forward()
                end
        end
        Bricks()
        turtle.turnRight()
        turtle.placeDown()
        for r=1,15,1 do
                forward()
                turtle.placeDown()
        end
        turtle.turnLeft()
        forward()
        turtle.turnLeft()
        turtle.placeDown()
        for r=1,15,1 do
                forward()
                turtle.placeDown()
        end
        turtle.turnRight()
        forward()

        turtle.turnRight()
        turtle.placeDown()
        for r=1,15,1 do
                forward()
                turtle.placeDown()
        end
        turtle.turnLeft()
        forward()
        turtle.turnLeft()
        turtle.placeDown()
        for r=1,15,1 do
                forward()
                turtle.placeDown()
        end

        turtle.turnLeft()
        for r=1,15,1 do
                forward()
        end
        turtle.turnLeft()
        turtle.turnLeft()
	Item()
end


--Mining forms-----------------------------------------------------------------------------------------------------------
function forward()
	while turtle.forward()==false do
		sleep(1)
		turtle.dig()
	end
end

function up()
	while turtle.up()==false do
		sleep(1)
		turtle.digUp()
	end
end

function down()
	while turtle.down()==false do
		sleep(1)
		turtle.digDown()
	end
end

------------------------------------


function Weiter()
	forward()
	forward()
end


--Position
function PR()
	forward()
	turtle.turnRight()
	forward()
	forward()
	turtle.dig()
	turtle.turnRight()
	turtle.dig()
end
function PL()
	forward()
	turtle.turnLeft()
	forward()
	forward()
	turtle.dig()
	turtle.turnLeft()
	turtle.dig()
end



-------------------------------------------------------------------------------------------------------------------------
function L()
	for t=1,8,1 do
		turtle.digDown()
		turtle.turnRight()
		turtle.dig()
		turtle.turnLeft()
		turtle.dig()
		for w=1,b,1 do
			down()
			turtle.digDown()
			turtle.dig()
			turtle.turnRight()
			turtle.dig()
			turtle.turnLeft()
		end
		down()
		turtle.dig()
		turtle.turnRight()
		turtle.dig()
		turtle.turnLeft()
		for u=1,a,1 do
			up()
		end
		Item()
		if t<8 then
			Weiter()
		end
	end
end

-------------------------------------------------------------------------------------------------------------------------
function T()
	for t=1,8,1 do
		turtle.digDown()
		turtle.turnRight()
		turtle.dig()
		turtle.turnLeft()
		turtle.dig()
		turtle.turnLeft()
		turtle.dig()
		turtle.turnRight()
		for w=1,b,1 do
			down()
			turtle.digDown()
			turtle.turnRight()
			turtle.dig()
			turtle.turnLeft()
			turtle.dig()
			turtle.turnLeft()
			turtle.dig()
			turtle.turnRight()
		end
		down()
		turtle.turnRight()
		turtle.dig()
		turtle.turnLeft()
		turtle.dig()
		turtle.turnLeft()
		turtle.dig()
		turtle.turnRight()
		for u=1,a,1 do
			up()
		end
		Item()
		if t<8 then
			Weiter()
		end
	end
end


-------------------------------------------------------------------------------------------------------------------------
function I()
	forward()
	turtle.turnLeft()
	forward()
	turtle.turnLeft()
	forward()
	turtle.dig()
	for t=1,4,1 do
		turtle.digDown()
		turtle.dig()
		turtle.turnRight()
		turtle.turnRight()
		turtle.dig()
		turtle.turnLeft()
		turtle.turnLeft()
		for w=1,b,1 do
			down()
			turtle.digDown()
			turtle.dig()
			turtle.turnRight()
			turtle.turnRight()
			turtle.dig()
			turtle.turnLeft()
			turtle.turnLeft()
		end
		down()
		turtle.dig()
		turtle.turnRight()
		turtle.turnRight()
		turtle.dig()
		turtle.turnLeft()
		turtle.turnLeft()
		for u=1,a,1 do
			up()
		end
		Item()
		if t<4 then
			Weiter()
			Weiter()
		else
			Weiter()
		end
	end
end



-------------------------------------------------------------------------------------------------------------------------
--Actions----------------------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------------


	Start()
	L()
	for w=1,3,1 do
		PR()
		T()
		PL()
		T()
	end
	PR()
	T()
	I()
	E()
	D()
	C()