started implementing Buckwalter input scheme

1 files changed, 15 insertions, 1 deletions

diff --git a/arabluatex.lua b/arabluatex.lua
index 3e574cf..9134ce5 100644
--- a/arabluatex.lua
+++ b/arabluatex.lua
@@ -456,12 +456,26 @@ local function transloc(str)
 return str
 end
 
-function processvoc(str, rules)
+local function processbuckw(str)
+   str = string.gsub(str, "\\arb(%b{})", function(inside)
+   inside = string.sub(inside, 2, -2)
+   for i = 1,#buckwalter do
+      inside = string.gsub(inside, buckwalter[i].a, buckwalter[i].b)
+   end
+   return string.format("\\arb{%s}", inside)
+   end)
+return str
+end
+
+function processvoc(str, rules, scheme)
    str = "\\arb{".. str.."}"
    str = takeoutcapetc(str)
    str = protectarb(str)
    str = breakcmd(str)
    str = holdcmd(str)
+   if scheme == "buckwalter" then
+      str = processbuckw(str)
+      else end
    if rules == "easy" then
       str = voceasy(str)
    elseif rules == "dflt" then