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

39 lines
801 B
Lua
Raw Normal View History

2015-03-06 02:30:44 +01:00
function getBoobs()
local rand = math.random(1, 8315)
local res,status = http.request("http://api.oboobs.ru/boobs/get/"..rand)
if status ~= 200 then return nil end
local data = json:decode(res)
-- The OpenBoobs API sometimes returns an empty array
if not data[1] then
print 'Cannot get that boobs, trying another ones...'
return getBoobs()
end
return 'http://media.oboobs.ru/' .. data[1].preview
end
function run(msg, matches)
local boobs = getBoobs()
if boobs ~= nil then
file = download_to_file(boobs)
send_photo(get_receiver(msg), file, ok_cb, false)
else
return 'Error getting boobs for you, please try again later.'
end
end
return {
description = "Gets a random boobs pic",
usage = "!boobs",
patterns = {
"^!boobs$"
},
run = run
}