-- SERVER

function convertTextToSpeech(text, broadcastTo, lang)
    -- Ensure first argument is valid
    assert(type(text) == "string", "Bad argument 1 @ convertTextToSpeech [ string expected, got " .. type(text) .. "]")
    assert(#text <= 100, "Bad argument 1 @ convertTextToSpeech [ too long string; 100 characters maximum ]")
    if triggerClientEvent then -- Is this function called serverside?
        -- Ensure second and third arguments are valid
        assert(broadcastTo == nil or type(broadcastTo) == "table" or isElement(broadcastTo), "Bad argument 2 @ convertTextToSpeech [ table/element expected, got " .. type(broadcastTo) .. "]")
        assert(lang == nil or type(lang) == "string", "Bad argument 3 @ convertTextToSpeech [ string expected, got " .. type(lang) .. "]")
        -- Tell the client to play the speech
        return triggerClientEvent(broadcastTo or root, "playTTS", root, text, lang or "en")
    else -- This function is executed clientside
        local lang = broadcastTo
        -- Ensure second argument is valid
        assert(lang == nil or type(lang) == "string", "Bad argument 2 @ convertTextToSpeech [ string expected, got " .. type(lang) .. "]")
        return playTTS(text, lang or "en")
    end
end

function testSpeech ( player, cmd )
    convertTextToSpeech("Dziękować", player, "pl")
    outputChatBox("SERVERSIEDE OK")
end
addCommandHandler ( "testing", testSpeech )


-- CLIENT

addEvent("playTTS", true) -- Add the event

local function playTTS(text, lang)
    --local URL = "http://translate.google.com/translate_tts?tl=" .. lang .. "&q=" .. text
    local URL = "https://code.responsivevoice.org/getvoice.php?tl=" .. lang .. "&t=" .. text
    -- Play the TTS. BASS returns the sound element even if it can not be played.
    outputChatBox("CLIENTSIDE OK")
    return true, playSound(URL), URL
end
addEventHandler("playTTS", root, playTTS)