Refresh on 2025-04-05 12:27:10

script/c101301222.lua

@@ -53,7 +53,7 @@ function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
 	local g=Duel.SelectMatchingCard(tp,s.spcostfilter,tp,LOCATION_HAND,0,1,1,c)
 	Duel.ConfirmCards(1-tp,g)
-	Duel.RaiseEvent(sg,EVENT_CUSTOM+9091064,e,REASON_COST,tp,tp,0)
+	Duel.RaiseEvent(g,EVENT_CUSTOM+9091064,e,REASON_COST,tp,tp,0)
 	Duel.ShuffleHand(tp)
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)

script/c101301266.lua

@@ -49,8 +49,7 @@ function s.spfilter(c,tp,attr)
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc,tp) end
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil,tp) end
+	if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
 	local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil,tp)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)

script/c114514030.lua

@@ -2,18 +2,17 @@
 local s,id,o=GetID()
 function s.initial_effect(c)
 	--synchro summon
+	c:EnableReviveLimit()
+	aux.AddSynchroMixProcedure(c,s.matfilter1,nil,nil,s.matfilter2,1,1)
 	local e0=Effect.CreateEffect(c)
-	e0:SetDescription(1164)
 	e0:SetType(EFFECT_TYPE_FIELD)
-	e0:SetCode(EFFECT_SPSUMMON_PROC)
-	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e0:SetCode(EFFECT_SYNCHRO_LEVEL_EX)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_IGNORE_IMMUNE)
 	e0:SetRange(LOCATION_EXTRA)
-	e0:SetCondition(s.LSynCondition)
-	e0:SetTarget(s.LSynTarget)
-	e0:SetOperation(Auxiliary.SynOperation())
-	e0:SetValue(SUMMON_TYPE_SYNCHRO)
+	e0:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e0:SetTarget(s.syntg)
+	e0:SetValue(s.synval)
 	c:RegisterEffect(e0)
-	c:EnableReviveLimit()
 	--special summon
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
@@ -37,122 +36,30 @@ function s.initial_effect(c)
 	e2:SetCondition(s.spcon)
 	e2:SetCost(s.spcost)
 	e2:SetTarget(s.sptg)
-	e2:SetOperation(s.spop) 
+	e2:SetOperation(s.spop)
 	c:RegisterEffect(e2)
 end
-function s.matfilter1(c,syncard,tp)
-	if c:IsFacedown() then return false end
-	if c:IsSynchroType(TYPE_LINK) and c:IsControler(tp) then return true end
-	return c:IsSynchroType(TYPE_TUNER) and c:IsCanBeSynchroMaterial(syncard) and (c:IsControler(tp) or Duel.GetSynchroMaterial(tp):IsContains(c))
-end
-function s.matfilter2(c,syncard,tp)
-	return (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) and c:IsNotTuner(syncard) and c:IsCanBeSynchroMaterial(syncard) and (c:IsControler(tp) or Duel.GetSynchroMaterial(tp):IsContains(c))
-end
-function s.val(c,syncard)
-	if c:IsSynchroType(TYPE_LINK) then
-		return c:GetLink()
-	else
-		return c:GetSynchroLevel(syncard)
-	end
+function s.matfilter1(c,syncard)
+	return c:IsTuner(syncard) or c:IsType(TYPE_LINK) and c:IsLink(1)
 end
-function s.synfilter(c,syncard,lv,g2,g3,minc,maxc,tp)
-	local tsg=c:IsHasEffect(EFFECT_HAND_SYNCHRO) and g3 or g2
-	return tsg:CheckSubGroup(s.goal,minc,maxc,tp,lv,syncard,c)
+function s.matfilter2(c,syncard)
+	return c:IsNotTuner(syncard) and not c:IsType(TYPE_LINK)
 end
-function s.goal(g,tp,lv,syncard,tuc)
-	if Duel.GetLocationCountFromEx(tp,tp,g,syncard)<=0 then return false end
-	if tuc:IsHasEffect(EFFECT_HAND_SYNCHRO) and g:IsExists(Card.IsLocation,2,tuc,LOCATION_HAND) then return false end
-	local lg=g:__add(tuc)
-	return lg:GetSum(s.val,syncard)==lv
-end
-function s.LSynCondition(e,c,tuner,mg,min,max)
-	if c==nil then return true end
-	if c:IsType(TYPE_PENDULUM) and c:IsFaceup() then return false end
-	local tp=c:GetControler()
-	local minc=1
-	local maxc=c:GetLevel()-1
-	if min then
-		if min>minc then minc=min end
-		if max<maxc then maxc=max end
-		if minc>maxc then return false end
-	end
-	local g1=nil
-	local g2=nil
-	local g3=nil
-	if mg then
-		g1=mg:Filter(s.matfilter1,nil,c,tp)
-		g2=mg:Filter(s.matfilter2,nil,c,tp)
-		g3=g2:Clone()
-	else
-		g1=Duel.GetMatchingGroup(s.matfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c,tp)
-		g2=Duel.GetMatchingGroup(s.matfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c,tp)
-		g3=Duel.GetMatchingGroup(s.matfilter2,tp,LOCATION_MZONE+LOCATION_HAND,LOCATION_MZONE,nil,c,tp)
-	end
-	local pe=Duel.IsPlayerAffectedByEffect(tp,EFFECT_MUST_BE_SMATERIAL)
-	local lv=c:GetLevel()
-	local sg=nil
-	if tuner then
-		return s.matfilter1(c,tp) and s.synfilter(tuner,c,lv,g2,g3,minc,maxc,tp)
-	elseif pe then
-		return s.matfilter1(pe:GetOwner(),tp) and s.synfilter(pe:GetOwner(),c,lv,g2,g3,minc,maxc,tp)
-	else
-		return g1:IsExists(s.synfilter,1,nil,c,lv,g2,g3,minc,maxc,tp)
-	end
+function s.syntg(e,c)
+	return c:IsType(TYPE_LINK) and c:IsLink(1)
 end
-function s.LSynTarget(e,tp,eg,ep,ev,re,r,rp,chk,c,tuner,mg,min,max)
-	local minc=1
-	local maxc=c:GetLevel()-1
-	if min then
-		if min>minc then minc=min end
-		if max<maxc then maxc=max end
-		if minc>maxc then return false end
-	end
-	local g1=nil
-	local g2=nil
-	local g3=nil
-	if mg then
-		g1=mg:Filter(s.matfilter1,nil,c,tp)
-		g2=mg:Filter(s.matfilter2,nil,c,tp)
-		g3=g2:Clone()
-	else
-		g1=Duel.GetMatchingGroup(s.matfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c,tp)
-		g2=Duel.GetMatchingGroup(s.matfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c,tp)
-		g3=Duel.GetMatchingGroup(s.matfilter2,tp,LOCATION_MZONE+LOCATION_HAND,LOCATION_MZONE,nil,c,tp)
-	end
-	local pe=Duel.IsPlayerAffectedByEffect(tp,EFFECT_MUST_BE_SMATERIAL)
-	local lv=c:GetLevel()
-	local tuc=nil
-	if tuner then
-		tuc=tuner
+function s.synval(e,syncard)
+	if e:GetHandler()==syncard then
+		return 1
 	else
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL)
-		if not pe then
-			local sg=g1:Filter(s.synfilter,nil,c,lv,g2,g3,minc,maxc,tp):CancelableSelect(tp,1,1,nil)
-			if sg then
-				tuc=sg:GetFirst()
-			else
-				return false
-			end
-		else
-			tuc=pe:GetOwner()
-			Group.FromCards(tuc):Select(tp,1,1,nil)
-		end
+		return 0
 	end
-	local tsg=tuc:IsHasEffect(EFFECT_HAND_SYNCHRO) and g3 or g2
-	Duel.Hint(tp,HINT_SELECTMSG,HINTMSG_SMATERIAL)
-	local g=tsg:SelectSubGroup(tp,s.goal,true,minc,maxc,tp,lv,c,tuc)
-	if g then
-		g:AddCard(tuc)
-		g:KeepAlive()
-		e:SetLabelObject(g)
-		return true
-	else return false end
 end
 function s.gspcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
 end
 function s.gspfilter(c,e,tp)
-	return c:IsSetCard(0x2c8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
+	return c:IsSetCard(0x1ca) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
 end
 function s.gsptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>=2
@@ -167,9 +74,8 @@ function s.gspop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 		local sg=g:Select(tp,2,2,nil)
 		for tc in aux.Next(sg) do
-			Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 		end
-		Duel.SpecialSummonComplete()
 	end
 end
 function s.spcon(e,tp,eg,ep,ev,re,r,rp)
@@ -180,7 +86,7 @@ function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SendtoDeck(e:GetHandler(),nil,0,REASON_COST)
 end
 function s.spfilter(c,e,tp)
-	return c:IsSetCard(0x2c8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+	return c:IsSetCard(0x1ca) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetMZoneCount(tp,e:GetHandler(),tp)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end