Index: 残局文料/lua_lib/常用库.lua ================================================================== --- 残局文料/lua_lib/常用库.lua +++ 残局文料/lua_lib/常用库.lua @@ -1,13 +1,13 @@ -local d_4 = {} +local d = {} local 简文件库 = require("lfs") --~ 排 --~ 办排中值的能 --~ 入参2 --~ 入参3 --~ 入参4 -function d_4.历排(o1_0, o1, o2_0, o3_0, o4_0) +function d.历排(o1_0, o1, o2_0, o3_0, o4_0) local k1_0 --~ 集排 k1_0 = {} for o2 = 1, #o1_0 do k1_0[#k1_0 + 1] = o1(o1_0[o2], o2_0, o3_0, o4_0) @@ -16,11 +16,11 @@ end --~ 文 --~ 历文的能 --~ 入参2 --~ 入参3 -function d_4.历文(o1, o2, o1_0, o2_0) +function d.历文(o1, o2, o1_0, o2_0) local k1_0 --~ 集排 k1_0 = {} for o3_0 in o2(o1, o1_0, o2_0) do k1_0[#k1_0 + 1] = o3_0 @@ -28,11 +28,11 @@ return k1_0 end --~ 表中值 --~ 值类 --~ 办值的能 -function d_4.操类(o1_0, o1, o2) +function d.操类(o1_0, o1, o2) if type(o1_0) == o1 then return o2(o1_0) else return o1_0 end @@ -39,61 +39,61 @@ end --~ 排中文 --~ 入参2 --~ 入参3 --~ 入参4 -function d_4.全筛文(o1, o2, o3, o4) +function d.全筛文(o1, o2, o3, o4) if string.find(o1, o2, o3, o4) then return o1 end end --~ 文 --~ 前缀 -function d_4.加前缀(o1, o2) +function d.加前缀(o1, o2) return (o2 or "") .. o1 end --~ 文 --~ 后缀 -function d_4.加后缀(o1, o2) +function d.加后缀(o1, o2) return o1 .. (o2 or "") end --~ 令 -function d_4.办令(o1) +function d.办令(o1) print(o1) os.execute(o1) end --~ 文 --~ 前缀 -function d_4.全筛前缀(o1, o2) +function d.全筛前缀(o1, o2) if string.sub(o1, 1, #o2) == o2 then return o1 end end --~ 文 --~ 后缀 -function d_4.全筛后缀(o1, o2) +function d.全筛后缀(o1, o2) if string.sub(o1, -#o2) == o2 then return o1 end end --~ 目对 -function d_4.用令行工具操文件(o1_0) +function d.用令行工具操文件(o1_0) local k1_9 --~ 令行排 - k1_9 = d_4.历文(o1_0.文件目, 简文件库.dir) - k1_9 = d_4.历排(k1_9, d_4.全筛后缀, o1_0.文件类) + k1_9 = d.历文(o1_0.文件目, 简文件库.dir) + k1_9 = d.历排(k1_9, d.全筛后缀, o1_0.文件类) for o1 = 1, #k1_9 do - k1_9[o1] = d_4.加前缀(k1_9[o1], o1_0.文件目) - k1_9[o1] = d_4.加前缀(k1_9[o1], [["]]) - k1_9[o1] = d_4.加后缀(k1_9[o1], [["]]) - k1_9[o1] = d_4.加前缀(k1_9[o1], o1_0.令行前缀) - d_4.办令(k1_9[o1]) + k1_9[o1] = d.加前缀(k1_9[o1], o1_0.文件目) + k1_9[o1] = d.加前缀(k1_9[o1], [["]]) + k1_9[o1] = d.加后缀(k1_9[o1], [["]]) + k1_9[o1] = d.加前缀(k1_9[o1], o1_0.令行前缀) + d.办令(k1_9[o1]) end end --~ 文件路 --~ 式 -function d_4.读文件(o1, o2) +function d.读文件(o1, o2) local k1 local k1_3 --~ 文件 k1_3 = io.open(o1, o2 or "r") --~ 文 @@ -101,31 +101,31 @@ k1_3:flush() k1_3:close() return k1 end --~ 常量排 -function d_4.加对限(o1_0) +function d.加对限(o1_0) for o1 = 1, #o1_0 do - o1_0[o1] = d_4.加前缀(o1_0[o1], [[k1_0["]]) + o1_0[o1] = d.加前缀(o1_0[o1], [[k1_0["]]) o1_0[o1] = string.gsub(o1_0[o1], "=", "\"]=", 1) end table.insert(o1_0, 1, "local k1_0 = {}") table.insert(o1_0, "return k1_0") return table.concat(o1_0, "\n") end --~ 文 --~ 文件路 --~ 式 -function d_4.写文件(o1, o2, o3) +function d.写文件(o1, o2, o3) local k1_3 --~ 文件 k1_3 = io.open(o2, o3 or "w") k1_3:write(o1) k1_3:flush() k1_3:close() end --~ 文 -function d_4.删左右空白(o1) +function d.删左右空白(o1) o1 = string.gsub(o1, "^%s+", "") return string.gsub(o1, "%s+$", "") end -return d_4 +return d