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-2/plugins/chatter.lua
2015-07-07 22:24:12 -04:00

50 lines
1004 B
Lua

-- shout-out to @luksi_reiku for showing me this site
local PLUGIN = {}
PLUGIN.triggers = {
'^@' .. bot.username .. ', ',
'^' .. bot.first_name .. ', '
}
function PLUGIN.action(msg)
local input = get_input(msg.text)
local url = 'http://www.simsimi.com/requestChat?lc=en&ft=1.0&req=' .. URL.escape(input)
local jstr, res = HTTP.request(url)
if res ~= 200 then
return send_message(msg.chat.id, "I don't feel like talking right now.")
end
local jdat = JSON.decode(jstr)
if string.match(jdat.res, '^I HAVE NO RESPONSE.') then
jdat.res = "I don't know what to say to that."
end
local message = jdat.res
-- Let's clean up the response a little. Capitalization & punctuation.
filter = {
['%aim%aimi'] = bot.first_name,
['^%s*(.-)%s*$'] = '%1',
['^%l'] = string.upper
}
for k,v in pairs(filter) do
message = string.gsub(message, k, v)
end
if not string.match(message, '%p$') then
message = message .. '.'
end
send_message(msg.chat.id, message)
end
return PLUGIN