--~ require(字集码互转库.u8_to_a("程语_月_基类_字串_内置库_加多"))
--~ 程语_月_标准库_仿照_加多_多编码_大字集_通用
function d_5.导入库_通用大字集态_八位态(modname)
  return require(字集码互转库.u8_to_a(modname))
  end
--~ local 
do
  local k1 = 0
  local h1 = 0
  function _G.递增示()
    k1 = k1 + 1
    print(k1)
    h1 = h1 + 1
    print(h1)
    end
  end
--~ do
--~ local k1 = os.execute
--~ local h1 = os.execute
--~ function _G.os.execute(command)
--~ return k1(字集码互转库.u2a(command))
--~ return h1(字集码互转库.u2a(command))
--~ end
--~ end
function d_5.读件(u1, u2)
  local k1
  local h1
  local k1_3
  k1_3 = io.open(u1, u2 or "r")
  k1 = k1_3:read("a")
  h1 = k1_3:read("a")
  k1_3:flush()
  k1_3:close()
  return k1
  return h1
  end
function d_5.读件排(o1_9, u1)
  local k1_9
  k1_9 = {}
  for u2 = 1, #o1_9 do
    k1_9[#k1_9 + 1] = d_5.读件(o1_9[u2], u1)
    end
  return k1_9
  end
function d_5.写件(u1, u2, u3)
  local k1_3
  k1_3 = io.open(u1, u3 or "w")
  k1_3:write(u2)
  k1_3:flush()
  k1_3:close()
  end
function d_5.写件_一维(u1, o1_9, u2, u3)
  local k1 = table.concat(o1_9, "\n")
  local h1 = table.concat(o1_9, "\n")
  if u3 then
    k1 = u3(k1)
    h1 = u3(h1)
    end
  d_5.写件(u1, k1, u2)
  d_5.写件(u1, h1, u2)
  end
function d_5.删制表符(u1)
  return u1:gsub("\t", "")
  end
--~ function d_5.删空白字(u1)
--~ return u1:gsub("%s", "")
--~ end

    h1_0[#h1_0 + 1] = u5
    end
  return h1_0
  end
--~ 排
--~ 能
function s.历排取一(u1_0, u1)
  local k1
  local h1
  for u2 = 1, #u1_0 do
    --~ 值
    k1 = s.历排取一的模(k1, u1_0[u2], u1)
    h1 = s.历排取一的模(h1, u1_0[u2], u1)
    end
  return k1
  return h1
  end
--~ 值
--~ 排中值
function s.历排取一的模(u1, u2, u3)
  if u1 == nil then
    return u2
  elseif u3(u1, u2) then
    return u2
  else
    return u1
    end
  end
--~ 对
--~ 能
function s.历对取一(u1_0, u1)
  local k1, k2
  local h1, h2
  for u2, u2_0 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = s.历对取一的模(k1, k2, u2, u2_0, u1)
    h1, h2 = s.历对取一的模(h1, h2, u2, u2_0, u1)
    end
  return k1, k2
  return h1, h2
  end
function s.历对取一的模(u1, u2, u3, u4, u5)
  if u1 == nil then
    return u3, u4
  elseif u5(u1, u2, u3, u4) then
    return u3, u4
  else
    return u1, u2
    end
  end
function s.历对(u1_0, u1, u2)
  local k1
  local h1
  local h1_0, h2_0
  --~ 对
  h1_0 = {}
  for u3, u2_0 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, h2_0 = u1(u3, u2_0, u2)
    if k1 then
      h1_0[k1] = h2_0
    h1, h2_0 = u1(u3, u2_0, u2)
    if h1 then
      h1_0[h1] = h2_0
    else
      end
    end
  return h1_0
  end
--~ 排中值
--~ 值类

    k1_9[u1] = s.加前缀(k1_9[u1], u1_0.令行前缀)
    s.办令(k1_9[u1])
    end
  end
--~ 文件路
--~ 式
function s.读文件(u1, u2)
  local k1
  local h1
  local k1_3
  --~ 文件
  k1_3 = io.open(u1, u2 or "r")
  --~ 文
  k1 = k1_3:read("a")
  h1 = k1_3:read("a")
  k1_3:flush()
  k1_3:close()
  return k1
  return h1
  end
--~ 常量排
function s.加对限(u1_0)
  table.insert(u1_0, 1, "local h1_0 = {}")
  table.insert(u1_0, "return h1_0")
  return table.concat(u1_0, "\n")
  end

    return tonumber(u1_0), u2_0
  else
    return u1_0, u2_0
    end
  end
do
  --~ 加数
  local k1 = 0
  local h1 = 0
  function s.递增()
    k1 = k1 + 1
    return k1
    h1 = h1 + 1
    return h1
    end
  end
--~ 左加数
--~ 右加数
function s.加法(u1, u2)
  return u1 + u2
  end

--~ 卡编
function s._取卡对(u1, u2)
  for o1_4 in 卡档:nrows(文库.连(u2, u1)) do
    return o1_4
    end
  end
do
  local k1
  local h1
  --~ 模
  k1 = "select * from texts where id = "
  h1 = "select * from texts where id = "
  --~ 卡编
  function s.取卡文(u1)
    return s._取卡对(u1, k1)
    return s._取卡对(u1, h1)
    end
  end
do
  local k1
  local h1
  --~ 模
  k1 = "select * from datas where id = "
  h1 = "select * from datas where id = "
  --~ 卡编
  function s.取卡数据(u1)
    return s._取卡对(u1, k1)
    return s._取卡对(u1, h1)
    end
  end
--~ 卡档路
function s.启卡档(u1)
  卡档 = 档库.open(u1)
  end
return s

--~ local 历排库 = 常用库.导入库_通用大字集态_八位态("程序语言_月_基础类型_序排_逐一")
local d_4 = {}
--~ 加
function d_4.加前缀(u1, u2)
  return (u2 or "") .. u1
  end
function d_4.加后缀(u1, u2)
  return u1 .. (u2 or "")
  end
--~ 加_分_确保
--~ function d_4.加前缀_确保态(u1, u2, u3)
--~ 筛文库.返全文(u1, )
--~ local k1
--~ k1 = d_4.删前缀(u1, u2, u3)
--~ local h1
--~ h1 = d_4.删前缀(u1, u2, u3)
--~ return u2 .. u1
--~ end
--~ function d_4.加前缀与后缀(u1, u2, u3)
  --~ u1 = d_4.加后缀(u1, u3)
  --~ return d_4.加前缀(u1, u2)
  --~ end
--~ function d_4.逐一加前缀(u1, u2)

function string:lstrip()
  return self:gsub("^%s+", "")
  end
function string:rstrip()
  return self:gsub("%s+$", "")
  end
function string:strip()
  local k1
  k1 = self:lstrip()
  return k1:rstrip()
  local h1
  h1 = self:lstrip()
  return h1:rstrip()
  end
function string:startswith(text)
  if self:sub(1, #text) == text then
    return self
    end
  end
function string:endswith(text)

local d_3 = {}
--~ 加
function d_3.加始缀_基态(u1, u2)
  return u2 .. u1
  end
function d_3.加终缀_基态(u1, u2)
  return u1 .. u2
  end
--~ 加_分_确保
--~ function d_3.加前缀_确保态(u1, u2, u3)
--~ 筛文库.返全文(u1, )
--~ local k1
--~ k1 = d_3.删前缀(u1, u2, u3)
--~ local h1
--~ h1 = d_3.删前缀(u1, u2, u3)
--~ return u2 .. u1
--~ end
--~ 减
function d_3.减始缀_基态(u1, u2)
  if u1:startswith(u2) then
    return u1:sub(#u2 + 1)
    end

function string:lstrip()
  return self:gsub("^%s+", "")
  end
function string:rstrip()
  return self:gsub("%s+$", "")
  end
function string:strip()
  local k1
  k1 = self:lstrip()
  return k1:rstrip()
  local h1
  h1 = self:lstrip()
  return h1:rstrip()
  end
function string:startswith(text)
  local size = text:len()
  if self:sub(1, size) == text then
    return self
    end
  end

  end
function d_3.加终缀_基态(u1, u2)
  return u1 .. u2
  end
--~ 加_分_确保
--~ function d_3.加前缀_确保态(u1, u2, u3)
--~ 筛文库.返全文(u1, )
--~ local k1
--~ k1 = d_3.删前缀(u1, u2, u3)
--~ local h1
--~ h1 = d_3.删前缀(u1, u2, u3)
--~ return u2 .. u1
--~ end
function d_3.加前缀与后缀_基态(u1, u2, u3)
  return u2 .. u1 .. (u3 or "")
  end
function d_3.加始缀与终缀_基态(u1, u2, u3)
  return u2 .. u1 .. (u3 or "")

local d_2 = {}
function d_2.读件(u1, u2)
  local k1
  local h1
  local k1_3
  k1_3 = io.open(u1, u2 or "r")
  k1 = k1_3:read("a")
  h1 = k1_3:read("a")
  k1_3:flush()
  k1_3:close()
  return k1
  return h1
  end
return d_2

local s = {}
--~ 文件路
--~ 式
function s.读文件(u1, u2)
  local k1
  local h1
  local k1_3
  --~ 文件
  k1_3 = io.open(u1, u2 or "r")
  --~ 文
  k1 = k1_3:read("a")
  h1 = k1_3:read("a")
  k1_3:flush()
  k1_3:close()
  return k1
  return h1
  end
return s

local 字集库 = require("u8_to_a")
local 基算库 = require(字集库.u8_to_a("算机_程语_月_基类_数_基算"))
local math = math
local string = string
local s = {}
-- 指数
--~ 左加数
--~ 右加数
function s.指数(u1, u2, u3)
  local k1
  local h1
  if u3 then
    --~ 指数次
    k1 = 基算库.除法(u2, u3)
    return u1 ^ k1
    h1 = 基算库.除法(u2, u3)
    return u1 ^ h1
  else
    return u1 ^ u2
    end
  end
-- 指数次
--~ 数
--~ 指数底
function s.指数次(u1, u2)
  local k1
  local h1
  --~ 指数次
  k1 = math.log(u1) / math.log(u2)
  return k1
  h1 = math.log(u1) / math.log(u2)
  return h1
  end
--~ 数
function s.二底指数次(u1)
  local k1
  local h1
  --~ 指数次
  _, k1 = math.frexp(u1)
  return k1
  _, h1 = math.frexp(u1)
  return h1
  end
-- 向大取整和向小取整
--~ 数
function s.向小取整(u1)
  return math.floor(u1)
  end
-- 几位整数和几位小数

    end
  end
-- 最值
function s.最大值()
  return math.huge
  end
function s.最小值()
  local k1
  local h1
  --~ 最大值
  k1 = s.最大值()
  return s.负数(k1)
  h1 = s.最大值()
  return s.负数(h1)
  end
--~ 数
function s.是否最值(u1)
  if u1 == s.最大值()
  or u1 == s.最小值() then
    return true
  else
    end
  end
--~ 数
function s.是否无效值(u1)
  if u1 == u1 then
  else
    return true
    end
  end
--~ 数
function s.是否错值(u1)
  local k1, k2
  local h1, h2
  --~ 是否最值
  k1 = s.是否最值(u1)
  h1 = s.是否最值(u1)
  --~ 是否无效值
  k2 = s.是否无效值(u1)
  return k1 or k2
  h2 = s.是否无效值(u1)
  return h1 or h2
  end
return s

local s = {}
-- 启
--~ 对
--~ 能
function s.历对(u1_0, u1)
  local k1, k2
  local h1, h2
  for u2, u3 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = s.模(k1, k2, u2, u3, u1)
    h1, h2 = s.模(h1, h2, u2, u3, u1)
    end
  return k1, k2
  return h1, h2
  end
-- 模
--~ 键
--~ 值
--~ 对中键
--~ 对中值
--~ 能

local s = {}
-- 全与局
--~ 对
--~ 能
--~ 入参3
function s.历对(u1_0, u1, u2)
  local k1, k2
  local h1, h2
  local h1_0
  --~ 对
  h1_0 = {}
  for u3, u4 in pairs(u1_0) do
    --~ 键
    --~ 值
    k1, k2 = u1(u3, u4, u2)
    if k1 then
      h1_0[k1] = k2
    h1, h2 = u1(u3, u4, u2)
    if h1 then
      h1_0[h1] = h2
    else
      end
    end
  return h1_0
  end
--~ 对
--~ 能

local s = {}
-- 启
--~ 排
--~ 能
function s.历排(u1_0, u1)
  local k1
  local h1
  for u2 = 1, #u1_0 do
    --~ 值
    k1 = s.模(k1, u1_0[u2], u1)
    h1 = s.模(h1, u1_0[u2], u1)
    end
  return k1
  return h1
  end
-- 模
--~ 值
--~ 排中值
function s.模(u1, u2, u3)
  if u1 == nil then
    return u2

local s = {}
-- 启
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
function s.历排(u1_0, u1, u2, u3, u4)
  local k1
  local h1
  --~ 和
  k1 = u1_0[1] or 0
  h1 = u1_0[1] or 0
  for u5 = 2, #u1_0 do
    k1 = u1(k1, u2(u1_0[u5], u3, u4))
    h1 = u1(h1, u2(u1_0[u5], u3, u4))
    end
  return k1
  return h1
  end
return s

local s = {}
-- 启
-- 启
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function s.历排(u1_0, u1, u2, u3, u4)
  local k1
  local h1
  --~ 和
  k1 = 0
  h1 = 0
  for u5 = 1, #u1_0 do
    k1 = k1 + u1(u1_0[u5], u2, u3, u4)
    h1 = h1 + u1(u1_0[u5], u2, u3, u4)
    end
  return k1
  return h1
  end
return s

    h1_0[u1] = u2
    end
  return h1_0
  end
-- 对长
--~ 对
function s.对长(u1_0)
  local k1
  local h1
  --~ 对长
  k1 = 0
  h1 = 0
  for _ in pairs(u1_0) do
    k1 = k1 + 1
    h1 = h1 + 1
    end
  return k1
  return h1
  end
return s

local 字集库 = require("u8_to_a")
local 历排取联库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_排_取联"))
local 返参库 = require(字集库.u8_to_a("算机_程语_月_基类_能_返参"))
local 基算库 = require(字集库.u8_to_a("算机_程语_月_基类_数_基算"))
local 历排库 = require(字集库.u8_to_a("算机_程语_月_基类_能_传能_历_基类_表_排_取全"))
local 数库 = require(字集库.u8_to_a("算机_程语_月_基类_数"))
local s = {}
--~ 排
function s.总和(u1_0)
  return 历排取联库.历排(u1_0, 基算库.加法, 返参库.一参)
  end
--~ 排
function s.均值(u1_0)
  local k1
  local h1
  --~ 总和
  k1 = s.总和(u1_0)
  return 基算库.除法(k1, #u1_0)
  h1 = s.总和(u1_0)
  return 基算库.除法(h1, #u1_0)
  end
--~ 排
--~ 标准值
function s.方差(u1_0, u1)
  local k1, k2
  local h1, h2
  local h1_0
  --~ 标准值
  k1 = u1 or s.均值(u1_0)
  h1 = u1 or s.均值(u1_0)
  --~ 排，用于算方差
  h1_0 = 历排库.历排(u1_0, 基算库.减法, k1)
  h1_0 = 历排库.历排(u1_0, 基算库.减法, h1)
  h1_0 = 历排库.历排(h1_0, 数库.指数, 2)
  --~ 方差
  k2 = 基算库.除法(s.总和(h1_0), #h1_0)
  return k2
  h2 = 基算库.除法(s.总和(h1_0), #h1_0)
  return h2
  end
--~ 排
--~ 标准值
function s.标准差(u1_0, u1)
  local k1
  local h1
  --~ 方差
  k1 = s.方差(u1_0, u1)
  return 数库.指数(k1, 1, 2)
  h1 = s.方差(u1_0, u1)
  return 数库.指数(h1, 1, 2)
  end
--~ 排
--~ 标准值
function s.均差(u1_0, u1)
  local k1, k2
  local h1, h2
  local h1_0
  --~ 标准值
  k1 = u1 or s.均值(u1_0)
  h1 = u1 or s.均值(u1_0)
  --~ 排，用于算均差
  h1_0 = 历排库.历排(u1_0, 基算库.减法, k1)
  h1_0 = 历排库.历排(u1_0, 基算库.减法, h1)
  h1_0 = 历排库.历排(h1_0, 数库.正数)
  --~ 均差
  k2 = 基算库.除法(s.总和(h1_0), #h1_0)
  return k2
  h2 = 基算库.除法(s.总和(h1_0), #h1_0)
  return h2
  end
return s

local 字集库 = require("u8_to_a")
local 文库 = require(字集库.u8_to_a("算机_程语_月_基类_文"))
local string = string
local s = {}
-- 单行注与多行注
--~ 文
function s.删注(u1)
  u1 = s.删多行注(u1)
  return s.删单行注(u1)
  end
do
  local k1
  local h1
  --~ 模
  k1 = 文库.连("%-%-", "%[", "(=*)", "%[", ".-", "%]", "%1", "%]")
  h1 = 文库.连("%-%-", "%[", "(=*)", "%[", ".-", "%]", "%1", "%]")
  --~ 文
  function s.删多行注(u1)
    return string.gsub(u1, k1, "")
    return string.gsub(u1, h1, "")
    end
  end
do
  local k1
  local h1
  --~ 模
  k1 = 文库.连("%-%-", "[^\n]*")
  h1 = 文库.连("%-%-", "[^\n]*")
  --~ 文
  function s.删单行注(u1)
    return string.gsub(u1, k1, "")
    return string.gsub(u1, h1, "")
    end
  end
return s

  end
--~ 卡对
function d.卡对消重(u1, u1_0)
  return u1_0.name, true
  end
--~ 卡对排
function d.荐名(u1_0)
  local k1, k2
  local h1, h2
  local h1_0
  --~ 攻击力排
  h1_0 = 历排库.历排(u1_0, 筛卡库.筛怪兽卡)
  h1_0 = 历排库.历排(h1_0, 筛卡库.筛攻击力)
  if h1_0[1] then
    --~ 攻击力均差阶
    k1 = 排算库.均差(h1_0)
    if k1 > 0 then
    h1 = 排算库.均差(h1_0)
    if h1 > 0 then
      --~ 补值
      k2 = 数库.指数(100, 基算库.除法(k1, 300))
      k1 = 基算库.除法(基算库.加法(k1, k2), 100)
      if k1 > 1 then
        k1 = 数库.指数次(k1, 2)
        return 数库.向下取整(k1)
      h2 = 数库.指数(100, 基算库.除法(h1, 300))
      h1 = 基算库.除法(基算库.加法(h1, h2), 100)
      if h1 > 1 then
        h1 = 数库.指数次(h1, 2)
        return 数库.向下取整(h1)
      else
        return 0
        end
    else
      return 0
      end
  else
    return 0
    end
  end
--~ 卡对排
function d.荐名(u1_0)
  local k1
  local h1
  --~ 名
  k1 = d.荐字段名(u1_0)
  if k1 then
  h1 = d.荐字段名(u1_0)
  if h1 then
  else
    k1 = d.荐卡名(u1_0)
    h1 = d.荐卡名(u1_0)
    end
  if k1 then
    return k1
  if h1 then
    return h1
  else
    return "请便"
    end
  end
--~ 卡对排
function d.荐卡名(u1_0)
  local h1_0
  --~ 卡名排
  h1_0 = 历排库.历排(u1_0, d.取卡名)
  return 历排取一库.筛最短文(h1_0)
  end
--~ 卡对
function d.取卡名(u1_0)
  return u1_0.name
  end
--~ 卡对排
function d.取字段对(u1_0)
  local k1, k2, k3, k4
  local h1, h2, h3, h4
  local h1_0
  --~ 字段对
  h1_0 = {}
  for u1 = 1, #u1_0 do
    --~ 字段数
    k1 = 字节库.to_uint64(u1_0[u1].setcode)
    if k1 < 1 then
    h1 = 字节库.to_uint64(u1_0[u1].setcode)
    if h1 < 1 then
    else
      if k1 > 0xffffFFFFffff then
        k1 = k1 - 1
      if h1 > 0xffffFFFFffff then
        h1 = h1 - 1
      else
        for u2 = 1, 11112222 do
          if k1 < 1 then
          if h1 < 1 then
            break
          else
            --~ 大字段号
            k2 = 位算库.位和(k1, 0xffff)
            k1 = 位算库.位右移(k1, 基算库.乘法(4, 4))
            h2 = 位算库.位和(h1, 0xffff)
            h1 = 位算库.位右移(h1, 基算库.乘法(4, 4))
            --~ 字段名
            k3 = 字段名对[tonumber(k2)]
            if k3 then
              if h1_0[k3] then
                h1_0[k3] = 基算库.加法(h1_0[k3], 1)
            h3 = 字段名对[tonumber(h2)]
            if h3 then
              if h1_0[h3] then
                h1_0[h3] = 基算库.加法(h1_0[h3], 1)
              else
                h1_0[k3] = 1
                h1_0[h3] = 1
                end
              if k2 > 0xfff then
              if h2 > 0xfff then
                --~ 小字段号
                k4 = 位算库.位和(k2, 0xfff)
                k3 = 字段名对[tonumber(k4)]
                if k3 then
                  if h1_0[k3] then
                    h1_0[k3] = 基算库.加法(h1_0[k3], 1)
                h4 = 位算库.位和(h2, 0xfff)
                h3 = 字段名对[tonumber(h4)]
                if h3 then
                  if h1_0[h3] then
                    h1_0[h3] = 基算库.加法(h1_0[h3], 1)
                  else
                    h1_0[k3] = 1
                    h1_0[h3] = 1
                    end
                else
                  end
              else
                end
            else
              end
            end
          end
        end
      end
    end
  return h1_0
  end
--~ 卡对排
function d.荐字段名(u1_0)
  local k1
  local h1
  local h1_0
  --~ 字段对
  h1_0 = d.取字段对(u1_0)
  --~ 最大的字段名数量
  _, k1 = 历对取一库.筛最大值(h1_0)
  _, h1 = 历对取一库.筛最大值(h1_0)
  --~ 最高频字段名对
  h2_0 = 历对库.历对(h1_0, 历对库.全等筛值, k1)
  h2_0 = 历对库.历对(h1_0, 历对库.全等筛值, h1)
  return 历对取一库.筛最短键(h2_0)
  end

package.path = [[.\lua_lib\?.lua;]] .. package.path
package.cpath = [[.\lua_lib\?.dll;]] .. package.cpath
local 字集码互转库 = require("u8_to_a")
local u8 = 字集码互转库.u8_to_a
local f = require(u8("常用库"))
local d_3 = {}
--~ 文件路
--~ 普常量文件名
function d_3.产普常量文件(u1, u2)
  local k1, k2
  local h1, h2
  local h1_0
  --~ 文
  k1 = f.读文件(u1)
  k1 = string.gsub(k1, "%-%-" .. "[^\n]*", "")
  k1 = string.gsub(k1, "[ \t]", "")
  h1 = f.读文件(u1)
  h1 = string.gsub(h1, "%-%-" .. "[^\n]*", "")
  h1 = string.gsub(h1, "[ \t]", "")
  --~ 常量排
  h1_0 = f.历文(k1, string.gmatch, "[^\n]+")
  h1_0 = f.历文(h1, string.gmatch, "[^\n]+")
  for u1 = 1, #h1_0 do
    h1_0[u1] = f.加前缀(h1_0[u1], [[h1_0.]])
    end
  --~ 文
  k2 = f.加对限(h1_0)
  f.写文件(k2, u2)
  h2 = f.加对限(h1_0)
  f.写文件(h2, u2)
  end
--~ 文件路
--~ 字段名文件名
function d_3.产字段名文件(u1, u2)
  local k1, k2
  local h1, h2
  local h1_0
  --~ 文
  k1 = f.读文件(u1)
  h1 = f.读文件(u1)
  --~ 常量排
  h1_0 = f.历文(k1, string.gmatch, "[^\n]+")
  h1_0 = f.历文(h1, string.gmatch, "[^\n]+")
  h1_0 = f.历排(h1_0, f.全筛文, "^!setname")
  for u3 = 1, #h1_0 do
    h1_0[u3] = f.删左右空白(h1_0[u3])
    h1_0[u3] = string.gsub(h1_0[u3], "^!setname ", "")
    h1_0[u3] = string.gsub(h1_0[u3], "[|\t].+", "")
    h1_0[u3] = string.gsub(h1_0[u3], " ", "=", 1)
    h1_0[u3] = string.gsub(h1_0[u3], "[0-9a-z]+", "h1_0[%1]", 1)
    h1_0[u3] = string.gsub(h1_0[u3], "=([^\n]+)", [[="%1"]], 1)
    end
  --~ 文
  k2 = f.加对限(h1_0)
  f.写文件(k2, u2)
  h2 = f.加对限(h1_0)
  f.写文件(h2, u2)
  end
d_3.产普常量文件([[D:\install\YGOPro/script/constant.lua]], u8("普常量.lua"))
d_3.产字段名文件([[D:\install\YGOPro/strings.conf]], u8("字段名.lua"))

  return 历排库.历排(u1_0, 筛卡库.筛有效果卡)
  end
--~ 卡编排
function s.取卡对_一维(u1_0)
  return 历排库.历排(u1_0, 卡档库.取卡对)
  end
do
  local k1, k2, k3
  local h1, h2, h3
  --~ 非空单行，且无换行符
  k1 = "[^\n]+"
  h1 = "[^\n]+"
  --~ 卡编所在函式
  k2 = "Debug%.AddCard.+"
  h2 = "Debug%.AddCard.+"
  --~ 卡编
  k3 = "[0-9]+"
  h3 = "[0-9]+"
  --~ 文
  function s.局筛卡编(u1)
    local h1_0
    --~ 卡编排
    h1_0 = 历文库.历文(u1, string.gmatch, k1)
    h1_0 = 历排库.历排(h1_0, string.match, k2)
    return 历排库.历排(h1_0, string.match, k3)
    h1_0 = 历文库.历文(u1, string.gmatch, h1)
    h1_0 = 历排库.历排(h1_0, string.match, h2)
    return 历排库.历排(h1_0, string.match, h3)
    end
  end
do
  local k1, k2, k3, k4
  local h1, h2, h3, h4
  --~ 非空单行，且无换行符
  k1 = "[^\n]+"
  h1 = "[^\n]+"
  --~ 玩家讯所在函式
  k2 = "Debug%.SetPlayerInfo.+"
  h2 = "Debug%.SetPlayerInfo.+"
  --~ 玩家编号
  k3 = "[0-9]+"
  h3 = "[0-9]+"
  --~ 玩家血量
  k4 = "[0-9]+"
  h4 = "[0-9]+"
  --~ 文
  function s.局筛血(u1)
    local h1_0
    --~ 血排
    h1_0 = 历文库.历文(u1, string.gmatch, k1)
    h1_0 = 历排库.历排(h1_0, string.match, k2)
    h1_0 = 历排库.历排(h1_0, string.gsub, k3, "", 1)
    return 历排库.历排(h1_0, string.match, k4)
    h1_0 = 历文库.历文(u1, string.gmatch, h1)
    h1_0 = 历排库.历排(h1_0, string.match, h2)
    h1_0 = 历排库.历排(h1_0, string.gsub, h3, "", 1)
    return 历排库.历排(h1_0, string.match, h4)
    end
  end
do
  local k1, k2, k3
  local h1, h2, h3
  --~ 非空单行，且无换行符
  k1 = "[^\n]+"
  h1 = "[^\n]+"
  --~ 残局讯所在函式
  k2 = 文库.连("Debug", "%.", "ReloadFieldBegin", ".+")
  h2 = 文库.连("Debug", "%.", "ReloadFieldBegin", ".+")
  --~ 则数
  k3 = "[0-9]"
  h3 = "[0-9]"
  --~ 文
  function s.局筛则数(u1)
    local k4
    local h4
    local h1_0
    --~ 则数排
    h1_0 = 历文库.历文(u1, string.gmatch, k1)
    h1_0 = 历排库.历排(h1_0, string.match, k2)
    h1_0 = 历文库.历文(u1, string.gmatch, h1)
    h1_0 = 历排库.历排(h1_0, string.match, h2)
    --~ 则数
    k4 = string.match(h1_0[1], k3)
    assert(k4, u1)
    return k4 or 5
    h4 = string.match(h1_0[1], h3)
    assert(h4, u1)
    return h4 or 5
    end
  end
--~ 卡对排
--~ 血排
function s.荐名(u1_0, u2_0)
  local k1, k2, k3
  local h1, h2, h3
  local h1_0
  --~ 攻击力排
  h1_0 = 历排库.历排(u1_0, 筛卡库.筛怪兽卡)
  h1_0 = 历排库.历排(h1_0, 筛卡库.筛攻击力)
  --~ 总攻
  k1 = 排算库.总和(h1_0)
  h1 = 排算库.总和(h1_0)
  --~ 总血
  k2 = 排算库.总和(u2_0)
  h2 = 排算库.总和(u2_0)
  --~ 荐名
  k3 = 基算库.除法(k1, k2)
  k3 = 数库.指数次(k3, 2)
  if 数库.是否错值(k3) then
  h3 = 基算库.除法(h1, h2)
  h3 = 数库.指数次(h3, 2)
  if 数库.是否错值(h3) then
    return 0
  else
    k3 = 数库.几位小数(k3, 1)
    return tostring(基算库.乘法(k3, 1000))
    h3 = 数库.几位小数(h3, 1)
    return tostring(基算库.乘法(h3, 1000))
    end
  end
--~ 文件
--~ 编号
--~ 文件路
function s.察编号(u1, u2, u3)
  local k1
  k1 = string.gsub(u1, 文库.连("Debug", "%.", "SetAIName", "[^\n]+"), 文库.连([[Debug.SetAIName("]], u2, [[")]]))
  if k1 == u1 then
  local h1
  h1 = string.gsub(u1, 文库.连("Debug", "%.", "SetAIName", "[^\n]+"), 文库.连([[Debug.SetAIName("]], u2, [[")]]))
  if h1 == u1 then
  else
    写文件库.写文件(u3, k1)
    写文件库.写文件(u3, h1)
    end
  end
--~ 目对
function s.残局改名(u1_0)
  local h1_0, h2_0, h3_0, h4_0, h5_0, h6_0, h7_0, h8_0, h9_0
  local h10_0, h11_0, h12_0
  --~ 文件名排