messageSender.lua

function sendWithThisBox(boxKey)

    for k,v in pairs(sendTheseMessages) do
    curMessageKey = k
    curMessage = v["message"]
    curPlayer = v["player"]
    curColor = v["color"]
    break
    end

local chatBox = chatBoxes[boxKey]["peripheral"]


    if type(curMessage) ~= "table" then
    local json = textutils.serialiseJSON({text = curMessage, color = curColor})
    chatBox.sendFormattedMessageToPlayer(json, curPlayer, systemName)
    table.remove(sendTheseMessages, curMessageKey)
    chatBoxes[boxKey]["cooldownTime"] = os.epoch("local")
    return
    end


    for k,v in pairs(curMessage) do
        if type(v) == "table" then
            if not v["color"] then
            curMessage[k]["color"] = curColor
            end
        else
        curMessage[k] = {text = v, color = curColor}
        end
    end

local json = textutils.serialiseJSON(curMessage)
chatBox.sendFormattedMessageToPlayer(json, curPlayer, systemName)


table.remove(sendTheseMessages, curMessageKey)
chatBoxes[boxKey]["cooldownTime"] = os.epoch("local")
end




function mainSender()
    while true do
        if table.maxn(sendTheseMessages) < 1 then
        os.pullEvent("sendMessage")
        else
        sleep(0.05)
        end


        for chatBoxKey,chatBox in pairs(chatBoxes) do
            if os.epoch("local") - chatBox["cooldownTime"] > 999 then
            sendWithThisBox(chatBoxKey)
            end

            if table.maxn(sendTheseMessages) < 1 then
            break
            end
        end

    end
end



    while true do
    sleep(1)
    mainSender()
    end