Lines of
残局文料/lua_lib/常用库.lua
from check-in 4d150d683b
that are changed by the sequence of edits moving toward
check-in 168300f866:
d7e39f5d2e 2024-02-03 1: local d_4 = {}
2: local 简文件库 = require("lfs")
3: --~ 排
4: --~ 办排中值的能
5: --~ 入参2
6: --~ 入参3
7: --~ 入参4
4d150d683b 2024-02-03 8: function d_4.历排(o1_11, o1, o2, o3, o4)
9: local k1_11
10: --~ 集排
11: k1_11 = {}
12: for o5 = 1, #o1_11 do
13: k1_11[#k1_11 + 1] = o1(o1_11[o5], o2, o3, o4)
14: end
15: return k1_11
16: end
17: --~ 文
18: --~ 历文的能
19: --~ 入参2
20: --~ 入参3
4d150d683b 2024-02-03 21: function d_4.历文(o1, o2, o3, o4)
22: local k1_9
23: --~ 集排
24: k1_9 = {}
25: for o5 in o2(o1, o3, o4) do
26: k1_9[#k1_9 + 1] = o5
27: end
28: return k1_9
29: end
30: --~ 表中值
31: --~ 值类
32: --~ 办值的能
4d150d683b 2024-02-03 33: function d_4.操类(o1, o2, o3)
34: if type(o1) == o2 then
35: return o3(o1)
36: else
37: return o1
38: end
39: end
40: --~ 排中文
41: --~ 入参2
42: --~ 入参3
43: --~ 入参4
4d150d683b 2024-02-03 44: function d_4.全筛文(o1, o2, o3, o4)
45: if string.find(o1, o2, o3, o4) then
46: return o1
47: end
48: end
49: --~ 文
50: --~ 前缀
4d150d683b 2024-02-03 51: function d_4.加前缀(o1, o2)
52: return (o2 or "") .. o1
53: end
54: --~ 文
55: --~ 后缀
4d150d683b 2024-02-03 56: function d_4.加后缀(o1, o2)
57: return o1 .. (o2 or "")
58: end
59: --~ 令
4d150d683b 2024-02-03 60: function d_4.办令(o1)
61: print(o1)
62: os.execute(o1)
63: end
64: --~ 文
65: --~ 前缀
4d150d683b 2024-02-03 66: function d_4.全筛前缀(o1, o2)
67: if string.sub(o1, 1, #o2) == o2 then
68: return o1
69: end
70: end
71: --~ 文
72: --~ 后缀
4d150d683b 2024-02-03 73: function d_4.全筛后缀(o1, o2)
74: if string.sub(o1, -#o2) == o2 then
75: return o1
76: end
77: end
78: --~ 目表
4d150d683b 2024-02-03 79: function d_4.用令行工具操文件(o1)
80: local k1_9
81: --~ 令行排
82: k1_9 = d_4.历文(o1.文件目, 简文件库.dir)
83: k1_9 = d_4.历排(k1_9, d_4.全筛后缀, o1.文件类)
84: for o2 = 1, #k1_9 do
85: k1_9[o2] = d_4.加前缀(k1_9[o2], o1.文件目)
86: k1_9[o2] = d_4.加前缀(k1_9[o2], [["]])
87: k1_9[o2] = d_4.加后缀(k1_9[o2], [["]])
88: k1_9[o2] = d_4.加前缀(k1_9[o2], o1.令行前缀)
89: d_4.办令(k1_9[o2])
90: end
91: end
92: --~ 文件路
93: --~ 式
4d150d683b 2024-02-03 94: function d_4.读文件(o1, o2)
95: local k1
96: local k1_4
97: --~ 文件
98: k1_4 = io.open(o1, o2 or "r")
99: --~ 文
100: k1 = k1_4:read("a")
101: k1_4:flush()
102: k1_4:close()
103: return k1
104: end
105: --~ 常量排
4d150d683b 2024-02-03 106: function d_4.加对限(o1_11)
107: for o1 = 1, #o1_11 do
108: o1_11[o1] = d_4.加前缀(o1_11[o1], [[k1_11["]])
109: o1_11[o1] = string.gsub(o1_11[o1], "=", "\"]=", 1)
110: end
111: table.insert(o1_11, 1, "local k1_11 = {}")
112: table.insert(o1_11, "return k1_11")
113: return table.concat(o1_11, "\n")
114: end
115: --~ 文
116: --~ 文件路
117: --~ 式
4d150d683b 2024-02-03 118: function d_4.写文件(o1, o2, o3)
65d8c2fcdd 2024-02-03 119: local k1_4
120: --~ 文件
65d8c2fcdd 2024-02-03 121: k1_4 = io.open(o2, o3 or "w")
65d8c2fcdd 2024-02-03 122: k1_4:write(o1)
65d8c2fcdd 2024-02-03 123: k1_4:flush()
65d8c2fcdd 2024-02-03 124: k1_4:close()
125: end
4d150d683b 2024-02-03 126: function d_4.删左右空白(o1)
127: o1 = string.gsub(o1, "^%s+", "")
128: return string.gsub(o1, "%s+$", "")
129: end
d7e39f5d2e 2024-02-03 130: return d_4