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
2016-06-22 13:59:06 +02:00

49 lines
1.4 KiB
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 text = string.gsub(text, "%&", "und")
if string.len(text) > 160 then return 'Text zu lang!' end
local text = string.gsub(text, " ", "+")
local url = 'http://tts.baidu.com/text2audio?lan='..lang..'&ie=UTF-8&text='..text
local file = download_to_file(url, text..'.mp3')
if not file then
return "Ein Fehler ist aufgetreten, besuche die URL eventuell direkt?\n"..url
end
local cb_extra = {file_path=file}
send_audio(receiver, file, rmtmp_cb, cb_extra)
end
return {
description = "Text-To-Speech",
usage = {
"#tts [Text]: Sendet Sprachnachricht mit dem Text",
"#tts(Sprache) [Text]: Sendet Sprachnachricht in der Sprache mit dem Text"
},
patterns = {
"^#tts (.+)$",
"^#tts(%w+) (.+)$"
},
run = run
}