Turtle Melon Farmer 1.0

-- Turtle Melon Farmer -- -- AdventurousMR --

local bin = peripheral.wrap("Bottom")

function limeWool()
    turtle.turnLeft()
    turtle.forward()
    turtle.turnLeft()
end

function redWool()
    turtle.turnRight()
    turtle.forward()
    turtle.turnRight()
end

function lightBlueWool()
    turtle.turnRight()
    turtle.turnRight()
    for i=1,16 do
        turtle.select(i)
        local item = turtle.getItemDetail()
        if item ~= nil and item.name == "minecraft:melon_slice" then
            turtle.dropDown()
        end
    end
    station()
end

function orangeWool()
    turtle.turnLeft()
    while true do
        local I_success, I_data = turtle.inspect()
        if I_success and I_data.name == "minecraft:orange_wool" then
            orangeWool()
        elseif I_success and I_data.name == "minecraft:light_blue_wool" then
            lightBlueWool()
            break
        else
            turtle.forward()
        end
    end
end

function run()
    local ID_success, ID_data = turtle.inspectDown()
    local I_success, I_data = turtle.inspect()

    if ID_success and ID_data.name == "minecraft:melon" then
        turtle.digDown()
        run()
    elseif I_success and I_data.name == "minecraft:red_wool" then
        redWool()
        run()
    elseif I_success and I_data.name == "minecraft:lime_wool" then
        limeWool()
        run()
    elseif I_success and I_data.name == "minecraft:light_blue_wool" then
        lightBlueWool()
    elseif I_success and I_data.name == "minecraft:orange_wool" then
        orangeWool()
    elseif ID_success == false or ID_success and ID_data.name ~= "minecraft:melon" then
        turtle.forward()
        run()
    end
end

function station()
    while true do
        if bin.getStored().count < 50 then
            run()
            break
        end
    end
end

station()