游戏王残局简化版

Check-in [d7e39f5d2e]
Login

Check-in [d7e39f5d2e]

Overview
Comment:升级
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: d7e39f5d2e52c88c7e9fc89f46e3c6315d6a8599dd5aac69a9a68059a7c3bc69
User & Date: 顽雨沉风 on 2024-02-03 09:39:46
Other Links: manifest | tags
Context
2024-02-03
09:54
完成 check-in: 81015f535b user: 顽雨沉风 tags: trunk
09:39
升级 check-in: d7e39f5d2e user: 顽雨沉风 tags: trunk
09:38
加能 check-in: 4d150d683b user: 顽雨沉风 tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified 残局文料/lua_lib/常用库.lua from [1fa21e538a] to [6635bf6e53]. 

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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
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

local d_4 = {}
local 简文件库 = require("lfs")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d_4.历排(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_4.历文(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_4.操类(o1, o2, o3)
  if type(o1) == o2 then
    return o3(o1)
  else
    return o1
    end
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function d_4.全筛文(o1, o2, o3, o4)
  if string.find(o1, o2, o3, o4) then
    return o1
    end
  end
--~ 文
--~ 前缀
function d_4.加前缀(o1, o2)
  return (o2 or "") .. o1
  end
--~ 文
--~ 后缀
function d_4.加后缀(o1, o2)
  return o1 .. (o2 or "")
  end
--~ 令
function d_4.办令(o1)
  print(o1)
  os.execute(o1)
  end
--~ 文
--~ 前缀
function d_4.全筛前缀(o1, o2)
  if string.sub(o1, 1, #o2) == o2 then
    return o1
    end
  end
--~ 文
--~ 后缀
function d_4.全筛后缀(o1, o2)
  if string.sub(o1, -#o2) == o2 then
    return o1
    end
  end
--~ 目表
function d_4.用令行工具操文件(o1)
  local k1_9
  --~ 令行排
  k1_9 = d_4.历文(o1.文件目, 简文件库.dir)
  k1_9 = d_4.历排(k1_9, d_4.全筛后缀, o1.文件类)
  for o2 = 1, #k1_9 do
    k1_9[o2] = d_4.加前缀(k1_9[o2], o1.文件目)
    k1_9[o2] = d_4.加前缀(k1_9[o2], [["]])
    k1_9[o2] = d_4.加后缀(k1_9[o2], [["]])
    k1_9[o2] = d_4.加前缀(k1_9[o2], o1.令行前缀)
    d_4.办令(k1_9[o2])
    end
  end
--~ 文件路
--~ 式
function d_4.读文件(o1, o2)
  local k1
  local k1_4
  --~ 文件
  k1_4 = io.open(o1, o2 or "r")
  --~ 文
  k1 = k1_4:read("a")
  k1_4:flush()
  k1_4:close()
  return k1
  end
--~ 常量排
function d_4.加对限(o1_11)
  for o1 = 1, #o1_11 do
    o1_11[o1] = d_4.加前缀(o1_11[o1], [[k1_11["]])
    o1_11[o1] = string.gsub(o1_11[o1], "=", "\"]=", 1)
    end
  table.insert(o1_11, 1, "local k1_11 = {}")
  table.insert(o1_11, "return k1_11")
  return table.concat(o1_11, "\n")
  end
--~ 文
--~ 文件路
--~ 式
function d_4.写文件(o1, o2, o3)
  local k1_4
  --~ 文件
  k1_4 = io.open(o2, o3 or "w")
  k1_4:write(o1)
  k1_4:flush()
  k1_4:close()
  end
function d_4.删左右空白(o1)
  o1 = string.gsub(o1, "^%s+", "")
  return string.gsub(o1, "%s+$", "")
  end
return d_4








|












|











|










|






|




|



|





|






|





|














|











|











|







|





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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
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

local d_4 = {}
local 简文件库 = require("lfs")
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d_5.历排(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_5.历文(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_5.操类(o1, o2, o3)
  if type(o1) == o2 then
    return o3(o1)
  else
    return o1
    end
  end
--~ 排中文
--~ 入参2
--~ 入参3
--~ 入参4
function d_5.全筛文(o1, o2, o3, o4)
  if string.find(o1, o2, o3, o4) then
    return o1
    end
  end
--~ 文
--~ 前缀
function d_5.加前缀(o1, o2)
  return (o2 or "") .. o1
  end
--~ 文
--~ 后缀
function d_5.加后缀(o1, o2)
  return o1 .. (o2 or "")
  end
--~ 令
function d_5.办令(o1)
  print(o1)
  os.execute(o1)
  end
--~ 文
--~ 前缀
function d_5.全筛前缀(o1, o2)
  if string.sub(o1, 1, #o2) == o2 then
    return o1
    end
  end
--~ 文
--~ 后缀
function d_5.全筛后缀(o1, o2)
  if string.sub(o1, -#o2) == o2 then
    return o1
    end
  end
--~ 目表
function d_5.用令行工具操文件(o1)
  local k1_9
  --~ 令行排
  k1_9 = d_4.历文(o1.文件目, 简文件库.dir)
  k1_9 = d_4.历排(k1_9, d_4.全筛后缀, o1.文件类)
  for o2 = 1, #k1_9 do
    k1_9[o2] = d_4.加前缀(k1_9[o2], o1.文件目)
    k1_9[o2] = d_4.加前缀(k1_9[o2], [["]])
    k1_9[o2] = d_4.加后缀(k1_9[o2], [["]])
    k1_9[o2] = d_4.加前缀(k1_9[o2], o1.令行前缀)
    d_4.办令(k1_9[o2])
    end
  end
--~ 文件路
--~ 式
function d_5.读文件(o1, o2)
  local k1
  local k1_4
  --~ 文件
  k1_4 = io.open(o1, o2 or "r")
  --~ 文
  k1 = k1_4:read("a")
  k1_4:flush()
  k1_4:close()
  return k1
  end
--~ 常量排
function d_5.加对限(o1_11)
  for o1 = 1, #o1_11 do
    o1_11[o1] = d_4.加前缀(o1_11[o1], [[k1_11["]])
    o1_11[o1] = string.gsub(o1_11[o1], "=", "\"]=", 1)
    end
  table.insert(o1_11, 1, "local k1_11 = {}")
  table.insert(o1_11, "return k1_11")
  return table.concat(o1_11, "\n")
  end
--~ 文
--~ 文件路
--~ 式
function d_5.写文件(o1, o2, o3)
  local k1_4
  --~ 文件
  k1_4 = io.open(o2, o3 or "w")
  k1_4:write(o1)
  k1_4:flush()
  k1_4:close()
  end
function d_5.删左右空白(o1)
  o1 = string.gsub(o1, "^%s+", "")
  return string.gsub(o1, "%s+$", "")
  end
return d_4

Modified 残局文料/残局改名.lua from [a16f74421b] to [76f5ac5d54]. 

1
2
3
4
5
6
7




8
9
10
11
12
13
14

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 简文件库 = require("lfs")
local d_5 = {}




--~ 目对
function d_5.残局改名(o1)
  local k1_9, k2_9
  --~ 文件排
  k1_9 = f.历文(o1.文件目, 简文件库.dir)
  k1_9 = f.历排(k1_9, f.全筛文, "%.lua$")
  for o2 = 1, #k1_9 do








>
>
>
>








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

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 简文件库 = require("lfs")
local d_5 = {}
--~ 文
function d_5.局筛则数(o1)
  
  end
--~ 目对
function d_5.残局改名(o1)
  local k1_9, k2_9
  --~ 文件排
  k1_9 = f.历文(o1.文件目, 简文件库.dir)
  k1_9 = f.历排(k1_9, f.全筛文, "%.lua$")
  for o2 = 1, #k1_9 do
︙︙