update poly cards

expansions/lflist.conf

@@ -2527,7 +2527,6 @@
 79100330 1
 79100350 1
 #250209
-11561047 0
 98920657 0
 98920290 1
 60000223 2
@@ -6310,6 +6309,7 @@
 98941054 0
 98941055 0
 60002247 0
+15005088 0
 #limit
 33403513 1
 82204250 0

expansions/script/c9911204.lua

@@ -5,7 +5,6 @@ function c9911204.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,9911204)
 	e1:SetCost(c9911204.thcost)
 	e1:SetTarget(c9911204.thtg)
 	e1:SetOperation(c9911204.thop)
@@ -15,7 +14,7 @@ function c9911204.initial_effect(c)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,9911205)
+	e2:SetCountLimit(1,9911204)
 	e2:SetCost(c9911204.spcost)
 	e2:SetTarget(c9911204.sptg)
 	e2:SetOperation(c9911204.spop)

expansions/script/c9911208.lua

@@ -5,7 +5,6 @@ function c9911208.initial_effect(c)
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,9911208)
 	e1:SetCost(c9911208.thcost)
 	e1:SetTarget(c9911208.thtg)
 	e1:SetOperation(c9911208.thop)
@@ -15,7 +14,7 @@ function c9911208.initial_effect(c)
 	e2:SetCategory(CATEGORY_DECKDES+CATEGORY_DESTROY)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,9911209)
+	e2:SetCountLimit(1,9911208)
 	e2:SetCost(c9911208.setcost)
 	e2:SetTarget(c9911208.settg)
 	e2:SetOperation(c9911208.setop)

expansions/script/c9911230.lua

@@ -16,6 +16,7 @@ function c9911230.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetDescription(aux.Stringid(9911230,1))
 	e2:SetCategory(0)
+	e1:SetProperty(0)
 	e2:SetTarget(c9911230.eftg)
 	e2:SetOperation(c9911230.efop)
 	c:RegisterEffect(e2)
@@ -30,42 +31,22 @@ function c9911230.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local g=Duel.SelectMatchingCard(tp,c9911230.costfilter,tp,LOCATION_DECK,0,1,1,nil)
 	Duel.SendtoGrave(g,REASON_COST)
 end
-function c9911230.filter1(c,tp)
-	return c:IsFaceup() and c:IsType(TYPE_NORMAL) and c:IsAbleToHand()
-		and Duel.IsExistingTarget(c9911230.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,c)
-end
-function c9911230.filter2(c)
-	return c:IsFaceup() and c:IsType(TYPE_EFFECT) and c:IsAbleToHand()
+function c9911230.ckfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_NORMAL)
 end
 function c9911230.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return false end
-	if chk==0 then return Duel.IsExistingTarget(c9911230.filter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,tp) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g1=Duel.SelectTarget(tp,c9911230.filter1,tp,LOCATION_MZONE,0,1,1,nil,tp)
+	local ct=Duel.GetMatchingGroupCount(c9911230.ckfilter,tp,LOCATION_MZONE,0,nil)
+	if chkc then return chkc:IsOnField() and chkc:IsAbleToHand() and chkc~=e:GetHandler() end
+	if chk==0 then return ct>0 and Duel.IsExistingTarget(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g2=Duel.SelectTarget(tp,c9911230.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,g1:GetFirst())
-	g1:Merge(g2)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g1,2,0,0)
-end
-function c9911230.locfilter(c,sp)
-	return c:IsLocation(LOCATION_HAND) and c:IsControler(sp)
+	local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct,e:GetHandler())
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,#g,0,0)
 end
 function c9911230.thop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
 	if g:GetCount()>0 then
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 	end
-	local ct=Duel.GetOperatedGroup():FilterCount(c9911230.locfilter,nil,tp)
-	if ct==0 then
-		local g2=Duel.GetMatchingGroup(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-		if g2:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(9911230,2)) then
-			Duel.BreakEffect()
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-			local sg=g2:Select(tp,1,1,nil)
-			Duel.HintSelection(sg)
-			Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		end
-	end
 end
 function c9911230.eftg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

expansions/script/c9911233.lua

+--浩瀚生态的遗迹探掘
+function c9911233.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9911233,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetCountLimit(1,9911233+EFFECT_COUNT_CODE_OATH)
+	e1:SetCost(c9911233.cost)
+	e1:SetTarget(c9911233.sctg)
+	e1:SetOperation(c9911233.scop)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetDescription(aux.Stringid(9911233,1))
+	e2:SetCategory(0)
+	e2:SetTarget(c9911233.reptg)
+	e2:SetOperation(c9911233.repop)
+	c:RegisterEffect(e2)
+end
+function c9911233.costfilter(c)
+	return c:IsSetCard(0x5958) and c:IsType(TYPE_TRAP) and c:IsAbleToGraveAsCost()
+end
+function c9911233.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9911233.costfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9911233.costfilter,tp,LOCATION_DECK,0,1,1,nil)
+	Duel.SendtoGrave(g,REASON_COST)
+end
+function c9911233.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,nil,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c9911233.scop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,nil)
+	if g:GetCount()>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sg=g:Select(tp,1,1,nil)
+		Duel.SynchroSummon(tp,sg:GetFirst(),nil)
+	end
+end
+function c9911233.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+end
+function c9911233.repop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(9911233)
+	e1:SetCountLimit(1)
+	e1:SetTargetRange(1,0)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end

expansions/script/c9911454.lua

@@ -13,6 +13,7 @@ function c9911454.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
+	c9911454.morfonica_summon_effect=e1
 	--to hand(self)
 	local e3=Effect.CreateEffect(c)
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SUMMON)
@@ -27,6 +28,26 @@ function c9911454.initial_effect(c)
 	local e4=e3:Clone()
 	e4:SetCode(EVENT_REMOVE)
 	c:RegisterEffect(e4)
+	--adjust(disablecheck)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetCode(EVENT_ADJUST)
+	e5:SetRange(0xff)
+	e5:SetLabelObject(e1)
+	e5:SetOperation(c9911454.adjustop)
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetLabelObject(e2)
+	c:RegisterEffect(e6)
+end
+function c9911454.adjustop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=e:GetLabelObject()
+	if Duel.GetFlagEffect(tp,9921454)~=0 then
+		e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CAN_FORBIDDEN)
+	else
+		e1:SetProperty(EFFECT_FLAG_DELAY)
+	end
 end
 function c9911454.thfilter(c)
 	return c:IsSetCard(0x3952) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()

expansions/script/c9911457.lua

@@ -13,6 +13,7 @@ function c9911457.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
+	c9911457.morfonica_summon_effect=e1
 	--to hand(self)
 	local e3=Effect.CreateEffect(c)
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SUMMON)
@@ -27,6 +28,26 @@ function c9911457.initial_effect(c)
 	local e4=e3:Clone()
 	e4:SetCode(EVENT_REMOVE)
 	c:RegisterEffect(e4)
+	--adjust(disablecheck)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetCode(EVENT_ADJUST)
+	e5:SetRange(0xff)
+	e5:SetLabelObject(e1)
+	e5:SetOperation(c9911457.adjustop)
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetLabelObject(e2)
+	c:RegisterEffect(e6)
+end
+function c9911457.adjustop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=e:GetLabelObject()
+	if Duel.GetFlagEffect(tp,9921457)~=0 then
+		e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CAN_FORBIDDEN)
+	else
+		e1:SetProperty(EFFECT_FLAG_DELAY)
+	end
 end
 function c9911457.pfilter1(c,tp)
 	return c:IsType(TYPE_CONTINUOUS) and c:IsSetCard(0x3952) and not c:IsForbidden() and c:CheckUniqueOnField(tp)

expansions/script/c9911459.lua

@@ -13,6 +13,7 @@ function c9911459.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
+	c9911459.morfonica_summon_effect=e1
 	--to hand(self)
 	local e3=Effect.CreateEffect(c)
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SUMMON)
@@ -27,6 +28,26 @@ function c9911459.initial_effect(c)
 	local e4=e3:Clone()
 	e4:SetCode(EVENT_REMOVE)
 	c:RegisterEffect(e4)
+	--adjust(disablecheck)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetCode(EVENT_ADJUST)
+	e5:SetRange(0xff)
+	e5:SetLabelObject(e1)
+	e5:SetOperation(c9911459.adjustop)
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetLabelObject(e2)
+	c:RegisterEffect(e6)
+end
+function c9911459.adjustop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=e:GetLabelObject()
+	if Duel.GetFlagEffect(tp,9921459)~=0 then
+		e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CAN_FORBIDDEN)
+	else
+		e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	end
 end
 function c9911459.rcfilter1(c,e)
 	return c:IsCanBeEffectTarget(e) and (c:IsAbleToHand() or c:IsAbleToDeck())
@@ -43,6 +64,7 @@ function c9911459.rctg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chk==0 then return dg:CheckSubGroup(c9911459.fselect,3,3) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
 	local g=dg:SelectSubGroup(tp,c9911459.fselect,false,3,3)
+	if chk==9911466 then Duel.HintSelection(g) end
 	Duel.SetTargetCard(g)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,2,0,0)

expansions/script/c9911461.lua

@@ -11,6 +11,7 @@ function c9911461.initial_effect(c)
 	local e2=e1:Clone()
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e2)
+	c9911461.morfonica_summon_effect=e1
 	--to hand(self)
 	local e3=Effect.CreateEffect(c)
 	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SUMMON)
@@ -25,6 +26,26 @@ function c9911461.initial_effect(c)
 	local e4=e3:Clone()
 	e4:SetCode(EVENT_REMOVE)
 	c:RegisterEffect(e4)
+	--adjust(disablecheck)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e5:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetCode(EVENT_ADJUST)
+	e5:SetRange(0xff)
+	e5:SetLabelObject(e1)
+	e5:SetOperation(c9911461.adjustop)
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetLabelObject(e2)
+	c:RegisterEffect(e6)
+end
+function c9911461.adjustop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=e:GetLabelObject()
+	if Duel.GetFlagEffect(tp,9921461)~=0 then
+		e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_INACTIVATE+EFFECT_FLAG_CAN_FORBIDDEN)
+	else
+		e1:SetProperty(EFFECT_FLAG_DELAY)
+	end
 end
 function c9911461.desop(e,tp,eg,ep,ev,re,r,rp)
 	local e0=Effect.CreateEffect(e:GetHandler())

expansions/script/c9911465.lua

 --闪蝶幻乐手 极强音
 function c9911465.initial_effect(c)
 	--fusion summon
-	aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x3952),aux.FilterBoolFunction(Card.IsFusionAttribute,ATTRIBUTE_LIGHT+ATTRIBUTE_DARK),true)
+	aux.AddFusionProcFun2(c,c9911465.ffilter1,c9911465.ffilter2,true)
 	--spsummon condition
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
@@ -16,6 +16,7 @@ function c9911465.initial_effect(c)
 	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
 	e2:SetRange(LOCATION_EXTRA)
 	e2:SetCondition(c9911465.sprcon)
+	e2:SetTarget(c9911465.sprtg)
 	e2:SetOperation(c9911465.sprop)
 	c:RegisterEffect(e2)
 	--spsummon success
@@ -34,33 +35,47 @@ function c9911465.initial_effect(c)
 	e4:SetLabelObject(e3)
 	c:RegisterEffect(e4)
 end
+function c9911465.ffilter1(c)
+	return c:IsLevelBelow(6) and c:IsFusionSetCard(0x3952) and not (c:IsOnField() and not c:IsLocation(LOCATION_MZONE))
+end
+function c9911465.ffilter2(c)
+	return c:IsOnField() and c:GetOriginalType()&TYPE_MONSTER~=0 and c:GetOriginalAttribute()&(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK)~=0
+end
 function c9911465.splimit(e,se,sp,st)
 	return se:IsHasType(EFFECT_TYPE_ACTIONS)
 end
 function c9911465.sprfilter1(c,sc)
-	return c:IsReleasable(REASON_SPSUMMON) and c:IsCanBeFusionMaterial(sc,SUMMON_TYPE_SPECIAL) and not c:IsFusionType(TYPE_FUSION)
-		and (c:IsFusionSetCard(0x3952) or c:IsFusionAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK))
+	return c:IsReleasable(REASON_SPSUMMON) and c:IsCanBeFusionMaterial(sc,SUMMON_TYPE_SPECIAL)
+		and (c9911465.ffilter1(c) or c9911465.ffilter2(c))
 end
 function c9911465.sprfilter2(g,tp,sc)
-	return Duel.GetLocationCountFromEx(tp,tp,g,sc)>0 and g:IsExists(Card.IsRace,1,nil,RACE_FIEND)
-		and aux.gffcheck(g,Card.IsFusionSetCard,0x3952,Card.IsFusionAttribute,ATTRIBUTE_LIGHT+ATTRIBUTE_DARK)
+	return Duel.GetLocationCountFromEx(tp,tp,g,sc)>0 and aux.gffcheck(g,c9911465.ffilter1,nil,c9911465.ffilter2,nil)
 end
 function c9911465.sprcon(e,c)
 	if c==nil then return true end
 	local tp=c:GetControler()
-	local g=Duel.GetMatchingGroup(c9911465.sprfilter1,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,c)
+	local g=Duel.GetMatchingGroup(c9911465.sprfilter1,tp,LOCATION_HAND+LOCATION_ONFIELD,0,nil,c)
 	return g:CheckSubGroup(c9911465.sprfilter2,2,2,tp,c)
 end
-function c9911465.sprop(e,tp,eg,ep,ev,re,r,rp,c)
-	local g=Duel.GetMatchingGroup(c9911465.sprfilter1,tp,LOCATION_HAND+LOCATION_MZONE,0,nil,c)
+function c9911465.sprtg(e,tp,eg,ep,ev,re,r,rp,chk,c)
+	local g=Duel.GetMatchingGroup(c9911465.sprfilter1,tp,LOCATION_HAND+LOCATION_ONFIELD,0,nil,c)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-	local sg=g:SelectSubGroup(tp,c9911465.sprfilter2,false,2,2,tp,c)
+	local sg=g:SelectSubGroup(tp,c9911465.sprfilter2,true,2,2,tp,c)
+	if sg then
+		sg:KeepAlive()
+		e:SetLabelObject(sg)
+		return true
+	else return false end
+end
+function c9911465.sprop(e,tp,eg,ep,ev,re,r,rp,c)
+	local sg=e:GetLabelObject()
 	c:SetMaterial(sg)
 	if sg:IsExists(Card.IsFacedown,1,nil) then
 		local cg=sg:Filter(Card.IsFacedown,nil)
 		Duel.ConfirmCards(1-tp,cg)
 	end
 	Duel.Release(sg,REASON_SPSUMMON+REASON_MATERIAL)
+	sg:DeleteGroup()
 end
 function c9911465.sucop(e,tp,eg,ep,ev,re,r,rp)
 	e:GetLabelObject():SetLabel(Duel.GetCurrentChain())
@@ -73,17 +88,18 @@ function c9911465.eqtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if ct>0 then Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) end
 end
 function c9911465.eqfilter(c,tp)
-	return c:IsSetCard(0x3952) and c:IsType(TYPE_MONSTER) and Duel.IsPlayerCanSSet(tp,c) and not c:IsForbidden()
+	if not (Duel.IsPlayerCanSSet(tp,c) and not c:IsForbidden()) then return false end
+	return c:IsLocation(LOCATION_HAND) or (c:IsSetCard(0x3952) and c:IsRace(RACE_FIEND))
 end
 function c9911465.eqop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	if c:IsFacedown() or not c:IsRelateToEffect(e) or Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
-	local g=Duel.SelectMatchingCard(tp,c9911465.eqfilter,tp,LOCATION_DECK,0,1,1,nil,tp)
+	local g=Duel.SelectMatchingCard(tp,c9911465.eqfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,tp)
 	local tc=g:GetFirst()
 	if not tc then return end
 	if not Duel.Equip(tp,tc,c,false) then return end
-	Duel.ConfirmCards(1-tp,tc)
+	if tc:IsPreviousLocation(LOCATION_DECK) then Duel.ConfirmCards(1-tp,tc) end
 	--equip limit
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
@@ -92,6 +108,14 @@ function c9911465.eqop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 	e1:SetValue(c9911465.eqlimit)
 	tc:RegisterEffect(e1)
+	--atk up
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_EQUIP)
+	e2:SetCode(EFFECT_UPDATE_ATTACK)
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e2:SetValue(800)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+	tc:RegisterEffect(e2)
 	local ct=e:GetLabel()
 	local tg=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD)
 	if ct==0 or #tg<ct then return end

expansions/script/c9911466.lua

+--拨云见日的闪蝶幻乐
+function c9911466.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetTarget(c9911466.target)
+	e1:SetOperation(c9911466.activate)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCondition(c9911466.thcon)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c9911466.thtg)
+	e2:SetOperation(c9911466.thop)
+	c:RegisterEffect(e2)
+end
+function c9911466.efffilter(c,e,tp,eg,ep,ev,re,r,rp)
+	if not (c:IsSetCard(0x3952) and bit.band(c:GetOriginalType(),TYPE_MONSTER)~=0) then return false end
+	local te=c.morfonica_summon_effect
+	if not te then return false end
+	local tg=te:GetTarget()
+	return not tg or tg and tg(e,tp,eg,ep,ev,re,r,rp,0)
+end
+function c9911466.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9911466.efffilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil,e,tp,eg,ep,ev,re,r,rp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
+	local g=Duel.SelectMatchingCard(tp,c9911466.efffilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
+	local tc=g:GetFirst()
+	if tc:IsFaceup() then Duel.HintSelection(g)
+	else Duel.ConfirmCards(1-tp,tc) end
+	Duel.ClearTargetCard()
+	tc:CreateEffectRelation(e)
+	e:SetLabelObject(tc)
+	local te=tc.morfonica_summon_effect
+	local tg=te:GetTarget()
+	if tg then tg(e,tp,eg,ep,ev,re,r,rp,9911466) end
+end
+function c9911466.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetLabelObject()
+	local te=tc.morfonica_summon_effect
+	local op=te:GetOperation()
+	if op then op(e,tp,eg,ep,ev,re,r,rp) end
+	Duel.RegisterFlagEffect(tp,tc:GetOriginalCode()+10000,0,0,1)
+end
+function c9911466.thcon(e,tp,eg,ep,ev,re,r,rp)
+	local cont,loc,attr=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CONTROLER,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_ATTRIBUTE)
+	return cont==tp and (LOCATION_GRAVE+LOCATION_REMOVED)&loc~=0 and (ATTRIBUTE_LIGHT+ATTRIBUTE_DARK)&attr~=0
+end
+function c9911466.thfilter(c,rc)
+	return c:IsSetCard(0x3952) and c:IsType(TYPE_MONSTER) and not c:IsCode(rc:GetCode()) and c:IsAbleToHand()
+end
+function c9911466.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local rc=re:GetHandler()
+	if chk==0 then return rc and Duel.IsExistingMatchingCard(c9911466.thfilter,tp,LOCATION_DECK,0,1,nil,rc) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c9911466.thop(e,tp,eg,ep,ev,re,r,rp)
+	local rc=re:GetHandler()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c9911466.thfilter,tp,LOCATION_DECK,0,1,1,nil,rc)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end