8c1e3abceb 2024-02-12 1: local 字集库 = require("u8_to_a")
b0e744e1e3 2024-02-12 2: local 档库 = require("lsqlite3")
b0e744e1e3 2024-02-12 3: local 文库 = require(字集库.u8_to_a("算机_程语_月_基类_文"))
8c1e3abceb 2024-02-12 4: local 对库 = require(字集库.u8_to_a("算机_程语_月_基类_表_对"))
5b9fb5e09f 2024-02-13 5: local s = {}
beb98c727c 2024-02-12 6: local 卡档
beb98c727c 2024-02-12 7: --~ 卡编
5b9fb5e09f 2024-02-13 8: function s.取卡对(o1)
beb98c727c 2024-02-12 9: local k1_0, k2_0
beb98c727c 2024-02-12 10: --~ 卡文对
5b9fb5e09f 2024-02-13 11: k1_0 = s.取卡文(o1)
beb98c727c 2024-02-12 12: --~ 卡数据对
5b9fb5e09f 2024-02-13 13: k2_0 = s.取卡数据(o1)
beb98c727c 2024-02-12 14: return 对库.连两对(k1_0, k2_0)
b2254565d9 2024-02-12 15: end
b2254565d9 2024-02-12 16: --~ 卡编
5b9fb5e09f 2024-02-13 17: function s._取卡对(o1, o2)
b2254565d9 2024-02-12 18: for o1_4 in 卡档:nrows(文库.连(o2, o1)) do
b2254565d9 2024-02-12 19: return o1_4
b2254565d9 2024-02-12 20: end
beb98c727c 2024-02-12 21: end
beb98c727c 2024-02-12 22: do
beb98c727c 2024-02-12 23: local k1
beb98c727c 2024-02-12 24: --~ 模
beb98c727c 2024-02-12 25: k1 = "select * from texts where id = "
beb98c727c 2024-02-12 26: --~ 卡编
5b9fb5e09f 2024-02-13 27: function s.取卡文(o1)
5b9fb5e09f 2024-02-13 28: return s._取卡对(o1, k1)
beb98c727c 2024-02-12 29: end
beb98c727c 2024-02-12 30: end
beb98c727c 2024-02-12 31: do
beb98c727c 2024-02-12 32: local k1
beb98c727c 2024-02-12 33: --~ 模
beb98c727c 2024-02-12 34: k1 = "select * from datas where id = "
beb98c727c 2024-02-12 35: --~ 卡编
5b9fb5e09f 2024-02-13 36: function s.取卡数据(o1)
5b9fb5e09f 2024-02-13 37: return s._取卡对(o1, k1)
beb98c727c 2024-02-12 38: end
beb98c727c 2024-02-12 39: end
beb98c727c 2024-02-12 40: --~ 卡档路
5b9fb5e09f 2024-02-13 41: function s.启卡档(o1)
beb98c727c 2024-02-12 42: 卡档 = 档库.open(o1)
beb98c727c 2024-02-12 43: end
5b9fb5e09f 2024-02-13 44: return s