local str = {}
local math = math
local string = string
local table = table
_G.fun = {}
---------------------------------
local cache_1
local cache_2
local cache_3
local cache_4
local cache_5
local cache_6
local cache_7
local cache_8
local cache_9
local _
str["效果卡的种类表"] = {
TYPE_SPELL,
TYPE_TRAP,
TYPE_EFFECT,
}
str["无效果灵摆怪兽表"] = {
28363749,
19474136,
17390179,
83980492,
}
cache_1 = 0
cache_1 = cache_1 + LOCATION_HAND + LOCATION_MZONE + LOCATION_SZONE + LOCATION_GRAVE + LOCATION_REMOVED
str["除卡组与额外卡组以外的区域"] = cache_1
cache_1 = cache_1 + LOCATION_DECK + LOCATION_EXTRA
str["所有区域"] = cache_1
--第一层-------------------------------
local cache_1
local cache_2
local cache_3
local cache_4
local cache_5
local cache_6
local cache_7
local cache_8
local cache_9
local _
fun["Debug.ReloadFieldBegin"] = Debug.ReloadFieldBegin
Debug.ReloadFieldBegin = function(u1, u2)
str["不洗牌"] = u1 & DUEL_PSEUDO_SHUFFLE
str["无BP"] = u1 & DUEL_ATTACK_FIRST_TURN
str["无AI"] = u1 & DUEL_SIMPLE_AI
str["规则表"] = {
[3] = "大师3 ",
[4] = "新大师 ",
[5] = "大师2020 ",
}
if u2 then
str["规则"] = str["规则表"][u2]
else
str["规则"] = str["规则表"][5]
end
fun["Debug.ReloadFieldBegin"](u1, u2)
end
fun["一_随机抽卡"] = function(u1)
str["随机抽卡的数量"] = u1
str["效果"] = Effect.GlobalEffect()
str["效果"]:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
str["效果"]:SetCode(EVENT_ADJUST)
str["效果"]:SetCondition(aux.TRUE)
function cache_1(effect_event, player_who_activate_the_effect)
Duel.ShuffleDeck(0)
Duel.Draw(0, u1, REASON_RULE)
effect_event:Reset()
end
str["效果"]:SetOperation(cache_1)
Duel.RegisterEffect(str["效果"], 0)
end
fun["一_该效果不能被连锁"] = function()
Duel.SetChainLimit(aux.FALSE)
return true
end
fun["一_通关邀请"] = function()
--备用：圣魔术师
str["原解邀请"] = "残局群181175613"
str["二解邀请"] = "爆貘团：「你居然二解了，请加群告诉我怎么二解。」"
str["效果"] = Effect.GlobalEffect()
str["效果"]:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
str["效果"]:SetCode(EVENT_DAMAGE)
function cache_1()
cache_1 = Duel.GetLP(1)
if cache_1 <= 0 then
if cache_1 == 0 then
else
Debug.ShowHint(str["二解邀请"])
end
Debug.ShowHint(str["原解邀请"])
else
return false
end
end
str["效果"]:SetCondition(cache_1)
str["效果"]:SetOperation(aux.NULL)
Duel.RegisterEffect(str["效果"], 0)
end
fun["一_是否效果卡"] = function(card)
for i = 1, #str["效果卡的种类表"] do
if Card.IsType(card, str["效果卡的种类表"][i]) then
return true
end
end
if Card.IsType(card, TYPE_PENDULUM) then
for i = 1, #str["无效果灵摆怪兽表"] do
if Card.IsCode(card, str["无效果灵摆怪兽表"][i]) then
else
return true
end
end
end
end
fun["一_开局添加手卡"] = function(u1)
str["开局添加手卡"] = true
str["开局添加手卡的数量"] = u1
str["效果"] = Effect.GlobalEffect()
str["效果"]:SetType(EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS)
str["效果"]:SetCode(EVENT_ADJUST)
str["效果"]:SetCondition(aux.TRUE)
function cache_1(effect_event, player_who_activate_the_effect)
str["玩家选定的卡"] = Duel.SelectMatchingCard(
player_who_activate_the_effect,
Card.IsAbleToHand,
player_who_activate_the_effect,
LOCATION_DECK,
0,
u1,
u1,
nil
)
Duel.SendtoHand(str["玩家选定的卡"], nil, REASON_RULE)
effect_event:Reset()
end
str["效果"]:SetOperation(cache_1)
Duel.RegisterEffect(str["效果"], 0)
end
fun["一_禁格"] = function(u1)
str["禁格"] = true
str["禁格的数量"] = u1
str["效果"] = Effect.GlobalEffect()
str["效果"]:SetCode(EFFECT_USE_EXTRA_MZONE)
str["效果"]:SetValue(u1)
Duel.RegisterEffect(str["效果"], 0)
end
--第二层-------------------------------
local cache_1
local cache_2
local cache_3
local cache_4
local cache_5
local cache_6
local cache_7
local cache_8
local cache_9
local _
fun["Debug.ReloadFieldEnd"] = Debug.ReloadFieldEnd
Debug.ReloadFieldEnd = function(u1)
fun["Debug.ReloadFieldEnd"]()
if u1 then
fun["一_随机抽卡"](u1)
end
end
fun["二_印卡"] = function(u1, u2, str_3)
if str_3 then
else
str_3 = u2
end
Debug.ShowHint(
"点击对方额外卡组可以进行印卡。\n手卡只能印 "
.. u2
.. " 张。\n最多可以印 "
.. str_3
.. " 张"
)
str["效果"] = Effect.CreateEffect(u1)
str["当前印卡数"] = 1
str["效果"]:SetType(EFFECT_TYPE_IGNITION)
str["效果"]:SetProperty(
EFFECT_FLAG_BOTH_SIDE + EFFECT_FLAG_UNCOPYABLE + EFFECT_FLAG_CANNOT_NEGATE + EFFECT_FLAG_CANNOT_DISABLE
)
str["效果"]:SetTarget(fun["一_该效果不能被连锁"])
str["效果"]:SetRange(LOCATION_EXTRA)
function print_hand(effect_event, player_who_activate_the_effect)
announce_card = Duel.AnnounceCard(player_who_activate_the_effect)
card = Duel.CreateToken(player_who_activate_the_effect, announce_card)
if str["当前印卡数"] <= u2 then
str["当前印卡数"] = str["当前印卡数"] + 1
Duel.SendtoHand(card, nil, REASON_RULE)
else
if str["当前印卡数"] <= str_3 then
str["当前印卡数"] = str["当前印卡数"] + 1
Duel.Remove(card, POS_FACEUP, REASON_RULE)
Duel.SendtoDeck(card, player_who_activate_the_effect, 0, REASON_RULE)
else
Debug.ShowHint("印卡过多！")
effect_event:Reset()
end
end
end
str["效果"]:SetOperation(print_hand)
u1:RegisterEffect(str["效果"])
end
fun["二_开局说明"] = function()
str["这个残局的效果卡数量"] =
Duel.GetMatchingGroupCount(fun["是否效果卡"], 0, str["所有区域"], str["所有区域"], nil)
str["超量素材组"] = Duel.GetOverlayGroup(0, LOCATION_MZONE, LOCATION_MZONE)
for k in aux.Next(str["超量素材组"]) do
if fun["一_是否效果卡"](k) then
str["这个残局的效果卡数量"] = str["这个残局的效果卡数量"] + 1
end
end
str["开局说明"] = str["这个残局的效果卡数量"] .. "卡 " .. str["规则"]
if str["不洗牌"] == 0 then
else
str["开局说明"] = str["开局说明"] .. "伪洗牌 "
end
if str["无BP"] == 0 then
str["开局说明"] = str["开局说明"] .. "无BP "
end
if str["无AI"] == 0 then
str["开局说明"] = str["开局说明"] .. "无AI "
end
if str["开局添加手卡"] then
str["开局说明"] = str["开局说明"] .. "选" .. str["开局添加手卡的数量"] .. "卡 "
end
if str["禁格"] then
str["开局说明"] = str["开局说明"] .. "禁" .. str["禁格的数量"] .. "格 "
end
if str["随机抽卡的数量"] then
str["开局说明"] = str["开局说明"] .. "抽" .. str["随机抽卡的数量"] .. "卡 "
end
Debug.ShowHint(str["开局说明"])
end
fun["aux.BeginPuzzle"] = aux.BeginPuzzle
aux.BeginPuzzle = function(u1, u2)
fun["aux.BeginPuzzle"]()
if u1 then
fun["一_开局添加手卡"](u1)
end
if u2 then
fun["一_禁格"](u2)
end
fun["二_开局说明"]()
fun["一_通关邀请"]()
end
--兼容层-------------------------------
fun["印卡"] = fun["二_印卡"]
fun["开局添加手卡"] = fun["一_开局添加手卡"]
fun["是否效果卡"] = fun["一_是否效果卡"]
fun["禁格"] = fun["一_禁格"]
fun["随机抽卡"] = fun["一_随机抽卡"]