Lines of
script/c0.lua
from check-in a806df48aa
that are changed by the sequence of edits moving toward
check-in cb9ce9dc22:
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: local s = {}
10: s["效卡之类排"] = {
11: TYPE_SPELL,
12: TYPE_TRAP,
13: TYPE_EFFECT,
14: }
15: s["无效灵摆怪兽之卡编排"] = {
16: 28363749,
17: 19474136,
18: 17390179,
19: 83980492,
20: }
21: s["全区"] = LOCATION_HAND + LOCATION_MZONE + LOCATION_SZONE + LOCATION_GRAVE + LOCATION_REMOVED + LOCATION_DECK + LOCATION_EXTRA
22: do
23: local h1
24: --~ 则对
25: h1 = {
26: [3] = "大师规则 ",
27: [4] = "新大师规则(2017) ",
28: [5] = "大师规则(2020) ",
29: }
30: s["Debug.ReloadFieldBegin"] = _G.Debug.ReloadFieldBegin
31: --~ 模
32: --~ 则数
33: function _G.Debug.ReloadFieldBegin(u1, u2)
34: s["伪洗卡"] = u1 & DUEL_PSEUDO_SHUFFLE
35: s["战段"] = u1 & DUEL_ATTACK_FIRST_TURN
36: s["机智"] = u1 & DUEL_SIMPLE_AI
37: if u2 then
38: s["则"] = h1[u2]
39: else
40: s["则"] = h1[5]
41: end
42: s["Debug.ReloadFieldBegin"](u1, u2)
43: end
44: end
45: s["不被连锁"] = function()
46: Duel.SetChainLimit(aux.FALSE)
47: return true
48: end
49: s["是否效卡"] = function(card)
50: for i = 1, #s["效卡之类排"] do
51: if Card.IsType(card, s["效卡之类排"][i]) then
52: return true
53: end
54: end
55: if Card.IsType(card, TYPE_PENDULUM) then
56: for i = 1, #s["无效灵摆怪兽之卡编排"] do
57: if Card.IsCode(card, s["无效灵摆怪兽之卡编排"][i]) then
58: return false
59: else
60: end
61: end
62: return true
63: end
64: end
65: do
66: local h1
67: --~ “调该效果”的效果
68: --~ “调该效果”的玩家
69: s["_开局选卡入手"] = function(u1, u2)
70: local h2
71: --~ 玩家选定的卡
72: h2 = Duel.SelectMatchingCard(u2, Card.IsAbleToHand, u2, LOCATION_DECK, 0, h1, h1, nil)
73: Duel.SendtoHand(h2, nil, REASON_RULE)
74: u1:Reset()
75: end
76: s["开局选卡入手"] = function(u1)
77: local h2
78: s["「开局选卡入手」之量"] = u1
79: --~ 「开局选卡入手」之量
80: h1 = u1
81: --~ 效果
82: h2 = Effect.GlobalEffect()
83: h2:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
84: h2:SetCode(EVENT_ADJUST)
85: h2:SetCondition(aux.TRUE)
86: h2:SetOperation(s["_开局选卡入手"])
87: Duel.RegisterEffect(h2, 0)
88: end
89: end
90: --~ 禁几个怪兽格
91: f["禁格"] = function(o1)
92: local k1
93: d["禁几个怪兽格"] = o1
94: --~ 效果
95: k1 = Effect.GlobalEffect()
96: k1:SetCode(EFFECT_USE_EXTRA_MZONE)
97: k1:SetValue(k1)
98: Duel.RegisterEffect(k1, 0)
99: end
100: do
a806df48aa 2024-06-27 101: local h1, h2, h3, h4
a806df48aa 2024-06-27 102: --~ 印卡过多之示
a806df48aa 2024-06-27 103: h1 = "印卡过多"
a806df48aa 2024-06-27 104: --~ 现之印卡数
a806df48aa 2024-06-27 105: h2 = 1
a806df48aa 2024-06-27 106: --~ 印手卡之上限
a806df48aa 2024-06-27 107: h3 = 0
a806df48aa 2024-06-27 108: --~ 总印卡之上限
a806df48aa 2024-06-27 109: h4 = 0
a806df48aa 2024-06-27 110: --~ 「调该效果」的效果
a806df48aa 2024-06-27 111: --~ 「调该效果」的玩家
a806df48aa 2024-06-27 112: s["_印卡"] = function(u1, u2)
a806df48aa 2024-06-27 113: local h5, h6
a806df48aa 2024-06-27 114: --~ 印卡之卡编
a806df48aa 2024-06-27 115: h5 = Duel.AnnounceCard(u2)
116: --~ 卡
a806df48aa 2024-06-27 117: h6 = Duel.CreateToken(u2, h5)
a806df48aa 2024-06-27 118: if h2 <= h3 then
a806df48aa 2024-06-27 119: h2 = h2 + 1
a806df48aa 2024-06-27 120: Duel.SendtoHand(h6, nil, REASON_RULE)
a806df48aa 2024-06-27 121: else
a806df48aa 2024-06-27 122: if h2 <= h4 then
a806df48aa 2024-06-27 123: h2 = h2 + 1
a806df48aa 2024-06-27 124: Duel.SendtoDeck(h6, u2, 0, REASON_RULE)
a806df48aa 2024-06-27 125: else
a806df48aa 2024-06-27 126: Debug.ShowHint(h1)
a806df48aa 2024-06-27 127: u1:Reset()
128: end
129: end
130: end
a806df48aa 2024-06-27 131: s["印卡"] = function(u1, u2, u3)
a806df48aa 2024-06-27 132: local h5, h6
a806df48aa 2024-06-27 133: h3 = u2
a806df48aa 2024-06-27 134: h4 = u3 or u2
a806df48aa 2024-06-27 135: Debug.ShowHint("点对方额外卡组,可印卡\n只能印手卡" .. h3 .. "张\n最多可印" .. h4 .. "张")
a806df48aa 2024-06-27 136: h5 = Effect.CreateEffect(u1)
a806df48aa 2024-06-27 137: h5:SetType(EFFECT_TYPE_IGNITION)
a806df48aa 2024-06-27 138: h5:SetProperty(EFFECT_FLAG_BOTH_SIDE + EFFECT_FLAG_UNCOPYABLE + EFFECT_FLAG_CANNOT_NEGATE + EFFECT_FLAG_CANNOT_DISABLE)
a806df48aa 2024-06-27 139: h5:SetTarget(s["不被连锁"])
a806df48aa 2024-06-27 140: h5:SetRange(LOCATION_EXTRA)
a806df48aa 2024-06-27 141: h5:SetOperation(s["_印卡"])
a806df48aa 2024-06-27 142: u1:RegisterEffect(h5)
143: end
144: end
145: s["开局示"] = function()
146: local h1, h2, h3
147: --~ 此局效卡之数
148: h2 = Duel.GetMatchingGroupCount(s["是否效卡"], 0, s["全区"], s["全区"], nil)
149: --~ 超量材组
150: h3 = Duel.GetOverlayGroup(0, LOCATION_MZONE, LOCATION_MZONE)
151: for u1 in aux.Next(h3) do
152: if s["是否效卡"](u1) then
153: h2 = h2 + 1
154: end
155: end
156: --~ 开局说明
157: h1 = h2 .. "卡 " .. s["则"]
158: if s["伪洗卡"] == 0 then
159: else
160: h1 = h1 .. "伪洗卡 "
161: end
162: if s["战段"] == 0 then
163: h1 = h1 .. "无战段 "
164: end
165: if s["机智"] == 0 then
166: h1 = h1 .. "无机智 "
167: end
168: if s["「开局选卡入手」之量"] then
169: h1 = h1 .. "选" .. s["「开局选卡入手」之量"] .. "卡 "
170: end
171: if s["「禁主怪格」之量"] then
172: h1 = h1 .. "禁" .. s["「禁主怪格」之量"] .. "怪格 "
173: end
174: if s["「禁魔陷格」之量"] then
175: h1 = h1 .. "禁" .. s["「禁魔陷格」之量"] .. "魔格 "
176: end
177: Debug.ShowHint(h1)
178: end
179: do
180: s["aux.BeginPuzzle"] = _G.aux.BeginPuzzle
181: --~ 「开局选卡入手」之量
182: --~ 传入对方额外卡组最上面表侧卡,并将其作为印卡源
183: --~ 能印手卡几张
184: --~ 最多能印卡几张
185: function _G.aux.BeginPuzzle(o1, o2, o3, o4, o5)
186: s["aux.BeginPuzzle"]()
187: if o1 then
188: s["开局选卡入手"](o1)
189: else
190: end
191: if o2 then
192: f["禁格"](o2)
193: else
194: end
195: if o3 then
196: s["印卡"](o3, o4, o5)
197: else
198: end
199: s["开局示"]()
200: end
201: end