Refresh on 2025-07-06 16:41:07

script/c172016018.lua

 --转瞬即逝的噩梦
 local s,id,o=GetID()
+o=1e9
 function s.initial_effect(c)
     --activate
     local e0=Effect.CreateEffect(c)
@@ -72,15 +73,17 @@ end
 
 function s.desop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
-	Duel.Destroy(tc,REASON_EFFECT)
+	if Duel.Destroy(tc,REASON_EFFECT)>0 and tc:IsType(TYPE_PENDULUM) then
+        e:GetHandler():RegisterFlagEffect(id+o,RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+    end
 end
 
 function s.sdcon(e,tp,eg,ep,ev,re,r,rp)
-    return not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,22200403)
+    return e:GetHandler():GetFlagEffect(id+o)>0 and not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,22200403)
 end
 function s.sdop(e,tp,eg,ep,ev,re,r,rp)
     local c=e:GetHandler()
     if Duel.Damage(tp,3000,REASON_EFFECT)>0 then
         Duel.Destroy(c,REASON_EFFECT)
     end
-end
+end
\ No newline at end of file

script/c172016019.lua

@@ -21,9 +21,7 @@ function s.cfilter(c,id)
 	return c:IsFaceup() and c:IsCode(id)
 end
 function s.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetLocationCount(tp,LOCATION_SZONE)>=3 and (
-           Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD,0,1,nil,53375573)
-        or Duel.IsExistingMatchingCard(s.cfilter,tp,0,LOCATION_ONFIELD,1,nil,53982768))
+	return Duel.GetLocationCount(tp,LOCATION_SZONE)>=3
 end
 function s.filter(c,tp,code)
 	return c:IsCode(code) and c:GetActivateEffect():IsActivatable(tp,true,true)
@@ -35,6 +33,8 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
     end
 end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
+    local skip=Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD,0,1,nil,53375573)
+            or Duel.IsExistingMatchingCard(s.cfilter,tp,0,LOCATION_ONFIELD,1,nil,53982768)
     for _, tid in ipairs({82732705,73599290,68937720}) do
         local tc=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil,tp,tid):GetFirst()
         if tc then
@@ -42,8 +42,10 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
             local te=tc:GetActivateEffect()
             te:UseCountLimit(tp,1,true)
             local tep=tc:GetControler()
-            local cost=te:GetCost()
-            if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
+            if not skip then
+                local cost=te:GetCost()
+                if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
+            end
             Duel.RaiseEvent(tc,tid,te,0,tp,tp,Duel.GetCurrentChain())
         else
             return

script/c172016041.lua

---神之预告
-local s,id=GetID()
-function s.initial_effect(c)
-	--Activate(summon)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_SPSUMMON)
-	e1:SetCost(s.cost1)
-	e1:SetTarget(s.target1)
-	e1:SetOperation(s.activate1)
-	c:RegisterEffect(e1)
-	--act in hand
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
-	e2:SetCondition(s.handcon)
-	c:RegisterEffect(e2)
-	Duel.AddCustomActivityCounter(id,ACTIVITY_CHAIN,s.chainfilter)
-end
-function s.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	local lp=math.floor(Duel.GetLP(tp)/2)
-	Duel.PayLPCost(tp,lp)
-	e:SetLabel(lp)
-end
-function s.target1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,2,0,0)
-end
-function s.activate1(e,tp,eg,ep,ev,re,r,rp)
-	local c1=Duel.AnnounceCard(tp)
-	local c2=Duel.AnnounceCard(1-tp)
-	if c1~=c2 then
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
-		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		e1:SetCode(EVENT_SPSUMMON)
-		e1:SetCondition(s.ngcon)
-		e1:SetOperation(s.ngop)
-		e1:SetLabel(c1)
-		e1:SetLabelObject(e)
-		Duel.RegisterEffect(e1,tp)
-	end
-end
-function s.ngcon(e,tp,eg,ep,ev,re,r,rp)
-	return aux.NegateSummonCondition(e,tp,eg,ep,ev,re,r,rp) and eg:IsExists(Card.IsCode,1,nil,e:GetLabel())
-end
-function s.ngop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.NegateSummon(eg)
-	Duel.Destroy(eg,REASON_EFFECT)
-	Duel.Remove(Duel.GetMatchingGroup(Card.IsCode,tp,0,LOCATION_EXTRA,nil,e:GetLabel()),POS_FACEDOWN,REASON_EFFECT)
-	Duel.Recover(tp,e:GetLabelObject():GetLabel(),REASON_EFFECT)
-	local c=e:GetLabelObject():GetHandler()
-	if c:IsLocation(LOCATION_GRAVE) and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
-		Duel.BreakEffect()
-		Duel.SendtoHand(c,nil,REASON_EFFECT)
-	end
-end
-
-function s.handcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCustomActivityCount(id,e:GetHandlerPlayer(),ACTIVITY_CHAIN)==0 --and ep~=tp
-end
-function s.chainfilter(re,tp,cid)
-	local rc=re:GetHandler()
-	if rc==nil then return true end
-	return not rc:IsType(TYPE_MONSTER+TYPE_SPELL)
-end
+--神之预告
+local s,id=GetID()
+function s.initial_effect(c)
+	--Activate(summon)
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_SPSUMMON)
+	e1:SetCondition(s.con1)
+	e1:SetCost(s.cost1)
+	e1:SetTarget(s.target1)
+	e1:SetOperation(s.activate1)
+	c:RegisterEffect(e1)
+	--act in hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
+	e2:SetCondition(s.handcon)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_CHAIN,s.chainfilter)
+end
+function s.con1(e,tp,eg,ep,ev,re,r,rp)
+	return ep~=tp
+end
+function s.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local lp=math.floor(Duel.GetLP(tp)/2)
+	Duel.PayLPCost(tp,lp)
+	e:SetLabel(lp)
+end
+function s.target1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,2,0,0)
+end
+function s.activate1(e,tp,eg,ep,ev,re,r,rp)
+	local c1=Duel.AnnounceCard(tp)
+	local c2=Duel.AnnounceCard(1-tp)
+	if c1~=c2 then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_SPSUMMON)
+		e1:SetCondition(s.ngcon)
+		e1:SetOperation(s.ngop)
+		e1:SetLabel(c1)
+		e1:SetLabelObject(e)
+		Duel.RegisterEffect(e1,tp)
+	end
+end
+function s.ngcon(e,tp,eg,ep,ev,re,r,rp)
+	return aux.NegateSummonCondition(e,tp,eg,ep,ev,re,r,rp) and eg:IsExists(Card.IsCode,1,nil,e:GetLabel())
+end
+function s.ngop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.NegateSummon(eg)
+	Duel.Destroy(eg,REASON_EFFECT)
+	Duel.Remove(Duel.GetMatchingGroup(Card.IsCode,tp,0,LOCATION_EXTRA,nil,e:GetLabel()),POS_FACEDOWN,REASON_EFFECT)
+	Duel.Recover(tp,e:GetLabelObject():GetLabel(),REASON_EFFECT)
+	local c=e:GetLabelObject():GetHandler()
+	if c:IsLocation(LOCATION_GRAVE) and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
+		Duel.BreakEffect()
+		Duel.SendtoHand(c,nil,REASON_EFFECT)
+	end
+end
+
+function s.handcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCustomActivityCount(id,e:GetHandlerPlayer(),ACTIVITY_CHAIN)==0 --and ep~=tp
+end
+function s.chainfilter(re,tp,cid)
+	local rc=re:GetHandler()
+	if rc==nil then return true end
+	return not rc:IsType(TYPE_MONSTER+TYPE_SPELL)
+end