Index: 残局文料/lua_lib/ipml_mj_ysaf.lua ================================================================== --- 残局文料/lua_lib/ipml_mj_ysaf.lua +++ 残局文料/lua_lib/ipml_mj_ysaf.lua @@ -1,25 +1,25 @@ --~ package.path = [[.\dfns_jvwg_ysaf\?.lua;]] .. package.path --~ package.cpath = [[.\dfns_jvwg_ysaf\?.dll;]] .. package.cpath local 字集码互转库 = require("u8_to_a") local d_5 = {} ---~ function _G.历排(o1_11, u1, u2, u3, o4) +--~ function _G.历排(o1_11, u1, u2, u3, u4) --~ local k1_8 --~ local k1_11 --~ k1_11 = {} --~ for o5 = 1, #o1_11 do - --~ k1_8 = u1(o1_11[o5], u2, u3, o4) + --~ k1_8 = u1(o1_11[o5], u2, u3, u4) --~ if k1_8 then --~ k1_11[#k1_11 + 1] = k1_8 --~ end --~ end --~ return k1_11 --~ end ---~ function _G.历文(u1, u2, u3, o4) +--~ function _G.历文(u1, u2, u3, u4) --~ local k1_9 --~ k1_9 = {} - --~ for o5 in u2(u1, u3, o4) do + --~ for o5 in u2(u1, u3, u4) do --~ k1_9[#k1_9 + 1] = o5 --~ end --~ return k1_9 --~ end --~ local 简件系库 = require("lfs") @@ -113,28 +113,28 @@ end function d_5.筛排(o1_9, u1, u2, u3) local k1_8 local k1_9 k1_9 = {} - for o4 = 1, #o1_9 do - k1_8 = u1(o1_9[o4], u2, u3) + for u4 = 1, #o1_9 do + k1_8 = u1(o1_9[u4], u2, u3) if k1_8 then k1_9[#k1_9 + 1] = k1_8 end end return k1_9 end --~ function d_5.筛文(u1, u2, u3) --~ local k1_9 --~ k1_9 = {} ---~ for o4 in u2(u1, u3) do ---~ k1_9[#k1_9 + 1] = o4 +--~ for u4 in u2(u1, u3) do +--~ k1_9[#k1_9 + 1] = u4 --~ end --~ return k1_9 --~ end ---~ function d_5.判文(u1, u2, u3, o4) ---~ if u1:find(u2 or ".", u3, o4) then +--~ function d_5.判文(u1, u2, u3, u4) +--~ if u1:find(u2 or ".", u3, u4) then --~ return u1 --~ end --~ end --~ function d_5.筛件径(u1, u2) --~ local k1_9 Index: 残局文料/lua_lib/常用库.lua ================================================================== --- 残局文料/lua_lib/常用库.lua +++ 残局文料/lua_lib/常用库.lua @@ -4,28 +4,28 @@ --~ 排 --~ 办排中值的能 --~ 入参2 --~ 入参3 --~ 入参4 -function s.历排(u1_0, u1, u2, u3, o4) +function s.历排(u1_0, u1, u2, u3, u4) local k1_0 --~ 集排 k1_0 = {} for o5 = 1, #u1_0 do - k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, o4) + k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, u4) end return k1_0 end --~ 文 --~ 历文的能 --~ 入参2 --~ 入参3 -function s.历文(u1, u2, u3, o4) +function s.历文(u1, u2, u3, u4) local k1_0 --~ 集排 k1_0 = {} - for o5 in u2(u1, u3, o4) do + for o5 in u2(u1, u3, u4) do k1_0[#k1_0 + 1] = o5 end return k1_0 end --~ 排 @@ -58,15 +58,15 @@ --~ 值 k1, k2 = s.历对取一的模(k1, k2, u2, u2_0, u1) end return k1, k2 end -function s.历对取一的模(u1, u2, u3, o4, o5) +function s.历对取一的模(u1, u2, u3, u4, o5) if u1 == nil then - return u3, o4 - elseif o5(u1, u2, u3, o4) then - return u3, o4 + return u3, u4 + elseif o5(u1, u2, u3, u4) then + return u3, u4 else return u1, u2 end end function s.历对(u1_0, u1, u2) @@ -97,13 +97,13 @@ end --~ 排中文 --~ 入参2 --~ 入参3 --~ 入参4 -function s.全筛文(u1, u2, u3, o4) +function s.全筛文(u1, u2, u3, u4) print(4) - if string.find(u1, u2, u3, o4) then + if string.find(u1, u2, u3, u4) then return u1 end end --~ 文 --~ 前缀 @@ -240,20 +240,20 @@ end --~ 键 --~ 最大值 --~ 键 --~ 值 -function s.筛对中最大值(u1, u2, u3, o4) - if u2 < o4 then +function s.筛对中最大值(u1, u2, u3, u4) + if u2 < u4 then return true end end --~ 最短键 --~ 值 --~ 键 --~ 值 -function s.筛对中最短键(u1, u2, u3, o4) +function s.筛对中最短键(u1, u2, u3, u4) if #u1 > #u3 then return true end end --~ 最短文 Index: 残局文料/lua_lib/程序语言_月_基础类型_功能_传入参数_转化.lua ================================================================== --- 残局文料/lua_lib/程序语言_月_基础类型_功能_传入参数_转化.lua +++ 残局文料/lua_lib/程序语言_月_基础类型_功能_传入参数_转化.lua @@ -1,12 +1,12 @@ local d_2 = {} --~ 传参_参数数量 -function d_2.二个参数(u1, u2, u3, o4) - return u1(u2(u3), u2(o4)) - end -function d_2.三个参数(u1, u2, u3, o4, o5) - return u1(u2(u3), u2(o4), u2(o5)) - end -function d_2.四个参数(u1, u2, u3, o4, o5, o6) - return u1(u2(u3), u2(o4), u2(o5), u2(o6)) +function d_2.二个参数(u1, u2, u3, u4) + return u1(u2(u3), u2(u4)) + end +function d_2.三个参数(u1, u2, u3, u4, o5) + return u1(u2(u3), u2(u4), u2(o5)) + end +function d_2.四个参数(u1, u2, u3, u4, o5, o6) + return u1(u2(u3), u2(u4), u2(o5), u2(o6)) end return d_2 Index: 残局文料/lua_lib/程序语言_月_基础类型_字串_全筛.lua ================================================================== --- 残局文料/lua_lib/程序语言_月_基础类型_字串_全筛.lua +++ 残局文料/lua_lib/程序语言_月_基础类型_字串_全筛.lua @@ -1,9 +1,9 @@ local d_2 = {} -function d_2.找字(u1, u2, u3, o4) - --~ print(u1, u2, u3, o4) - if u1:find(u2, u3, o4) then +function d_2.找字(u1, u2, u3, u4) + --~ print(u1, u2, u3, u4) + if u1:find(u2, u3, u4) then return u1 end end --~ function d_2.返全文_普态_前缀态(u1, u2) --~ return d_2.返全文(u1, u2, 1, true) Index: 残局文料/lua_lib/程序语言_月_基础类型_字串_逐一.lua ================================================================== --- 残局文料/lua_lib/程序语言_月_基础类型_字串_逐一.lua +++ 残局文料/lua_lib/程序语言_月_基础类型_字串_逐一.lua @@ -1,10 +1,10 @@ local d_2 = {} -function d_2.处理后返回新排(u1, u2, u3, o4) +function d_2.处理后返回新排(u1, u2, u3, u4) local k1_9 k1_9 = {} - for o5 in u2(u1, u3, o4) do + for o5 in u2(u1, u3, u4) do k1_9[#k1_9 + 1] = o5 end return k1_9 end return d_2 Index: 残局文料/lua_lib/程序语言_月_基础类型_序排_逐一.lua ================================================================== --- 残局文料/lua_lib/程序语言_月_基础类型_序排_逐一.lua +++ 残局文料/lua_lib/程序语言_月_基础类型_序排_逐一.lua @@ -1,19 +1,19 @@ local d_2 = {} -function d_2.处理后返回新排(o1_11, u1, u2, u3, o4) +function d_2.处理后返回新排(o1_11, u1, u2, u3, u4) local k1_8 local k1_11 k1_11 = {} for o5 = 1, #o1_11 do - k1_8 = u1(o1_11[o5], u2, u3, o4) + k1_8 = u1(o1_11[o5], u2, u3, u4) if k1_8 then k1_11[#k1_11 + 1] = k1_8 end end return k1_11 end --~ function d_2.处理(o1_11, u1, u2, u3) - --~ for o4 = 1, #o1_11 do - --~ u1(o1_11[o4], u2, u3) + --~ for u4 = 1, #o1_11 do + --~ u1(o1_11[u4], u2, u3) --~ end --~ end return d_2 Index: 残局文料/lua_lib/算机_程语_月_基类_文.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_文.lua +++ 残局文料/lua_lib/算机_程语_月_基类_文.lua @@ -1,16 +1,16 @@ local string = string local s = {} -function s.连(u1, u2, u3, o4, o5, o6, o7, o8, o9) - return u1 .. (u2 or "") .. (u3 or "") .. (o4 or "") .. (o5 or "") .. (o6 or "") .. (o7 or "") .. (o8 or "") .. (o9 or "") +function s.连(u1, u2, u3, u4, o5, o6, o7, o8, o9) + return u1 .. (u2 or "") .. (u3 or "") .. (u4 or "") .. (o5 or "") .. (o6 or "") .. (o7 or "") .. (o8 or "") .. (o9 or "") end --~ 排中文 --~ 入参2 --~ 入参3 --~ 入参4 -function s.全筛文(u1, u2, u3, o4) +function s.全筛文(u1, u2, u3, u4) --~ print(4) - if string.find(u1, u2, u3, o4) then + if string.find(u1, u2, u3, u4) then return u1 end end return s Index: 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_文_取全.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_文_取全.lua +++ 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_文_取全.lua @@ -2,15 +2,15 @@ -- 启 --~ 文 --~ 历文的能 --~ 入参2 --~ 入参3 -function s.历文(u1, u2, u3, o4) +function s.历文(u1, u2, u3, u4) local k1_0 --~ 集排 k1_0 = {} - for o5 in u2(u1, u3, o4) do + for o5 in u2(u1, u3, u4) do k1_0[#k1_0 + 1] = o5 end return k1_0 end return s Index: 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取一.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取一.lua +++ 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取一.lua @@ -15,25 +15,25 @@ --~ 键 --~ 值 --~ 对中键 --~ 对中值 --~ 能 -function s.模(u1, u2, u3, o4, o5) +function s.模(u1, u2, u3, u4, o5) if u1 == nil then - return u3, o4 - elseif o5(u1, u2, u3, o4) then - return u3, o4 + return u3, u4 + elseif o5(u1, u2, u3, u4) then + return u3, u4 else return u1, u2 end end -- 最短 --~ 最短键 --~ 值 --~ 键 --~ 值 -function s._筛最短键(u1, u2, u3, o4) +function s._筛最短键(u1, u2, u3, u4) if #u1 > #u3 then return true end end --~ 对 @@ -43,15 +43,15 @@ -- 最大 --~ 键 --~ 最大值 --~ 键 --~ 值 -function s._筛最大值(u1, u2, u3, o4) - if u2 < o4 then +function s._筛最大值(u1, u2, u3, u4) + if u2 < u4 then return true end end --~ 对 function s.筛最大值(u1_0) return s.历对(u1_0, s._筛最大值) end return s Index: 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取全.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取全.lua +++ 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_对_取全.lua @@ -6,14 +6,14 @@ function s.历对(u1_0, u1, u2) local k1, k2 local k1_0 --~ 对 k1_0 = {} - for u3, o4 in pairs(u1_0) do + for u3, u4 in pairs(u1_0) do --~ 键 --~ 值 - k1, k2 = u1(u3, o4, u2) + k1, k2 = u1(u3, u4, u2) if k1 then k1_0[k1] = k2 else end end @@ -25,12 +25,12 @@ --~ 入参3 function s.历值(u1_0, u1, u2, u3) local k1_0 --~ 对 k1_0 = {} - for o4, o5 in pairs(u1_0) do - k1_0[o4] = u1(o5, u2, u3) + for u4, o5 in pairs(u1_0) do + k1_0[u4] = u1(o5, u2, u3) end return k1_0 end --~ 键 --~ 值 Index: 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取全.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取全.lua +++ 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取全.lua @@ -4,31 +4,31 @@ --~ 排 --~ 办排中值的能 --~ 入参2 --~ 入参3 --~ 入参4 -function s.历排(u1_0, u1, u2, u3, o4) +function s.历排(u1_0, u1, u2, u3, u4) local k1_0 --~ 集排 k1_0 = {} for o5 = 1, #u1_0 do - k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, o4) + k1_0[#k1_0 + 1] = u1(u1_0[o5], u2, u3, u4) end return k1_0 end --~ 排 --~ 排 --~ 办排中值的能 --~ 入参3 --~ 入参4 --~ 入参5 -function s.历二排(u1_0, u2_0, u1, u2, u3, o4) +function s.历二排(u1_0, u2_0, u1, u2, u3, u4) local k1_0 --~ 集排 k1_0 = {} for o5 = 1, #u1_0 do - k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u2, u3, o4) + k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u2, u3, u4) end return k1_0 end --~ 排 --~ 排 @@ -35,15 +35,15 @@ --~ 排 --~ 办排中值的能 --~ 入参4 --~ 入参5 --~ 入参6 -function s.历三排(u1_0, u2_0, u3_0, u1, u2, u3, o4) +function s.历三排(u1_0, u2_0, u3_0, u1, u2, u3, u4) local k1_0 --~ 集排 k1_0 = {} for o5 = 1, #u1_0 do - k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u3_0[o5], u2, u3, o4) + k1_0[#k1_0 + 1] = u1(u1_0[o5], u2_0[o5], u3_0[o5], u2, u3, u4) end return k1_0 end return s Index: 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取联.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取联.lua +++ 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取联.lua @@ -2,15 +2,15 @@ -- 启 --~ 排 --~ 办排中值的能 --~ 入参2 --~ 入参3 -function s.历排(u1_0, u1, u2, u3, o4) +function s.历排(u1_0, u1, u2, u3, u4) local k1 --~ 和 k1 = u1_0[1] or 0 for o5 = 2, #u1_0 do - k1 = u1(k1, u2(u1_0[o5], u3, o4)) + k1 = u1(k1, u2(u1_0[o5], u3, u4)) end return k1 end return s Index: 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_相加.lua ================================================================== --- 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_相加.lua +++ 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_相加.lua @@ -4,15 +4,15 @@ --~ 排 --~ 办排中值的能 --~ 入参2 --~ 入参3 --~ 入参4 -function s.历排(u1_0, u1, u2, u3, o4) +function s.历排(u1_0, u1, u2, u3, u4) local k1 --~ 和 k1 = 0 for o5 = 1, #u1_0 do - k1 = k1 + u1(u1_0[o5], u2, u3, o4) + k1 = k1 + u1(u1_0[o5], u2, u3, u4) end return k1 end return s Index: 残局文料/lua_lib/计算机_系统_窗口群_命令行_无窗口.lua ================================================================== --- 残局文料/lua_lib/计算机_系统_窗口群_命令行_无窗口.lua +++ 残局文料/lua_lib/计算机_系统_窗口群_命令行_无窗口.lua @@ -8,13 +8,13 @@ end --~ function d_2.逐一执行命令(u1) --~ 历排库.处理(u1, d_2.执行命令) --~ end --~ 件夹 ---~ function d_2.入文件夹路径而用文件路径执行命令_全筛态_加前缀与后缀态_不虑子文件夹内态(u1, u2, u3, o4, o5, o6) +--~ function d_2.入文件夹路径而用文件路径执行命令_全筛态_加前缀与后缀态_不虑子文件夹内态(u1, u2, u3, u4, o5, o6) --~ local k1_9 - --~ k1_9 = 件径库.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, o4) + --~ k1_9 = 件径库.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, u4) --~ k1_9 = 前后缀库.逐一在前后加上英文双引号(k1_9) --~ k1_9 = 前后缀库.逐一加前缀与后缀(k1_9, o5, o6) --~ d_2.逐一执行命令(k1_9) --~ end --~ function d_2.入文件夹路径而用文件路径执行命令_全筛后缀态_加前缀态_不虑子文件夹内态(u1, u2, u3) Index: 残局文料/lua_lib/计算机_系统_窗口群_文件系统_路径.lua ================================================================== --- 残局文料/lua_lib/计算机_系统_窗口群_文件系统_路径.lua +++ 残局文料/lua_lib/计算机_系统_窗口群_文件系统_路径.lua @@ -2,14 +2,14 @@ local 历文库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_逐一") local 历排库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_序排_逐一") local 前后缀库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_前缀与后缀") local 全筛文库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_字串_全筛") local 简单文件系统库 = require("lfs") -function d_2.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, o4) +function d_2.入文件夹路径而返文件路径排_全筛态(u1, u2, u3, u4) local k1_9 k1_9 = d_2.入文件夹路径而返文件路径排(u1) - return 历排库.处理后返回新排(k1_9, 全筛文库.找字, u2, u3, o4) + return 历排库.处理后返回新排(k1_9, 全筛文库.找字, u2, u3, u4) end function d_2.入文件夹路径而返文件路径排(u1) local k1_9 k1_9 = d_2.入文件夹路径而返文件名排(u1) return 前后缀库.逐一加前缀(k1_9, u1 .. "/")