2025/5/5 新增：KP21新卡

script/c120271040.lua

@@ -3,7 +3,7 @@ cm.name="虚钢演机急转"
 function cm.initial_effect(c)
 	--Activate
 	local e1=RD.CreateFusionEffect(c,cm.matfilter,cm.spfilter,cm.exfilter,LOCATION_GRAVE,0,nil,RD.FusionToDeck,nil,cm.operation)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
 	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)

script/c120285006.lua

+local cm,m=GetID()
+local list={120222017,120225001}
+cm.name="重建鸭人"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsCode(list[1],list[2]) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP_DEFENSE)
+end
+cm.cost=RD.CostSendSelfToGrave()
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetMZoneCount(tp,e:GetHandler())>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndSpecialSummon(aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP_DEFENSE)
+end
\ No newline at end of file

script/c120285030.lua

+local cm,m=GetID()
+cm.name="继承的魔战士"
+function cm.initial_effect(c)
+	--Copy Code
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Copy Code
+function cm.costfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeckOrExtraAsCost()
+end
+function cm.filter(c,code)
+	return (c:IsAttack(2600) or RD.IsDefense(c,2600)) and c:IsRace(RACE_WARRIOR+RACE_SPELLCASTER) and not c:IsCode(code)
+end
+function cm.costcheck(g,e,tp)
+	return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,g,e:GetHandler():GetCode())
+end
+cm.cost=RD.CostSendGraveSubToDeck(cm.costfilter,cm.costcheck,2,2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e:GetHandler():GetCode()) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFaceup() and c:IsRelateToEffect(e) then
+		local filter=RD.Filter(cm.filter,c:GetCode())
+		RD.SelectAndDoAction(aux.Stringid(m,1),aux.NecroValleyFilter(filter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+			RD.CopyCode(e,c,g:GetFirst(),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		end)
+	end
+end
\ No newline at end of file

script/c120285031.lua

+local cm,m=GetID()
+cm.name="不逊的艾比"
+function cm.initial_effect(c)
+	--Position
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_POSITION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Position
+function cm.costfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeckOrExtraAsCost()
+end
+function cm.posfilter(c,e,tp)
+	return c:IsPosition(POS_FACEUP_ATTACK) and c:IsType(TYPE_EFFECT)
+		and RD.IsCanChangePosition(c,e,tp,REASON_EFFECT) and c:IsCanTurnSet()
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and c:IsRace(RACE_PLANT)
+end
+cm.cost=RD.CostSendGraveToDeck(cm.costfilter,2,2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.posfilter,tp,0,LOCATION_MZONE,1,nil,e,tp) end
+	local g=Duel.GetMatchingGroup(cm.posfilter,tp,0,LOCATION_MZONE,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local filter=RD.Filter(cm.posfilter,e,tp)
+	RD.SelectAndDoAction(HINTMSG_SET,filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		if RD.ChangePosition(g,e,tp,REASON_EFFECT,POS_FACEDOWN_DEFENSE)~=0 then
+			local mg=Duel.GetMatchingGroup(cm.exfilter,tp,LOCATION_MZONE,0,nil)
+			if mg:GetCount()==3 then
+				mg:ForEach(function(tc)
+					RD.AttachPierce(e,tc,aux.Stringid(m,1),RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+				end)
+			end
+		end
+	end)
+end
\ No newline at end of file

script/c120285037.lua

+local cm,m=GetID()
+local list={120222017,120225001}
+cm.name="紫鳞弹超越爆击速龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],list[2])
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.atkcon)
+	e1:SetValue(cm.atkval)
+	c:RegisterEffect(e1)
+	--Continuous Effect
+	RD.AddContinuousEffect(c,e1)
+end
+--Atk Up
+function cm.atkfilter(c)
+	return c:IsFaceup() and c:GetBaseAttack()>0
+end
+function cm.atkcon(e)
+	return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
+end
+function cm.atkval(e,c)
+	local tp=c:GetControler()
+	local mg=Duel.GetMatchingGroup(cm.atkfilter,tp,0,LOCATION_MZONE,nil)
+	if mg:GetCount()>0 then
+		local _,atk=mg:GetMaxGroup(Card.GetBaseAttack)
+		return atk
+	else
+		return 0
+	end
+end
\ No newline at end of file

script/c120285062.lua

+local cm,m=GetID()
+local list={120222017,120225001}
+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,nil,cm.operation)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_GRAVE_SPSUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_DESTROYED)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCondition(cm.condition)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.matfilter(c)
+	return false
+end
+function cm.spfilter(c)
+	return aux.IsMaterialListCode(c,list[1]) or aux.IsMaterialListCode(c,list[2])
+end
+function cm.exfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToDeck()
+end
+function cm.confilter(c,tp,rp)
+	return c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE)
+		and ((rp==1-tp and c:IsReason(REASON_EFFECT)) or c==Duel.GetAttackTarget())
+end
+function cm.filter(c,e,tp)
+	return RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP_ATTACK)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.confilter,1,nil,tp,rp)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp,mat,fc)
+	if Duel.GetTurnPlayer()==tp then
+		RD.CanSelectAndSpecialSummon(aux.Stringid(m,1),aux.NecroValleyFilter(cm.filter),1-tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEUP_ATTACK)
+	end
+end
\ No newline at end of file