游戏王残局简化版

Check-in [91958121fe]
Login

Check-in [91958121fe]

Overview
Comment:又卡住了
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 91958121fe1247c216f4bc625075354458a0b44255064fd2a396fe67bd9b061e
User & Date: 顽雨沉风 on 2024-02-05 11:37:24
Other Links: manifest | tags
Context
2024-02-05
14:53
差不多了 check-in: c4461ce231 user: 顽雨沉风 tags: trunk
11:37
又卡住了 check-in: 91958121fe user: 顽雨沉风 tags: trunk
10:01
精度难知呀 check-in: 6bd570d52a user: 顽雨沉风 tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified 残局文料/lua_lib/常用库.lua from [6ff72213e4] to [ff88c3754c]. 

1
2

3
4
5
6
7
8
9

local d = {}
local 简文件库 = require("lfs")

--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d.历排(o1_0, o1, o2_0, o3_0, o4_0)
  local k1_0



>








1
2
3
4
5
6
7
8
9
10

local d = {}
local 简文件库 = require("lfs")
local ffi = require("ffi")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d.历排(o1_0, o1, o2_0, o3_0, o4_0)
  local k1_0
︙︙
24
25
26
27
28
29
30

31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

  k1_0 = {}
  for o3_0 in o2(o1, o1_0, o2_0) do
    k1_0[#k1_0 + 1] = o3_0
    end
  return k1_0
  end
function d.历对(o1_0, o1)

  local k1_0, k2_0, k3_0
  --~ 对
  k1_0 = {}
  for o2_0, o3_0 in pairs(o1_0) do
    --~ 键
    --~ 值
    k2_0, k3_0 = o1(o2_0, o3_0)
    if k2_0 then
      k1_0[k2_0] = k3_0
    else
      end
    end
  return k1_0
  end
--~ 表中值
--~ 值类








>
|


|


|
|
|








25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48

  k1_0 = {}
  for o3_0 in o2(o1, o1_0, o2_0) do
    k1_0[#k1_0 + 1] = o3_0
    end
  return k1_0
  end
function d.历对(o1_0, o1)
  local k1
  local k1_0, k2_0
  --~ 对
  k1_0 = {}
  for o2, o2_0 in pairs(o1_0) do
    --~ 键
    --~ 值
    k1, k2_0 = o1(o2, o2_0)
    if k1 then
      k1_0[k1] = k2_0
    else
      end
    end
  return k1_0
  end
--~ 表中值
--~ 值类
︙︙
185
186
187
188
189
190
191
192

193
194
195
196
197








198








199

  return o1 / o2
  end
--~ 左数
--~ 右数
function d.位和(o1, o2)
  return bit.band(o1, o2)
  end
do

  local double_pointer = ffi.new("double[1]")
  local uint64_pointer = ffi.cast("uint64_t*", double_pointer)
  function d.double_to_uint64(o1)
    
    end








  end








return d








<
>
|
<
|
|
|
>
>
>
>
>
>
>
>
|
>
>
>
>
>
>
>
>


187
188
189
190
191
192
193

194
195

196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216

  return o1 / o2
  end
--~ 左数
--~ 右数
function d.位和(o1, o2)
  return bit.band(o1, o2)
  end

--~ 数
--~ 右移几位

function d.位右移(o1, o2)
  return bit.rshift(o1, o2)
  end
--~ 对
function d.找对中最大值(o1_0)
  local k1, k2
  k2 = -math.huge
  for o1, o2 in pairs(o1_0) do
    if k2 < o2 then
      k1, k2 = o1, o2
    else
      end
    end
  return k1, k2
  end
--~ 内数
function d.to_uint64(o1)
  local uint64_pointer = ffi.new("uint64_t[1]", o1)
  return uint64_pointer[0]
  end
return d

Modified 残局文料/残局改名.lua from [689535e77e] to [f3ccfec413].

︙︙
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116

117



















118

















119






120

121
























122
123
124
125
126
127
128

function d.荐名(o1_0)
  --~ print(o1_0[1].name)
  --~ return o1_0[1]
  d.荐字段名(o1_0)
  end
--~ 卡对排
function d.荐字段名(o1_0)
  local k1, k2
  local k1_0
  --~ 字段对
  k1_0 = {}
  for o1 = 1, #o1_0 do
    --~ 字段数
    k1 = f.double_to_uint64(o1_0[o1].setcode)
    if k1 > 0xffff then
      k1 = k1 - 1

    else



















      end

















    --~ for o2 = 1, 11112222 do






    --~ 大字段号

      --~ k1 = f.位和(o1_0[o1].setcode, 0xffff)
























      --~ k2 = 
      --~ end
    --~ 大字段号
    --~ k1 = bit.band(o1_0[o1].setcode, 0xffff)
    --~ print(o1_0[o1].setcode)
    --~ print(f.位和(o1_0[o1].setcode, 0xffff))
    --~ if k1 > 0xfff then








|





|
|

>

>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
>
>
>
>
>
>
|
>
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>








101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196

function d.荐名(o1_0)
  --~ print(o1_0[1].name)
  --~ return o1_0[1]
  d.荐字段名(o1_0)
  end
--~ 卡对排
function d.荐字段名(o1_0)
  local k1, k2, k3, k4
  local k1_0
  --~ 字段对
  k1_0 = {}
  for o1 = 1, #o1_0 do
    --~ 字段数
    k1 = f.to_uint64(o1_0[o1].setcode)
    if k1 > 0xffffFFFFffff then
      k1 = k1 - 1
    elseif k1 < 1 then
    else
      for o2 = 1, 11112222 do
        if k1 < 1 then
          --~ f.历对(k1_0, print)
          --~ print(3)
          break
          --~ return
        else
          --~ 大字段号
          k2 = f.位和(k1, 0xffff)
          k1 = f.位右移(k1, f.乘法(4, 4))
          --~ print(k1, k2)
          --~ 字段名
          k3 = 字段名对[tonumber(k2)]
          --~ print(k3)
          if k3 then
            if k1_0[k3] then
              k1_0[k3] = f.加法(k1_0[k3], 1)
            else
              k1_0[k3] = 1
              end
            --~ 小字段号
            k4 = f.位和(k1, 0xfff)
            k3 = 字段名对[tonumber(k4)]
            if k3 then
              if k1_0[k3] then
                k1_0[k3] = f.加法(k1_0[k3], 1)
              else
                k1_0[k3] = 1
                end
            else
              end
          else
            end
          end
        end
      end
    --~ print(string.format("%x", k1))
    --~ for o2 = 1, 6 do
      --~ print(k1)
      --~ if k1 < 1 then
        --~ f.历对(k1_0, print)
        --~ print(23)
        --~ return
      --~ else
        --~ 大字段号
        --~ k2 = f.位和(k1, 0xffff)
        --~ k1 = f.位右移(k1, f.乘法(4, 4))
        --~ 字段名
        --~ k3 = 字段名对[k2]
        --~ if k3 then
          --~ if k1_0[k3] then
            --~ k1_0[k3] = f.加法(k1_0[k3], 1)
          --~ else
            --~ k1_0[k3] = 1
            --~ end
          --~ 小字段号
          --~ k4 = f.位和(k1, 0xfff)
          --~ k3 = 字段名对[k4]
          --~ if k3 then
            --~ if k1_0[k3] then
              --~ k1_0[k3] = f.加法(k1_0[k3], 1)
            --~ else
              --~ k1_0[k3] = 1
              --~ end
          --~ else
            --~ end
        --~ else
          --~ end
        --~ end

      --~ print(k1, k2)
      --~ k2 = 
      --~ end
    --~ 大字段号
    --~ k1 = bit.band(o1_0[o1].setcode, 0xffff)
    --~ print(o1_0[o1].setcode)
    --~ print(f.位和(o1_0[o1].setcode, 0xffff))
    --~ if k1 > 0xfff then
︙︙
142
143
144
145
146
147
148

149
150
151
152
153
154
155

    --~ if k1_0[k2] then
      --~ k1_0[k2] = k1_0[k2] + 1
    --~ elseif k2 == nil then
    --~ else
      --~ k1_0[k2] = 1
      --~ end
    end

  end
--~ 目对
function d.残局改名(o1_0)
  local k1_0, k2_0, k3_0, k4_0, k5_0, k6_0
  --~ 文件排
  k1_0 = f.历文(o1_0.文件目, 简文件库.dir)
  k1_0 = f.历排(k1_0, f.全筛后缀, ".lua")








>








210
211
212
213
214
215
216
217
218
219
220
221
222
223
224

    --~ if k1_0[k2] then
      --~ k1_0[k2] = k1_0[k2] + 1
    --~ elseif k2 == nil then
    --~ else
      --~ k1_0[k2] = 1
      --~ end
    end
  f.历对(k1_0, print)
  end
--~ 目对
function d.残局改名(o1_0)
  local k1_0, k2_0, k3_0, k4_0, k5_0, k6_0
  --~ 文件排
  k1_0 = f.历文(o1_0.文件目, 简文件库.dir)
  k1_0 = f.历排(k1_0, f.全筛后缀, ".lua")
︙︙