2025/4/6 新增5TH1新卡

script/RDFusion.lua

@@ -2,6 +2,8 @@
 RushDuel = RushDuel or {}
 -- 当前的融合效果
 RushDuel.CurrentFusionEffect = nil
+-- 额外的融合素材过滤
+RushDuel.FusionExtraMaterialFilter = nil
 -- 额外的融合检测
 RushDuel.FusionExtraChecker = nil
 -- 最小融合素材数
@@ -338,8 +340,8 @@ function RushDuel.CreateFusionEffect(card, matfilter, spfilter, exfilter, s_rang
     local include = including_self or false
     local leave = self_leave or false
     local e = Effect.CreateEffect(card)
-    e:SetTarget(RushDuel.FusionTarget(matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, include, leave, target_action))
-    e:SetOperation(RushDuel.FusionOperation(matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, move, include, leave, operation_action, limit_action))
+    e:SetTarget(RushDuel.FusionTarget(card, matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, include, leave, target_action))
+    e:SetOperation(RushDuel.FusionOperation(card, matfilter, spfilter, exfilter, self_range, opponent_range, mat_check, move, include, leave, operation_action, limit_action))
     return e
 end
 -- 融合召唤 - 素材过滤
@@ -385,6 +387,9 @@ function RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_ra
     if including_self then
         gc = e:GetHandler()
     end
+    if RushDuel.FusionExtraMaterialFilter then
+        mg = mg:Filter(RushDuel.FusionExtraMaterialFilter, nil, e, tp, mg)
+    end
     local sg = Duel.GetMatchingGroup(RushDuel.FusionSpecialSummonFilter, tp, LOCATION_EXTRA, 0, nil, e, tp, mg, nil, gc, chkf, spfilter)
     local list = {}
     local fusionable = false
@@ -396,6 +401,9 @@ function RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_ra
     for _, effect in ipairs(effects) do
         local target = effect:GetTarget()
         local mg2 = target(effect, e, tp, mg)
+        if RushDuel.FusionExtraMaterialFilter then
+            mg2 = mg2:Filter(RushDuel.FusionExtraMaterialFilter, nil, e, tp, mg2)
+        end
         if #mg2 > 0 then
             local mf = effect:GetValue()
             local sg2 = Duel.GetMatchingGroup(RushDuel.FusionSpecialSummonFilter, tp, LOCATION_EXTRA, 0, nil, e, tp, mg2, mf, gc, chkf, spfilter)
@@ -498,10 +506,13 @@ function RushDuel.IsCanFusionSummon(e, tp, matfilter, spfilter, exfilter, s_rang
     return fusionable
 end
 -- 融合召唤 - 目标
-function RushDuel.FusionTarget(matfilter, spfilter, exfilter, s_range, o_range, mat_check, including_self, self_leave, action)
+function RushDuel.FusionTarget(card, matfilter, spfilter, exfilter, s_range, o_range, mat_check, including_self, self_leave, action)
     return function(e, tp, eg, ep, ev, re, r, rp, chk)
         if chk == 0 then
-            return RushDuel.IsCanFusionSummon(e, tp, matfilter, spfilter, exfilter, s_range, o_range, mat_check, including_self, self_leave, nil)
+            RushDuel.FusionExtraMaterialFilter = card.fusion_mat_filter
+            local res = RushDuel.IsCanFusionSummon(e, tp, matfilter, spfilter, exfilter, s_range, o_range, mat_check, including_self, self_leave, nil)
+            RushDuel.FusionExtraMaterialFilter = nil
+            return res
         end
         if action ~= nil then
             action(e, tp, eg, ep, ev, re, r, rp)
@@ -510,8 +521,9 @@ function RushDuel.FusionTarget(matfilter, spfilter, exfilter, s_range, o_range,
     end
 end
 -- 融合召唤 - 处理
-function RushDuel.FusionOperation(matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, including_self, self_leave, action, limit)
+function RushDuel.FusionOperation(card, matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, including_self, self_leave, action, limit)
     return function(e, tp, eg, ep, ev, re, r, rp)
+        RushDuel.FusionExtraMaterialFilter = card.fusion_mat_filter
         RushDuel.FusionExtraChecker = RushDuel.FusionCheckLocation(e, self_leave, mat_check)
         local fusionable, list, chkf, gc = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, self_leave, nil, e)
         if fusionable then
@@ -520,6 +532,7 @@ function RushDuel.FusionOperation(matfilter, spfilter, exfilter, s_range, o_rang
                 action(e, tp, eg, ep, ev, re, r, rp, mat, fc)
             end
         end
+        RushDuel.FusionExtraMaterialFilter = nil
         RushDuel.FusionExtraChecker = nil
         if limit ~= nil then
             limit(e, tp, eg, ep, ev, re, r, rp)

script/c120151003.lua

@@ -9,13 +9,16 @@ function cm.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetLabel(m)
-	e1:SetCondition(RD.MaximumMode)
+	e1:SetCondition(cm.condition)
 	e1:SetCost(cm.cost)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.operation)
 	c:RegisterEffect(e1)
 end
 --Multiple Attack
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.MaximumMode(e) and Duel.IsAbleToEnterBP()
+end
 cm.cost=RD.CostSendDeckTopToGrave(2)
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

script/c120277066.lua

@@ -3,6 +3,7 @@ local list={120263004}
 local cm=_G["c"..m]
 cm.name="奇迹接触"
 function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
 	--Activate
 	local e1=RD.CreateFusionEffect(c,cm.matfilter,cm.spfilter,cm.exfilter,LOCATION_GRAVE,0,nil,RD.FusionToDeck)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_GRAVE_ACTION)

script/c120283025.lua

+local m=120283025
+local list={120105001,120110001}
+local cm=_G["c"..m]
+cm.name="连击龙骑士-七魔导骑士"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],list[2])
+	--Multi-Choose Effect
+	local e1,e2=RD.CreateMultiChooseEffect(c,nil,cm.cost,aux.Stringid(m,1),cm.target1,cm.operation1,aux.Stringid(m,2),cm.target2,cm.operation2)
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+end
+--Multi-Choose Effect
+cm.cost=RD.CostSendDeckTopToGrave(1)
+--Atk Up
+function cm.target1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function cm.operation1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.AttachAtkDef(e,c,500,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		RD.AttachExtraAttackMonster(e,c,1,aux.Stringid(m,3),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	end
+end
+--Indes
+cm.indval=RD.ValueEffectIndesType(TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP)
+function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return RD.IsCanAttachEffectIndes(e:GetHandler(),tp,cm.indval) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function cm.operation2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.AttachEffectIndes(e,c,cm.indval,aux.Stringid(m,4),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
+	end
+end
\ No newline at end of file

script/c120283026.lua

+local m=120283026
+local list={120235003}
+local cm=_G["c"..m]
+cm.name="THE☆完美齿车戒龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],cm.matfilter,cm.matfilter,cm.matfilter,cm.matfilter)
+	--Multiple Attack
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Fusion Material
+cm.unspecified_funsion=true
+function cm.matfilter(c)
+	return c:IsLevel(7)
+end
+--Multiple Attack
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.IsLPBelowOpponent(tp,1) and Duel.IsAbleToEnterBP()
+end
+cm.cost=RD.CostSendHandToGrave(Card.IsAbleToGraveAsCost,1,1)
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		RD.AttachAttackAll(e,c,1,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	end
+end
\ No newline at end of file

script/c120283040.lua

+local m=120283040
+local cm=_G["c"..m]
+cm.name="凤凰庄家"
+function cm.initial_effect(c)
+	--Draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DRAW+CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Draw
+function cm.costfilter(c)
+	return c:IsLevel(7) and c:IsAbleToGraveAsCost()
+end
+function cm.spfilter(c,e,tp)
+	return c:IsLevel(9) and c:IsRace(RACE_MAGICALKNIGHT) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>9
+end
+cm.cost=RD.CostSendHandToGrave(cm.costfilter,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	RD.TargetDraw(tp,1)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if RD.Draw()~=0 then
+		RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP)
+	end
+end
\ No newline at end of file

script/c120283051.lua

+local m=120283051
+local list={120235003}
+local cm=_G["c"..m]
+cm.name="THE☆VS融合"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Activate
+	local e1=RD.CreateFusionEffect(c,cm.matfilter,cm.spfilter,cm.exfilter,LOCATION_GRAVE,0,cm.matcheck,RD.FusionToDeck)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(cm.condition)
+	c:RegisterEffect(e1)
+end
+function cm.fusion_mat_filter(c)
+	return c:IsCode(list[1]) or not c:IsRace(RACE_DRAGON)
+end
+--Activate
+function cm.matfilter(c)
+	return c:IsOnField() and c:IsFusionType(TYPE_NORMAL) and c:IsAbleToDeck()
+end
+function cm.spfilter(c)
+	return aux.IsMaterialListCode(c,list[1])
+end
+function cm.exfilter(c)
+	return c:IsFusionType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToDeck()
+end
+function cm.matcheck(tp,sg,fc)
+	return sg:GetClassCount(Card.GetLocation)==2
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFusionMaterial(tp):IsExists(cm.matfilter,1,nil)
+end
\ No newline at end of file