fix

expansions/script/c1300910.lua

@@ -31,16 +31,17 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 end
 function s.operation(e,tp,eg,ep,ev,re,r,rp)
+	::SynMixTargetSelectCancel::
 	local mg=Duel.GetMatchingGroup(s.filter,tp,LOCATION_GRAVE+LOCATION_EXTRA,LOCATION_GRAVE+LOCATION_EXTRA,nil)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local tc=Duel.SelectMatchingCard(tp,Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,1,nil,nil,mg,nil,4):GetFirst()
 	if not tc then return end
-		local lv=tc:GetLevel()
+		local lv=24
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL)
 		aux.GCheckAdditional=s.syncheckadditional(lv)
-		local sg=mg:SelectSubGroup(tp,s.syncheck,false,1,4,tc)
+		local sg=mg:SelectSubGroup(tp,s.syncheck,true,1,4,tc)
 		aux.GCheckAdditional=nil
-		if not sg then return end
+		if not sg then goto SynMixTargetSelectCancel end
 			tc:SetMaterial(sg)
 			Duel.Remove(sg,POS_FACEUP,REASON_MATERIAL+REASON_SYNCHRO)
 			Duel.BreakEffect()

expansions/script/c16104436.lua

@@ -5,7 +5,7 @@ Duel.LoadScript("c16199990.lua")
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
 	aux.EnablePendulumAttribute(c) 
-	aux.AddFusionProcFun2(c,cm.fuscheck1,nil,true)
+	aux.AddFusionProcFun2(c,cm.fuscheck,aux.TRUE,true)
 	--Effect 1
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
@@ -41,7 +41,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3) 
 end
 function cm.fuscheck(c)
-	return c:check("TENKAISI")
+	return c:IsCode(16104421,16104424,16104425)
 end
 --Effect 1
 function cm.splimit(e,c)

expansions/script/c16314030.lua

+--完美典范 究极骑士颅骨兽
+function c16314030.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,3,99,c16314030.lcheck)
+	c:EnableReviveLimit()
+	--set
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(16314030,1))
+	e1:SetCategory(CATEGORY_LEAVE_GRAVE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetTarget(c16314030.target)
+	e1:SetOperation(c16314030.operation)
+	c:RegisterEffect(e1)
+	--
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c16314030.chcon)
+	e2:SetTarget(c16314030.chtg)
+	e2:SetOperation(c16314030.chop)
+	c:RegisterEffect(e2)
+	--Activate
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(16314030,3))
+	e3:SetCategory(CATEGORY_DESTROY)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetTarget(c16314030.target2)
+	e3:SetOperation(c16314030.activate2)
+	c:RegisterEffect(e3)
+end
+function c16314030.lcheck(g,lc)
+	return g:IsExists(Card.IsLinkRace,1,nil,RACE_WARRIOR)
+end
+function c16314030.pfilter(c,tp)
+	return c:IsCode(16314110) and not c:IsForbidden() and c:CheckUniqueOnField(tp)
+end
+function c16314030.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsExistingMatchingCard(c16314030.pfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,tp) end
+end
+function c16314030.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c16314030.pfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
+	if tc then Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) end
+end
+function c16314030.chcon(e,tp,eg,ep,ev,re,r,rp)
+	return rp==1-tp and re:IsActiveType(TYPE_MONSTER)
+end
+function c16314030.chtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsPosition,tp,0,LOCATION_MZONE,1,nil,POS_FACEUP_ATTACK) end
+end
+function c16314030.chop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Group.CreateGroup()
+	Duel.ChangeTargetCard(ev,g)
+	Duel.ChangeChainOperation(ev,c16314030.repop)
+end
+function c16314030.atkfilter(c)
+	return c:IsFaceup() and c:IsCode(16314030)
+end
+function c16314030.repop(e,tp,eg,ep,ev,re,r,rp)
+	local ag=Duel.GetMatchingGroup(Card.IsPosition,tp,LOCATION_MZONE,0,nil,POS_FACEUP_ATTACK)
+	if #ag<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATTACK)
+	local ac=ag:Select(tp,1,1,nil):GetFirst()
+	if not ac then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATTACKTARGET)
+	local g=Duel.SelectMatchingCard(tp,c16314030.atkfilter,tp,0,LOCATION_MZONE,1,1,nil)
+	if g:GetCount()>0 then
+		local tc=g:GetFirst()
+		Duel.CalculateDamage(ac,tc,true)
+	end
+end
+function c16314030.cfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x3dc2)
+end
+function c16314030.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsType(TYPE_SPELL+TYPE_TRAP) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c16314030.cfilter,tp,LOCATION_ONFIELD,0,1,nil)
+		and Duel.IsExistingTarget(Card.IsType,tp,0,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) end
+	local ct=Duel.GetMatchingGroupCount(c16314030.cfilter,tp,LOCATION_ONFIELD,0,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local sg=Duel.SelectTarget(tp,Card.IsType,tp,0,LOCATION_ONFIELD,1,ct,nil,TYPE_SPELL+TYPE_TRAP)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
+end
+function c16314030.activate2(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	Duel.Destroy(g,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c18030511.lua

@@ -54,16 +54,16 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function s.tdfilter(c)
-	return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
-		and (not c:IsLocation(LOCATION_REMOVED) or c:IsFaceup())
+	return c:IsType(TYPE_TUNER) and c:IsAbleToDeck()
+		and c:IsFaceupEx()
 end
 function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(s.tdfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
 end
 function s.tdop(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.tdfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.tdfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 	local sg=g:SelectSubGroup(tp,aux.dabcheck,false,1,7)
 	if sg:GetCount()>0 and Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)~=0 then
 		local og=Duel.GetOperatedGroup()

expansions/script/c18032401.lua

@@ -78,7 +78,7 @@ function s.aclimit(e,re,tp)
 		and re:GetHandler():IsLocation(LOCATION_GRAVE)
 end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then e:IsCostChecked()
+	if chk==0 then return e:IsCostChecked()
 		and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
 	local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
 	if e:GetLabel()~=1 then

expansions/script/c18032404.lua

@@ -79,20 +79,14 @@ function s.aclimit(e,re,tp)
 end
 function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:IsCostChecked()
-		and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
-	local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+		and Duel.IsPlayerCanDraw(tp,1) end
 	if e:GetLabel()~=1 then
-		Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+		Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
 	end
 end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
 	if e:GetLabel()==1 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,3,nil)
-	if g:GetCount()>0 then
-		Duel.HintSelection(g)
-		Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
-	end
+	Duel.Draw(tp,1,REASON_EFFECT)
 end
 function s.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return re:IsActiveType(TYPE_TRAP) and re:IsHasType(EFFECT_TYPE_ACTIVATE)

expansions/script/c47330613.lua

@@ -67,6 +67,17 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
             Duel.SendtoHand(tg,tp,REASON_EFFECT)
         end
 	end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return c:IsLocation(LOCATION_EXTRA) and not c:IsType(TYPE_PENDULUM)
 end
 function s.todeck(c)
     local e1=Effect.CreateEffect(c)

expansions/script/c47330614.lua

@@ -49,6 +49,17 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
 		tc:CompleteProcedure()
 	end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return c:IsLocation(LOCATION_EXTRA) and not c:IsType(TYPE_PENDULUM)
 end
 function s.todeck(c)
     local e1=Effect.CreateEffect(c)

expansions/script/c5012610.lua

@@ -8,9 +8,14 @@ function s.initial_effect(c)
 	aux.AddXyzProcedureLevelFree(c,s.mfilter,nil,3,3)
 	--summon success
 	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e1:SetDescription(1109)
+	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	--e1:SetOperation(s.sumsuc)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCondition(s.thcon)
+	e1:SetTarget(s.thtg)
+	e1:SetOperation(s.thop)
 	c:RegisterEffect(e1)
 	--ntr
 	local e2=Effect.CreateEffect(c)
@@ -36,23 +41,22 @@ function s.initial_effect(c)
 	e3:SetOperation(s.operation2)
 	c:RegisterEffect(e3)
 end
-function s.mfilter(c,xyzc)
-	return (c.MoJin or c:IsSetCard(0x23c)) 
+function s.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
 end
-function s.cfilter(c)
-	return c:IsCode(5012604) and c:IsFaceup()
+function s.filter(c)
+	return aux.IsCodeListed(c,5012604) and c:IsAbleToHand()
 end
-function s.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if not c:IsSummonType(SUMMON_TYPE_XYZ) then return end
-	if Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil) 
-		and Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_DECK,0,1,nil) then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 then
-			Duel.SendtoHand(g,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,g)
-		end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.filter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
 	end
 end
 function s.condition1(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c5012626.lua

@@ -2,7 +2,6 @@
 local s,id,o=GetID()
 s.MoJin=true
 function s.initial_effect(c)
-	aux.AddCodeList(c,5012604)
 	aux.EnablePendulumAttribute(c)
 	c:EnableReviveLimit()
 	--spsummon condition
@@ -29,9 +28,9 @@ function s.initial_effect(c)
 	e3:SetCategory(CATEGORY_DRAW)
 	e3:SetType(EFFECT_TYPE_QUICK_O)
 	e3:SetCode(EVENT_CHAINING)
-	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
 	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,id)
+	e3:SetCountLimit(1)
 	e3:SetCondition(s.discon)
 	e3:SetTarget(s.drawtg)
 	e3:SetOperation(s.drawop)
@@ -42,9 +41,9 @@ function s.initial_effect(c)
 	e4:SetDescription(aux.Stringid(id,1))
 	e4:SetType(EFFECT_TYPE_QUICK_O)
 	e4:SetCode(EVENT_CHAINING)
-	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
 	e4:SetRange(LOCATION_MZONE)
-	e4:SetCountLimit(1,id+1)
+	e4:SetCountLimit(1)
 	e4:SetCondition(s.discon)
 	e4:SetTarget(s.immtg)
 	e4:SetOperation(s.immop)
@@ -56,9 +55,9 @@ function s.initial_effect(c)
 	e5:SetCategory(CATEGORY_DESTROY)
 	e5:SetType(EFFECT_TYPE_QUICK_O)
 	e5:SetCode(EVENT_CHAINING)
-	e5:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e5:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
 	e5:SetRange(LOCATION_MZONE)
-	e5:SetCountLimit(1,id+2)
+	e5:SetCountLimit(1)
 	e5:SetCondition(s.discon)
 	e5:SetTarget(s.destg)
 	e5:SetOperation(s.desop)
@@ -70,9 +69,9 @@ function s.initial_effect(c)
 	e6:SetCategory(CATEGORY_HANDES)
 	e6:SetType(EFFECT_TYPE_QUICK_O)
 	e6:SetCode(EVENT_CHAINING)
-	e6:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e6:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL+EFFECT_FLAG_NO_TURN_RESET)
 	e6:SetRange(LOCATION_MZONE)
-	e6:SetCountLimit(1,id+3)
+	e6:SetCountLimit(1)
 	e6:SetCondition(s.discon)
 	e6:SetTarget(s.distg)
 	e6:SetOperation(s.disop)

expansions/script/c5012638.lua

@@ -2,7 +2,6 @@
 local s,id,o=GetID()
 s.MoJin=true
 function s.initial_effect(c)
-	aux.AddCodeList(c,5012604)
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_DECKDES)

expansions/script/c60010275.lua

@@ -32,8 +32,8 @@ function cm.retg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 end
 function cm.retop1(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if Duel.SelectYesNo(tp,aux.Stringid(m,2))~=0 and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
+	local c=e:GetHandler() 
+	if Duel.SelectYesNo(tp,aux.Stringid(m,2)) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) then
 		local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
 		if #g~=0 and Duel.IsEnvironment(60010029,tp) then
 			Duel.Destroy(g,REASON_EFFECT)

expansions/script/c64800019.lua

@@ -43,15 +43,15 @@ function cm.filter(c)
 	return  c:IsSetCard(0x9342)  and c:IsAbleToHand()
 end
 function cm.operation(e,tp,eg,ep,ev,re,r,rp,chk)
-   local c=e:GetHandler()
-   --negate
+  	local c=e:GetHandler()
+  	--negate
 	local e5=Effect.CreateEffect(c)
 	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e5:SetCode(EVENT_CHAIN_SOLVING)
 	e5:SetOperation(cm.negop)
 	e5:SetReset(RESET_EVENT+0x1fe0000+RESET_CHAIN)
 	Duel.RegisterEffect(e5,tp)  
---sps
+	--sps
 	local e6=Effect.CreateEffect(c)
 	e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e6:SetCode(EVENT_PHASE+PHASE_STANDBY)
@@ -86,9 +86,10 @@ function cm.spfilter1(c,e,tp)
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:GetFlagEffect(m+1)>0 and Duel.GetTurnCount()-c:GetTurnID()==1 and  Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+	if c:GetFlagEffect(m+1)>0 --and Duel.GetTurnCount()-c:GetTurnID()==1 
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(cm.spfilter1,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil,e,tp)
-		and Duel.SelectYesNo(tp,aux.Stringid(m,3))then 
+		and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then 
 			 Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 			local g=Duel.SelectMatchingCard(tp,cm.spfilter1,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,nil,e,tp)
 			if g:GetCount()>0 then

expansions/script/c81902600.lua

@@ -59,6 +59,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	if a and not b then
 		Duel.Hint(HINTMSG_SELECT,tp,HINTMSG_SPSUMMON)
 		local tc=g1:Select(tp,1,1,nil):GetFirst()
+		if not tc then return false end
 		if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
 		if tc:IsFacedown() or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
@@ -77,6 +78,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	elseif b and not a then
 		Duel.Hint(HINTMSG_SELECT,tp,HINTMSG_SPSUMMON)
 		local tc=g2:Select(tp,1,1,nil):GetFirst()
+		if not tc then return false end
 		if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
 		if tc:IsFacedown() or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
@@ -97,6 +99,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		if Duel.SelectOption(tp,aux.Stringid(m,1),aux.Stringid(m,2))==0 then
 			Duel.Hint(HINTMSG_SELECT,tp,HINTMSG_SPSUMMON)
 			local tc=g1:Select(tp,1,1,nil):GetFirst()
+			if not tc then return false end
 			if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
 			if tc:IsFacedown() or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
@@ -115,6 +118,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		else
 			Duel.Hint(HINTMSG_SELECT,tp,HINTMSG_SPSUMMON)
 			local tc=g2:Select(tp,1,1,nil):GetFirst()
+			if not tc then return false end
 			if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
 			if tc:IsFacedown() or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)