9f760114bd
All help messages and many other things moved from markdown to html. Eventually, I'd like only things made from user input to use markdown. cats.lua, rmspic.lua, and dilbert.lua moved to sendPhoto with URL. xkcd.lua and apod.lua not moved to retain formatting. Probably a lot of other stuff that I forget about. I should commit more often.
50 lines
1.5 KiB
Lua
50 lines
1.5 KiB
Lua
local bible = {}
|
|
|
|
local HTTP = require('socket.http')
|
|
local URL = require('socket.url')
|
|
local utilities = require('otouto.utilities')
|
|
|
|
function bible:init(config)
|
|
assert(config.biblia_api_key,
|
|
'bible.lua requires a Biblia API key from http://api.biblia.com.'
|
|
)
|
|
|
|
bible.triggers = utilities.triggers(self.info.username, config.cmd_pat):t('bible', true):t('b', true).table
|
|
bible.doc = config.cmd_pat .. [[bible <reference>
|
|
Returns a verse from the American Standard Version of the Bible, or an apocryphal verse from the King James Version. Results from biblia.com.
|
|
Alias: ]] .. config.cmd_pat .. 'b'
|
|
end
|
|
|
|
bible.command = 'bible <reference>'
|
|
|
|
function bible:action(msg, config)
|
|
|
|
local input = utilities.input_from_msg(msg)
|
|
if not input then
|
|
utilities.send_reply(msg, bible.doc, 'html')
|
|
return
|
|
end
|
|
|
|
local url = 'http://api.biblia.com/v1/bible/content/ASV.txt?key=' .. config.biblia_api_key .. '&passage=' .. URL.escape(input)
|
|
|
|
local output, res = HTTP.request(url)
|
|
|
|
if not output or res ~= 200 or output:len() == 0 then
|
|
url = 'http://api.biblia.com/v1/bible/content/KJVAPOC.txt?key=' .. config.biblia_api_key .. '&passage=' .. URL.escape(input)
|
|
output, res = HTTP.request(url)
|
|
end
|
|
|
|
if not output or res ~= 200 or output:len() == 0 then
|
|
output = config.errors.results
|
|
end
|
|
|
|
if output:len() > 4000 then
|
|
output = 'The text is too long to post here. Try being more specific.'
|
|
end
|
|
|
|
utilities.send_reply(msg, output)
|
|
|
|
end
|
|
|
|
return bible
|