Index: 残局文料/lib_lua/ipml_mj_ysaf.lua
==================================================================
--- 残局文料/lib_lua/ipml_mj_ysaf.lua
+++ 残局文料/lib_lua/ipml_mj_ysaf.lua
@@ -1,11 +1,13 @@
+package.path = [[.\lib_lua\?.lua;]] .. package.path
+package.cpath = [[.\lib_dll\?.dll;]] .. package.cpath
 local 字集码互转库 = require("u8_to_a")
 local d_5 = {}
 local 简件系库 = require("lfs")
-function _G.require_u8(modname)
-  return require(字集码互转库.u8_to_a(modname))
-  end
+--~ function _G.require_u8(modname)
+  --~ return require(字集码互转库.u8_to_a(modname))
+  --~ end
 do
 local k1 = 0
 function _G.递增示()
   k1 = k1 + 1
   print(k1)
@@ -46,13 +48,13 @@
   if o3 then
     k1 = o3(k1)
     end
   d_5.写件(o1, k1, o2)
   end
-function d_5.删制表符(o1)
-  return o1:gsub("\t", "")
-  end
+--~ function d_5.删制表符(o1)
+  --~ return o1:gsub("\t", "")
+  --~ end
 function d_5.删空格与制表符(o1)
   o1 = d_5.删空格(o1)
   return d_5.删制表符(o1)
   end
 function d_5.文转排(text)
@@ -70,21 +72,21 @@
 function d_5.删后缀(o1, o2)
   if o1:find(o2, -1, true) then
     return o1:sub(1, #o1 - #o2)
     end
   end
-function d_5.删空行_不虑首末态(o1)
-  return o1:gsub("\n+", "\n")
-  end
-function d_5.删空行(o1)
-  o1 = d_5.删空行_不虑首末态(o1)
-  o1 = d_5.删前缀(o1, "\n")
-  return d_5.删后缀(o1, "\n")
-  end
-function d_5.删空格(o1)
-  return o1:gsub(" ", "")
-  end
+--~ function d_5.删空行_不虑首末态(o1)
+  --~ return o1:gsub("\n+", "\n")
+  --~ end
+--~ function d_5.删空行(o1)
+  --~ o1 = d_5.删空行_不虑首末态(o1)
+  --~ o1 = d_5.删前缀(o1, "\n")
+  --~ return d_5.删后缀(o1, "\n")
+  --~ end
+--~ function d_5.删空格(o1)
+  --~ return o1:gsub(" ", "")
+  --~ end
 function d_5.筛排(o1_9, o1, o2, o3)
   local k1_8
   local k1_9
   k1_9 = {}
   for o4 = 1, #o1_9 do
@@ -93,27 +95,46 @@
       k1_9[#k1_9 + 1] = k1_8
       end
     end
   return k1_9
   end
-function d_5.筛件径(o1, o2)
-  local k1
+function d_5.捕排(o1, o2, o3)
   local k1_9
   k1_9 = {}
-  for o3 in 简件系库.dir(o1) do
-    if o3:match(o2 or ".") then
-      k1_9[#k1_9 + 1] = o1 .. "/" .. o3
-      end
+  for o4 in o1(o2, o3) do
+    k1_9[#k1_9 + 1] = o4
     end
   return k1_9
   end
+function d_5.留文(o1, o2)
+  if o1:match(o2 or ".") then
+    return o1
+    end
+  end
+function d_5.筛件径(o1, o2)
+  local k1_9
+  k1_9 = d_5.捕排(简件系库.dir, o1)
+  k1_9 = d_5.筛排(k1_9, d_5.加前缀, o1 .. "/")
+  return d_5.筛排(k1_9, d_5.留文, o2)
+  end
+--~ function d_5.筛件径(o1, o2)
+  --~ local k1
+  --~ local k1_9
+  --~ k1_9 = {}
+  --~ for o3 in 简件系库.dir(o1) do
+    --~ if o3:match(o2 or ".") then
+      --~ k1_9[#k1_9 + 1] = o1 .. "/" .. o3
+      --~ end
+    --~ end
+  --~ return k1_9
+  --~ end
 function d_5.加前缀(o1, o2)
   return o2 .. o1
   end
-function d_5.加前缀与后缀(o1, o2, o3)
-  return o2 .. o1 .. o3
-  end
+--~ function d_5.加前缀与后缀(o1, o2, o3)
+  --~ return o2 .. o1 .. o3
+  --~ end
 function d_5.加后缀(o1, o2)
   return o1 .. o2
   end
 function d_5.filterLinesWithCharacter(text, character)
   local result = {}
@@ -128,14 +149,14 @@
   end
 function d_5.办并说(o1)
   print(o1)
   os.execute(o1)
   end
-function d_5.筛单行等式_左右值态(o1)
-  local k1_11
-  k1_11 = {}
-  for o2 in 11:gmatch("[^\n= \t]+") do
-    table.insert(k1_11, o2)
-    end
-  return o2
-  end
+--~ function d_5.筛单行等式_左右值态(o1)
+  --~ local k1_11
+  --~ k1_11 = {}
+  --~ for o2 in k1_11:gmatch("[^\n= \t]+") do
+    --~ table.insert(k1_11, o2)
+    --~ end
+  --~ return o2
+  --~ end
 return d_5

Index: 残局文料/lib_lua/删注/月程语_不虑字串.lua
==================================================================
--- 残局文料/lib_lua/删注/月程语_不虑字串.lua
+++ 残局文料/lib_lua/删注/月程语_不虑字串.lua
@@ -1,15 +1,15 @@
 local d_3 = {}
-function d_3.多行注_套娃态(o1)
-  return o1:gsub("%-%-%[(=*)%[.-%]%1%]", "")
-  end
-function d_3.多行注_凡态(o1)
-  return o1:gsub("%-%-%[%[.-%]%]", "")
-  end
+--~ function d_3.多行注_套娃态(o1)
+  --~ return o1:gsub("%-%-%[(=*)%[.-%]%1%]", "")
+  --~ end
+--~ function d_3.多行注_凡态(o1)
+  --~ return o1:gsub("%-%-%[%[.-%]%]", "")
+  --~ end
 function d_3.单行注(o1)
   return o1:gsub("%-%-[^\n]*", "")
   end
-function d_3.事启(o1)
-  o1 = d_3.多行注_套娃态(o1)
-  return d_3.单行注(o1)
-  end
+--~ function d_3.事启(o1)
+  --~ o1 = d_3.多行注_套娃态(o1)
+  --~ return d_3.单行注(o1)
+  --~ end
 return d_3

Index: 残局文料/产常量件.lua
==================================================================
--- 残局文料/产常量件.lua
+++ 残局文料/产常量件.lua
@@ -1,19 +1,19 @@
 package.path = [[.\lib_lua\?.lua;]] .. package.path
 package.cpath = [[.\lib_dll\?.dll;]] .. package.cpath
 _G.常用库 = require("ipml_mj_ysaf")
 local 字集码互转库 = require("u8_to_a")
-local 删注库_月程语态_不虑字串态 = require_u8("删注/月程语_不虑字串")
+local 删注库_月程语版_不虑字串版 = require(字集码互转库.u8_to_a("删注/月程语_不虑字串"))
 local d_2 = {}
 function d_2.产常量件(o1)
   local k1
   k1 = 常用库.读件(o1 .. "/script/constant.lua", "rb")
-  k1 = 删注库_月程语态_不虑字串态.事启(k1)
-  --~ k1 = 常用库.删空格与制表符(k1)
-  for o1 in k1:gmatch("[^\n= \t]+") do
-    print(o1)
-    end
+  k1 = 删注库_月程语版_不虑字串版.单行注(k1)
+  k1 = 常用库.捕排(string.gmatch, k1, "[^\n= \t]+")
+  --~ for o1 in k1:gmatch("[^\n= \t]+") do
+    --~ print(o1)
+    --~ end
   --~ k1 = 常用库.删空行(k1)
   --~ k1 = "local k1_11 = {}\n" .. k1 .. ""
   --~ k1 = 常用库.筛排(k1, print)
   --~ print(k1)
   --~ print(k1:gsub("\n", "猪"))

Index: 残局文料/齐月程语件.lua
==================================================================
--- 残局文料/齐月程语件.lua
+++ 残局文料/齐月程语件.lua
@@ -1,12 +1,11 @@
-package.path = [[.\lib_lua\?.lua;]] .. package.path
-package.cpath = [[.\lib_dll\?.dll;]] .. package.cpath
-_G.常用库 = require("ipml_mj_ysaf")
+_G.常用库 = require("lib_lua/ipml_mj_ysaf")
 local 字集码互转库 = require("u8_to_a")
 local d_2 = {}
 function d_2.齐月程语件(o1)
   local k1_9
   k1_9 = 常用库.筛件径(o1, "%.lua$")
-  k1_9 = 常用库.筛排(k1_9, 常用库.加前缀与后缀, [[stylua "]], [["]])
+  k1_9 = 常用库.筛排(k1_9, 常用库.加前缀, [[stylua "]])
+  k1_9 = 常用库.筛排(k1_9, 常用库.加后缀, [["]])
   常用库.筛排(k1_9, 常用库.办并说)
   end
 d_2.齐月程语件(字集码互转库.u8_to_a([[../single]]))