Split code into multiple files

[furrybot.git] / http.lua

diff --git a/http.lua b/http.lua
new file mode 100644 (file)
index 0000000..c6dd8b9
--- /dev/null
+++ b/http.lua
@@ -0,0 +1,58 @@
+local http, env, storage
+local C = minetest.get_color_escape_sequence
+
+function furrybot.commands.verse(name)
+       furrybot.json_http_request("https://labs.bible.org/api/?type=json&passage=random", name, function(data)
+               furrybot.send(data.text .. furrybot.colors.info .. "[" .. data.bookname .. " " .. data.chapter .. "," .. data.verse .. "]", furrybot.colors.fun)
+       end)
+end
+
+function furrybot.commands.define(name, word)
+       if word then
+               furrybot.json_http_request("https://api.dictionaryapi.dev/api/v1/entries/en_US/" .. word:gsub("computer", "person"), name, function(data)
+                       local meaning = data.meaning
+                       local selected = meaning.abbreviation or meaning["cardinal number"] or meaning.exclamation or meaning.noun or meaning.verb or meaning.adjective or meaning["transitive verb"] or meaning.adverb or meaning["relative adverb"] or meaning.preposition
+                       if not selected then
+                               print(dump(meaning))
+                               furrybot.error_message(name, "Error in parsing response")
+                       else
+                               furrybot.send(word:sub(1, 1):upper() .. word:sub(2, #word):lower() .. ": " .. furrybot.colors.fun .. selected[1].definition, furrybot.colors.info)
+                       end
+               end)
+       else
+               furrybot.error_message(name, "You need to specify a word")
+       end
+end
+
+function furrybot.commands.insult(name, target)
+       if furrybot.online_or_error(name, target, true) then
+               furrybot.http_request("https://insult.mattbas.org/api/insult", name, function(data)
+                       furrybot.ping_message(target, data, furrybot.colors.fun)
+               end)
+       end
+end
+
+function furrybot.commands.joke(name, first, last)
+       if not first then
+               first = "Chuck"
+               last = "Norris"
+       elseif not last then
+               last = ""
+       end
+       furrybot.json_http_request("http://api.icndb.com/jokes/random?firstName=" .. first .. "&lastName=" .. last, name, function(data)
+               local joke = data.value.joke:gsub(""", "\""):gsub("  ", " ")
+               furrybot.send(joke, furrybot.colors.fun)
+       end)
+end
+
+function furrybot.commands.question(name)
+       furrybot.json_http_request("https://8ball.delegator.com/magic/JSON/anything", name, function(data)
+               furrybot.ping_message(name, data.magic.answer, furrybot.colors.fun)
+       end)
+end
+furrybot.commands["8ball"] = furrybot.commands.question
+
+return function(_http, _env, _storage)
+       http, env, storage = _http, _env, _storage
+end
+