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-2/plugins/apod.lua
2016-01-14 15:49:37 -05:00

65 lines
1.3 KiB
Lua
Executable File

local command = 'apod [query]'
local doc = [[```
/apod [query]
Returns the Astronomy Picture of the Day.
If the query is a date, in the format YYYY-MM-DD, the APOD of that day is returned.
Source: nasa.gov
```]]
local triggers = {
'^/apod[@'..bot.username..']*'
}
local action = function(msg)
if not config.nasa_api_key then
config.nasa_api_key = 'DEMO_KEY'
end
local input = msg.text:input()
local caption = ''
local date = '*'
local url = 'https://api.nasa.gov/planetary/apod?api_key=' .. config.nasa_api_key
if input then
url = url .. '&date=' .. URL.escape(input)
date = date .. input
else
date = date .. os.date("%Y-%m-%d")
end
date = date .. '*\n'
local jstr, res = HTTPS.request(url)
if res ~= 200 then
sendReply(msg, config.errors.connection)
return
end
local jdat = JSON.decode(jstr)
if jdat.error then
sendReply(msg, config.errors.results)
return
end
--local weburl = 'http://apod.nasa.gov/apod/ap' .. date_url .. '.html'
--output = date .. '[' .. jdat.title .. '](' .. weburl .. ')\n'
output = date .. '[' .. jdat.title .. '](' .. jdat.hdurl .. ')\n'
if jdat.copyright then
output = output .. 'Copyright: ' .. jdat.copyright
end
sendMessage(msg.chat.id, output, false, nil, true)
end
return {
action = action,
triggers = triggers,
doc = doc,
command = command
}