1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
local 八位通用大字集码转本机码库 = require("u8_to_a")
local d_5 = {}
local 简件系库 = require("lfs")
function _G.require_u8(modname)
return require(八位通用大字集码转本机码库.u8_to_a(modname))
end
do
local k1 = 0
function _G.递增示()
k1 = k1 + 1
print(k1)
end
end
--~ do
--~ local k1 = os.execute
--~ function _G.os.execute(command)
--~ return k1(八位通用大字集码转本机码库.u2a(command))
--~ end
--~ end
function d_5.读件(o1, o2)
local k1
local k1_3
k1_3 = io.open(o1, o2 or "r")
k1 = k1_3:read("a")
|
|
|
|
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
local 字集码互转库 = require("u8_to_a")
local d_5 = {}
local 简件系库 = require("lfs")
function _G.require_u8(modname)
return require(字集码互转库.u8_to_a(modname))
end
do
local k1 = 0
function _G.递增示()
k1 = k1 + 1
print(k1)
end
end
--~ do
--~ local k1 = os.execute
--~ function _G.os.execute(command)
--~ return k1(字集码互转库.u2a(command))
--~ end
--~ end
function d_5.读件(o1, o2)
local k1
local k1_3
k1_3 = io.open(o1, o2 or "r")
k1 = k1_3:read("a")
|
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
end
d_5.写件(o1, k1, o2)
end
function d_5.删注释_lua_多行注释(o1)
return o1:gsub("%-%-%[%[.-%]%]", "")
end
function d_5.删注释_lua_单行注释(o1)
return o1:gsub("%-%-.-\n", "")
end
function d_5.删注释_lua(o1)
o1 = d_5.删注释_lua_多行注释(o1)
return d_5.删注释_lua_单行注释(o1)
end
function d_5.筛排(o1_9, o1, o2, o3)
local k1_8
|
|
|
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
end
d_5.写件(o1, k1, o2)
end
function d_5.删注释_lua_多行注释(o1)
return o1:gsub("%-%-%[%[.-%]%]", "")
end
function d_5.删注释_lua_单行注释(o1)
return o1:gsub("%-%-[^\n]+", "")
end
function d_5.删注释_lua(o1)
o1 = d_5.删注释_lua_多行注释(o1)
return d_5.删注释_lua_单行注释(o1)
end
function d_5.筛排(o1_9, o1, o2, o3)
local k1_8
|