Lines of script/c0.lua from check-in 07dff49316 that are changed by the sequence of edits moving toward check-in 383ce45c59:
1: local string = string
2: local table = table
3: local Debug = Debug
4: local Effect = Effect
5: local Duel = Duel
6: local Card = Card
7: local d = {}
8: local f = {}
9: d["排_效果卡之类型"] = {
10: TYPE_SPELL,
11: TYPE_TRAP,
12: TYPE_EFFECT,
13: }
14: d["排_非效果灵摆怪兽之卡片编号"] = {
15: 28363749,
16: 19474136,
17: 17390179,
18: 83980492,
19: }
20: d["数_所有区域"] = LOCATION_HAND + LOCATION_MZONE + LOCATION_SZONE + LOCATION_GRAVE + LOCATION_REMOVED + LOCATION_DECK + LOCATION_EXTRA
21: do
22: --~ 这一局所适用规则的对
23: local k1
24: k1 = {
25: [3] = "大师规则三（2014） ",
26: [4] = "新大师规则（2017） ",
27: [5] = "大师规则（2020） ",
28: }
29: f["Debug.ReloadFieldBegin"] = _G.Debug.ReloadFieldBegin
30: --~ 数_这一局的模式
31: --~ 数_规则参数
32: function _G.Debug.ReloadFieldBegin(o1, o2)
33: d["数_假洗卡"] = o1 & DUEL_PSEUDO_SHUFFLE
34: d["数_战斗阶段"] = o1 & DUEL_ATTACK_FIRST_TURN
35: d["数_人工智能"] = o1 & DUEL_SIMPLE_AI
36: if o2 then
37: d["字_这一局的规则"] = k1[o2]
38: else
39: d["字_这一局的规则"] = k1[5]
40: end
07dff49316 2024-07-17 41: local k1
42: f["Debug.ReloadFieldBegin"](o1, o2)
43: end
44: end
45: f["不被连锁"] = function()
46: Duel.SetChainLimit(aux.FALSE)
47: return true
48: end
49: f["是否有效果卡"] = function(card)
07dff49316 2024-07-17 50: for k1 = 1, #d["排_效果卡之类型"] do
07dff49316 2024-07-17 51: if Card.IsType(card, d["排_效果卡之类型"][k1]) then
52: return true
53: end
54: end
55: if Card.IsType(card, TYPE_PENDULUM) then
07dff49316 2024-07-17 56: for k1 = 1, #d["排_非效果灵摆怪兽之卡片编号"] do
07dff49316 2024-07-17 57: if Card.IsCode(card, d["排_非效果灵摆怪兽之卡片编号"][k1]) then
58: return false
59: else
60: end
61: end
62: return true
63: end
64: end
65: do
66: --~ 量_开局选卡入手的数量
67: local k1
68: --~ 效果_所调用这个效果的效果
69: --~ 玩家_所调用这个效果的玩家
70: f["_开局选卡入手"] = function(o1, o2)
71: --~ 卡_玩家选定的卡
72: local k2
73: k2 = Duel.SelectMatchingCard(o2, Card.IsAbleToHand, o2, LOCATION_DECK, 0, k1, k1, nil)
74: local o2
75: local k1
76: Duel.SendtoHand(k2, nil, REASON_RULE)
77: local k2
78: o1:Reset()
79: local o1
80: end
81: --~ 量_开局选卡入手的数量
82: f["开局选卡入手"] = function(o1)
83: --~ 效果
84: local k2
85: d["量_选卡"] = o1
86: k1 = o1
87: k2 = Effect.GlobalEffect()
88: k2:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
89: k2:SetCode(EVENT_ADJUST)
90: k2:SetCondition(aux.TRUE)
91: k2:SetOperation(f["_开局选卡入手"])
92: Duel.RegisterEffect(k2, 0)
93: end
94: end
95: --~ 量_禁几个怪兽格
96: f["禁格"] = function(o1)
97: local k1
98: d["量_禁格"] = o1
99: --~ 效果
100: k1 = Effect.GlobalEffect()
101: k1:SetCode(EFFECT_USE_EXTRA_MZONE)
102: k1:SetValue(o1)
103: Duel.RegisterEffect(k1, 0)
104: end
105: do
106: local k1, k2, k3, k4
107: --~ 字_印卡过多时的提示
108: k1 = "印卡过多"
109: --~ 量_现在的印卡数量
110: k2 = 1
111: --~ 量_手卡印卡数量的上限
112: k3 = 0
113: --~ 量_印卡总数量的上限
114: k4 = 0
115: --~ 效果_所调用这个效果的效果
116: --~ 数_所调用这个效果的玩家
117: f["_印卡"] = function(o1, o2)
118: local k5, k6
119: --~ 数_要印之卡的卡编
120: k5 = Duel.AnnounceCard(o2)
121: --~ 卡
122: k6 = Duel.CreateToken(o2, k5)
123: if k2 <= k3 then
124: k2 = k2 + 1
125: Duel.SendtoHand(k6, nil, REASON_RULE)
126: else
127: if k2 <= k4 then
128: k2 = k2 + 1
129: Duel.SendtoDeck(k6, o2, 0, REASON_RULE)
130: else
131: Debug.ShowHint(k1)
132: o1:Reset()
133: end
134: end
135: end
136: --~ 卡_印卡的启动源
137: --~ 量_手卡印卡数量的上限
138: --~ 量_印卡总数量的上限
139: f["印卡"] = function(o1, o2, o3)
140: local k5
141: k3 = o2
142: k4 = o3 or o2
143: Debug.ShowHint("点击对方额外卡组，可以印卡\n手卡只能印" .. k3 .. "张\n最多可印" .. k4 .. "张")
144: k5 = Effect.CreateEffect(o1)
145: k5:SetType(EFFECT_TYPE_IGNITION)
146: k5:SetProperty(EFFECT_FLAG_BOTH_SIDE + EFFECT_FLAG_UNCOPYABLE + EFFECT_FLAG_CANNOT_DISABLE)
147: k5:SetTarget(f["不被连锁"])
148: k5:SetRange(LOCATION_EXTRA)
149: k5:SetOperation(f["_印卡"])
150: o1:RegisterEffect(k5)
151: end
152: end
153: f["开局说明"] = function()
154: --~ 字_开局说明
155: --~ 量_我方的效果卡
156: --~ 组_我方超量素材
157: --~ 量_对方的效果卡
158: --~ 组_对方超量素材
159: --~ 量_效果卡
160: local k1, k2, k3, k4, k5, k6
161: k2 = Duel.GetMatchingGroupCount(f["是否有效果卡"], 0, d["数_所有区域"], nil, nil)
162: k3 = Duel.GetOverlayGroup(0, LOCATION_MZONE, nil)
163: for o1 in aux.Next(k3) do
164: if f["是否有效果卡"](o1) then
165: k2 = k2 + 1
166: end
167: end
168: k4 = Duel.GetMatchingGroupCount(f["是否有效果卡"], 0, nil, d["数_所有区域"], nil)
169: k5 = Duel.GetOverlayGroup(0, nil, LOCATION_MZONE)
170: for o1 in aux.Next(k5) do
171: if f["是否有效果卡"](o1) then
172: k4 = k4 + 1
173: end
174: end
175: k6 = k2 + k4
176: k1 = "" .. k6 .. "卡 " .. k4 .. "卡 " .. d["字_这一局的规则"]
177: if d["数_假洗卡"] == 0 then
178: else
179: k1 = k1 .. "假洗卡 "
180: end
181: if d["数_战斗阶段"] == 0 then
182: k1 = k1 .. "无战斗阶段 "
183: end
184: if d["数_人工智能"] == 0 then
185: k1 = k1 .. "无人工智能 "
186: end
187: if d["量_选卡"] then
188: k1 = k1 .. "选" .. d["量_选卡"] .. "卡 "
189: end
190: if d["量_禁格"] then
191: k1 = k1 .. "禁" .. d["量_禁格"] .. "格 "
192: end
193: Debug.ShowHint(k1)
194: end
195: do
196: f["aux.BeginPuzzle"] = _G.aux.BeginPuzzle
197: --~ 量_开局选卡入手的数量
198: --~ 量_禁几个我方主要怪兽格
199: --~ 卡_传入对方额外卡组最上面的表侧卡，并将其作为印卡源
200: --~ 量_能印几张手卡
201: --~ 量_最多能印几张卡
202: function _G.aux.BeginPuzzle(o1, o2, o3, o4, o5)
203: f["aux.BeginPuzzle"]()
204: if o1 then
205: f["开局选卡入手"](o1)
206: else
207: end
208: if o2 then
209: f["禁格"](o2)
210: else
211: end
212: if o3 then
213: f["印卡"](o3, o4, o5)
214: else
215: end
216: f["开局说明"]()
217: end
218: end
219: Auxiliary.PuzzleOp = function()
220: Duel.SetLP(0,0)
221: for i = 1, #d["排_局末提示"] do
222: Debug.ShowHint(d["排_局末提示"][i])
223: end
224: end
225: do
226: f["Debug.ReloadFieldEnd"] = _G.Debug.ReloadFieldEnd
227: --~ 局末提示
228: function _G.Debug.ReloadFieldEnd(...)
229: f["Debug.ReloadFieldEnd"]()
230: d["排_局末提示"] = {...}
231: end
232: end