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