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