2023/5/17 新增：风战士新卡

script/RDBase.lua

@@ -243,6 +243,21 @@ function RushDuel.CreateOnlyThisAttackEffect(e, code, player, s_range, o_range,
     Duel.RegisterEffect(e1, player)
     c:RegisterFlagEffect(code, RESET_EVENT + RESETS_STANDARD - RESET_TURN_SET + reset, 0, 1)
 end
+-- 创建效果: 不能把效果发动 (对玩家效果)
+function RushDuel.CreateCannotActivateEffect(e, desc, value, player, s_range, o_range, reset)
+    local e1 = Effect.CreateEffect(e:GetHandler())
+    e1:SetDescription(desc)
+    e1:SetType(EFFECT_TYPE_FIELD)
+    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
+    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET + EFFECT_FLAG_CLIENT_HINT)
+    e1:SetTargetRange(s_range, o_range)
+    if value ~= nil then
+        e1:SetValue(value)
+    end
+    e1:SetReset(reset)
+    Duel.RegisterEffect(e1, player)
+    return e1
+end
 -- 创建效果: Buff类效果
 function RushDuel.CreateSingleEffect(e, desc, card, code, value, reset, forced)
     local e1 = Effect.CreateEffect(e:GetHandler())

script/c120247018.lua

+local m=120247018
+local list={120155029,120247031}
+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])
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	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
+--Atk Up
+cm.indval=RD.ValueEffectIndesType(0,TYPE_TRAP)
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return RD.IsCanAttachEffectIndes(c,tp,cm.indval) or RD.IsCanAttachPierce(c)
+end
+cm.cost=RD.CostSendHandToGrave(Card.IsAbleToGraveAsCost,1,3,function(g)
+	return g:FilterCount(Card.IsType,nil,TYPE_MONSTER)
+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 reset=RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END
+		RD.AttachEffectIndes(e,c,cm.indval,aux.Stringid(m,1),reset)
+		RD.AttachPierce(e,c,aux.Stringid(m,2),reset)
+		local atk=e:GetLabel()*1000
+		if RD.IsSpecialSummonTurn(c) and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
+			and atk>0 and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
+			RD.AttachAtkDef(e,c,atk,0,reset)
+		end
+	end
+end
\ No newline at end of file

script/c120247019.lua

+local m=120247019
+local list={120155028,120247031}
+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])
+	--Destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DESTROY+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
+--Destroy
+function cm.desfilter(c)
+	return c:IsFacedown() and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:GetSequence()<5
+end
+cm.cost=RD.CostSendHandToGrave(Card.IsAbleToGraveAsCost,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.desfilter,tp,0,LOCATION_SZONE,1,nil) end
+	local g=Duel.GetMatchingGroup(cm.desfilter,tp,0,LOCATION_SZONE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(cm.desfilter,tp,0,LOCATION_SZONE,nil)
+	if g:GetCount()>0 then
+		local atk=Duel.Destroy(g,REASON_EFFECT)*600
+		local c=e:GetHandler()
+		if atk~=0 and c:IsFaceup() and c:IsRelateToEffect(e) then
+			Duel.BreakEffect()
+			RD.AttachAtkDef(e,c,atk,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		end
+	end
+end
\ No newline at end of file

script/c120247025.lua

+local m=120247025
+local cm=_G["c"..m]
+cm.name="振乐姬 大铜喇叭碟"
+function cm.initial_effect(c)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	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
+--To Hand
+function cm.confilter(c)
+	return c:IsFaceup() and c:IsRace(RACE_WARRIOR)
+end
+function cm.filter1(c)
+	return c:IsLevelAbove(7) and c:IsAttribute(ATTRIBUTE_WIND)
+end
+function cm.filter2(c)
+	return c:IsType(TYPE_NORMAL) and c:IsRace(RACE_WARRIOR)
+end
+function cm.thfilter(c)
+	return (cm.filter1(c) or cm.filter2(c)) and c:IsAbleToHand()
+end
+function cm.check(g)
+	if g:GetCount()<2 then return false end
+	local tc1=g:GetFirst()
+	local tc2=g:GetNext()
+	return (cm.filter1(tc1) and cm.filter2(tc2)) or (cm.filter1(tc2) and cm.filter2(tc1))
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return RD.IsSummonTurn(c) and Duel.IsExistingMatchingCard(cm.confilter,tp,LOCATION_MZONE,0,1,c)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_GRAVE,0,nil)
+	if chk==0 then return g:CheckSubGroup(cm.check,2,2) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,2,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectGroupAndDoAction(HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),cm.check,tp,LOCATION_GRAVE,0,2,2,nil,function(g)
+		RD.SendToHandAndExists(g,1-tp)
+	end)
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateCannotActivateEffect(e,aux.Stringid(m,1),cm.aclimit,tp,1,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
+function cm.aclimit(e,re,tp)
+	local tc=re:GetHandler()
+	return re:IsActiveType(TYPE_MONSTER) and not (tc:IsAttribute(ATTRIBUTE_WIND) and tc:IsRace(RACE_WARRIOR+RACE_BEAST))
+end
\ No newline at end of file

script/c120247034.lua

+local m=120247034
+local cm=_G["c"..m]
+cm.name="乐姬的葬奏曲"
+function cm.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e1:SetCondition(cm.condition)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	local c=Duel.GetAttackTarget()
+	return Duel.GetAttacker():IsControler(1-tp)
+		and c and c:IsControler(tp) and c:IsPosition(POS_FACEUP_ATTACK)
+		and c:IsLevelAbove(7) and c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_WARRIOR+RACE_BEAST)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetAttacker()
+	if tc and tc:IsRelateToBattle() and tc:IsFaceup() then
+		local atk=tc:GetLevel()*-600
+		RD.AttachAtkDef(e,tc,atk,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	end
+end
\ No newline at end of file