47e0a87646 2024-02-10 1: package.path = [[.\lua_lib\?.lua;]] .. package.path
47e0a87646 2024-02-10 2: package.cpath = [[.\lua_lib\?.dll;]] .. package.cpath
47e0a87646 2024-02-10 3: local 字集库 = require("u8_to_a")
47e0a87646 2024-02-10 4: local 文件系库 = require("lfs")
47e0a87646 2024-02-10 5: local 基算库 = require(字集库.u8_to_a("算机_程语_月_基类_数_基算"))
47e0a87646 2024-02-10 6: local 前缀库 = require(字集库.u8_to_a("算机_程语_月_基类_文_前缀"))
413d4284fd 2024-02-11 7: local 文库 = require(字集库.u8_to_a("算机_程语_月_基类_文"))
47e0a87646 2024-02-10 8: local 后缀库 = require(字集库.u8_to_a("算机_程语_月_基类_文_后缀"))
47e0a87646 2024-02-10 9: local 历排库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_排_取全"))
47e0a87646 2024-02-10 10: local 历对库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_对_取全"))
47e0a87646 2024-02-10 11: local 历文库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_文_取全"))
47e0a87646 2024-02-10 12: local 数库 = require(字集库.u8_to_a("算机_程语_月_基类_数"))
47e0a87646 2024-02-10 13: local 基类库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_基类"))
47e0a87646 2024-02-10 14: local 筛卡库 = require(字集库.u8_to_a("游戏王_则拟器_原版_残局_卡_全筛"))
7641d52a05 2024-02-12 15: local 卡档库 = require(字集库.u8_to_a("游戏王_则拟器_原版_卡档"))
47e0a87646 2024-02-10 16: local 排算库 = require(字集库.u8_to_a("算机_程语_月_基类_表_排_基类_数"))
b0e744e1e3 2024-02-12 17: local 删注库 = require(字集库.u8_to_a("算机_程语_月_注_删_不虑字串"))
47e0a87646 2024-02-10 18: local 读文件库 = require(字集库.u8_to_a("算机_基统_窗群_文件系_小文件_读"))
47e0a87646 2024-02-10 19: local 写文件库 = require(字集库.u8_to_a("算机_基统_窗群_文件系_小文件_写"))
47e0a87646 2024-02-10 20: local string = string
47e0a87646 2024-02-10 21: local os = os
0bb276043b 2024-02-11 22: local table = table
671d8a7ff9 2024-02-13 23: local s = {}
671d8a7ff9 2024-02-13 24: --~ 卡对排
f1bea6a75e 2024-02-13 25: function s.筛有效果卡(u1_0)
f1bea6a75e 2024-02-13 26: return 历排库.历排(u1_0, 筛卡库.筛有效果卡)
f1bea6a75e 2024-02-13 27: end
f1bea6a75e 2024-02-13 28: --~ 卡编排
f1bea6a75e 2024-02-13 29: function s.取卡对_一维(u1_0)
f1bea6a75e 2024-02-13 30: return 历排库.历排(u1_0, 卡档库.取卡对)
f1bea6a75e 2024-02-13 31: end
f1bea6a75e 2024-02-13 32: do
89f423ff38 2024-02-13 33: local h1, h2, h3
f1bea6a75e 2024-02-13 34: --~ 非空单行，且无换行符
89f423ff38 2024-02-13 35: h1 = "[^\n]+"
f1bea6a75e 2024-02-13 36: --~ 卡编所在函式
89f423ff38 2024-02-13 37: h2 = "Debug%.AddCard.+"
f1bea6a75e 2024-02-13 38: --~ 卡编
89f423ff38 2024-02-13 39: h3 = "[0-9]+"
f1bea6a75e 2024-02-13 40: --~ 文
f1bea6a75e 2024-02-13 41: function s.局筛卡编(u1)
f1bea6a75e 2024-02-13 42: local h1_0
f1bea6a75e 2024-02-13 43: --~ 卡编排
89f423ff38 2024-02-13 44: h1_0 = 历文库.历文(u1, string.gmatch, h1)
89f423ff38 2024-02-13 45: h1_0 = 历排库.历排(h1_0, string.match, h2)
89f423ff38 2024-02-13 46: return 历排库.历排(h1_0, string.match, h3)
f1bea6a75e 2024-02-13 47: end
f1bea6a75e 2024-02-13 48: end
f1bea6a75e 2024-02-13 49: do
89f423ff38 2024-02-13 50: local h1, h2, h3, h4
f1bea6a75e 2024-02-13 51: --~ 非空单行，且无换行符
89f423ff38 2024-02-13 52: h1 = "[^\n]+"
f1bea6a75e 2024-02-13 53: --~ 玩家讯所在函式
89f423ff38 2024-02-13 54: h2 = "Debug%.SetPlayerInfo.+"
f1bea6a75e 2024-02-13 55: --~ 玩家编号
89f423ff38 2024-02-13 56: h3 = "[0-9]+"
f1bea6a75e 2024-02-13 57: --~ 玩家血量
89f423ff38 2024-02-13 58: h4 = "[0-9]+"
f1bea6a75e 2024-02-13 59: --~ 文
f1bea6a75e 2024-02-13 60: function s.局筛血(u1)
f1bea6a75e 2024-02-13 61: local h1_0
f1bea6a75e 2024-02-13 62: --~ 血排
89f423ff38 2024-02-13 63: h1_0 = 历文库.历文(u1, string.gmatch, h1)
89f423ff38 2024-02-13 64: h1_0 = 历排库.历排(h1_0, string.match, h2)
89f423ff38 2024-02-13 65: h1_0 = 历排库.历排(h1_0, string.gsub, h3, "", 1)
89f423ff38 2024-02-13 66: return 历排库.历排(h1_0, string.match, h4)
f1bea6a75e 2024-02-13 67: end
f1bea6a75e 2024-02-13 68: end
f1bea6a75e 2024-02-13 69: do
89f423ff38 2024-02-13 70: local h1, h2, h3
f1bea6a75e 2024-02-13 71: --~ 非空单行，且无换行符
89f423ff38 2024-02-13 72: h1 = "[^\n]+"
f1bea6a75e 2024-02-13 73: --~ 残局讯所在函式
89f423ff38 2024-02-13 74: h2 = 文库.连("Debug", "%.", "ReloadFieldBegin", ".+")
f1bea6a75e 2024-02-13 75: --~ 则数
89f423ff38 2024-02-13 76: h3 = "[0-9]"
f1bea6a75e 2024-02-13 77: --~ 文
f1bea6a75e 2024-02-13 78: function s.局筛则数(u1)
89f423ff38 2024-02-13 79: local h4
f1bea6a75e 2024-02-13 80: local h1_0
f1bea6a75e 2024-02-13 81: --~ 则数排
89f423ff38 2024-02-13 82: h1_0 = 历文库.历文(u1, string.gmatch, h1)
89f423ff38 2024-02-13 83: h1_0 = 历排库.历排(h1_0, string.match, h2)
f1bea6a75e 2024-02-13 84: --~ 则数
89f423ff38 2024-02-13 85: h4 = string.match(h1_0[1], h3)
89f423ff38 2024-02-13 86: assert(h4, u1)
89f423ff38 2024-02-13 87: return h4 or 5
671d8a7ff9 2024-02-13 88: end
671d8a7ff9 2024-02-13 89: end
671d8a7ff9 2024-02-13 90: --~ 卡对排
671d8a7ff9 2024-02-13 91: --~ 血排
f1bea6a75e 2024-02-13 92: function s.荐名(u1_0, u2_0)
89f423ff38 2024-02-13 93: local h1, h2, h3
671d8a7ff9 2024-02-13 94: local h1_0
671d8a7ff9 2024-02-13 95: --~ 攻击力排
f1bea6a75e 2024-02-13 96: h1_0 = 历排库.历排(u1_0, 筛卡库.筛怪兽卡)
671d8a7ff9 2024-02-13 97: h1_0 = 历排库.历排(h1_0, 筛卡库.筛攻击力)
671d8a7ff9 2024-02-13 98: --~ 总攻
89f423ff38 2024-02-13 99: h1 = 排算库.总和(h1_0)
671d8a7ff9 2024-02-13 100: --~ 总血
89f423ff38 2024-02-13 101: h2 = 排算库.总和(u2_0)
671d8a7ff9 2024-02-13 102: --~ 荐名
89f423ff38 2024-02-13 103: h3 = 基算库.除法(h1, h2)
89f423ff38 2024-02-13 104: h3 = 数库.指数次(h3, 2)
89f423ff38 2024-02-13 105: if 数库.是否错值(h3) then
671d8a7ff9 2024-02-13 106: return 0
671d8a7ff9 2024-02-13 107: else
89f423ff38 2024-02-13 108: h3 = 数库.几位小数(h3, 1)
89f423ff38 2024-02-13 109: return tostring(基算库.乘法(h3, 1000))
413d4284fd 2024-02-11 110: end
413d4284fd 2024-02-11 111: end
413d4284fd 2024-02-11 112: --~ 文件
413d4284fd 2024-02-11 113: --~ 编号
413d4284fd 2024-02-11 114: --~ 文件路
f1bea6a75e 2024-02-13 115: function s.察编号(u1, u2, u3)
89f423ff38 2024-02-13 116: local h1
89f423ff38 2024-02-13 117: h1 = string.gsub(u1, 文库.连("Debug", "%.", "SetAIName", "[^\n]+"), 文库.连([[Debug.SetAIName("]], u2, [[")]]))
89f423ff38 2024-02-13 118: if h1 == u1 then
413d4284fd 2024-02-11 119: else
8d2b2c76db 2024-02-14 120: 写文件库.写文件(h1, u3)
413d4284fd 2024-02-11 121: end
413d4284fd 2024-02-11 122: end
413d4284fd 2024-02-11 123: --~ 目对
f1bea6a75e 2024-02-13 124: function s.残局改名(u1_0)
713a53fab4 2024-02-13 125: local h1_0, h2_0, h3_0, h4_0, h5_0, h6_0, h7_0, h8_0, h9_0
671d8a7ff9 2024-02-13 126: local h10_0, h11_0, h12_0
caceb3cbb9 2024-02-13 127: --~ 文件名排
f1bea6a75e 2024-02-13 128: h1_0 = 历文库.历文(u1_0.文件目, 文件系库.dir)
caceb3cbb9 2024-02-13 129: h1_0 = 历排库.历排(h1_0, 后缀库.全筛后缀, ".lua")
caceb3cbb9 2024-02-13 130: --~ 文件排
caceb3cbb9 2024-02-13 131: h2_0 = 历排库.历排(h1_0, 后缀库.全筛后缀, ".lua")
f1bea6a75e 2024-02-13 132: h2_0 = 历排库.历排(h2_0, 前缀库.加前缀, u1_0.文件目)
caceb3cbb9 2024-02-13 133: h2_0 = 历排库.历排(h2_0, 读文件库.读文件)
caceb3cbb9 2024-02-13 134: h2_0 = 历排库.历排(h2_0, 删注库.删注)
caceb3cbb9 2024-02-13 135: --~ 则数排
671d8a7ff9 2024-02-13 136: h3_0 = 历排库.历排(h2_0, s.局筛则数)
713a53fab4 2024-02-13 137: --~ 各文件的卡编排
671d8a7ff9 2024-02-13 138: h4_0 = 历排库.历排(h2_0, s.局筛卡编)
713a53fab4 2024-02-13 139: --~ 各文件的卡对排
671d8a7ff9 2024-02-13 140: h5_0 = 历排库.历排(h4_0, s.取卡对_一维)
713a53fab4 2024-02-13 141: --~ 有效果卡的卡对排
671d8a7ff9 2024-02-13 142: h6_0 = 历排库.历排(h5_0, s.筛有效果卡)
713a53fab4 2024-02-13 143: --~ 有效果卡的张数排
713a53fab4 2024-02-13 144: h7_0 = 历排库.历排(h6_0, table.maxn)
713a53fab4 2024-02-13 145: --~ 血排
671d8a7ff9 2024-02-13 146: h11_0 = 历排库.历排(h2_0, s.局筛血)
713a53fab4 2024-02-13 147: --~ 荐名排
671d8a7ff9 2024-02-13 148: h8_0 = 历排库.历二排(h6_0, h11_0, s.荐名)
713a53fab4 2024-02-13 149: --~ 新名排
713a53fab4 2024-02-13 150: h9_0 = 历排库.历排(h1_0, string.gsub, 字集库.u8_to_a(文库.连(" ", ".+")), "")
713a53fab4 2024-02-13 151: --~ 编号排
ca2f234ffc 2024-02-13 152: h10_0 = 历排库.历排(h1_0, string.gsub, 字集库.u8_to_a(文库.连(" ", ".+")), "")
ca2f234ffc 2024-02-13 153: h9_0 = 历排库.历排(h9_0, string.gsub, 文库.连("%.", "lua", "$"), "")
f1bea6a75e 2024-02-13 154: for u1 = 1, #h1_0 do
f1bea6a75e 2024-02-13 155: h9_0[u1] = 文库.连(字集库.a_to_u8(u1_0.文件目), 字集库.a_to_u8(h9_0[u1]), " ", h3_0[u1], "_", 数库.几位整数(h7_0[u1], 2))
f1bea6a75e 2024-02-13 156: if h8_0[u1] == 0 then
f1bea6a75e 2024-02-13 157: h9_0[u1] = 文库.连(h9_0[u1], ".", "lua")
ca2f234ffc 2024-02-13 158: else
f1bea6a75e 2024-02-13 159: h9_0[u1] = 文库.连(h9_0[u1], "_", h8_0[u1], ".", "lua")
ca2f234ffc 2024-02-13 160: end
ca2f234ffc 2024-02-13 161: end
f1bea6a75e 2024-02-13 162: h1_0 = 历排库.历排(h1_0, 前缀库.加前缀, u1_0.文件目)
ca2f234ffc 2024-02-13 163: h9_0 = 历排库.历排(h9_0, 字集库.u8_to_a)
ca2f234ffc 2024-02-13 164: 历排库.历二排(h1_0, h9_0, os.rename)
ca2f234ffc 2024-02-13 165: h10_0 = 历排库.历排(h10_0, 字集库.a_to_u8)
ca2f234ffc 2024-02-13 166: --~ 文排
671d8a7ff9 2024-02-13 167: h12_0 = 历排库.历排(h9_0, 读文件库.读文件)
671d8a7ff9 2024-02-13 168: 历排库.历三排(h12_0, h10_0, h9_0, s.察编号)
ca2f234ffc 2024-02-13 169: end
671d8a7ff9 2024-02-13 170: s.目对 = {
413d4284fd 2024-02-11 171: ["文件目"] = "../single/"
413d4284fd 2024-02-11 172: , ["卡档路"] = [[D:\install\YGOPro\cards.cdb]]
413d4284fd 2024-02-11 173: }
671d8a7ff9 2024-02-13 174: s.目对 = 历对库.历值(s.目对, 基类库.操类, "string", 字集库.u8_to_a)
671d8a7ff9 2024-02-13 175: 卡档库.启卡档(s.目对.卡档路)
671d8a7ff9 2024-02-13 176: s.残局改名(s.目对)