--This program will excavate in a 10x10 area
--Starts from the bottom left

--Init
local wide = 0
local wideCount = 0
local long = 0
local longCount = 0
local deep = 0
local deepCount = 0
local totalBlocks = 0
local coalNeeded = 0
local correct = n
local xPos = 0
local yPos = 0
local zPos = 0
local facing = 0 --right +, left -
local initFace = 0
-- Inventory: This Will Check At Start Code
local chest = 0
local fuelCount = 0
local fuelCount1 = 0
local noFuelNeed = 0 -- if Config is set to not use fuel, set = 1
local error = 0 -- Error Code
local reCheck = 0 -- Recheck Code
-- Others
local totalBlocks = 0
local totalBlockDone = 0 -- How many Block Mined
local LSorWS = 0 -- Go Left or Go Right This is for Wide Code
local ALorAR = 0 -- align left Or align Right
local processRaw = 0
local process = 0
local enderChest = 0 -- TODO
local blockUp = 0 -- Fixing to Chest Probleem and moving probleem
local processRaw = 0
local process = 0

-- Checking
local function check()
    if noFuelNeed == 0 then
        if fuelCount == 0 then
            print("Turtle has no fuel")
            print("Put fuel in Second and Thrid slot")
            error = 1
        else
            print("Turtle has Fuel")
        end
        if fuelCount1 == 0 then
            print("Turtle has no extra fuel but will run until empty")
        end
    end
    if chest == 0 then
        print("No chest in Turtle")
        print("Put chest in 1 slot")
        error = 1
    else
        print("Turtle has chest")
    end
    if error == 1 then
        print("Items are missing please try again")
        print("Turtle will recheck in 8 sec")
    end
end

-- Recheck if user forget something turtle will check after 6 sec
local function reCheck()
    chest = turtle.getItemCount(1)
    fuelCount = turtle.getItemCount(2)
    fuelCount1 = turtle.getItemCount(3)
    error = 0
end

-- Chest Dump
local function chestDump()
    if turtle.getItemCount(16)> 0 then -- If slot 16 in turtle has item slot 4 to 16 will go to chest
		initFace = facing % 4

		repeat
			turtle.turnLeft()
			facing = facing - 1
		until facing % 4 == 3

		while xPos < 0 do
			turtle.back()
			xPos = xPos + 1
		end

		while xPos > 0 do
			turtle.forward()
			xPos = xPos - 1
		end


		repeat
			turtle.turnLeft()
			facing = facing - 1
		until facing % 4 == 2

		while yPos < 0 do
			turtle.back()
			yPos = yPos + 1
		end

		while yPos > 0 do
			turtle.forward()
			yPos = yPos - 1
		end


		while zPos < 0 do
			turtle.up()
			zPos = zPos + 1
		end


		for slot = 4, 16 do
			turtle.select(slot)
			sleep(0.6)
			turtle.dropUp()
		end

		turtle.select(4)

		repeat
			turtle.turnLeft()
			facing = facing - 1
		until facing % 4 == 1

		while xPos < wideCount do
			turtle.forward()
			xPos = xPos + 1
		end

		repeat
			turtle.turnLeft()
			facing = facing - 1
		until facing % 4 == 0

		while yPos < longCount do
			turtle.forward()
			yPos = yPos + 1
		end

		while zPos < deepCount do
			turtle.down()
			zPos = zPos - 1
		end

		repeat
			turtle.turnLeft()
			facing = facing - 1
		until facing % 4 == initFace
    end
end

-- Refuel
local function refuel()
    if noFuelNeed == 0 then
        repeat
            if turtle.getFuelLevel() < 160 then
                if fuelCount > 0 then
                    turtle.select(2)
                    turtle.refuel(1)
                    fuelCount = fuelCount - 1
                elseif fuelCount1 > 0 then
                    turtle.select(3)
                    turtle.refuel(1)
                    fuelCount1 = fuelCount1 - 1
                else
                    print("out of fuel")
                    os.shutdown()
                end
            end
        until turtle.getFuelLevel() >= 160
    end
end

local function mineLong()
    if turtle.detect() then
        turtle.dig()
    end
    if turtle.forward() then
		if facing % 4 == 0 then
			yPos = yPos + 1
		elseif facing % 4 == 1 then
			xPos = xPos + 1
		elseif facing % 4 == 2 then
			yPos = yPos - 1
		elseif facing % 4 == 3 then
			xPos = xPos - 1
		end

        longCount = longCount + 1
    else
        repeat
            turtle.dig()
            sleep(0.6)
            if turtle.forward() then
				if facing % 4 == 0 then
					yPos = yPos + 1
				elseif facing % 4 == 1 then
					xPos = xPos + 1
				elseif facing % 4 == 2 then
					yPos = yPos - 1
				elseif facing % 4 == 3 then
					xPos = xPos - 1
				end
                blockUp = 0
            else
                blockUp = 1
            end
        until blockUp == 0
        longCount = longCount + 1
        print(totalBlocks - totalBlockDone)
    end
    if turtle.detectUp() then
        turtle.digUp()
    end
    if turtle.detectDown() then
        turtle.digDown()
    end
    totalBlockDone = totalBlockDone + 3
end

local function wideMineLeft() -- TODO
    turtle.turnLeft()
	facing = facing - 1
    if turtle.detect() then
        turtle.dig()
        sleep(0.6) -- Minor bug fix if there is gravel
    end
    if turtle.forward() then
        if facing % 4 == 0 then
			yPos = yPos + 1
		elseif facing % 4 == 1 then
			xPos = xPos + 1
		elseif facing % 4 == 2 then
			yPos = yPos - 1
		elseif facing % 4 == 3 then
			xPos = xPos - 1
		end
    else
        repeat
            turtle.dig()
            sleep(0.6)
            if turtle.forward() then
				if facing % 4 == 0 then
					yPos = yPos + 1
				elseif facing % 4 == 1 then
					xPos = xPos + 1
				elseif facing % 4 == 2 then
					yPos = yPos - 1
				elseif facing % 4 == 3 then
					xPos = xPos - 1
				end
                blockUp = 0
            else
                blockUp = 1
            end
        until blockUp == 0
    end
    if turtle.detectUp() then
        turtle.digUp()
    end
    if turtle.detectDown() then
        turtle.digDown()
    end
    turtle.turnLeft()
	facing = facing - 1
    LSorWS = 0
    longCount = 0
    wideCount = wideCount + 1
    totalBlockDone = totalBlockDone + 3
    end

local function wideMineRight() -- TODO
    turtle.turnRight()
	facing = facing + 1
    if turtle.detect() then
        turtle.dig()
        sleep(0.6)
    end
    if turtle.forward() then
        if facing % 4 == 0 then
			yPos = yPos + 1
		elseif facing % 4 == 1 then
			xPos = xPos + 1
		elseif facing % 4 == 2 then
			yPos = yPos - 1
		elseif facing % 4 == 3 then
			xPos = xPos - 1
		end
    else
        repeat
            turtle.dig()
            sleep(0.6)
            if turtle.forward() then
				if facing % 4 == 0 then
					yPos = yPos + 1
				elseif facing % 4 == 1 then
					xPos = xPos + 1
				elseif facing % 4 == 2 then
					yPos = yPos - 1
				elseif facing % 4 == 3 then
					xPos = xPos - 1
				end
                blockUp = 0
            else
                blockUp = 1
            end
        until blockUp == 0
    end
    if turtle.detectUp() then
        turtle.digUp()
    end
    if turtle.detectDown() then
        turtle.digDown()
    end
    turtle.turnRight()
	facing = facing + 1
    LSorWS = 1
    longCount = 0
    wideCount = wideCount + 1
    totalBlockDone = totalBlockDone + 3
end

local function deepMine()
    turtle.digDown()
    turtle.down()
		zPos = zPos - 1
    turtle.digDown()
    turtle.down()
		zPos = zPos - 1
    turtle.digDown()
    turtle.down()
		zPos = zPos - 1
    turtle.digDown()
    turtle.turnRight()
	facing = facing + 1
    turtle.turnRight()
	facing = facing + 1
    wideCount = 0
    longCount = 0
    deepCount = deepCount + 3
    totalBlockDone = totalBlockDone + 3
end

local function main()
    repeat --Repeat for each level
        mineLong()
        refuel()
        chestDump()
        if longCount == long then
            if wideCount ~= wide then
                process = totalBlockDone / totalBlocks * 100
                processRaw = totalBlocks - totalBlockDone
                print("How Much Is Done: " .. math.floor(process+0.5) .. " %")
                print("TotalBlocks Still Need To Dig Is " .. processRaw)
                if LSorWS == 0 then
                    wideMineRight()
                else
                    wideMineLeft()
                end
            elseif wideCount >= wide then
                    deepMine()
            end
        end
    until deepCount >= deep
    print("turtle is Done")
end

local function firstDig()
    turtle.digDown()
    turtle.down()
		zPos = zPos - 1
    turtle.digDown()
    turtle.down()
		zPos = zPos - 1
    turtle.digDown()
    wideCount = 0
    longCount = 0
    totalBlockDone = totalBlockDone + 3
end

local function start()
    print("Welcome To The Dig Turtle Program")
    print("Slot 1: Chest, Slot 2: Fuel, Slot 3: Fuel")
    print("How long(Length) do you want")
    input = io.read()
    long = tonumber(input)
    long = long - 1
    print("How wide(Width) do you want")
    input2 = io.read()
    wide = tonumber(input2)
    wide = wide - 1
    print("How Deep(Depth) do you Want")
    input3 = io.read()
    deep = tonumber(input3)
    print("Is This Correct?: Length = " .. (long + 1) .. " Width = " .. (wide + 1) .. " Depth = " .. (deep))
    print("Type Y if correct or N if incorrect")
    correct = io.read()
    if correct == n or N then
        os.reboot()
    end
    print("Okay Program Will Do Calculations")
    totalBlocks = (wide + 1) * (long + 1) * deep -- 1 is add because above it removed for wide and long code
    print("Total amount for block to mine is " .. totalBlocks)
    coalNeeded = totalBlocks / 3 / 80
    print("Total amount for Coal needed is " .. math.floor(coalNeeded+0.5))
    if turtle.getFuelLevel() == "unlimited" then
        print("Your turtle config does need fuel")
        noFuelNeed = 1
    elseif turtle.getFuelLevel() < 160 then
        turtle.select(2)
        turtle.refuel(2)
    end
    reCheck()
    check()
    if error == 1 then
        repeat
            sleep(6)
            reCheck()
            check()
        until error == 0
    end
end

start()
print("Turtle will now start!")
turtle.select(1)
turtle.placeUp()
firstDig()
main()