Index: 残局文料/lua_lib/常用库.lua ================================================================== --- 残局文料/lua_lib/常用库.lua +++ 残局文料/lua_lib/常用库.lua @@ -1,13 +1,13 @@ -local d_5 = {} +local d_4 = {} local 简文件库 = require("lfs") --~ 排 --~ 办排中值的能 --~ 入参2 --~ 入参3 --~ 入参4 -function d_5.历排(o1_11, o1, o2, o3, o4) +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) @@ -16,11 +16,11 @@ end --~ 文 --~ 历文的能 --~ 入参2 --~ 入参3 -function d_5.历文(o1, o2, o3, o4) +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 @@ -28,11 +28,11 @@ return k1_9 end --~ 表中值 --~ 值类 --~ 办值的能 -function d_5.操类(o1, o2, o3) +function d_4.操类(o1, o2, o3) if type(o1) == o2 then return o3(o1) else return o1 end @@ -39,46 +39,46 @@ end --~ 排中文 --~ 入参2 --~ 入参3 --~ 入参4 -function d_5.全筛文(o1, o2, o3, o4) +function d_4.全筛文(o1, o2, o3, o4) if string.find(o1, o2, o3, o4) then return o1 end end --~ 文 --~ 前缀 -function d_5.加前缀(o1, o2) +function d_4.加前缀(o1, o2) return (o2 or "") .. o1 end --~ 文 --~ 后缀 -function d_5.加后缀(o1, o2) +function d_4.加后缀(o1, o2) return o1 .. (o2 or "") end --~ 令 -function d_5.办令(o1) +function d_4.办令(o1) print(o1) os.execute(o1) end --~ 文 --~ 前缀 -function d_5.全筛前缀(o1, o2) +function d_4.全筛前缀(o1, o2) if string.sub(o1, 1, #o2) == o2 then return o1 end end --~ 文 --~ 后缀 -function d_5.全筛后缀(o1, o2) +function d_4.全筛后缀(o1, o2) if string.sub(o1, -#o2) == o2 then return o1 end end --~ 目表 -function d_5.用令行工具操文件(o1) +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 @@ -89,11 +89,11 @@ d_4.办令(k1_9[o2]) end end --~ 文件路 --~ 式 -function d_5.读文件(o1, o2) +function d_4.读文件(o1, o2) local k1 local k1_4 --~ 文件 k1_4 = io.open(o1, o2 or "r") --~ 文 @@ -101,11 +101,11 @@ k1_4:flush() k1_4:close() return k1 end --~ 常量排 -function d_5.加对限(o1_11) +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 = {}") @@ -113,18 +113,18 @@ return table.concat(o1_11, "\n") end --~ 文 --~ 文件路 --~ 式 -function d_5.写文件(o1, o2, o3) +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_5.删左右空白(o1) +function d_4.删左右空白(o1) o1 = string.gsub(o1, "^%s+", "") return string.gsub(o1, "%s+$", "") end -return d_5 +return d_4 Index: 残局文料/残局改名.lua ================================================================== --- 残局文料/残局改名.lua +++ 残局文料/残局改名.lua @@ -8,11 +8,12 @@ local d_5 = {} do local TYPE_SPELL = 0x2 local TYPE_TRAP = 0x4 local TYPE_EFFECT = 0x20 - local 有效果卡类排 = { + local TYPE_PENDULUM = 0x1000000 + local 有效果卡的类排 = { TYPE_SPELL , TYPE_TRAP , TYPE_EFFECT } local 无效果灵摆怪兽排 = { @@ -21,26 +22,38 @@ , 17390179 --闪光之骑士 , 83980492 --铜锣龙 } --~ 卡对 function d_5.筛有效果卡(o1_5) - + for o1 = 1, #有效果卡的类排 do + if bit.band(有效果卡的类排[o1], o1_5.type) == 0 then + else + return o1_5 + end + end + if bit.band(TYPE_PENDULUM, o1_5.type) == 0 then + else + if 无效果灵摆怪兽排[o1_5.id] then + else + return o1_5 + end + end end end --~ 卡对排 -function d_5.筛有效果卡的卡数(o1_8) +function d_5.筛有效果卡的张数(o1_8) local k1_8 --~ 卡排 - k1_8 = f.历排(o1_8, d_5.筛有效果卡的卡数) - return #k1 + k1_8 = f.历排(o1_8, d_5.筛有效果卡) + return #k1_8 end --~ 卡编排 -function d_5.筛卡对_一维(o1_8) - return f.历排(o1_8, d_5.筛卡对) +function d_5.取卡对_一维(o1_8) + return f.历排(o1_8, d_5.取卡对) end --~ 卡编 -function d_5.筛卡对(o1_8) +function d_5.取卡对(o1_8) for o1_5 in 数据库:nrows("select * from datas where id = " .. o1_8) do return o1_5 end end --~ 文 @@ -62,11 +75,11 @@ k1 = string.match(k1_9[1], "[0-9]") return k1 or 3 end --~ 目对 function d_5.残局改名(o1) - local k1_9, k2_9, k3_9, k4_9, k5_9 + local k1_9, k2_9, k3_9, k4_9, k5_9, k6_9 --~ 文件排 k1_9 = f.历文(o1.文件目, 简文件库.dir) k1_9 = f.历排(k1_9, f.全筛后缀, ".lua") for o2 = 1, #k1_9 do k1_9[o2] = f.加前缀(k1_9[o2], o1.文件目) @@ -78,17 +91,20 @@ k2_9 = f.历排(k1_9, d_5.局筛则数) --~ 各文件的卡编排 k3_9 = f.历排(k1_9, d_5.局筛卡编) _G.数据库 = 简数据库库.open(o1.数据库路) --~ 各文件的卡对排 - k4_9 = f.历排(k3_9, d_5.筛卡对_一维) - --~ 有效果卡的卡数排 - k5_9 = f.历排(k4_9, d_5.筛有效果卡的卡数) + k4_9 = f.历排(k3_9, d_5.取卡对_一维) + --~ 有效果卡的张数排 + k5_9 = f.历排(k4_9, d_5.筛有效果卡的张数) + --~ 卡文排 + --~ k6_9 = f.历排(k3_9, d_5.取卡文) + --~ print(k5_9[2]) end d_5.目对 = { ["文件目"] = "../single/" , ["数据库路"] = [[D:\install\YGOPro\cards.cdb]] } for o1, o2 in pairs(d_5.目对) do d_5.目对[o1] = f.操类(o2, "string", u8) end d_5.残局改名(d_5.目对)