110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
-
-
-
-
-
-
-
+
+
+
+
+
+
+
|
--~ return k1_9
--~ end
--~ function d_5.判文(o1, o2, o3, o4)
--~ if o1:find(o2 or ".", o3, o4) then
--~ return o1
--~ end
--~ end
function d_5.筛件径(o1, o2)
local k1_9
k1_9 = d_5.筛文(o1, 简件系库.dir)
k1_9 = d_5.筛排(k1_9, d_5.加前缀, o1 .. "/")
k1_9 = d_5.筛排(k1_9, d_5.判文, o2)
return d_5.筛排(k1_9, d_5.在前后加英文双引号)
end
--~ function d_5.筛件径(o1, o2)
--~ local k1_9
--~ k1_9 = d_5.筛文(o1, 简件系库.dir)
--~ k1_9 = d_5.筛排(k1_9, d_5.加前缀, o1 .. "/")
--~ k1_9 = d_5.筛排(k1_9, d_5.判文, o2)
--~ return d_5.筛排(k1_9, d_5.在前后加英文双引号)
--~ end
--~ function d_5.筛单行等式(o1)
--~ return 常用库.捕排(string.gmatch, o1, "[^\n= \t]+")
--~ end
--~ function d_5.捕非空单行(o1)
--~ return 常用库.捕排(string.gmatch, o1, "[^\n]+[\n]?")
--~ end
--~ function d_5.捕非空单行(o1)
|
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
|
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
|
-
-
-
-
+
+
+
+
|
for i, line in ipairs(lines) do
if line:find(character, 1, true) then
table.insert(result, line)
end
end
return result
end
function d_5.办令(o1)
print(o1)
os.execute(o1)
end
--~ function d_5.办令(o1)
--~ print(o1)
--~ os.execute(o1)
--~ end
--~ function d_5.在前后加英文双引号(o1)
--~ return [["]] .. o1 .. [["]]
--~ end
--~ function d_5.筛单行等式_左右值态(o1)
--~ local k1_11
--~ k1_11 = {}
--~ for o2 in k1_11:gmatch("[^\n= \t]+") do
--~ table.insert(k1_11, o2)
--~ end
--~ return o2
--~ end
return d_5
|