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
|
local 字集库 = require("u8_to_a")
local 档库 = require("lsqlite3")
local 文库 = require(字集库.u8_to_a("算机_程语_月_基类_文"))
local 对库 = require(字集库.u8_to_a("算机_程语_月_基类_表_对"))
local d = {}
local 卡档
--~ 卡编
function d.取卡对(o1)
local k1_0, k2_0
--~ 卡文对
k1_0 = d.取卡文(o1)
--~ 卡数据对
k2_0 = d.取卡数据(o1)
return 对库.连两对(k1_0, k2_0)
end
--~ 卡编
function d._取卡对(o1, o2)
for o1_4 in 卡档:nrows(文库.连(o2, o1)) do
return o1_4
end
end
do
local k1
--~ 模
k1 = "select * from texts where id = "
--~ 卡编
function d.取卡文(o1)
return d._取卡对(o1, k1)
end
end
do
local k1
--~ 模
k1 = "select * from datas where id = "
--~ 卡编
function d.取卡数据(o1)
return d._取卡对(o1, k1)
end
end
--~ 卡档路
function d.启卡档(o1)
卡档 = 档库.open(o1)
end
return d
|
|
|
|
|
|
|
|
|
|
|
|
|
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
|
local 字集库 = require("u8_to_a")
local 档库 = require("lsqlite3")
local 文库 = require(字集库.u8_to_a("算机_程语_月_基类_文"))
local 对库 = require(字集库.u8_to_a("算机_程语_月_基类_表_对"))
local s = {}
local 卡档
--~ 卡编
function s.取卡对(o1)
local k1_0, k2_0
--~ 卡文对
k1_0 = s.取卡文(o1)
--~ 卡数据对
k2_0 = s.取卡数据(o1)
return 对库.连两对(k1_0, k2_0)
end
--~ 卡编
function s._取卡对(o1, o2)
for o1_4 in 卡档:nrows(文库.连(o2, o1)) do
return o1_4
end
end
do
local k1
--~ 模
k1 = "select * from texts where id = "
--~ 卡编
function s.取卡文(o1)
return s._取卡对(o1, k1)
end
end
do
local k1
--~ 模
k1 = "select * from datas where id = "
--~ 卡编
function s.取卡数据(o1)
return s._取卡对(o1, k1)
end
end
--~ 卡档路
function s.启卡档(o1)
卡档 = 档库.open(o1)
end
return s
|