游戏王残局简化版

Check-in [e733caf45e]
Login

Check-in [e733caf45e]

Overview
Comment:改错
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: e733caf45efb8958b0fd259b2bafcba52e2920a992d9c11743869e7faebb8391
User & Date: 顽雨沉风 on 2024-02-03 04:02:58.680
Other Links: manifest | tags
Context
2024-02-03
04:03
改错 check-in: feeabb7721 user: 顽雨沉风 tags: trunk
04:02
改错 check-in: e733caf45e user: 顽雨沉风 tags: trunk
03:59
简化 check-in: e039d6b77e user: 顽雨沉风 tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Modified 残局文料/lua_lib/常用库.lua from [fd7a071c26] to [816bdeb8a6]. 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

local d_3 = {}
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d_2.历排(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)
    end
  return k1_11
  end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function d_2.历文(o1, o2, o3, o4)
  local k1_9
  --~ 集排
  k1_9 = {}
  for o5 in o2(o1, o3, o4) do
    k1_9[#k1_9 + 1] = o5
    end
  return k1_9
  end
--~ 表中值
--~ 值类
--~ 办值的能
function d_2.操类(o1, o2, o3)
  if type(o1) == o2 then
    return o3(o1)
  else
    return o1
    end
  end
return







|












|











|








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

local d_3 = {}
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d_3.历排(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)
    end
  return k1_11
  end
--~ 文
--~ 历文的能
--~ 入参2
--~ 入参3
function d_3.历文(o1, o2, o3, o4)
  local k1_9
  --~ 集排
  k1_9 = {}
  for o5 in o2(o1, o3, o4) do
    k1_9[#k1_9 + 1] = o5
    end
  return k1_9
  end
--~ 表中值
--~ 值类
--~ 办值的能
function d_3.操类(o1, o2, o3)
  if type(o1) == o2 then
    return o3(o1)
  else
    return o1
    end
  end
return
Modified 残局文料/用令行工具排版lua文件.lua from [4a9767a832] to [a3f5c8a762]. 
1
2
3
4
5

6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41

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 k1 = 字集码互转库.u8_to_a("计算机_系统_窗口群_命令行_无窗口")
local 令行库 = require(k1)
local 简单文件系统库 = require("lfs")
local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_字串_逐一")
local 历文库 = require(k1)
local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_序排_逐一")
local 历排库 = require(k1)
local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_字串_前缀与后缀")
local 前后缀库 = require(k1)
local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_字串_全筛")
local 全筛文库 = require(k1)
local d_2 = {}
function d_2.用命令行工具排版lua文件(o1, o2)
  local k1
  local k1_9
  k1_9 = 历文库.处理后返回新排(o1, 简单文件系统库.dir)
  k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加前缀, o1 .. "/")
  k1 = ".lua"
  k1_9 = 历排库.处理后返回新排(k1_9, 全筛文库.找字, k1, -#k1, true)
  k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加前缀, [["]])
  k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加后缀, [["]])
  k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加前缀, o2)
  历排库.处理后返回新排(k1_9, 令行库.执行命令)
  end
local k1 = 字集码互转库.u8_to_a([[../single]])
local k2 = 字集码互转库.u8_to_a([[stylua --indent-type Spaces  --indent-width 2 --collapse-simple-statement Never ]])
--~ 若不传命令行参数，则后果未必如愿。例如，我想用空格做缩进符，它却用制表符。
d_2.用命令行工具排版lua文件(k1, k2)
d_2.目表 = {
  ["文件目"] = [[../single]]
  ["文件类"] = ".lua"
  ["令行前缀"] = [[stylua --indent-type Spaces  --indent-width 2 --collapse-simple-statement Never ]]
  }
for _, o1 in pairs(d_2.目表) do
  d_2.目表[_] = f.操类(o1, "string", u8)
  end






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

|


|
|





1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

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_2 = {}
--~ local k1 = 字集码互转库.u8_to_a("计算机_系统_窗口群_命令行_无窗口")
--~ local 令行库 = require(k1)
--~ local 简单文件系统库 = require("lfs")
--~ local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_字串_逐一")
--~ local 历文库 = require(k1)
--~ local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_序排_逐一")
--~ local 历排库 = require(k1)
--~ local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_字串_前缀与后缀")
--~ local 前后缀库 = require(k1)
--~ local k1 = 字集码互转库.u8_to_a("程序语言_月_基础类型_字串_全筛")
--~ local 全筛文库 = require(k1)
--~ local d_2 = {}
--~ function d_2.用命令行工具排版lua文件(o1, o2)
  --~ local k1
  --~ local k1_9
  --~ k1_9 = 历文库.处理后返回新排(o1, 简单文件系统库.dir)
  --~ k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加前缀, o1 .. "/")
  --~ k1 = ".lua"
  --~ k1_9 = 历排库.处理后返回新排(k1_9, 全筛文库.找字, k1, -#k1, true)
  --~ k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加前缀, [["]])
  --~ k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加后缀, [["]])
  --~ k1_9 = 历排库.处理后返回新排(k1_9, 前后缀库.加前缀, o2)
  --~ 历排库.处理后返回新排(k1_9, 令行库.执行命令)
  --~ end
--~ local k1 = 字集码互转库.u8_to_a([[../single]])
--~ local k2 = 字集码互转库.u8_to_a([[stylua --indent-type Spaces  --indent-width 2 --collapse-simple-statement Never ]])
--~ 若不传命令行参数，则后果未必如愿。例如，我想用空格做缩进符，它却用制表符。
--~ d_2.用命令行工具排版lua文件(k1, k2)
d_2.目表 = {
  ["文件目"] = [[../single]]
  , ["文件类"] = ".lua"
  , ["令行前缀"] = [[stylua --indent-type Spaces  --indent-width 2 --collapse-simple-statement Never ]]
  }
for _, o1 in pairs(d_2.目表) do
  d_2.目表[_] = f.操类(o1, "string", u8)
  end