2025/3/26 新增：直播新卡

script/RDBase.lua

@@ -30,6 +30,7 @@ EFFECT_CANNOT_CHANGE_POSITION_EFFECT = 120277011 -- 不会因效果改变表示
 FLAG_SUMMON_TURN = 120000011 -- 召唤·特殊召唤的回合被盖放, 不再符合召唤·特殊召唤的回合的条件
 FLAG_ATTACK_ANNOUNCED = 120000012 -- 已经进行了攻击宣言, 不能向怪兽攻击的效果失效
 FLAG_ATTACH_EFFECT = 120000013 -- 通过效果赋予的效果, 不能重复叠加
+FLAG_CANNOT_ATTACK_NEXT_TURN = 120231059 -- 下个回合不能攻击
 
 -- 提示信息
 HINTMSG_MAXSUMMON = Auxiliary.Stringid(120000000, 0) -- 极大召唤

script/c120231059.lua

@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 end
 --Discard Deck
 function cm.filter(c)
-	return c:IsFaceup() and c:IsLevelBelow(8) and c:GetFlagEffect(m)==0
+	return c:IsFaceup() and c:IsLevelBelow(8) and c:GetFlagEffect(FLAG_CANNOT_ATTACK_NEXT_TURN)==0
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,1) end
@@ -35,7 +35,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
 		tc:RegisterEffect(e1)
 		if not tc:IsImmuneToEffect(e) then
-			tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,0,1)
+			tc:RegisterFlagEffect(FLAG_CANNOT_ATTACK_NEXT_TURN,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,0,1)
 		end
 	end)
 end

script/c120280006.lua

@@ -7,7 +7,7 @@ function cm.initial_effect(c)
 	--Set
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetCategory(CATEGORY_DRAW)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCondition(cm.condition)

script/c120280008.lua

+local m=120280008
+local cm=_G["c"..m]
+cm.name="引诱光明的狮鹫兽卫"
+function cm.initial_effect(c)
+	--Set
+	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
+--Set
+function cm.costfilter(c)
+	return c:IsType(TYPE_RITUAL) and c:IsRace(RACE_WARRIOR+RACE_SPELLCASTER) and RD.IsDefenseAbove(c,2500)
+end
+function cm.setfilter(c,tc)
+	return c:GetType()==TYPE_RITUAL+TYPE_SPELL and aux.IsCodeListed(c,tc:GetCode()) and c:IsSSetable()
+end
+cm.cost=RD.CostShowExtra(cm.costfilter,1,1,nil,Group.GetFirst)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:IsCostChecked() and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_GRAVE,0,1,nil,e:GetLabelObject()) end
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local filter=RD.Filter(cm.setfilter,e:GetLabelObject())
+	RD.SelectAndSet(aux.NecroValleyFilter(filter),tp,LOCATION_GRAVE,0,1,1,nil,e)
+end
\ No newline at end of file

script/c120280009.lua

+local m=120280009
+local list={120280009}
+local cm=_G["c"..m]
+cm.name="导向黑暗的栗子球"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Lock Attack
+	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
+--Atk Down
+function cm.filter(c)
+	return c:IsFaceup() and c:IsLevelBelow(8) and c:GetFlagEffect(FLAG_CANNOT_ATTACK_NEXT_TURN)==0
+end
+function cm.spfilter(c,e,tp)
+	return (c:IsCode(list[1]) or (c:IsLevel(7) and RD.IsDefense(c,2100)))
+		and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEDOWN_DEFENSE)
+end
+cm.cost=RD.CostSendDeckTopToGrave(2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,0,LOCATION_MZONE,1,nil) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(aux.Stringid(m,1),cm.filter,tp,0,LOCATION_MZONE,1,1,nil,function(g)
+		local tc=g:GetFirst()
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetDescription(aux.Stringid(m,2))
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CANNOT_ATTACK)
+		e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
+		e1:SetLabel(1-tp)
+		e1:SetCondition(cm.atkcon)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
+		tc:RegisterEffect(e1)
+		if not tc:IsImmuneToEffect(e) then
+			tc:RegisterFlagEffect(FLAG_CANNOT_ATTACK_NEXT_TURN,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,0,1)
+		end
+		RD.CanSelectAndSpecialSummon(aux.Stringid(m,3),aux.NecroValleyFilter(cm.spfilter),tp,LOCATION_GRAVE,0,1,1,nil,e,POS_FACEDOWN_DEFENSE)
+	end)
+end
+function cm.atkcon(e)
+	return Duel.GetTurnPlayer()==e:GetLabel()
+end
\ No newline at end of file

script/c120283004.lua

+RD.SameCard(120283004,120261037)
\ No newline at end of file

script/c120283010.lua

+RD.SameCard(120283010,120249064)
\ No newline at end of file

script/c120283028.lua

+local m=120283028
+local list={120130000}
+local cm=_G["c"..m]
+cm.name="超魔导骑士-黑魔导骑兵"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],cm.matfilter)
+	RD.SetFusionLegendMaterial(c,{list[1]},{aux.Stringid(m,1)})
+	--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:SetValue(cm.atkval)
+	c:RegisterEffect(e1)
+	--Pierce
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_PIERCE)
+	c:RegisterEffect(e2)
+	--Indes
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetTargetRange(LOCATION_MZONE,0)
+	e3:SetCondition(cm.condition)
+	e3:SetTarget(cm.target)
+	e3:SetValue(cm.indval)
+	c:RegisterEffect(e3)
+	--Continuous Effect
+	RD.AddContinuousEffect(c,e1,e2,e3)
+end
+--Fusion Material
+cm.unspecified_funsion=true
+function cm.matfilter(c)
+	return c:IsRace(RACE_WARRIOR) and RD.IsDefense(c,2100)
+end
+--Atk Up
+function cm.filter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP)
+end
+function cm.atkval(e,c)
+	return Duel.GetMatchingGroupCount(cm.filter,0,LOCATION_GRAVE,LOCATION_GRAVE,nil)*100
+end
+--Indes
+function cm.condition(e)
+	return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_HAND,0)>0
+end
+function cm.target(e,c)
+	return c~=e:GetHandler()
+end
+cm.indval=RD.ValueEffectIndesType(0,TYPE_MONSTER+TYPE_SPELL+TYPE_TRAP)
\ No newline at end of file

script/c120283037.lua

+local m=120283037
+local list={120199052}
+local cm=_G["c"..m]
+cm.name="七宝神-毘华"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Special Summon Procedure
+	RD.AddHandSpecialSummonProcedure(c,aux.Stringid(m,0),cm.spcon)
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	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 Procedure
+function cm.spconfilter(c)
+	return RD.IsDefense(c,2700) or c:IsCode(list[1])
+end
+function cm.spcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spconfilter,tp,LOCATION_GRAVE,0,1,nil)
+end
+--Atk Up
+function cm.filter(c)
+	return c:IsFaceup() and c:IsLevel(7)
+end
+cm.cost=RD.CostSendDeckTopToGrave(2)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_MZONE,0,1,nil) 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 atk=Duel.GetMatchingGroupCount(cm.filter,tp,LOCATION_MZONE,0,nil)*400
+		RD.AttachAtkDef(e,c,atk,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	end
+end
\ No newline at end of file

script/c120283039.lua

+local m=120283039
+local list={120102003,120247002}
+local cm=_G["c"..m]
+cm.name="鹰身小天使 轻短裙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],cm.matfilter)
+	--Contact Fusion
+	RD.EnableContactFusion(c,aux.Stringid(m,0))
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Fusion Material
+cm.unspecified_funsion=true
+function cm.matfilter(c)
+	return c:IsLevelBelow(4) and c:IsRace(RACE_WINDBEAST)
+end
+--To Hand
+function cm.thfilter(c)
+	return c:IsCode(list[2]) and c:IsAbleToHand()
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_FUSION) and RD.IsSpecialSummonTurn(c)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,2,nil,function(g)
+		RD.SendToHandAndExists(g,e,tp,REASON_EFFECT)
+	end)
+end
\ No newline at end of file

script/c120283041.lua

+local m=120283041
+local cm=_G["c"..m]
+cm.name="黑火山龙"
+function cm.initial_effect(c)
+	--Summon Procedure
+	RD.AddSummonProcedureOne(c,aux.Stringid(m,0),nil,cm.sumfilter)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Summon Procedure
+function cm.sumfilter(c,e,tp)
+	return c:IsRace(RACE_DRAGON)
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsRace(RACE_DRAGON) and RD.IsCanBeSpecialSummoned(c,e,tp,POS_FACEUP)
+end
+function cm.exfilter(c)
+	return c:GetOriginalLevel()==9
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return RD.IsSummonTurn(e:GetHandler())
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetMZoneCount(tp)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if RD.SelectAndSpecialSummon(cm.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,POS_FACEUP)~=0
+		and and RD.IsOperatedGroupExists(cm.exfilter,1,nil) then
+		RD.CanDraw(aux.Stringid(m,2),tp,1)
+	end
+end
\ No newline at end of file

script/c120283049.lua

+local m=120283049
+local cm=_G["c"..m]
+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:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Position
+function cm.confilter(c)
+	return c:IsFaceup() and c:IsLevelAbove(5) and c:IsRace(RACE_MACHINE)
+end
+function cm.posfilter(c,e,tp)
+	return c:IsFaceup() and RD.IsCanChangePosition(c,e,tp,REASON_EFFECT) and c:IsCanTurnSet()
+end
+function cm.exfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsLevelAbove(8) and c:IsRace(RACE_MACHINE)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,nil)
+end
+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
+			and Duel.IsExistingMatchingCard(cm.exfilter,tp,LOCATION_MZONE,0,1,nil)
+			and Duel.SelectEffectYesNo(tp,g:GetFirst(),aux.Stringid(m,1)) then
+			Duel.Destroy(sg,REASON_EFFECT)
+		end
+	end)
+end
\ No newline at end of file