2024/4/23 新增：神疑之光来，合并免疫战斗·效果伤害

script/RDLimit.lua

@@ -304,3 +304,34 @@ function RushDuel.CreateActivateCountLimitEffect(e, desc, value, count, player,
     end)
     return e1
 end
+
+-- 创建限制: 不会受到战斗伤害
+function RushDuel.CreateNoBattleDamageEffect(e, desc, player, s_range, o_range, reset)
+    local e1 = Effect.CreateEffect(e:GetHandler())
+    e1:SetDescription(desc)
+    e1:SetType(EFFECT_TYPE_FIELD)
+    e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
+    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET + EFFECT_FLAG_CLIENT_HINT)
+    e1:SetTargetRange(s_range, o_range)
+    e1:SetValue(1)
+    e1:SetReset(reset)
+    Duel.RegisterEffect(e1, player)
+    return e1
+end
+
+-- 创建限制: 不会受到效果伤害
+function RushDuel.CreateNoEffectDamageEffect(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_CHANGE_DAMAGE)
+    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET + EFFECT_FLAG_CLIENT_HINT)
+    e1:SetTargetRange(s_range, o_range)
+    e1:SetValue(value)
+    e1:SetReset(reset)
+    Duel.RegisterEffect(e1, player)
+    local e2 = e1:Clone()
+    e2:SetCode(EFFECT_NO_EFFECT_DAMAGE)
+    Duel.RegisterEffect(e2, player)
+    return e1, e2
+end

script/RDSummon.lua

@@ -239,6 +239,7 @@ function RushDuel.AdvanceMaterialCheck(card, effect, getter)
     e:SetLabelObject(effect)
     e:SetValue(RushDuel.AdvanceMaterialCheckValue(getter))
     card:RegisterEffect(e)
+    return e
 end
 function RushDuel.AdvanceMaterialCheckValue(getter)
     return function(e, c)

script/c120199062.lua

@@ -29,14 +29,6 @@ end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
 	if RD.Damage()~=0 and p==1-tp then
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetDescription(aux.Stringid(m,1))
-		e1:SetType(EFFECT_TYPE_FIELD)
-		e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
-		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
-		e1:SetTargetRange(1,0)
-		e1:SetValue(1)
-		e1:SetReset(RESET_PHASE+PHASE_END)
-		Duel.RegisterEffect(e1,tp)
+		RD.CreateNoBattleDamageEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
 	end
 end
\ No newline at end of file

script/c120235053.lua

@@ -49,18 +49,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetFlagEffect(tp,m)~=0 then return end
 	RD.CreateHintEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
 	RD.CreateAttackLimitEffect(e,cm.atktg,tp,LOCATION_MZONE,0,RESET_PHASE+PHASE_END)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetDescription(aux.Stringid(m,2))
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CHANGE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
-	e1:SetTargetRange(0,1)
-	e1:SetValue(cm.damval)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-	local e2=e1:Clone()
-	e2:SetCode(EFFECT_NO_EFFECT_DAMAGE)
-	Duel.RegisterEffect(e2,tp)
+	RD.CreateNoEffectDamageEffect(e,aux.Stringid(m,2),cm.damval,tp,0,1,RESET_PHASE+PHASE_END)
 	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
 end
 function cm.atktg(e,c)

script/c120235064.lua

@@ -23,15 +23,7 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.DiscardDeck(tp,1,REASON_EFFECT)==0 then return end
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetDescription(aux.Stringid(m,1))
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
-	e1:SetTargetRange(1,0)
-	e1:SetValue(1)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
+	RD.CreateNoBattleDamageEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
 	if RD.IsLPAbove(tp,3000) then
 		Duel.Damage(tp,2000,REASON_EFFECT)
 	end

script/c120247064.lua

@@ -4,7 +4,7 @@ cm.name="风帝 莱扎"
 function cm.initial_effect(c)
 	--Advance Flag
 	RD.CreateAdvanceSummonFlag(c,20247064)
-	--Destroy
+	--To Deck
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetCategory(CATEGORY_TODECK)
@@ -23,7 +23,7 @@ end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
 	local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_TODECK,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,function(g)

script/c120253061.lua

@@ -37,23 +37,8 @@ end
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	RD.SelectAndDoAction(HINTMSG_DESTROY,nil,tp,0,LOCATION_MZONE,1,1,nil,function(g)
 		if Duel.Destroy(g,REASON_EFFECT)~=0 and Duel.GetLP(tp)<=2000 then
-			local e1=Effect.CreateEffect(e:GetHandler())
-			e1:SetDescription(aux.Stringid(m,1))
-			e1:SetType(EFFECT_TYPE_FIELD)
-			e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
-			e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
-			e1:SetTargetRange(1,0)
-			e1:SetValue(1)
-			e1:SetReset(RESET_PHASE+PHASE_END)
-			Duel.RegisterEffect(e1,tp)
-			local e2=e1:Clone()
-			e2:SetDescription(aux.Stringid(m,2))
-			e2:SetCode(EFFECT_CHANGE_DAMAGE)
-			e2:SetValue(cm.damval)
-			Duel.RegisterEffect(e2,tp)
-			local e3=e2:Clone()
-			e3:SetCode(EFFECT_NO_EFFECT_DAMAGE)
-			Duel.RegisterEffect(e3,tp)
+			RD.CreateNoBattleDamageEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
+			RD.CreateNoEffectDamageEffect(e,aux.Stringid(m,2),cm.damval,tp,1,0,RESET_PHASE+PHASE_END)
 		end
 	end)
 end

script/c120259005.lua

@@ -31,13 +31,5 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if tc and tc:IsRelateToBattle() then
 		Duel.Destroy(tc,REASON_EFFECT)
 	end
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetDescription(aux.Stringid(m,1))
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
-	e1:SetTargetRange(1,0)
-	e1:SetValue(1)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
+	RD.CreateNoBattleDamageEffect(e,aux.Stringid(m,1),tp,1,0,RESET_PHASE+PHASE_END)
 end
\ No newline at end of file

script/c120261065.lua

+local m=120261065
+local cm=_G["c"..m]
+cm.name="神疑之光来"
+function cm.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_CUSTOM+m)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+	--Event
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_TO_GRAVE)
+		ge1:SetOperation(cm.event)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+--Activate
+function cm.filter(c,tp)
+	return c:IsPreviousControler(tp)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.filter,1,nil,1-tp)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
+	RD.TargetDraw(tp,2)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	if RD.Draw()==0 then return end
+	local g=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
+	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
+		Duel.BreakEffect()
+		RD.SendOpponentHandToGrave(tp,aux.Stringid(m,2),1,1)
+	end
+end
+--Event
+function cm.event(e,tp,eg,ep,ev,re,r,rp)
+	local g=eg:Filter(Card.IsPreviousLocation,nil,LOCATION_MZONE)
+	if g:GetCount()>0 then
+		Duel.RaiseEvent(g,EVENT_CUSTOM+m,re,r,rp,ep,ev)
+	end
+end
\ No newline at end of file