This repository has been archived on 2021-04-24. You can view files and clone it, but cannot push or open issues or pull requests.
Mikubot/plugins/tts.lua
2015-06-10 14:29:22 +02:00

40 lines
1.1 KiB
Lua

-- TTS plugin in lua
local function run(msg, matches)
local receiver = get_receiver(msg)
if matches[2] == nil then
text = matches[1]
lang = 'de'
else
text = matches[2]
lang = matches[1]
end
local b = 1
local text = string.gsub(text, "%+", "plus")
while b ~= 0 do
text,b = text:gsub('^+','+')
text = text:trim()
end
local text = string.gsub(text, "%s+", "+")
local text = string.gsub(text, "ä", "ae")
local text = string.gsub(text, "Ä", "Ae")
local text = string.gsub(text, "ö", "oe")
local text = string.gsub(text, "Ö", "Oe")
local text = string.gsub(text, "ü", "ue")
local text = string.gsub(text, "Ü", "Ue")
local text = string.gsub(text, "ß", "ss")
local url = "http://translate.google.com/translate_tts?tl="..lang.."&q=" .. text
local file = download_to_file(url)
local cb_extra = {file_path=file}
send_audio(receiver, file, rmtmp_cb, cb_extra)
end
return {
description = "Text To Speech",
usage = "/tts [whatever]",
patterns = {
"^/tts (.+)$",
"^/tts(%w+) (.+)$"
},
run = run
}