Mikubot/plugins/9gag.lua

do

function get_9GAG()
  local b = http.request("http://api-9gag.herokuapp.com/")
  local gag = json:decode(b)
  local i = math.random(#gag) -- random max json table size (# is an operator o.O)
  local link_image = gag[i].src
  local title = gag[i].title
  if link_image:sub(0,2) == '//' then
    link_image = msg.text:sub(3,-1)
  end
  return link_image, title
end

function send_title(cb_extra, success, result)
  if success then
    send_msg(cb_extra[1], cb_extra[2], ok_cb, false)
  end
end

function run(msg, matches)
  local receiver = get_receiver(msg)
  url, title = get_9GAG()
  file_path = download_to_file(url)
  _send_photo(receiver, file_path, send_title, {receiver, title})
  return false
end

return {
  description = "9GAG for telegram",
  usage = "!9gag: Send random image from 9gag",
  patterns = {"^!9gag$"},
  run = run
}

end