68 lines
1.6 KiB
Lua
68 lines
1.6 KiB
Lua
|
do
|
||
|
|
local URL = "http://danbooru.donmai.us"
|
||
|
|
local URL_NEW = "/posts.json"
|
||
|
|
local URL_POP = "/explore/posts/popular.json"
|
||
|
|
|
||
|
|
local scale_day = "?scale=day"
|
||
|
|
local scale_week = "?scale=week"
|
||
|
|
local scale_month = "?scale=month"
|
||
|
|
|
||
|
|
function get_post(url)
|
||
|
|
local b, c, h = http.request(url)
|
||
|
|
local posts = json:decode(b)
|
||
|
|
|
||
|
|
-- bad random - bad magic...
|
||
|
|
math.randomseed( os.time() )
|
||
|
|
math.random(#posts)
|
||
|
|
math.random(#posts)
|
||
|
|
|
||
|
|
return posts[math.random(#posts)]
|
||
|
|
end
|
||
|
|
|
||
|
|
function run(msg, matches)
|
||
|
|
|
||
|
|
local url = URL
|
||
|
|
|
||
|
|
if matches[1] == "/dan" then
|
||
|
|
url = url .. URL_NEW
|
||
|
|
else
|
||
|
|
url = url .. URL_POP
|
||
|
|
|
||
|
|
if matches[1] == "/dand" then
|
||
|
|
url = url .. scale_day
|
||
|
|
elseif matches[1] == "/danw" then
|
||
|
|
url = url .. scale_week
|
||
|
|
elseif matches[1] == "/danm" then
|
||
|
|
url = url .. scale_month
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
local post = get_post(url)
|
||
|
|
|
||
|
|
local receiver = get_receiver(msg)
|
||
|
|
local img = URL .. post.large_file_url
|
||
|
|
send_photo_from_url(receiver, img)
|
||
|
|
|
||
|
|
local txt = 'Artist: ' .. post.tag_string_artist .. '\n'
|
||
|
|
txt = txt .. 'Character: ' .. post.tag_string_character .. '\n'
|
||
|
|
txt = txt .. '[' .. math.ceil(post.file_size/1000) .. 'kb] ' .. URL .. post.file_url
|
||
|
|
return txt
|
||
|
|
end
|
||
|
|
|
||
|
|
return {
|
||
|
|
description = "Gets a random fresh or popular image from Danbooru",
|
||
|
|
usage = {
|
||
|
|
"/dan - gets a random fresh image from Danbooru 🔞",
|
||
|
|
"/dand - random daily popular image 🔞",
|
||
|
|
"/danw - random weekly popular image 🔞",
|
||
|
|
"/danm - random monthly popular image 🔞"},
|
||
|
|
patterns = {
|
||
|
|
"^/dan$",
|
||
|
|
"^/dand$",
|
||
|
|
"^/danw$",
|
||
|
|
"^/danm$"},
|
||
|
|
run = run
|
||
|
|
}
|
||
|
|
|
||
|
|
end
|