bookbot: add automatic book writing bot

clientmods/bookbot/init.lua

@@ -0,0 +1,155 @@
+-- CC0/Unlicense Emilia 2020
+
+-- TODO: API
+-- TODO: all count should be changed to support using a bookbot as a rolling writer
+--        an alternate solution is to just have an inventory manager bot that intermittently swaps the inventory and activates bookbot
+-- TODO: local formspec stuff
+
+--[[
+COMMANDS
+
+write <book> <times>        Writes the book named <book>, <times> times
+bookadd_form                Opens a book formspec for adding a book to the library
+bookadd_this <shortname>    Adds the currently selected book to the library
+bookdel <shortname>         Removes a book from the library
+bookpeek <book>             Peeks at a book in the library
+booklist                    Lists all books
+--]]
+
+local write = 0
+local books = {
+    example = {
+        title = "Autobook",
+        author = "Emilia",
+        text = "This is an automatically written book."
+    }
+}
+local book = "example"
+
+local storage = minetest.get_mod_storage()
+
+local function storage_save()
+    storage:set_string("books", minetest.write_json(books))
+end
+
+local function storage_load()
+    local sbooks = storage:get("books")
+    if sbooks then
+        books = minetest.parse_json(sbooks)
+    end
+end
+
+storage_load()
+
+local function open_book()
+    if minetest.switch_to_item("mcl_books:writable_book") then
+        minetest.interact("place")
+    else
+        write = 0
+    end
+end
+
+local function count_books()
+    local lpmain = minetest.get_inventory("current_player").main
+    local count = 0
+
+    for i, v in ipairs(lpmain) do
+        if v:get_name() == "mcl_books:writable_book" then
+            count = count + 1
+        end
+    end
+
+    return count
+end
+
+minetest.register_on_receiving_inventory_form(function(formname, formspec)
+    if formname == "mcl_books:writable_book" and write ~= 0 then
+        minetest.send_inventory_fields("mcl_books:writable_book", {
+            text = books[book].text,
+            sign = "true",
+        })
+        minetest.close_formspec("")
+    elseif formname == "mcl_books:signing" and write ~= 0 then
+        minetest.send_inventory_fields("mcl_books:signing", {
+            title = books[book].title,
+            sign = "true"
+        })
+        minetest.close_formspec("")
+
+        write = write - 1
+        if write > 0 then
+            -- this should take lag into consideration
+            minetest.after(0.5, open_book)
+        end
+    end
+end)
+
+minetest.register_chatcommand("write", {
+    description = "Write a book.",
+    params = "<book> <?ntimes/all>",
+    func = function(params)
+        local p = string.split(params, " ")
+
+        if #p == 0 then
+            minetest.display_chat_message("Error: book short name required")
+            return
+        end
+
+        book = "example"
+        if p[1] and books[p[1]] then
+            book = p[1]
+        end
+
+        local count = 1
+        if p[2] then
+            if p[2] == "all" then
+                count = count_books()
+            elseif p[2]:match("^[0-9]+$") then
+                count = tonumber(p[2])
+            end
+        end
+
+        write = count
+        open_book()
+    end
+})
+
+minetest.register_chatcommand("bookadd_this", {
+    description = "Add the currently wielded book to the library, <name> is for the name in the library.",
+    params = "<name>",
+    func = function(params)
+        if params == "" then
+            minetest.display_chat_message("Error: no short name given")
+            return
+        end
+
+        local wielded = minetest.localplayer:get_wielded_item()
+        if wielded:get_name() == "mcl_books:written_book" then
+            local meta = wielded:get_meta():to_table()
+            books[params] = {
+                title = meta.fields.title,
+                author = meta.fields.author,
+                text = meta.fields.text
+            }
+        end
+
+        storage_save()
+    end
+})
+
+minetest.register_chatcommand("booklist", {
+    description = "List all saved books.",
+    func = function()
+        local out = ""
+        local first = true
+        for k, v in pairs(books) do
+            if not first then
+                out = out .. ", "
+            end
+            out = out .. k
+            first = false
+        end
+        minetest.display_chat_message("Saved books:")
+        minetest.display_chat_message(out)
+    end
+})

clientmods/mods.conf

@@ -29,7 +29,6 @@ load_mod_turtle = true
 load_mod_undying = true
 load_mod_autodupe = true
 load_mod_randomscreenshot = true
-load_mod_util = true
 load_mod_scaffold = true
 load_mod_speedlimit = true
 load_mod_frenemies = true
@@ -43,3 +42,4 @@ load_mod_optimize = true
 load_mod_render = true
 load_mod_combat = true
 load_mod_waterbot = true
+load_mod_bookbot = true