byd

expansions/script/c18586014.lua

@@ -51,7 +51,7 @@ function cm.matfilter1(c)
 	return c:IsFusionType(TYPE_FUSION) and c:IsFusionAttribute(ATTRIBUTE_EARTH) and c:IsRace(RACE_PLANT)
 end
 function cm.matfilter2(c,fc,sub,mg,sg)
-	return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
+	return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,aux.AND(c,cm.matfilter1)==0 or sg:IsExists(Card.IsFusionCode,1,aux.AND(c,cm.matfilter1),c:GetFusionCode()))
 end
 function cm.actlim(e,re,tp)
 	if not re:IsActivated() or re:GetCode()~=EVENT_SUMMON_SUCCESS

expansions/script/c18586082.lua

@@ -24,14 +24,14 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.thop)
 	c:RegisterEffect(e2)
 end
-function cm.exconfilter(c)
-	return c:IsFaceup() and not c:IsType(TYPE_TOKEN) and Duel.IsExistingMatchingCard(cm.cfilter,0,LOCATION_MZONE,0,1,c,c:GetCode())
+function cm.exconfilter(c,tp)
+	return c:IsFaceup() and not c:IsType(TYPE_TOKEN) and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,c,c:GetCode())
 end
 function cm.cfilter(c,code)
 	return c:IsFaceup() and c:IsCode(code) and not c:IsType(TYPE_TOKEN)
 end
 function cm.excon(tp)
-	return Duel.IsExistingMatchingCard(cm.exconfilter,tp,LOCATION_MZONE,0,1,nil)
+	return Duel.IsExistingMatchingCard(cm.exconfilter,tp,LOCATION_MZONE,0,1,nil,tp)
 end
 function cm.filter1(c,e)
 	return not c:IsImmuneToEffect(e)

expansions/script/c50218138.lua

@@ -97,27 +97,28 @@ end
 function c50218138.atkcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
 end
+function c50218138.atkfilter(c)
+	return c:IsFaceup() and (not c:IsAttack(0) or not c:IsDefense(0))
+end
 function c50218138.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c50218138.atkfilter,tp,0,LOCATION_MZONE,1,nil) end
 end
 function c50218138.atkop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local tg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+	local tg=Duel.GetMatchingGroup(c50218138.atkfilter,tp,0,LOCATION_MZONE,nil)
 	local tc=tg:GetFirst()
 	while tc do
-		local atk=tc:GetAttack()
-		local def=tc:GetDefense()
 		local e1=Effect.CreateEffect(c)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
 		e1:SetValue(0)
-		e1:SetReset(RESET_EVENT+0x1fe0000)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 		tc:RegisterEffect(e1)
 		local e2=Effect.CreateEffect(c)
 		e2:SetType(EFFECT_TYPE_SINGLE)
 		e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
 		e2:SetValue(0)
-		e2:SetReset(RESET_EVENT+0x1fe0000)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
 		tc:RegisterEffect(e2)
 		tc=tg:GetNext()
 	end

expansions/script/c50222100.lua

@@ -34,6 +34,7 @@ function c50222100.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e4:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e4:SetCondition(c50222100.efcon)
+	e4:SetTarget(c50222100.eftg)
 	e4:SetOperation(c50222100.efop)
 	c:RegisterEffect(e4)
 	--tohand
@@ -94,13 +95,24 @@ end
 function c50222100.efcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
 end
+function c50222100.effilter(c)
+	return c:IsFaceup() and c:GetType()&TYPE_EFFECT~=0
+end
+function c50222100.eftg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c50222100.effilter,tp,0,LOCATION_MZONE,1,nil) end
+end
 function c50222100.efop(e,tp,eg,ep,ev,re,r,rp)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CANNOT_TRIGGER)
-	e1:SetTargetRange(0,LOCATION_MZONE)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
+	local c=e:GetHandler()
+	local tg=Duel.GetMatchingGroup(c50222100.effilter,tp,0,LOCATION_MZONE,nil)
+	local tc=tg:GetFirst()
+	while tc do
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CANNOT_TRIGGER)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+		tc=tg:GetNext()
+	end
 end
 function c50222100.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local g=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)

expansions/script/c60150610.lua

@@ -140,7 +140,7 @@ function c60150610.gfilter(c)
 end
 function c60150610.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g1=Duel.SelectMatchingCard(tp,c60150610.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp,c)
-	local g2=Duel.SelectMatchingCard(tp,c60150610.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst(),c)
+	local g2=Duel.SelectMatchingCard(tp,c60150610.spfilter2,tp,LOCATION_MZONE,0,1,1,g1:GetFirst(),c)
 	g1:Merge(g2)
 	local tc=g1:GetFirst()
 	while tc do

expansions/script/c60150611.lua

@@ -168,7 +168,7 @@ function c60150611.gfilter(c)
 end
 function c60150611.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g1=Duel.SelectMatchingCard(tp,c60150611.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp,c)
-	local g2=Duel.SelectMatchingCard(tp,c60150611.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst(),c)
+	local g2=Duel.SelectMatchingCard(tp,c60150611.spfilter2,tp,LOCATION_MZONE,0,1,1,g1:GetFirst(),c)
 	g1:Merge(g2)
 	local tc=g1:GetFirst()
 	while tc do

expansions/script/c60150612.lua

@@ -71,7 +71,7 @@ function c60150612.gfilter(c)
 end
 function c60150612.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g1=Duel.SelectMatchingCard(tp,c60150612.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp,c)
-	local g2=Duel.SelectMatchingCard(tp,c60150612.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst(),c)
+	local g2=Duel.SelectMatchingCard(tp,c60150612.spfilter2,tp,LOCATION_MZONE,0,1,1,g1:GetFirst(),c)
 	g1:Merge(g2)
 	local tc=g1:GetFirst()
 	while tc do

expansions/script/c60150613.lua

@@ -82,7 +82,7 @@ function c60150613.gfilter(c)
 end
 function c60150613.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g1=Duel.SelectMatchingCard(tp,c60150613.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp,c)
-	local g2=Duel.SelectMatchingCard(tp,c60150613.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst(),c)
+	local g2=Duel.SelectMatchingCard(tp,c60150613.spfilter2,tp,LOCATION_MZONE,0,1,1,g1:GetFirst(),c)
 	g1:Merge(g2)
 	local tc=g1:GetFirst()
 	while tc do

expansions/script/c60150614.lua

@@ -80,7 +80,7 @@ function c60150614.gfilter(c)
 end
 function c60150614.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g1=Duel.SelectMatchingCard(tp,c60150614.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp,c)
-	local g2=Duel.SelectMatchingCard(tp,c60150614.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst(),c)
+	local g2=Duel.SelectMatchingCard(tp,c60150614.spfilter2,tp,LOCATION_MZONE,0,1,1,g1:GetFirst(),c)
 	g1:Merge(g2)
 	local tc=g1:GetFirst()
 	while tc do

expansions/script/c60150615.lua

@@ -110,7 +110,7 @@ function c60150615.gfilter(c)
 end
 function c60150615.sprop(e,tp,eg,ep,ev,re,r,rp,c)
 	local g1=Duel.SelectMatchingCard(tp,c60150615.spfilter1,tp,LOCATION_ONFIELD,0,1,1,nil,tp,c)
-	local g2=Duel.SelectMatchingCard(tp,c60150615.spfilter2,tp,LOCATION_ONFIELD,0,1,1,g1:GetFirst(),c)
+	local g2=Duel.SelectMatchingCard(tp,c60150615.spfilter2,tp,LOCATION_MZONE,0,1,1,g1:GetFirst(),c)
 	g1:Merge(g2)
 	local tc=g1:GetFirst()
 	while tc do

expansions/script/c96071015.lua

@@ -73,15 +73,14 @@ function cm.tcfilter(c)
 	return c:IsCode(96071000) and c:IsAbleToHand()
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.tcfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(cm.tcfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectTarget(tp,cm.tcfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.tcfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,cm.tcfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
 	end
 end
\ No newline at end of file

expansions/script/c96071111.lua

@@ -83,7 +83,6 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 end
 --up
 function cm.lvcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
 	return re:GetHandler():IsSetCard(0xef1) and not c:IsCode(m)
 end
 function cm.lvop(e,tp,eg,ep,ev,re,r,rp)