Strip Mine Turtle [os 1.3]

--Local
local distance = 0 -- How Far Did User Pick
local onlight = 0 -- When to Place Torch
local torch = turtle.getItemCount(1) -- How many items are in slot 1 (torch)
local MD = 3 -- How Many Blocks Apart From Each Mine
local MineTimes = 0 -- If Multi Mines Are ON then This will keep Count
local Error = 0 -- 0 = No Error and 1 = Error
local Way = 0 -- 0 = Left and 1 = Right

--Checking
local function Check()
    if torch == 0 then
        print("There are no torch's in Turtle")
        Error = 1
    else
        print("There are torch's in turtle")
    end
end

-- Recheck if user forget something turtle will check after 15 sec
local function Recheck()
    torch = turtle.getItemCount(1)
    Error = 0
end

--Mining
local function ForwardM()
    repeat
        if turtle.detect() then
            turtle.dig()
        end
        if turtle.forward() then -- sometimes sand and gravel and block and mix-up distance
            TF = TF - 1
            onlight = onlight + 1
        end
        if turtle.detectUp() then
            turtle.digUp()
        end
        turtle.up()
        if turtle.detectUp() then
            turtle.digUp()
        end
        turtle.down()
        turtle.select(2)
        repeat
            turtle.placeDown()
            sleep(0.2)
        until turtle.detectDown()
        if onlight == 8 then -- Every 10 Block turtle place torch
            if torch > 0 then
                turtle.turnLeft()
                turtle.turnLeft()
                turtle.select(1)
                turtle.place()
                turtle.turnLeft()
                turtle.turnLeft()
                torch = torch - 1
                onlight = onlight - 8
            else
                print("turtle run out of torchs")
                os.shutdown()
            end
        end
        if turtle.getItemCount(9)>0 then -- If slot 9 in turtle has item slot 4 to 9 will go to chest
            print("Waiting to be emptied")
            repeat
                sleep(10)
            until turtle.getItemCount(9) == 0
        end
    until TF == 0
end

--Warm Up For Back Program
local function WarmUpForBackProgram() -- To make turn around so it can go back
    turtle.turnLeft()
    turtle.turnLeft()
    turtle.up()
end

--Back Program
local function Back()
    repeat
        if turtle.forward() then -- sometimes sand and gravel and block and mix-up distance
            TB = TB - 1
        end
        if turtle.detect() then -- Sometimes sand and gravel can happen and this will fix it
            if TB ~= 0 then
                turtle.dig()
            end
        end
    until TB == 0
end

-- Multimines Program
local function MultiMines()
    if Way == 1 then
        turtle.turnLeft()
        turtle.down()
    else
        turtle.turnRight()
        turtle.down()
    end
    repeat
        if turtle.detect() then
            turtle.dig()
        end
        if turtle.forward() then
            MD = MD - 1
        end
        if turtle.detectUp() then
            turtle.digUp()
        end
    until MD == 0
    if Way == 1 then
        turtle.turnLeft()
    else
        turtle.turnRight()
    end
    if MineTimes == 0 then
        print("Turtle is done")
    else
        MineTimes = MineTimes - 1
    end
end

-- Restart
local function Restart()
    TF = distance
    TB = distance
    MD = 3
    onlight = 0
end

-- Starting
function Start()
    repeat
        ForwardM()
        WarmUpForBackProgram()
        Back()
        MultiMines()
        Restart()
    until MineTimes == 0
end

-- Start
print("Hi There Welcome to Mining Turtle Program")
print("Designed for turtle os 1.3")
print("Torches go in slot 1")
print("Gravel in slot 2")
print("turtle will stop and wait when it needs to be emptied")
print("How Far Will Turtle Go")
input = io.read()
distance = tonumber(input)
TF = distance
TB = distance
print("Left or Right")
print("0 = Left and 1 = Right")
input2 = io.read()
Way = tonumber(input2)
print("How Many Times")
input3 = io.read()
MineTimes = tonumber(input3)
Check()
if Error == 1 then
    repeat
        sleep(10)
        Recheck()
        Check()
    until Error == 0
end
Start()