furrybot.commands = {}
furrybot.requests = {}
+furrybot.unsafe_commands = {}
+local http, env, storage
local C = minetest.get_color_escape_sequence
furrybot.colors = {
system = C("#FFFA00"),
error = C("#D70029"),
detail = C("#FF6683"),
- rpg = C("#FFD94E"),
+ roleplay = C("#FFD94E"),
braces = C("#FFFAC0"),
info = C("#00FFC3"),
fun = C("#A0FF24"),
furrybot.ping_message(player, error .. (detail and furrybot.colors.detail .. " '" .. detail .. "'" .. furrybot.colors.error or "") .. ".", furrybot.colors.error)
end
-function furrybot.recieve(msg)
- msg = minetest.strip_colors(msg)
- if msg:find("<") == 1 then
- local idx = msg:find(">")
- local player = msg:sub(2, idx - 1)
- local message = msg:sub(idx + 3, #msg)
- if message:find("!") == 1 then
- local args = message:sub(2, #message):split(" ")
- local cmd = table.remove(args, 1)
- local func = furrybot.commands[cmd]
- if func then
- func(player, unpack(args))
+function furrybot.parse_message(player, message, discord)
+ if message:find("!") == 1 and not furrybot.ignored[player] then
+ local args = message:sub(2, #message):split(" ")
+ local cmd = table.remove(args, 1)
+ local func = furrybot.commands[cmd]
+ if func then
+ if furrybot.unsafe_commands[cmd] and discord then
+ furrybot.error_message(player, "Sorry, you cannot run this command from discord: ", cmd)
else
- furrybot.error_message(player, "Invalid command", cmd)
+ func(player, unpack(args))
end
+ else
+ furrybot.error_message(player, "Invalid command", cmd)
+ end
+ end
+end
+
+function furrybot.reload()
+ local func, err = env.loadfile("clientmods/furrybot/bot.lua")
+ if func then
+ local old_fb = table.copy(furrybot)
+ local status, init = pcall(func)
+
+ if status then
+ status, init = init(http, env, storage)
+ end
+
+ if not status then
+ furrybot = old_fb
+ furrybot.send("Error: " .. furrybot.colors.detail .. init, furrybot.colors.error)
end
+ else
+ furrybot.send("Syntax error: " .. furrybot.colors.detail .. err, furrybot.colors.error)
end
end
end
function furrybot.random(min, max, color)
- return furrybot.colors.random .. math.random(#list) .. color
+ return furrybot.colors.random .. math.random(min, max) .. color
end
function furrybot.http_request(url, name, callback)
- furrybot.http.fetch({url = url}, function(res)
+ http.fetch({url = url}, function(res)
if res.succeeded then
callback(res.data)
else
return msg
end
-function furrybot.simple_rpg_command(action)
+function furrybot.interactive_roleplay_command(action)
return function(name, target)
if furrybot.online_or_error(name, target) then
- furrybot.send(name .. " " .. action .. " " .. target .. ".", furrybot.colors.rpg)
+ furrybot.send(name .. " " .. action .. " " .. target .. ".", furrybot.colors.roleplay)
end
end
end
+function furrybot.solo_roleplay_command(action)
+ return function(name)
+ furrybot.send(name .. " " .. action .. ".", furrybot.colors.roleplay)
+ end
+end
+
function furrybot.request_command(on_request, on_accept)
return function(name, target)
if furrybot.online_or_error(name, target) and on_request(name, target) ~= false then
end
end
-function furrybot.get_money(name)
- local key = name .. ".money"
- if furrybot.storage:contains(key) then
- return furrybot.storage:get_int(key)
- else
- return 100
- end
-end
+-- General purpose commands
-function furrybot.set_money(name, money)
- furrybot.storage:set_int(name .. ".money", money)
-end
-
-function furrybot.add_money(name, add)
- local money = furrybot.get_money(name)
- furrybot.set_money(name, money + add)
-end
-
-function furrybot.take_money(name, remove)
- local money = furrybot.get_money(name)
- local new = money - remove
- if new < 0 then
- return false
- else
- furrybot.set_money(name, new)
- return true
- end
-end
-
-function furrybot.money(money, color)
- return furrybot.colors.money .. "$" .. money .. color
-end
-
--- Commands
-
--- system
function furrybot.commands.help()
local keys = {}
for k in pairs(furrybot.commands) do
furrybot.error_message(name, "Nothing to accept")
end
end
+furrybot.unsafe_commands.accept = true
function furrybot.commands.deny(name)
local tbl = furrybot.requests[name]
furrybot.error_message(name, "Nothing to deny")
end
end
+furrybot.unsafe_commands.deny = true
-- don't bug players that are running ClamityBot commands from discord
function furrybot.commands.status()
function furrybot.commands.cmd()
end
--- rpg
-furrybot.commands.hug = furrybot.simple_rpg_command("hugs")
-furrybot.commands.cuddle = furrybot.simple_rpg_command("cuddles")
-furrybot.commands.kiss = furrybot.simple_rpg_command("kisses")
-furrybot.commands.hit = furrybot.simple_rpg_command("hits")
-furrybot.commands.slap = furrybot.simple_rpg_command("slaps")
-furrybot.commands.beat = furrybot.simple_rpg_command("beats")
-furrybot.commands.lick = furrybot.simple_rpg_command("licks")
-
-furrybot.commands.sex = furrybot.request_command(function(name, target)
- furrybot.ping_message(target, name .. " wants to have sex with you. Type !accept to accept or !deny to deny.", furrybot.colors.system)
-end, function(name, target)
- furrybot.send(name .. " and " .. target .. " are having sex! OwO", furrybot.colors.rpg)
-end)
-furrybot.commands.bang = furrybot.commands.sex
-furrybot.commands.fuck = furrybot.commands.sex
-
-furrybot.commands.marry = furrybot.request_command(function(name, target)
- if furrybot.storage:contains(name .. ".partner", target) then
- furrybot.error_message(name, "You are already married to", furrybot.storage:get_string(name .. ".partner"))
- return false
- elseif furrybot.storage:contains(target .. ".partner", name) then
- furrybot.error_message(name, target .. " is already married to", furrybot.storage:get_string(name .. ".partner"))
- return false
- else
- furrybot.ping_message(target, name .. " proposes to you. Type !accept to accept or !deny to deny.", furrybot.colors.system)
- end
-end, function(name, target)
- furrybot.storage:set_string(name .. ".partner", target)
- furrybot.storage:set_string(target .. ".partner", name)
- furrybot.send("Congratulations, " .. furrybot.ping(name, furrybot.colors.rpg) .. "&" .. furrybot.ping(target, furrybot.colors.rpg) .. ", you are married. You may now kiss :).", furrybot.colors.rpg)
-end)
-furrybot.commands.propose = furrybot.commands.marry
-
-function furrybot.commands.divorce(name)
- if furrybot.storage:contains(name .. ".partner") then
- local partner = furrybot.storage:get_string(name .. ".partner")
- furrybot.storage:set_string(name .. ".partner", "")
- furrybot.storage:set_string(partner .. ".partner", "")
- furrybot.ping_message(name, "divorces from " .. partner .. " :(", furrybot.colors.rpg)
- else
- furrybot.error_message(name, "You are not married")
- end
-end
-
-function furrybot.commands.partner(name, target)
- target = target or name
- if furrybot.storage:contains(target .. ".partner") then
- furrybot.ping_message(name, (target == name and "You are" or target .. " is") .. " married to " .. furrybot.storage:get_string(target .. ".partner"), furrybot.colors.system)
- else
- furrybot.error_message(name, (target == name and "You are" or target .. " is") .. " not married")
- end
-end
-furrybot.commands.married = furrybot.commands.partner
+return function(_http, _env, _storage)
+ http, env, storage = _http, _env, _storage
--- misc
-function furrybot.commands.rolldice(name)
- furrybot.ping_message(name, "rolled a dice and got a " .. furrybot.random(1, 6, furrybot.colors.system) .. ".", furrybot.colors.system)
-end
+ for _, f in ipairs {"nsfw", "roleplay", "death", "economy", "random", "http", "operator", "bullshit"} do
+ local func, err = env.loadfile("clientmods/furrybot/" .. f .. ".lua")
-function furrybot.commands.coinflip(name)
- furrybot.ping_message(name, "flipped a coin and got " .. furrybot.choose({"Heads", "Tails"}, furrybot.colors.system) .. ".", furrybot.colors.system)
-end
+ if not func then
+ return false, err
+ end
-function furrybot.commands.choose(name, ...)
- local options = {...}
- if #options > 1 then
- furrybot.ping_message(name, "I choose " .. furrybot.choose(options, "", furrybot.colors.system) .. ".", furrybot.colors.system)
- else
- furrybot.error_message(name, "Not enough options")
+ func()(http, env, storage)
end
-end
-
-function furrybot.commands.dicksize(name, target)
- target = target or name
- local size = furrybot.strrandom(target, 31242, 2, 10)
- local dick = furrybot.repeat_string("=", size) .. "D"
- furrybot.send(dick .. furrybot.colors.system .. " <= " .. furrybot.ping(target, furrybot.colors.system) .. "'s Dick", C("#FF4DE1"))
-end
-furrybot.commands.cocksize = furrybot.commands.dicksize
--- fun
-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
+ furrybot.send("FurryBot - " .. C("#170089") .. "https://github.com/EliasFleckenstein03/furrybot", furrybot.colors.system)
-function furrybot.commands.define(name, word)
- if word then
- furrybot.json_http_request("https://api.dictionaryapi.dev/api/v1/entries/en_US/" .. word, name, function(data)
- local meaning = data.meaning
- local selected = meaning.exclamation or meaning.noun or meaning.verb or meaning.adjective or meaning["transitive verb"] or meaning.adverb or meaning["relative adverb"]
- 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)
+ if furrybot.loaded then
+ furrybot.send("Reloaded", furrybot.colors.system)
else
- furrybot.error_message(name, "You need to specify a word")
+ furrybot.loaded = true
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
-
--- economy
-function furrybot.commands.money(name, target)
- target = target or name
- furrybot.ping_message(name, (target == name and "You have " or target .. " has ") .. furrybot.money(furrybot.get_money(target), furrybot.colors.system) .. ".", furrybot.colors.system)
-end
-furrybot.commands.balance = furrybot.commands.money
-
-function furrybot.commands.pay(name, target, number)
- if furrybot.online_or_error(name, target) then
- local money = tonumber(number or "")
- if not money or money <= 0 or math.floor(money) ~= money then
- furrybot.error_message(name, "Invalid amount of money")
- else
- if furrybot.take_money(name, money) then
- furrybot.add_money(target, money)
- furrybot.ping_message(target, name .. " has payed you " .. furrybot.money(money, furrybot.colors.system) .. ".", furrybot.colors.system)
- else
- furrybot.error_message(name, "You don't have enough money")
- end
- end
- end
-end
-
--- send load message
-furrybot.send("FurryBot - " .. C("#170089") .. "https://github.com/EliasFleckenstein03/furrybot", furrybot.colors.system)
-if furrybot.loaded then
- furrybot.send("Reloaded", furrybot.colors.system)
-else
- furrybot.loaded = true
+ return true
end