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/giphy.lua

79 lines
1.9 KiB
Lua

-- Idea by https://github.com/asdofindia/telegram-bot/
-- See http://api.giphy.com/
do
local BASE_URL = 'http://api.giphy.com/v1'
local API_KEY = 'dc6zaTOxFJmzC' -- public beta key
local function get_image(response)
local images = json:decode(response).data
if #images == 0 then return nil end -- No images
local i = math.random(#images)
local image = images[i] -- A random one
if image.images.downsized then
return image.images.downsized.url
end
if image.images.original then
return image.original.url
end
return nil
end
local function get_random_top()
local url = BASE_URL.."/gifs/trending?api_key="..API_KEY
local response, code = http.request(url)
if code ~= 200 then return nil end
return get_image(response)
end
local function search(text)
text = URL.escape(text)
local url = BASE_URL.."/gifs/search?q="..text.."&api_key="..API_KEY
local response, code = http.request(url)
if code ~= 200 then return nil end
return get_image(response)
end
local function send_gif(cb_extra, success, result)
local receiver = cb_extra.receiver
local gif_url = cb_extra.gif_url
send_document_from_url(receiver, gif_url)
end
local function run(msg, matches)
local gif_url = nil
-- If no search data, a random trending GIF will be sended
if matches[1] == "/gif" or matches[1] == "/giphy" then
gif_url = get_random_top()
else
gif_url = search(matches[1])
end
if not gif_url then
return "Kein GIF gefunden!"
end
local receiver = get_receiver(msg)
print("GIF URL"..gif_url)
local text = 'Einen Moment, GIF wird hochgeladen.'
local cb_extra = {
gif_url = gif_url,
receiver = receiver
}
send_msg(receiver, text, send_gif, cb_extra)
end
return {
description = "Sucht und sendet ein GIF von Giphy",
usage = {"/gif [Begriff]","/giphy [Begriff]"},
patterns = {"^/gif$","^/gif (.*)","^/giphy (.*)","^/giphy$"},
run = run
}
end