游戏王残局简化版

Check-in [07463271f6]
Login

Check-in [07463271f6]

Overview
Comment:(/ω\)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 07463271f6c22b1b18f8ec499aa5e791b3503dc34af3e91adbbd2020e9b372b5
User & Date: 顽雨沉风 on 2024-02-11 13:31:02
Other Links: manifest | tags
Context
2024-02-11
13:59
慢慢来 check-in: bb99c8bbb8 user: 顽雨沉风 tags: trunk
13:31
(/ω\) check-in: 07463271f6 user: 顽雨沉风 tags: trunk
13:21
慢慢来 check-in: 413d4284fd user: 顽雨沉风 tags: trunk
Changes

Modified 残局文料/lua_lib/算机_程语_月_基类_能_传能_历_基类_表_排_取全.lua from [66c973a9d6] to [072e9eeaba].

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
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







-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-

















+
+
+

-
+

+





-
-
-
+
+
+

+
+
+

-
+

+


local d = {}
-- 返旧与返新与不返
-- 排数
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d.历排返旧(o1_0, o1, o2, o3, o4)
  for o5 = 1, #o1_0 do
    o1_0[o5] = o1(o1_0[o5], o2, o3, o4)
    end
  return o1_0
  end
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d.历排返新(o1_0, o1, o2, o3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #o1_0 do
    k1_0[#k1_0 + 1] = o1(o1_0[o5], o2, o3, o4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参3
--~ 入参4
--~ 入参5
function d.历二排返新(o1_0, o2_0, o1, o2, o3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #o1_0 do
    k1_0[#k1_0 + 1] = o1(o1_0[o5], o2_0[o5], o2, o3, o4)
    end
  return k1_0
  end
--~ 排
--~ 办排中值的能
--~ 入参2
--~ 入参3
--~ 入参4
function d.历排(o1_0, o1, o2, o3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #o1_0 do
    k1_0[#k1_0 + 1] = o1(o1_0[o5], o2, o3, o4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参3
--~ 入参4
--~ 入参5
function d.历二排(o1_0, o2_0, o1, o2, o3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #o1_0 do
    o1(o1_0[o5], o2_0[o5], o2, o3, o4)
    k1_0[#k1_0 + 1] = o1(o1_0[o5], o2_0[o5], o2, o3, o4)
    end
  return k1_0
  end
--~ 排
--~ 排
--~ 排
--~ 办排中值的能
--~ 入参3
--~ 入参4
--~ 入参5
--~ 入参4
--~ 入参5
--~ 入参6
function d.历三排(o1_0, o2_0, o3_0, o1, o2, o3, o4)
  local k1_0
  --~ 集排
  k1_0 = {}
  for o5 = 1, #o1_0 do
    o1(o1_0[o5], o2_0[o5], o3_0[o5], o2, o3, o4)
    k1_0[#k1_0 + 1] = o1(o1_0[o5], o2_0[o5], o3_0[o5], o2, o3, o4)
    end
  return k1_0
  end
return d

Modified 残局文料/游戏王_则拟器_原版_残局_局名_改名.lua from [96d1dd37ea] to [0b7cf222f4].

22
23
24
25
26
27
28
29

30
31
32
33

34
35
36
37
38
39
40
22
23
24
25
26
27
28

29
30
31
32

33
34
35
36
37
38
39
40







-
+



-
+







local string = string
local os = os
local table = table
local d = {}
local 卡档
--~ 卡对排
function d.筛有效果卡(o1_0)
  return 历排库.历排返新(o1_0, 筛卡库.筛有效果卡)
  return 历排库.历排(o1_0, 筛卡库.筛有效果卡)
  end
--~ 卡编排
function d.取卡对_一维(o1_0)
  return 历排库.历排返新(o1_0, d.取卡对)
  return 历排库.历排(o1_0, d.取卡对)
  end
--~ 卡编
function d.取卡对(o1)
  local k1_0, k2_0
  --~ 卡文对
  k1_0 = d.取卡文(o1)
  --~ 卡数据对
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
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







-
-
+
+






-
-
-
+
+
+







-
+










-
-
+
+







    end
  end
--~ 文
function d.局筛卡编(o1)
  local k1_0
  --~ 卡编排
  k1_0 = 历文库.历文(o1, string.gmatch, "[^\n]+")
  k1_0 = 历排库.历排返新(k1_0, string.match, "Debug%.AddCard.+")
  return 历排库.历排返旧(k1_0, string.match, "[0-9]+")
  k1_0 = 历排库.历排(k1_0, string.match, "Debug%.AddCard.+")
  return 历排库.历排(k1_0, string.match, "[0-9]+")
  end
--~ 文
function d.局筛血(o1)
  local k1_0
  --~ 血排
  k1_0 = 历文库.历文(o1, string.gmatch, "[^\n]+")
  k1_0 = 历排库.历排返新(k1_0, string.match, "Debug%.SetPlayerInfo.+")
  k1_0 = 历排库.历排返旧(k1_0, string.gsub, "[0-9]+", "", 1)
  return 历排库.历排返旧(k1_0, string.match, "[0-9]+")
  k1_0 = 历排库.历排(k1_0, string.match, "Debug%.SetPlayerInfo.+")
  k1_0 = 历排库.历排(k1_0, string.gsub, "[0-9]+", "", 1)
  return 历排库.历排(k1_0, string.match, "[0-9]+")
  end
--~ 文
function d.局筛则数(o1)
  local k1
  local k1_0
  --~ 则数排
  k1_0 = 历文库.历文(o1, string.gmatch, "[^\n]+")
  k1_0 = 历排库.历排返新(k1_0, 前缀库.全筛前缀, "Debug.ReloadFieldBegin")
  k1_0 = 历排库.历排(k1_0, 前缀库.全筛前缀, "Debug.ReloadFieldBegin")
  --~ 则数
  k1 = string.match(k1_0[1], "[0-9]")
  return k1 or 3
  end
--~ 卡对排
--~ 血排
function d.荐名(o1_0, o2_0)
  local k1, k2, k3
  local k1_0
  --~ 攻击力排
  k1_0 = 历排库.历排返新(o1_0, 筛卡库.筛怪兽卡)
  k1_0 = 历排库.历排返旧(k1_0, 筛卡库.筛攻击力)
  k1_0 = 历排库.历排(o1_0, 筛卡库.筛怪兽卡)
  k1_0 = 历排库.历排(k1_0, 筛卡库.筛攻击力)
  --~ 总攻
  k1 = 排算库.总和(k1_0)
  --~ 总血
  k2 = 排算库.总和(o2_0)
  --~ 荐名
  k3 = 基算库.除法(k1, k2)
  k3 = 数库.指数次(k3, 2)
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
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







-
+

-
-
-
-
-
+
+
+
+
+

-
+

-
+

-
+

-
+

-
+

-
+

-
+

-
+

-
-
+
+








-
-
+
+

-
+

-
+









  end
--~ 目对
function d.残局改名(o1_0)
  local k1_0, k2_0, k3_0, k4_0, k5_0, k6_0, k7_0, k8_0, k9_0
  local k10_0, k11_0, k12_0
  --~ 文件名排
  k1_0 = 历文库.历文(o1_0.文件目, 文件系库.dir)
  k1_0 = 历排库.历排返新(k1_0, 后缀库.全筛后缀, ".lua")
  k1_0 = 历排库.历排(k1_0, 后缀库.全筛后缀, ".lua")
  --~ 文件排
  k2_0 = 历排库.历排返新(k1_0, 后缀库.全筛后缀, ".lua")
  k2_0 = 历排库.历排返旧(k2_0, 前缀库.加前缀, o1_0.文件目)
  k2_0 = 历排库.历排返旧(k2_0, 读文件库.读文件)
  k2_0 = 历排库.历排返旧(k2_0, string.gsub, 文库.连("%-%-", "%[", "(=*)", "%[", ".-", "%]", "%1", "%]"), "")
  k2_0 = 历排库.历排返旧(k2_0, string.gsub, 文库.连("%-%-", "[^\n]*"), "")
  k2_0 = 历排库.历排(k1_0, 后缀库.全筛后缀, ".lua")
  k2_0 = 历排库.历排(k2_0, 前缀库.加前缀, o1_0.文件目)
  k2_0 = 历排库.历排(k2_0, 读文件库.读文件)
  k2_0 = 历排库.历排(k2_0, string.gsub, 文库.连("%-%-", "%[", "(=*)", "%[", ".-", "%]", "%1", "%]"), "")
  k2_0 = 历排库.历排(k2_0, string.gsub, 文库.连("%-%-", "[^\n]*"), "")
  --~ 则数排
  k3_0 = 历排库.历排返新(k2_0, d.局筛则数)
  k3_0 = 历排库.历排(k2_0, d.局筛则数)
  --~ 各文件的卡编排
  k4_0 = 历排库.历排返新(k2_0, d.局筛卡编)
  k4_0 = 历排库.历排(k2_0, d.局筛卡编)
  --~ 各文件的卡对排
  k5_0 = 历排库.历排返新(k4_0, d.取卡对_一维)
  k5_0 = 历排库.历排(k4_0, d.取卡对_一维)
  --~ 有效果卡的卡对排
  k6_0 = 历排库.历排返新(k5_0, d.筛有效果卡)
  k6_0 = 历排库.历排(k5_0, d.筛有效果卡)
  --~ 有效果卡的张数排
  k7_0 = 历排库.历排返新(k6_0, table.maxn)
  k7_0 = 历排库.历排(k6_0, table.maxn)
  --~ 血排
  k11_0 = 历排库.历排返新(k2_0, d.局筛血)
  k11_0 = 历排库.历排(k2_0, d.局筛血)
  --~ 荐名排
  k8_0 = 历排库.历二排返新(k6_0, k11_0, d.荐名)
  k8_0 = 历排库.历二排(k6_0, k11_0, d.荐名)
  --~ 新名排
  k9_0 = 历排库.历排返新(k1_0, string.gsub, 字集库.u8_to_a(文库.连(" ", ".+")), "")
  k9_0 = 历排库.历排(k1_0, string.gsub, 字集库.u8_to_a(文库.连(" ", ".+")), "")
  --~ 编号排
  k10_0 = 历排库.历排返新(k1_0, string.gsub, 字集库.u8_to_a(文库.连(" ", ".+")), "")
  k9_0 = 历排库.历排返旧(k9_0, string.gsub, 文库.连("%.", "lua", "$"), "")
  k10_0 = 历排库.历排(k1_0, string.gsub, 字集库.u8_to_a(文库.连(" ", ".+")), "")
  k9_0 = 历排库.历排(k9_0, string.gsub, 文库.连("%.", "lua", "$"), "")
  for o1 = 1, #k1_0 do
    k9_0[o1] = 文库.连(字集库.a_to_u8(o1_0.文件目), 字集库.a_to_u8(k9_0[o1]), " ", k3_0[o1], "_", 数库.几位整数(k7_0[o1], 2))
    if k8_0[o1] == 0 then
      k9_0[o1] = 文库.连(k9_0[o1], ".", "lua")
    else
      k9_0[o1] = 文库.连(k9_0[o1], "_", k8_0[o1], ".", "lua")
      end
    end
  k1_0 = 历排库.历排返旧(k1_0, 前缀库.加前缀, o1_0.文件目)
  k9_0 = 历排库.历排返旧(k9_0, 字集库.u8_to_a)
  k1_0 = 历排库.历排(k1_0, 前缀库.加前缀, o1_0.文件目)
  k9_0 = 历排库.历排(k9_0, 字集库.u8_to_a)
  历排库.历二排(k1_0, k9_0, os.rename)
  k10_0 = 历排库.历排返旧(k10_0, 字集库.a_to_u8)
  k10_0 = 历排库.历排(k10_0, 字集库.a_to_u8)
  --~ 文排
  k12_0 = 历排库.历排返新(k9_0, 读文件库.读文件)
  k12_0 = 历排库.历排(k9_0, 读文件库.读文件)
  历排库.历三排(k12_0, k10_0, k9_0, d.察编号)
  end
d.目对 = {
  ["文件目"] = "../single/"
  , ["卡档路"] = [[D:\install\YGOPro\cards.cdb]]
  }
d.目对 = 历对库.历值(d.目对, 基类库.操类, "string", 字集库.u8_to_a)
卡档 = 档库.open(d.目对.卡档路)
d.残局改名(d.目对)