游戏王残局简化版

游戏王_则拟器_原版_残局_局名_字段.lua at [89f423ff38]
Login

游戏王_则拟器_原版_残局_局名_字段.lua at [89f423ff38]

File 残局文料/副_容冗/游戏王_则拟器_原版_残局_局名_字段.lua artifact 69bf46dcf7 part of check-in 89f423ff38


-- 不用这套方案了
--~ 卡对排
function d.荐名(u1_0)
  local h1_0
  --~ 卡名对
  h1_0 = 历对库.历对(u1_0, d.卡对消重)
  return 对库.对长(h1_0)
  end
--~ 卡对
function d.卡对消重(u1, u1_0)
  return u1_0.name, true
  end
--~ 卡对排
function d.荐名(u1_0)
  local h1, h2
  local h1_0
  --~ 攻击力排
  h1_0 = 历排库.历排(u1_0, 筛卡库.筛怪兽卡)
  h1_0 = 历排库.历排(h1_0, 筛卡库.筛攻击力)
  if h1_0[1] then
    --~ 攻击力均差阶
    h1 = 排算库.均差(h1_0)
    if h1 > 0 then
      --~ 补值
      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 h1
  --~ 名
  h1 = d.荐字段名(u1_0)
  if h1 then
  else
    h1 = d.荐卡名(u1_0)
    end
  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 h1, h2, h3, h4
  local h1_0
  --~ 字段对
  h1_0 = {}
  for u1 = 1, #u1_0 do
    --~ 字段数
    h1 = 字节库.to_uint64(u1_0[u1].setcode)
    if h1 < 1 then
    else
      if h1 > 0xffffFFFFffff then
        h1 = h1 - 1
      else
        for u2 = 1, 11112222 do
          if h1 < 1 then
            break
          else
            --~ 大字段号
            h2 = 位算库.位和(h1, 0xffff)
            h1 = 位算库.位右移(h1, 基算库.乘法(4, 4))
            --~ 字段名
            h3 = 字段名对[tonumber(h2)]
            if h3 then
              if h1_0[h3] then
                h1_0[h3] = 基算库.加法(h1_0[h3], 1)
              else
                h1_0[h3] = 1
                end
              if h2 > 0xfff then
                --~ 小字段号
                h4 = 位算库.位和(h2, 0xfff)
                h3 = 字段名对[tonumber(h4)]
                if h3 then
                  if h1_0[h3] then
                    h1_0[h3] = 基算库.加法(h1_0[h3], 1)
                  else
                    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 h1
  local h1_0
  --~ 字段对
  h1_0 = d.取字段对(u1_0)
  --~ 最大的字段名数量
  _, h1 = 历对取一库.筛最大值(h1_0)
  --~ 最高频字段名对
  h2_0 = 历对库.历对(h1_0, 历对库.全等筛值, h1)
  return 历对取一库.筛最短键(h2_0)
  end