add 星騎士 セイクリッド・カドケウス

c1050186.lua

@@ -17,12 +17,13 @@ function c1050186.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c1050186.star_knight_summon_effect=e1
 end
 function c1050186.filter(c)
 	return c:IsSetCard(0x9c) and not c:IsCode(1050186) and c:IsAbleToGrave()
 end
-function c1050186.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c1050186.filter,tp,LOCATION_DECK,0,1,nil) end
+function c1050186.target(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c1050186.filter,tp,LOCATION_DECK,0,1,exc) end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
 end
 function c1050186.operation(e,tp,eg,ep,ev,re,r,rp)

c13851202.lua

@@ -15,6 +15,7 @@ function c13851202.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c13851202.star_knight_summon_effect=e1
 end
 function c13851202.filter(c)
 	return c:IsFaceup() and c:IsSetCard(0x9c)

c14759024.lua

@@ -13,12 +13,13 @@ function c14759024.initial_effect(c)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	c:RegisterEffect(e2)
+	c14759024.star_knight_summon_effect=e1
 end
 function c14759024.filter(c)
 	return c:IsSetCard(0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
-function c14759024.tg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c14759024.filter,tp,LOCATION_DECK,0,1,nil) end
+function c14759024.tg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c14759024.filter,tp,LOCATION_DECK,0,1,exc) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function c14759024.op(e,tp,eg,ep,ev,re,r,rp)

c15871676.lua

@@ -9,13 +9,14 @@ function c15871676.initial_effect(c)
 	e2:SetTarget(c15871676.sptg)
 	e2:SetOperation(c15871676.spop)
 	c:RegisterEffect(e2)
+	c15871676.star_knight_summon_effect=e2
 end
 function c15871676.filter(c,e,tp)
 	return c:IsSetCard(0x53) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
-function c15871676.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+function c15871676.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c15871676.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c15871676.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function c15871676.spop(e,tp,eg,ep,ev,re,r,rp)

c16906241.lua

@@ -9,13 +9,14 @@ function c16906241.initial_effect(c)
 	e2:SetTarget(c16906241.sptg)
 	e2:SetOperation(c16906241.spop)
 	c:RegisterEffect(e2)
+	c16906241.star_knight_summon_effect=e2
 end
 function c16906241.filter(c,e,tp)
 	return c:IsSetCard(0x53) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
 end
-function c16906241.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+function c16906241.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c16906241.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c16906241.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function c16906241.spop(e,tp,eg,ep,ev,re,r,rp)

c22617205.lua

@@ -28,6 +28,7 @@ function c22617205.initial_effect(c)
 	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e5:SetCondition(c22617205.condition)
 	c:RegisterEffect(e5)
+	c22617205.star_knight_summon_effect=e3
 end
 function c22617205.splimit(e,c,sump,sumtype,sumpos,targetp)
 	if c:IsSetCard(0x9c,0xc4) then return false end

c2273734.lua

@@ -17,6 +17,7 @@ function c2273734.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c2273734.star_knight_summon_effect=e1
 end
 function c2273734.filter(c,e,tp)
 	return c:IsSetCard(0x9c) and not c:IsCode(2273734) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)

c26057276.lua

@@ -17,13 +17,14 @@ function c26057276.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c26057276.star_knight_summon_effect=e1
 end
 function c26057276.filter(c)
 	return c:IsSetCard(0x9c) and not c:IsCode(26057276) and c:IsAbleToHand()
 end
-function c26057276.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function c26057276.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc,exc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c26057276.filter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c26057276.filter,tp,LOCATION_GRAVE,0,1,nil) end
+	if chk==0 then return Duel.IsExistingTarget(c26057276.filter,tp,LOCATION_GRAVE,0,1,exc) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectTarget(tp,c26057276.filter,tp,LOCATION_GRAVE,0,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)

c38667773.lua

@@ -17,13 +17,14 @@ function c38667773.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c38667773.star_knight_summon_effect=e1
 end
 function c38667773.filter(c,e,tp)
 	return c:IsSetCard(0x9c) and not c:IsCode(38667773) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
-function c38667773.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+function c38667773.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c38667773.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c38667773.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function c38667773.spop(e,tp,eg,ep,ev,re,r,rp)

c40143123.lua

@@ -9,13 +9,14 @@ function c40143123.initial_effect(c)
 	e2:SetTarget(c40143123.sptg)
 	e2:SetOperation(c40143123.spop)
 	c:RegisterEffect(e2)
+	c40143123.star_knight_summon_effect=e2
 end
 function c40143123.filter(c,e,tp)
 	return c:IsSetCard(0x53) and c:IsLevel(5) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
 end
-function c40143123.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+function c40143123.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c40143123.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c40143123.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function c40143123.spop(e,tp,eg,ep,ev,re,r,rp)

c41269771.lua

@@ -9,13 +9,14 @@ function c41269771.initial_effect(c)
 	e2:SetTarget(c41269771.sptg)
 	e2:SetOperation(c41269771.spop)
 	c:RegisterEffect(e2)
+	c41269771.star_knight_summon_effect=e2
 end
 function c41269771.filter(c,e,tp)
 	return c:IsSetCard(0x53) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
-function c41269771.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+function c41269771.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c41269771.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c41269771.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function c41269771.spop(e,tp,eg,ep,ev,re,r,rp)

c42391240.lua

@@ -13,13 +13,14 @@ function c42391240.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
+	c42391240.star_knight_summon_effect=e1
 end
 function c42391240.tgfilter(c)
 	return c:IsSetCard(0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
-function c42391240.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function c42391240.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc,exc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c42391240.tgfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c42391240.tgfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	if chk==0 then return Duel.IsExistingTarget(c42391240.tgfilter,tp,LOCATION_GRAVE,0,1,exc) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectTarget(tp,c42391240.tgfilter,tp,LOCATION_GRAVE,0,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)

c43513897.lua

@@ -11,6 +11,7 @@ function c43513897.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
+	c43513897.star_knight_summon_effect=e1
 end
 function c43513897.filter(c)
 	return c:IsFaceup() and c:IsSetCard(0x53)

c58858807.lua

+--星騎士 セイクリッド・カドケウス
+function c58858807.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddXyzProcedure(c,nil,4,2,nil,nil,99)
+	Duel.EnableGlobalFlag(GLOBALFLAG_XMAT_COUNT_LIMIT)
+	--to hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(58858807,0))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,58858807)
+	e1:SetCondition(c58858807.thcon)
+	e1:SetTarget(c58858807.thtg)
+	e1:SetOperation(c58858807.thop)
+	c:RegisterEffect(e1)
+	--copy star knight summon effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(58858807,1))
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,58858808)
+	e2:SetTarget(c58858807.copytg)
+	e2:SetOperation(c58858807.copyop)
+	c:RegisterEffect(e2)
+end
+function c58858807.thcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsSummonType(SUMMON_TYPE_XYZ)
+end
+function c58858807.thfilter(c,e)
+	return c:IsSetCard(0x9c,0x53) and c:IsCanBeEffectTarget(e) and c:IsAbleToHand()
+end
+function c58858807.fselect(g)
+	if #g==1 then return true end
+	return aux.gfcheck(g,Card.IsSetCard,0x9c,0x53)
+end
+function c58858807.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c58858807.thfilter(chkc,e) end
+	local g=Duel.GetMatchingGroup(c58858807.thfilter,tp,LOCATION_GRAVE,0,nil,e)
+	if chk==0 then return #g>0 end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local sg=g:SelectSubGroup(tp,c58858807.fselect,false,1,2)
+	Duel.SetTargetCard(sg)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c58858807.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetTargetsRelateToChain()
+	if #tg==0 then return end
+	Duel.SendtoHand(tg,nil,REASON_EFFECT)
+end
+function c58858807.efffilter(c,e,tp,eg,ep,ev,re,r,rp)
+	if not (c:IsSetCard(0x9c,0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()) then return false end
+	local te=c.star_knight_summon_effect
+	if not te then return false end
+	local tg=te:GetTarget()
+	return not tg or tg(e,tp,eg,ep,ev,re,r,rp,0,nil,c)
+end
+function c58858807.copytg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then
+		return e:IsCostChecked() and c:CheckRemoveOverlayCard(tp,1,REASON_COST)
+			and Duel.IsExistingMatchingCard(c58858807.efffilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp,eg,ep,ev,re,r,rp)
+	end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c58858807.efffilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
+	c:RemoveOverlayCard(tp,1,1,REASON_COST)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+	local tc=g:GetFirst()
+	Duel.ClearTargetCard()
+	e:SetLabelObject(tc)
+	local te=tc.star_knight_summon_effect
+	local tg=te:GetTarget()
+	if tg then tg(e,tp,eg,ep,ev,re,r,rp,1) end
+	Duel.ClearOperationInfo(0)
+end
+function c58858807.copyop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetLabelObject()
+	local te=tc.star_knight_summon_effect
+	local op=te:GetOperation()
+	if op then op(e,tp,eg,ep,ev,re,r,rp) end
+end

c63274863.lua

@@ -17,14 +17,15 @@ function c63274863.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c63274863.star_knight_summon_effect=e1
 end
 function c63274863.filter(c)
 	return c:IsSetCard(0x9c) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
 end
-function c63274863.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+function c63274863.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc,exc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c63274863.filter(chkc) end
 	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
-		and Duel.IsExistingTarget(c63274863.filter,tp,LOCATION_GRAVE,0,5,nil) end
+		and Duel.IsExistingTarget(c63274863.filter,tp,LOCATION_GRAVE,0,5,exc) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 	local g=Duel.SelectTarget(tp,c63274863.filter,tp,LOCATION_GRAVE,0,5,5,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,5,0,0)

c65056481.lua

@@ -17,6 +17,7 @@ function c65056481.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c65056481.star_knight_summon_effect=e1
 end
 function c65056481.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

c75878039.lua

@@ -17,12 +17,13 @@ function c75878039.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c75878039.star_knight_summon_effect=e1
 end
 function c75878039.filter(c)
 	return c:IsSetCard(0x9c) and c:IsType(TYPE_MONSTER) and not c:IsCode(75878039) and c:IsAbleToHand()
 end
-function c75878039.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c75878039.filter,tp,LOCATION_DECK,0,1,nil) end
+function c75878039.target(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c75878039.filter,tp,LOCATION_DECK,0,1,exc) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function c75878039.operation(e,tp,eg,ep,ev,re,r,rp)

c78486968.lua

@@ -9,12 +9,13 @@ function c78486968.initial_effect(c)
 	e1:SetTarget(c78486968.tg)
 	e1:SetOperation(c78486968.op)
 	c:RegisterEffect(e1)
+	c78486968.star_knight_summon_effect=e1
 end
 function c78486968.filter(c)
 	return c:IsSetCard(0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
-function c78486968.tg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c78486968.filter,tp,LOCATION_DECK,0,1,nil) end
+function c78486968.tg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
+	if chk==0 then return Duel.IsExistingMatchingCard(c78486968.filter,tp,LOCATION_DECK,0,1,exc) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function c78486968.op(e,tp,eg,ep,ev,re,r,rp)

c86466163.lua

@@ -16,6 +16,7 @@ function c86466163.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c86466163.star_knight_summon_effect=e1
 end
 function c86466163.operation(e,tp,eg,ep,ev,re,r,rp)
 	local e1=Effect.CreateEffect(e:GetHandler())

c96223501.lua

@@ -28,6 +28,7 @@ function c96223501.initial_effect(c)
 	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e5:SetCondition(c96223501.condition)
 	c:RegisterEffect(e5)
+	c96223501.star_knight_summon_effect=e3
 end
 function c96223501.splimit(e,c,sump,sumtype,sumpos,targetp)
 	if c:IsSetCard(0x9c,0xc4) then return false end

c99668578.lua

@@ -17,13 +17,14 @@ function c99668578.initial_effect(c)
 	local e3=e1:Clone()
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
+	c99668578.star_knight_summon_effect=e3
 end
 function c99668578.filter(c)
 	return c:IsSetCard(0x9c) and c:IsType(TYPE_MONSTER)
 end
-function c99668578.target(e,tp,eg,ep,ev,re,r,rp,chk)
+function c99668578.target(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
 	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
-		and Duel.IsExistingMatchingCard(c99668578.filter,tp,LOCATION_HAND,0,1,nil) end
+		and Duel.IsExistingMatchingCard(c99668578.filter,tp,LOCATION_HAND,0,1,exc) end
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
 end