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