From c3ea27ffaa0c5178ccadb2cb9cb099dd1580cf1a Mon Sep 17 00:00:00 2001
From: lili-ffxi <40600148+lili-ffxi@users.noreply.github.com>
Date: Wed, 1 Jan 2025 18:26:59 +0000
Subject: [PATCH] Create atreplace.lua

---
 atreplace/atreplace.lua | 98 +++++++++++++++++++++++++++++++++++++++++
 1 file changed, 98 insertions(+)
 create mode 100644 atreplace/atreplace.lua

diff --git a/atreplace/atreplace.lua b/atreplace/atreplace.lua
new file mode 100644
index 0000000..f895be3
--- /dev/null
+++ b/atreplace/atreplace.lua
@@ -0,0 +1,98 @@
+_addon.name = 'atreplace'
+_addon.author = 'Lili'
+_addon.version = '1.3.0'
+_addon.commands = { _addon.name, 'at' }
+
+local res = require('resources')
+require('pack')
+require('logger')
+
+local validterms = { auto_translates = S{}, items = S{}, key_items = S{} }
+local cache = {}
+local lang = windower.ffxi.get_info().language:lower()
+
+at_term = function(str)
+    local term = str:lower()
+
+    if not cache[term] then
+        local at    
+        local id = validterms.auto_translates[term] or validterms.items[term] or validterms.key_items[term] 
+        
+        if id then
+            -- arcon is the best
+            local is_item = validterms.items[term] and true
+            local high = (id / 0x100):floor() ~= 0
+            local low = (id % 0x100) ~= 0
+            local any_zero = not (high and low)
+            local mask = validterms.auto_translates[term] and 2:char() or 'qqqqq':pack(
+                low,
+                high,
+                not is_item == any_zero,
+                is_item and any_zero,
+                not is_item
+            )
+
+            at = 'CS1C>HC':pack(0xFD, mask, 2, id, 0xFD):gsub("%z", 0xFF:char())
+        end
+       
+        cache[term] = at or str
+    end
+   
+    return cache[term]
+end
+
+windower.register_event('load',function()
+    local keys = { 'english', 'english_log', 'japanese', 'japanese_log' }
+    for category,_ in pairs(validterms) do
+        for id, t in pairs(res[category]) do
+            if not (category == 'auto_translates' and id % 0x100 == 0) then
+                for _,key in pairs(keys) do
+                    if t[key] then
+                        validterms[category][t[key]:lower()] = id
+                    end
+                end
+            end
+        end
+    end
+end)
+
+windower.register_event('outgoing text', function(org, mod, blk)
+    if org == mod then
+        return mod:gsub("_%((..-)%)", at_term)
+    end
+end)
+
+windower.register_event('addon command', function(...)
+    local args = T{...}
+    local mode = args[1] and args[1]:lower() or 'help'
+    
+    if mode == 'r' or mode == 'reload' then
+        windower.send_command('lua r '.._addon.name)
+        return
+        
+    elseif mode == 'u' or mode == 'unload' then
+        windower.send_command('lua u '.._addon.name)
+        return
+    
+    elseif mode == 'search' or mode == 'find' then
+        table.remove(args,1)
+        local arg = args:concat(' ')
+        local query = arg:gsub('%a', function(char) return string.format("([%s%s])", char:lower(), char:upper()) end)
+        log("Search results for '%s'":format(arg:color(258)))
+        for cat, t in pairs(validterms) do
+            local r = ''
+            for name,id in pairs(t) do
+                if name:find(arg) then
+                    r = '%s %s,':format(r, res[cat][id][lang])
+                end
+            end
+            if #r > 512 then
+                r = '(Too many results; please provide a longer string.)'
+            elseif #r > 1 then
+                log('[' .. cat:upper() .. ']', r:sub(1,-2))
+            end
+        end
+        
+        return
+    end
+end)