240519 Part B

expansions/script/c11561046.lua

@@ -2,7 +2,7 @@
 local m=11561046
 local cm=_G["c"..m]
 function cm.initial_effect(c)
-	aux.AddCodeList(c,11561046)
+	aux.AddCodeList(c,6007213,32491822,69890967)
 	aux.EnableChangeCode(c,11561046,LOCATION_MZONE+LOCATION_GRAVE)
 	--to hand
 	local e1=Effect.CreateEffect(c)

expansions/script/c11561048.lua

@@ -4,7 +4,7 @@ local cm=_G["c"..m]
 function cm.initial_effect(c)
 	c:EnableCounterPermit(0x1)
 	--link summon
-	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_ZOMBIE+RACE_FIEND),2,4)
+	aux.AddLinkProcedure(c,nil,2,4,c11561048.lcheck)
 	c:EnableReviveLimit()
 	--count
 	local e1=Effect.CreateEffect(c)
@@ -43,6 +43,9 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 	
 	
+end
+function c11561048.lcheck(g,lc)
+	return g:IsExists(Card.IsLinkRace,1,nil,RACE_ZOMBIE+RACE_FIEND)
 end
 function c11561048.decost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,3,REASON_COST) end

expansions/script/c11561049.lua

+--纯白巫女 公主·可可落
+local m=11561049
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	c:EnableCounterPermit(0x1)
+	--xyz summon
+	c:EnableReviveLimit()
+	aux.AddXyzProcedureLevelFree(c,aux.TRUE,c11561049.xyzcheck,3,99)  
+	--xyzlimit
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+	e1:SetValue(1)
+	c:RegisterEffect(e1) 
+	--count
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_COUNTER)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,11561049+EFFECT_COUNT_CODE_DUEL)
+	e2:SetCondition(c11561049.ctcon)
+	e2:SetTarget(c11561049.cttg)
+	e2:SetOperation(c11561049.ctop)
+	c:RegisterEffect(e2)
+	--Remove counter replace
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(11561049,0))
+	e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_RCOUNTER_REPLACE+0x1)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetCondition(c11561049.rcon)
+	e3:SetOperation(c11561049.rop)
+	c:RegisterEffect(e3)
+	--atkup
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetCode(EFFECT_UPDATE_ATTACK)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetTargetRange(LOCATION_MZONE,0)
+	e3:SetCondition(c11561049.atkcon)
+	e4:SetValue(c11561049.atkval)
+	c:RegisterEffect(e4)
+	--destroy replace
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e5:SetCode(EFFECT_DESTROY_REPLACE)
+	e5:SetRange(LOCATION_MZONE)
+	e5:SetCountLimit(1)
+	e5:SetTarget(c11561049.destg)
+	e5:SetValue(1)
+	e5:SetOperation(c11561049.desop)
+	c:RegisterEffect(e5)
+
+
+end
+function c11561049.dfilter(c,tp)
+	return c:IsControler(tp) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
+end
+function c11561049.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		local count=eg:FilterCount(c11561049.dfilter,nil,tp)
+		e:SetLabel(count)
+		return e:GetHandler():GetOverlayCount()>4 and count>0 and Duel.IsCanRemoveCounter(tp,1,0,0x1,count,REASON_COST)
+	end
+	return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
+end
+function c11561049.desop(e,tp,eg,ep,ev,re,r,rp)
+	local count=e:GetLabel()
+	Duel.RemoveCounter(tp,1,0,0x1,count,REASON_COST)
+end
+
+function c11561049.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetOverlayCount()>2
+end
+function c11561049.atkval(e)
+	return Duel.GetCounter(e:GetHandlerPlayer(),1,0,0x1)*100
+end
+function c11561049.rcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetOverlayCount()>0 and re:IsActivated() and bit.band(r,REASON_COST)~=0 and ep==e:GetOwnerPlayer() and e:GetHandler():GetCounter(0x1)>=ev
+end
+function c11561049.rop(e,tp,eg,ep,ev,re,r,rp)
+	e:GetHandler():RemoveCounter(ep,0x1,ev,REASON_EFFECT)
+end
+function c11561049.cfilter(c)
+	return c:IsCanHaveCounter(0x1)
+end
+function c11561049.matfilter(c)
+	return c:IsCanHaveCounter(0x1) and c:IsCanOverlay() and (c:IsFaceupEx() or not c:IsLocation(LOCATION_REMOVED))
+end
+
+
+function c11561049.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local ct=Duel.GetMatchingGroupCount(c11561049.cfilter,tp,LOCATION_ONFIELD,0,nil)
+	if chk==0 then return ct>0 and Duel.IsExistingMatchingCard(c11561049.matfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,ct,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,ct,0,0x1)
+end
+function c11561049.ctop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local cct=Duel.GetMatchingGroupCount(c11561049.cfilter,tp,LOCATION_ONFIELD,0,nil)
+	if c:IsFaceup() and c:IsRelateToEffect(e) and cct>0 and c:AddCounter(0x1,cct)~=0 and Duel.IsExistingMatchingCard(c11561049.matfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,cct,nil) then 
+			Duel.BreakEffect()
+		local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c11561049.matfilter),tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,cct,cct,nil,e,tp)
+		if g:GetCount()>0 then
+			Duel.Overlay(c,g)
+		end
+	end
+end
+function c11561049.ctcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
+end
+function c11561049.xyzfilter(c)
+	return c:GetCounter(0x1)==0
+end
+function c11561049.xyzcheck(g)
+	return g:Filter(c11561049.xyzfilter,nil):GetClassCount(Card.GetOriginalLevel)==1 and g:IsExists(Card.IsLevelAbove,1,nil,1)
+end
\ No newline at end of file

expansions/script/c11561050.lua

+--闪光No.39 希望皇 霍普·彼岸
+local m=11561050
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT),6,2,c11561050.ovfilter,aux.Stringid(11561050,0),3,c11561050.xyzop)
+	c:EnableReviveLimit()
+	--imm
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,11561050)
+	e1:SetCondition(c11561050.imcon)
+	e1:SetCost(c11561050.imcost)
+	e1:SetOperation(c11561050.imop)
+	c:RegisterEffect(e1)
+	--Atk Change
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(0,LOCATION_MZONE)
+	e2:SetCode(EFFECT_UPDATE_ATTACK)
+	e2:SetCondition(c11561050.atkcon)
+	e2:SetValue(0)
+	c:RegisterEffect(e2)
+	--SpecialSummon
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_REMOVE)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetCountLimit(1)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetHintTiming(0,TIMING_BATTLE_START+TIMING_END_PHASE)
+	e3:SetCondition(c11561050.spcon)
+	e3:SetCost(c11561050.imcost)
+	e3:SetTarget(c11561050.spctg)
+	e3:SetOperation(c11561050.spcop)
+	c:RegisterEffect(e3)
+
+	
+end
+aux.xyz_number[11561050]=39
+
+
+function c11561050.sovfilter1(c)
+	return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsCanOverlay() and c:IsFaceup()
+end
+function c11561050.sovfilter2(c,e,tp)
+	return c:IsSetCard(0x107f) and c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c11561050.spctg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return false end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingTarget(c11561050.sovfilter1,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingTarget(c11561050.sovfilter2,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g1=Duel.SelectTarget(tp,c11561050.sovfilter1,tp,LOCATION_MZONE,0,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g2=Duel.SelectTarget(tp,c11561050.sovfilter2,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	g1:Merge(g2)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g2,1,0,0)
+end
+function c11561050.spcop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	local scc=g:GetFirst()
+	local spc=g:GetNext()
+	local tc
+	if not spc:IsRelateToEffect(e) or not scc:IsRelateToEffect(e) then return end
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	if Duel.SpecialSummon(spc,0,tp,tp,false,false,POS_FACEUP)>0 and not scc:IsImmuneToEffect(e) then
+		local og=scc:GetOverlayGroup()
+		if og:GetCount()>0 then
+			Duel.SendtoGrave(og,REASON_RULE)
+		end
+		Duel.Overlay(spc,scc)
+			Duel.BreakEffect()
+			local rec=math.ceil(spc:GetAttack()/2)
+			Duel.Recover(tp,rec,REASON_EFFECT)
+	end
+end
+function c11561050.atkcon(e)
+	local ph=Duel.GetCurrentPhase()
+	return e:GetHandler():GetOverlayGroup():IsExists(Card.IsSetCard,1,nil,0x107f) and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
+end
+function c11561050.spcon(e)
+	return e:GetHandler():GetOverlayGroup():IsExists(Card.IsSetCard,1,nil,0x107f)
+end
+function c11561050.cfilter(c)
+	return c:IsType(TYPE_SPELL) and c:IsDiscardable()
+end
+function c11561050.ovfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0x107f)
+end
+function c11561050.xyzop(e,tp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11561050.cfilter,tp,LOCATION_HAND,0,1,nil) end
+	Duel.DiscardHand(tp,c11561050.cfilter,1,1,REASON_COST+REASON_DISCARD)
+end
+function c11561050.imcon(e,tp,eg,ep,ev,re,r,rp)
+	return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
+end
+function c11561050.imcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c11561050.imtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,LOCATION_ONFIELD,0,1,nil) end
+end
+function c11561050.imop(e,tp,eg,ep,ev,re,r,rp)
+	local g1=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,0,nil)
+	local tc=g1:GetFirst()
+	while tc do
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_IMMUNE_EFFECT)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_CHAIN)
+		e1:SetValue(c11561050.efilter)
+		tc:RegisterEffect(e1)
+		tc=g1:GetNext()
+	end
+end
+function c11561050.efilter(e,re)
+	return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
+end
\ No newline at end of file

expansions/script/c11561051.lua

+--炙热甜蜜 茜里
+local m=11561051
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	c:EnableCounterPermit(0x1)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,4,c11561048.lcheck)
+   -- aux.AddLinkProcedure(c,nil,2)
+	c:EnableReviveLimit()
+	--add counter
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(11561051,0))
+	e1:SetCategory(CATEGORY_COUNTER)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,11561051)
+	e1:SetCondition(c11561051.ctcon)
+	e1:SetOperation(c11561051.ctop)
+	c:RegisterEffect(e1)
+	--add dun
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(11561051,1))
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,11571051)
+	e2:SetCost(c11561051.adcost)
+	e2:SetOperation(c11561051.adop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(11561051,2))
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_SPSUMMON_PROC_G)
+	e3:SetRange(0xff)
+	e3:SetCondition(c11561051.clcon)
+	e3:SetOperation(c11561051.debug)
+	c:RegisterEffect(e3)
+	--link summon
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(11561051,3))
+	e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_FREE_CHAIN)
+	e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCountLimit(1,11581051)
+	e4:SetCondition(c11561051.lkcon)
+	e4:SetCost(c11561051.lkcost)
+	e4:SetTarget(c11561051.lktg)
+	e4:SetOperation(c11561051.lkop)
+	c:RegisterEffect(e4)
+
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e6:SetCode(EVENT_BE_MATERIAL)
+	e6:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
+	e6:SetOperation(c11561051.effop)
+ --   e6:SetLabelObject(e5)
+	c:RegisterEffect(e6)
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e5:SetOperation(c11561051.regop)
+	e5:SetLabelObject(e6)
+	c:RegisterEffect(e5)
+	if not c11561051.global_check then
+		c11561051.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD)
+		ge1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		ge1:SetCode(EFFECT_CANNOT_LOSE_KOISHI)
+		ge1:SetTargetRange(1,1)
+		ge1:SetCondition(c11561051.clcon)
+		ge1:SetValue(1)
+		Duel.RegisterEffect(ge1,0)
+		Duel.RegisterEffect(ge1,1)
+		local ge2=Effect.CreateEffect(c)
+		ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge2:SetCode(EVENT_ADJUST)
+		ge2:SetCondition(c11561051.lpcon)
+		ge2:SetOperation(c11561051.Lpop)
+		Duel.RegisterEffect(ge2,0)
+		Duel.RegisterEffect(ge2,1)
+	end
+end
+function c11561051.lcheck(g,lc)
+	return g:IsExists(Card.IsLinkRace,1,nil,RACE_ZOMBIE+RACE_FIEND)
+end
+function c11561051.effop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,0,11561051)
+	local c=e:GetHandler()
+	local rc=c:GetReasonCard()
+	if not rc:IsCanHaveCounter(0x1) or not rc:IsType(TYPE_LINK) then return end
+	rc:RegisterFlagEffect(11561051,RESET_EVENT+RESETS_STANDARD,0,1,e:GetLabel())
+	local e1=Effect.CreateEffect(rc)
+	e1:SetCategory(CATEGORY_COUNTER)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,11561051)
+	e1:SetCondition(c11561051.coucon)
+	e1:SetOperation(c11561051.couop)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	rc:RegisterEffect(e1,true)
+	if not rc:IsType(TYPE_EFFECT) then
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_ADD_TYPE)
+		e2:SetValue(TYPE_EFFECT)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+		rc:RegisterEffect(e2,true)
+	end
+end
+function c11561051.coucon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function c11561051.couop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ct=c:GetFlagEffectLabel(11561051)
+	if c:IsFaceup() and c:IsRelateToEffect(e) and ct>0 then
+		c:AddCounter(0x1,ct)
+	end
+end
+function c11561051.regop(e,tp,eg,ep,ev,re,r,rp)
+	e:GetLabelObject():SetLabel(e:GetHandler():GetMaterialCount())
+end
+
+
+
+function c11561051.lkcon(e,tp,eg,ep,ev,re,r,rp)
+	return (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2) and e:GetHandler():GetSequence()>4
+end
+function c11561051.lkcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
+end
+function c11561051.lktg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,1,nil,nil,e:GetHandler()) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c11561051.lkop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsControler(1-tp) or not c:IsRelateToEffect(e) or c:IsFacedown() then return end
+	local g=Duel.GetMatchingGroup(Card.IsLinkSummonable,tp,LOCATION_EXTRA,0,nil,nil,c)
+	if g:GetCount()>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sg=g:Select(tp,1,1,nil)
+		Duel.LinkSummon(tp,sg:GetFirst(),nil,c)
+	end
+end
+function c11561051.debug(e,tp,eg,ep,ev,re,r,rp,c,sg,og)
+	local flag=Duel.GetFlagEffectLabel(tp,11561051)
+	Debug.Message("护盾值"..flag)
+end
+function c11561051.adcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
+	Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
+end
+function c11561051.adop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_DESTROYED)
+	e1:SetCondition(c11561051.aqcon1)
+	e1:SetOperation(c11561051.adop1)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c11561051.aqcon1filter(c,tp)
+	return c:IsType(TYPE_MONSTER) and c:GetReasonPlayer()==1-tp
+end
+function c11561051.aqcon1(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c11561051.aqcon1filter,1,nil,tp)
+end
+function c11561051.adop1(e,tp,eg,ep,ev,re,r,rp)
+	local flag=Duel.GetFlagEffectLabel(tp,11561051)
+	local tc=eg:GetFirst()
+	local atk=0
+	while tc do
+		local tatk=tc:GetTextAttack()
+		if tatk>0 then atk=atk+tatk end
+		tc=eg:GetNext()
+	end
+	local dun=math.floor(atk/2)
+	if flag then
+		Duel.SetFlagEffectLabel(tp,11561051,flag+dun)
+	else
+		Duel.RegisterFlagEffect(tp,11561051,RESET_EVENT+RESETS_STANDARD,0,1,dun)
+	end
+	e:Reset()
+end
+function c11561051.clcon(e,tp,eg,ep,ev,re,r,rp)
+	local flag=Duel.GetFlagEffectLabel(tp,11561051)
+	return flag and flag>0
+end
+function c11561051.lpcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetLP(tp)<=0
+end
+function c11561051.Lpop(e,tp,eg,ep,ev,re,r,rp)
+	local flag=Duel.GetFlagEffectLabel(tp,11561051)
+	if Duel.GetLP(tp)<=0 and flag then
+		if Duel.GetFlagEffectLabel(tp,11561051)>=2000 then
+		Duel.SetLP(tp,2000)
+		c:SetFlagEffectLabel(11561051,flag-2000)
+		elseif Duel.GetFlagEffectLabel(tp,11561051)<2000 then
+		Duel.SetLP(tp,flag)
+		Duel.SetFlagEffectLabel(tp,11561051,0)
+		end
+	end
+end
+function c11561051.ctcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function c11561051.ctop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ct=c:GetMaterialCount()
+	if c:IsFaceup() and c:IsRelateToEffect(e) and ct>0 then
+		c:AddCounter(0x1,ct)
+	end
+end
\ No newline at end of file

expansions/script/c11579812.lua

@@ -4,7 +4,6 @@ local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,aux.TRUE,2,99,c11579812.lcheck)
-	aux.AddLinkProcedure(c,aux.TRUE,2,99,nil)
 	c:EnableReviveLimit()
 	--immune
 	local e1=Effect.CreateEffect(c)
@@ -65,7 +64,7 @@ function c11579812.desop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) then
 		local aaa=math.ceil(math.abs(Duel.GetLP(tp)-Duel.GetLP(1-tp))/2)
-		if tc:GetAttack()<aaa or Duel.GetFlagEffect(tp,11580812)>1 then
+		if tc:GetAttack()<aaa and tc:GetFlagEffect(11580812)>1 then
 		Duel.Remove(tc,POS_FACEDOWN,REASON_RULE,1-tp)
 		else 
 		if Duel.Destroy(tc,REASON_EFFECT)~=0 then
@@ -91,6 +90,7 @@ function c11579812.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local dam=0
 	while tc do
 		dam=dam+tc:GetBaseAttack()
+		tc:RegisterFlagEffect(11580812,RESET_PHASE+PHASE_END,0,1)
 		tc=tg:GetNext()
 	end
 		e:SetLabel(dam)
@@ -105,7 +105,6 @@ function c11579812.repop(e,tp,eg,ep,ev,re,r,rp)
 end
 function c11579812.damval1(e,re,val,r,rp,rc)
 	local c=e:GetHandler()
-	Duel.RegisterFlagEffect(tp,11580812,RESET_PHASE+PHASE_END,0,1)
 	if Duel.GetFlagEffect(tp,11579812)~=0 then
 		Duel.ResetFlagEffect(tp,11579812)
 		return val*2

expansions/script/c11637001.lua

+--料理厨·银明
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetHintTiming(0,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
+	e1:SetCountLimit(1,id)
+	e1:SetTarget(s.settg)
+	e1:SetOperation(s.setop)
+	c:RegisterEffect(e1)
+	--copyname
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,1))
+	e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_TODECK)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetHintTiming(0,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
+	e2:SetCountLimit(1,id+1)
+	e2:SetTarget(s.cptg)
+	e2:SetOperation(s.cpop)
+	c:RegisterEffect(e2)
+end
+
+function s.setfilter(c)
+	return c:IsSetCard(0xa221) and c:IsSSetable()
+end
+function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function s.setop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectMatchingCard(tp,s.setfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SSet(tp,g)
+		local tc=g:GetFirst()
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+		e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+	end
+end
+
+function s.cpfilter(c,code)
+	return c:IsSetCard(0xa221) and ((c:IsAbleToDeck() and c:IsLocation(LOCATION_GRAVE)) or c:IsLocation(LOCATION_DECK)) and not c:IsCode(code)
+end
+function s.opfilter(c,code)
+	return ((c:IsAbleToDeck() and c:IsLocation(LOCATION_GRAVE)) or c:IsLocation(LOCATION_DECK)) and c:IsCode(code)
+end
+function s.cptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local code=c:GetCode()
+	if chk==0 then return Duel.IsExistingMatchingCard(s.cpfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,code) end
+	local g=Duel.GetMatchingGroup(s.cpfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,nil,code)
+	local ag=Group.CreateGroup()
+	local codes={}
+	for tc in aux.Next(g) do
+		local tc_code=tc:GetCode()
+		if not ag:IsExists(Card.IsCode,1,nil,tc_code) then
+			ag:AddCard(tc)
+			table.insert(codes,tc_code)
+		end
+	end
+	table.sort(codes)
+	local afilter={codes[1],OPCODE_ISCODE}
+	if #codes>1 then
+		for i=2,#codes do
+			table.insert(afilter,codes[i])
+			table.insert(afilter,OPCODE_ISCODE)
+			table.insert(afilter,OPCODE_OR)
+		end
+	end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
+	local ac=Duel.AnnounceCard(tp,table.unpack(afilter))
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_CHANGE_CODE)
+	e1:SetValue(ac)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	c:RegisterEffect(e1,true)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetTargetParam(ac)
+	Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,0,tp,0)
+end
+function s.cpop(e,tp,eg,ep,ev,re,r,rp)
+	local ac=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
+	local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.opfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,ac):GetFirst()
+	if tc then
+		if tc:IsLocation(LOCATION_GRAVE) then
+			Duel.HintSelection(Group.FromCards(tc))
+			Duel.SendtoDeck(tc,nil,2,REASON_COST)
+		else
+			Duel.ConfirmCards(1-tp,tc)
+			Duel.ShuffleDeck(tp)
+		end
+	end
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e2:SetCode(EVENT_CHAIN_END)
+		e2:SetOperation(s.tgop)
+		e2:SetLabelObject(c)
+		Duel.RegisterEffect(e2,tp)
+		c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1)
+	end
+end
+
+function s.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetLabelObject()
+	if tc:GetFlagEffect(id)~=0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+		Duel.SendtoGrave(tc,nil,REASON_EFFECT)
+	end
+	e:Reset()
+end
\ No newline at end of file

expansions/script/c11637003.lua

+--料理厨·烛火
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetHintTiming(0,TIMING_END_PHASE+TIMINGS_CHECK_MONSTER)
+	e1:SetCountLimit(1,id)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.opetation)
+	c:RegisterEffect(e1)
+end
+
+function s.IsFoodMaterial_Listed(c,code)
+	if not c.FoodMaterial_Listed then return false end
+	local flag=false
+	for i=1,#c.FoodMaterial_Listed do
+		if c.FoodMaterial_Listed[i]==code then flag=true end
+	end
+	return flag
+end
+function s.filter(c)
+	if not c.FoodMaterial_Listed then return false end
+	local codes={}
+	for i=1,#c.FoodMaterial_Listed do
+		table.insert(codes,c.FoodMaterial_Listed[i])
+	end
+	return (c:IsSetCard(0x9221) and #codes>0 and c:IsAbleToExtra() and c:IsFaceup()),codes
+end
+function s.spfilter(c,e,tp,tc,...)
+	local codes={...}
+	local flag=true
+	for i=1,#codes do
+		if not s.IsFoodMaterial_Listed(c,codes[i]) then flag=false end
+	end
+	return c:IsSetCard(0x9221) and flag and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCountFromEx(tp,tp,tc,c)
+end
+function s.filter2(c,e)
+	return s.filter(c) and c:IsCanBeEffectTarget(e) 
+end
+function s.gselect(g,e,tp)
+	local codes={}
+	for tc in aux.Next(g) do
+		for i=1,#tc.FoodMaterial_Listed do
+			table.insert(codes,tc.FoodMaterial_Listed[i])
+		end
+	end
+	return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,g,table.unpack(codes))
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then 
+		local flag,codes=s.filter(chkc)
+		return chkc:IsLocation(LOCATION_MZONE) and flag and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,chkc,table.unpack(codes))
+	end
+	local g=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_MZONE,0,nil,e)
+	if chk==0 then return g:CheckSubGroup(s.gselect,1,#g,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local tg=g:SelectSubGroup(tp,s.gselect,false,1,#g,e,tp)
+	Duel.SetTargetCard(tg)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,tg,#tg,tp,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function s.opetation(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	local g=tg:Filter(Card.IsRelateToEffect,nil,e)
+	if g:GetCount()>0 then
+		Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
+		local codes={}
+		for tmp in aux.Next(g) do
+			for i=1,#tmp.FoodMaterial_Listed do
+				table.insert(codes,tmp.FoodMaterial_Listed[i])
+			end
+		end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local tc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,nil,table.unpack(codes)):GetFirst()
+		if not tc then return end
+		Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
+		local c=e:GetHandler()
+		if c:IsRelateToEffect(e) and c:IsAbleToGrave() and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
+			Duel.BreakEffect()
+			Duel.SendtoGrave(c,nil,REASON_EFFECT)
+		end
+	end
+end

expansions/script/c11637004.lua

+--水产料理食材
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(s.cost)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	--Gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetOperation(s.regop)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
+end
+function s.counterfilter(c)
+	return c:IsSetCard(0x9221)
+end
+
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c)
+	return not c:IsSetCard(0x9221)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,true)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5 or Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>=5 end
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	local flag1=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5
+	local flag2=Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>=5
+	local op=aux.SelectFromOptions(tp,{flag1,aux.Stringid(id,2)},{flag1,aux.Stringid(id,3)})
+	if not op or op==0 then return end
+	if op==1 then
+		Duel.ConfirmDecktop(tp,5)
+		Duel.SortDecktop(tp,tp,5)
+	elseif op==2 then
+		Duel.ConfirmDecktop(1-tp,5)
+		Duel.SortDecktop(tp,1-tp,5)
+	end
+	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(id,4)) then
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
+		Duel.SpecialSummon(sc,0,tp,tp,false,true,POS_FACEUP)
+		sc:CompleteProcedure()
+	end
+end
+
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) and tc:IsFaceup() then
+			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_FIELD)
+			e1:SetCode(EFFECT_PUBLIC)
+			e1:SetRange(LOCATION_MZONE)
+			e1:SetTargetRange(0,LOCATION_HAND)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c11637005.lua

+--蔬果料理食材
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(s.cost)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	--Gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetOperation(s.regop)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
+end
+function s.counterfilter(c)
+	return c:IsSetCard(0x9221)
+end
+
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c)
+	return not c:IsSetCard(0x9221)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,true)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1000)
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Recover(tp,1000,REASON_EFFECT)
+	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
+		Duel.SpecialSummon(sc,0,tp,tp,false,true,POS_FACEUP)
+		sc:CompleteProcedure()
+	end
+end
+
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) and tc:IsFaceup() then
+			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+			e1:SetCode(EVENT_CHAINING)
+			e1:SetRange(LOCATION_MZONE)
+			e1:SetCondition(s.repcon)
+			e1:SetOperation(s.repop)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
+function s.repcon(e,tp,eg,ep,ev,re,r,rp)
+	return rp==1-tp
+end
+function s.repop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Recover(tp,300,REASON_EFFECT)
+end
+

expansions/script/c11637006.lua

+--肉类料理食材
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(s.cost)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	--Gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetOperation(s.regop)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
+end
+function s.counterfilter(c)
+	return c:IsSetCard(0x9221)
+end
+
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c)
+	return not c:IsSetCard(0x9221)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,true)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1000)
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local tc=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil):GetFirst()
+	if not tc then return end
+	Duel.HintSelection(Group.FromCards(tc))
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(1000)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	tc:RegisterEffect(e1)
+	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
+		Duel.SpecialSummon(sc,0,tp,tp,false,true,POS_FACEUP)
+		sc:CompleteProcedure()
+	end
+end
+
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) and tc:IsFaceup() then
+			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+			e1:SetCode(EVENT_CHAIN_SOLVED)
+			e1:SetRange(LOCATION_MZONE)
+			e1:SetCondition(s.repcon)
+			e1:SetOperation(s.repop)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
+function s.repcon(e,tp,eg,ep,ev,re,r,rp)
+	return re:GetHandler():IsSetCard(0xa221)
+end
+function s.repop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(300)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_UPDATE_DEFENSE)
+	c:RegisterEffect(e2)
+end
+

expansions/script/c11637007.lua

+--蛋类料理食材
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(s.cost)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	--Gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetOperation(s.regop)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
+end
+function s.counterfilter(c)
+	return c:IsSetCard(0x9221)
+end
+
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c)
+	return not c:IsSetCard(0x9221)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,true)
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	--indes
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetReset(RESET_PHASE+PHASE_END)
+	e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x9221))
+	e2:SetValue(s.indct)
+	Duel.RegisterEffect(e2,tp)
+	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
+		Duel.SpecialSummon(sc,0,tp,tp,false,true,POS_FACEUP)
+		sc:CompleteProcedure()
+	end
+end
+function s.indct(e,re,r,rp)
+	if bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0 then
+		return 1
+	else return 0 end
+end
+
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) and tc:IsFaceup() then
+			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetDescription(aux.Stringid(id,3))
+			e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+			e1:SetType(EFFECT_TYPE_QUICK_O)
+			e1:SetCode(EVENT_FREE_CHAIN)
+			e1:SetHintTiming(TIMINGS_CHECK_MONSTER,TIMINGS_CHECK_MONSTER)
+			e1:SetRange(LOCATION_MZONE)
+			e1:SetCountLimit(1)
+			e1:SetCost(s.spcost)
+			e1:SetTarget(s.sptg)
+			e1:SetOperation(s.spop)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
+function s.spcfilter2(c,e,tp)
+	return c:IsSetCard(0x9221) and c:IsAbleToDeckOrExtraAsCost() and c:IsFaceup() and Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c)
+end
+function s.spfilter2(c,e,tp,v)
+	local t=Auxiliary.GetValueType(v)
+	local lv=0
+	local tc=nil
+	if t=='Card' then 
+		lv=v:GetLevel()
+		tc=v
+	else lv=v end
+	return c:IsSetCard(0x9221) and c:IsLevel(lv) and Duel.GetLocationCountFromEx(tp,tp,tc,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
+end
+function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	e:SetLabel(1)
+	if chk==0 then return true end
+end
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then 
+		if e:GetLabel()==0 then return false end
+		e:SetLabel(0)
+		return Duel.IsExistingMatchingCard(s.spcfilter2,tp,LOCATION_MZONE,0,1,e:GetHandler(),e,tp) end
+	e:SetLabel(0)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local tc=Duel.SelectMatchingCard(tp,s.spcfilter2,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),e,tp):GetFirst()
+	e:SetLabel(tc:GetLevel())
+	Duel.SendtoDeck(tc,nil,2,REASON_COST)
+end
+function s.spop(e,tp,eg,ep,ev,re,r,rp)
+	local lv=e:GetLabel()
+	if not lv then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local sc=Duel.SelectMatchingCard(tp,s.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv):GetFirst()
+	if not sc then return end
+	Duel.SpecialSummon(sc,0,tp,tp,true,false,POS_FACEUP)
+end
\ No newline at end of file

expansions/script/c11637008.lua

+--香料料理食材
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(s.cost)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	--Gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetOperation(s.regop)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
+end
+function s.counterfilter(c)
+	return c:IsSetCard(0x9221)
+end
+
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c)
+	return not c:IsSetCard(0x9221)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,true)
+end
+function s.setfilter(c,tp)
+	return c:IsSetCard(0xa221) and c:CheckUniqueOnField(tp)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local flag=Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+	if not c:IsOnField() then
+		flag=Duel.GetLocationCount(tp,LOCATION_SZONE)>1
+	end
+	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK,0,1,nil,tp) and flag end
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local tc=Duel.SelectMatchingCard(tp,s.setfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
+	if not tc then return end
+	Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_CHAIN_END)
+	e1:SetOperation(s.tgop)
+	e1:SetLabelObject(tc)
+	Duel.RegisterEffect(e1,tp)
+	tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_CHANGE_TYPE)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+	e2:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+	tc:RegisterEffect(e2)
+	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
+		Duel.SpecialSummon(sc,0,tp,tp,false,true,POS_FACEUP)
+		sc:CompleteProcedure()
+	end
+end
+
+function s.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetLabelObject()
+	if tc:GetFlagEffect(id)~=0 then
+		Duel.SendtoGrave(tc,nil,REASON_EFFECT)
+	end
+	e:Reset()
+end
+
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) and tc:IsFaceup() then
+			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetDescription(aux.Stringid(id,3))
+			e1:SetCategory(CATEGORY_TODECK)
+			e1:SetType(EFFECT_TYPE_IGNITION)
+			e1:SetCode(EVENT_FREE_CHAIN)
+			e1:SetRange(LOCATION_MZONE)
+			e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+			e1:SetCountLimit(1)
+			e1:SetCost(s.cpcost)
+			e1:SetTarget(s.cptg)
+			e1:SetOperation(s.cpop)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
+
+function s.cpcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	e:SetLabel(1)
+	if chk==0 then return true end
+end
+function s.cpfilter(c,code)
+	return c:IsSetCard(0xa221) and c:IsAbleToDeck() and c:CheckActivateEffect(true,true,false) and not c:IsCode(code)
+end
+function s.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	local code=c:GetCode()
+	if chkc then return s.cpfilter(chkc,code) and chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) end
+	if chk==0 then 
+		if e:GetLabel()==0 then return false end
+		e:SetLabel(0)
+		return Duel.IsExistingTarget(s.cpfilter,tp,LOCATION_GRAVE,0,1,nil,code) end
+	e:SetLabel(0)
+	local g=Duel.GetMatchingGroup(s.cpfilter,tp,LOCATION_GRAVE,0,nil,code)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local tc=Duel.SelectTarget(tp,s.cpfilter,tp,LOCATION_GRAVE,0,1,1,nil,code):GetFirst()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_CHANGE_CODE)
+	e1:SetValue(tc:GetCode())
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_CHAIN)
+	c:RegisterEffect(e1,true)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local te,ceg,cep,cev,cre,cr,crp=tc:CheckActivateEffect(true,true,true)
+	e:SetProperty(te:GetProperty())
+	local tg=te:GetTarget()
+	if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end
+	te:SetLabelObject(e:GetLabelObject())
+	e:SetLabelObject(te)
+	Duel.ClearOperationInfo(0)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,tc,1,0,0)
+end
+function s.cpop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) or not aux.NecroValleyFilter()(tc) then return end
+	if Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)==0 then return end
+	local te=e:GetLabelObject()
+	if te then
+		e:SetLabelObject(te:GetLabelObject())
+		local op=te:GetOperation()
+		if op then op(e,tp,eg,ep,ev,re,r,rp) end
+	end
+end
\ No newline at end of file

expansions/script/c11637009.lua

+--主食料理食材
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DISABLE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(s.cost)
+	e1:SetTarget(s.target)
+	e1:SetOperation(s.activate)
+	c:RegisterEffect(e1)
+	--Gain effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetOperation(s.regop)
+	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
+end
+function s.counterfilter(c)
+	return c:IsSetCard(0x9221)
+end
+
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(s.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function s.splimit(e,c)
+	return not c:IsSetCard(0x9221)
+end
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,true)
+end
+function s.setfilter(c,tp)
+	return c:IsSetCard(0xa221) and c:CheckUniqueOnField(tp)
+end
+function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,1,nil) end
+	local g=Duel.GetMatchingGroup(aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,1-tp,LOCATION_MZONE)
+end
+function s.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
+	local tc=Duel.SelectMatchingCard(tp,aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,1,1,nil):GetFirst()
+	if not tc then return end
+	Duel.HintSelection(Group.FromCards(tc))
+	Duel.NegateRelatedChain(tc,RESET_TURN_SET)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_DISABLE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	tc:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_DISABLE_EFFECT)
+	e2:SetValue(RESET_TURN_SET)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	tc:RegisterEffect(e2)
+	if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sc=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
+		Duel.SpecialSummon(sc,0,tp,tp,false,true,POS_FACEUP)
+		sc:CompleteProcedure()
+	end
+end
+
+function s.regop(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) and tc:IsFaceup() then
+			tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1))
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetDescription(aux.Stringid(id,3))
+			e1:SetCategory(CATEGORY_REMOVE)
+			e1:SetType(EFFECT_TYPE_QUICK_O)
+			e1:SetCode(EVENT_CHAINING)
+			e1:SetRange(LOCATION_MZONE)
+			e1:SetCountLimit(1)
+			e1:SetCondition(s.rmcon)
+			e1:SetTarget(s.rmtg)
+			e1:SetOperation(s.rmop)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+			tc:RegisterEffect(e1)
+		end
+	end
+end
+
+function s.rmcon(e,tp,eg,ep,ev,re,r,rp)
+	return re:GetHandler()~=e:GetHandler() and rp==tp and re:GetHandler():IsType(TYPE_FUSION) and re:IsActiveType(TYPE_MONSTER)
+end
+function s.cpfilter(c,code)
+	return c:IsSetCard(0xa221) and c:IsAbleToDeck() and c:CheckActivateEffect(true,true,false) and not c:IsCode(code)
+end
+function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_GRAVE)
+end
+function s.rmop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_GRAVE,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c11637010.lua

+--刺身料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637004)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.thtg)
+	e2:SetOperation(s.thop)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637004}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637004 then flag=true end
+		end
+	end
+	return flag
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.thfilter(c)
+	return c:IsSetCard(0x9221) and c:IsAbleToHand()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetDecktopGroup(tp,3)
+	if #g<3 then return end
+	Duel.ConfirmDecktop(tp,3)
+	if g:IsExists(s.thfilter,1,nil) then
+		local tg=g:Filter(s.thfilter,nil)
+		Duel.SendtoHand(tg,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,tg)
+		g:Sub(tg)
+	end
+	if #g>0 then Duel.ShuffleDeck(tp) end
+end

expansions/script/c11637011.lua

+--清炒蔬菜料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637005)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.thtg)
+	e2:SetOperation(s.thop)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637005}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637005 then flag=true end
+		end
+	end
+	return flag
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.thfilter(c,e,tp)
+	local flag=false
+	if c:IsType(TYPE_MONSTER) then
+		flag=c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+	elseif c:IsType(TYPE_SPELL+TYPE_TRAP) then
+		flag=c:IsSSetable()
+	end
+	return c:IsSetCard(0x9221) and (c:IsAbleToHand() or flag) and c:IsFaceupEx()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,0,tp,LOCATION_GRAVE+LOCATION_REMOVED)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,0,tp,LOCATION_GRAVE+LOCATION_REMOVED)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
+	local tc=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp):GetFirst()
+	if not tc then return end
+	local flag1=tc:IsAbleToHand()
+	local flag2=false
+	if tc:IsType(TYPE_MONSTER) then
+		flag2=tc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+	elseif tc:IsType(TYPE_SPELL+TYPE_TRAP) then
+		flag2=tc:IsSSetable()
+	end
+	local op=aux.SelectFromOptions(tp,{flag1,aux.Stringid(id,1)},{flag2,aux.Stringid(id,2)})
+	if op==1 then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,tc)
+	elseif op==2 then
+		if tc:IsType(TYPE_MONSTER) then 
+			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEDOWN_DEFENSE)
+			Duel.ConfirmCards(1-tp,tc)
+		else
+			Duel.SSet(tp,tc)
+		end
+	end
+end

expansions/script/c11637012.lua

+--烤肉料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637006)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.thtg)
+	e2:SetOperation(s.thop)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637006}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637006 then flag=true end
+		end
+	end
+	return flag
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.thfilter(c)
+	return c:IsSetCard(0x9221) and c:IsAbleToHand()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function s.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end

expansions/script/c11637013.lua

+--煎蛋料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637007)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.settg)
+	e2:SetOperation(s.setop)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637007}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637007 then flag=true end
+		end
+	end
+	return flag
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.setfilter(c)
+	return c:IsSetCard(0xa221) and c:IsSSetable()
+end
+function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function s.setop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectMatchingCard(tp,s.setfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SSet(tp,g)
+	end
+end

expansions/script/c11637014.lua

+--蒸馒头料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637009)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--Destroy
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.destg)
+	e2:SetOperation(s.desop)
+	c:RegisterEffect(e2)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637009}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637009 then flag=true end
+		end
+	end
+	return flag
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,TYPE_SPELL+TYPE_TRAP)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function s.desop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local sg=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
+	Duel.HintSelection(sg)
+	Duel.Destroy(sg,REASON_EFFECT)
+end

expansions/script/c11637015.lua

+--土豆炖牛腩料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637006,11637005)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BATTLE_DESTROYING)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCondition(aux.bdocon)
+	e2:SetTarget(s.thtg)
+	e2:SetOperation(s.thop)
+	c:RegisterEffect(e2)
+	--attack all
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_ATTACK_ALL)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637006,11637005}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag1=false
+	local flag2=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637006 then flag1=true end
+			if labels[i]==11637005 then flag2=true end
+		end
+	end
+	return flag1 and flag2
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.thfilter(c)
+	return c:IsSetCard(0xa221) and c:IsAbleToHand()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	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.thfilter),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
\ No newline at end of file

expansions/script/c11637016.lua

+--咖喱饭料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637008,11637009)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--Destroy
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(id,0))
+	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,id)
+	e2:SetTarget(s.destg)
+	e2:SetOperation(s.desop)
+	c:RegisterEffect(e2)
+	--search
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,1))
+	e3:SetCategory(CATEGORY_TOHAND)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_PREDRAW)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCondition(s.thcon)
+	e3:SetTarget(s.thtg)
+	e3:SetOperation(s.thop)
+	c:RegisterEffect(e3)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637008,11637009}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag1=false
+	local flag2=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637008 then flag1=true end
+			if labels[i]==11637009 then flag2=true end
+		end
+	end
+	return flag1 and flag2
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function s.desop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local sg=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	Duel.HintSelection(sg)
+	Duel.Destroy(sg,REASON_EFFECT)
+end
+
+function s.thfilter(c)
+	return c:IsSetCard(0xa221) and c:IsAbleToHand()
+end
+function s.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return tp==Duel.GetTurnPlayer()
+end
+function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return aux.IsPlayerCanNormalDraw(tp) and Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	aux.GiveUpNormalDraw(e,tp)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,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.thfilter),tp,LOCATION_GRAVE,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/c11637017.lua

+--佛跳墙料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--cannot special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(s.splimit)
+	c:RegisterEffect(e1)
+	--act qp in hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_QP_ACT_IN_NTPHAND)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x9221))
+	e2:SetTargetRange(LOCATION_HAND,0)
+	c:RegisterEffect(e2)
+	--disable
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_DISABLE)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_CHAINING)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1,id)
+	e3:SetCondition(s.discon)
+	e3:SetTarget(s.distg)
+	e3:SetOperation(s.disop)
+	c:RegisterEffect(e3)
+	--atk up
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_ATKCHANGE)
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1)
+	e3:SetCost(s.atkcost)
+	e3:SetTarget(s.atktg)
+	e3:SetOperation(s.atkop)
+	c:RegisterEffect(e3)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	if tc:IsSetCard(0xa221) then
+		Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+	end
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag={}
+	local num=0
+	if labels then
+		for i = 0, #labels do 
+			local tmp=true
+			for i2=0, #flag do
+				if labels[i]==flag[i2] then
+					tmp=false
+				end
+			end
+			if tmp then
+				num=num+1
+				table.insert(flag,labels[i])
+			end
+		end
+	end
+	return num>=3
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.discon(e,tp,eg,ep,ev,re,r,rp)
+	return re:IsHasType(EFFECT_TYPE_ACTIVATE) and rp==tp and re:GetHandler():IsSetCard(0xa221)
+end
+function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateMonsterFilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	local g=Duel.GetMatchingGroup(aux.NegateMonsterFilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,PLAYER_ALL,LOCATION_MZONE)
+end
+function s.disop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
+	local tc=Duel.SelectMatchingCard(tp,aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,1,1,nil):GetFirst()
+	if not tc then return end
+	Duel.NegateRelatedChain(tc,RESET_TURN_SET)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_DISABLE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	tc:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_DISABLE_EFFECT)
+	e2:SetValue(RESET_TURN_SET)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	tc:RegisterEffect(e2)
+end
+
+function s.atkcfilter(c)
+	return c:IsSetCard(0x9221) and c:IsAbleToDeckOrExtraAsCost() and c:IsFaceupEx()
+end
+function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	e:SetLabel(1)
+	return true
+end
+function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		if e:GetLabel()==0 then return false end
+		e:SetLabel(0)
+		return Duel.IsExistingMatchingCard(s.atkcfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,0,1,e:GetHandler()) 
+	end
+	e:SetLabel(0)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local g=Duel.GetMatchingGroup(s.atkcfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,0,e:GetHandler())
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local tg=g:Select(tp,1,#g,nil)
+	Duel.HintSelection(tg)
+	local num=Duel.SendtoDeck(tg,nil,2,REASON_COST)
+	e:SetLabel(num)
+end
+function s.atkop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) or c:IsFacedown() then return end
+	local num=e:GetLabel()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+	e1:SetValue(num*500)
+	c:RegisterEffect(e1)
+end

expansions/script/c11637018.lua

+--扬州炒饭料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637007,11637009)
+	--cannot special summon
+	local e0=Effect.CreateEffect(c)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e0:SetValue(s.splimit)
+	c:RegisterEffect(e0)
+	--indes
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+	e1:SetValue(1)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	c:RegisterEffect(e2)
+	--SendtoGrave   
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,0))
+	e3:SetCategory(CATEGORY_TOGRAVE)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1,id)
+	e3:SetCondition(s.tgcon)
+	e3:SetTarget(s.tgtg)
+	e3:SetOperation(s.tgop)
+	c:RegisterEffect(e3)
+	--special summon   
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(id,1))
+	e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_FREE_CHAIN)
+	e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
+	e4:SetRange(LOCATION_MZONE) 
+	e4:SetCountLimit(1)
+	e4:SetTarget(s.sptg)
+	e4:SetOperation(s.spop)
+	c:RegisterEffect(e4)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637007,11637009}
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	if tc:IsSetCard(0xa221) then
+		Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+	end
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag={}
+	local flag1=false
+	local flag2=false
+	local num=0
+	if labels then
+		for i = 0, #labels do 
+			local tmp=true
+			for i2=0, #flag do
+				if labels[i]==flag[i2] then
+					tmp=false
+				end
+			end
+			if tmp then
+				num=num+1
+				table.insert(flag,labels[i])
+			end
+			if labels[i]==11637007 then flag1=true end
+			if labels[i]==11637009 then flag2=true end
+		end
+	end
+	return num>=3 and flag1 and flag2
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+
+function s.tgfilter(c)
+	return c:IsSetCard(0xa221)
+end
+function s.tgcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(s.tgfilter,1,nil)
+end
+function s.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,1-tp,LOCATION_ONFIELD)
+end
+function s.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
+	if #g<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local tc=g:Select(1-tp,1,1,nil)
+	Duel.HintSelection(tc)
+	Duel.SendtoGrave(tc,REASON_RULE)
+end
+
+function s.spfilter(c,e,tp)
+	return c:IsSetCard(0x9221) and not c:IsType(TYPE_FUSION) 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.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
+end
+function s.spop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
+	if #tc<=0 then return end
+	Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+end
\ No newline at end of file

expansions/script/c11637023.lua

+--鲜虾蒸蛋料理
+local s,id,o=GetID()
+function s.initial_effect(c)
+	aux.AddCodeList(c,11637004,11637007)
+	--cannot special summon
+	local e0=Effect.CreateEffect(c)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e0:SetValue(s.splimit)
+	c:RegisterEffect(e0)
+	--immune
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(id,0))
+	e4:SetCategory(CATEGORY_ANNOUNCE)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_FREE_CHAIN)
+	e4:SetHintTiming(TIMINGS_CHECK_MONSTER,TIMINGS_CHECK_MONSTER)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCountLimit(1)
+	e4:SetTarget(s.imtg)
+	e4:SetOperation(s.imop)
+	c:RegisterEffect(e4)
+	--immune
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(id,1))
+	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetCondition(s.atkcon)
+	e1:SetTarget(s.atktg)
+	e1:SetOperation(s.atkop)
+	c:RegisterEffect(e1)
+	if not s.global_check then
+		s.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_CHAINING)
+		ge1:SetOperation(s.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(s.checkop2)
+		Duel.RegisterEffect(ge1,0)
+		local ge2=Effect.CreateEffect(c)
+		ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge2:SetCode(EVENT_CHAIN_SOLVED)
+		ge2:SetOperation(s.checkop3)
+		Duel.RegisterEffect(ge2,0)
+	end
+end
+
+s.FoodMaterial_Listed={11637004,11637007}
+
+function s.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	Duel.RegisterFlagEffect(0,id,RESET_CHAIN,0,1,tc:GetCode())
+end
+function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
+	for tc in aux.Next(eg) do
+		if tc:IsSetCard(0x9221) then
+			Duel.RegisterFlagEffect(0,81,RESET_CHAIN,0,1)
+		end
+	end
+end
+function s.checkop3(e,tp,eg,ep,ev,re,r,rp)
+	local tc=re:GetHandler()
+	if tc:IsSetCard(0xa221) and re:IsHasType(EFFECT_TYPE_ACTIVATE) then
+		Duel.RegisterFlagEffect(rp,id+1,0,0,0)
+	end
+end
+
+function s.label_check(...)
+	local labels={...}
+	local flag1=false
+	local flag2=false
+	if labels then 
+		for i = 0, #labels do 
+			if labels[i]==11637004 then flag1=true end
+			if labels[i]==11637007 then flag2=true end
+		end
+	end
+	return flag1 and flag2
+end
+function s.splimit(e,se,sp,st)
+	return s.label_check(Duel.GetFlagEffectLabel(0,id)) and se:GetHandler():IsSetCard(0xa221) and Duel.GetFlagEffect(0,81)==0
+end
+
+function s.imtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local code=Duel.AnnounceCard(tp)
+	e:SetLabel(code)
+end
+function s.imop(e,tp,eg,ep,ev,re,r,rp)
+	local code=e:GetLabel()
+	local c=e:GetHandler()
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_IMMUNE_EFFECT)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetLabel(code)
+	e2:SetTarget(s.immune)
+	e2:SetValue(s.efilter)
+	Duel.RegisterEffect(e2,tp)
+end
+function s.immune(e,c)
+	return c:IsSetCard(0x9221) and c:IsType(TYPE_FUSION)
+end
+function s.efilter(e,re)
+	local code=e:GetLabel()
+	return re:GetHandler():IsCode(code)
+end
+
+function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:GetReasonPlayer()==1-tp
+end
+function s.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
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function s.atkop(e,tp,eg,ep,ev,re,r,rp)
+	local num=Duel.GetFlagEffect(tp,id+1)
+	local c=e:GetHandler()
+	local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
+	local dg=Group.CreateGroup()
+	local tc=g:GetFirst()
+	while tc do
+		local preatk=tc:GetAttack()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(num*(-300))
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+		if preatk~=0 and tc:IsAttack(0) then dg:AddCard(tc) end
+		tc=g:GetNext()
+	end
+	Duel.Destroy(dg,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c21080001.lua

+--圣罗伯特的拼合
+local m=21080001
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	aux.AddCodeList(c,15005130)
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_EXTRA_SYNCHRO_MATERIAL)
+	e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e0:SetRange(LOCATION_HAND)
+	e0:SetValue(cm.matval)
+	c:RegisterEffect(e0) 
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
+	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e2:SetRange(LOCATION_HAND)
+	e2:SetValue(cm.matval1)
+	c:RegisterEffect(e2)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e1:SetType(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCountLimit(1,m)
+	e1:SetCost(cm.spcost)
+	e1:SetTarget(cm.thtg)
+	e1:SetOperation(cm.thop)
+	c:RegisterEffect(e1)
+end
+function cm.matval(e,c)
+	return (c:IsType(TYPE_SYNCHRO)) and aux.IsCodeListed(c,15005130)
+end
+function cm.mfilter(c)
+	return true
+end
+function cm.matval1(e,c,mg,lc)
+	if not aux.IsCodeListed(c,15005130) then return false,nil end
+	return true,not mg or mg:IsExists(cm.mfilter,0,nil) and aux.IsCodeListed(c,15005130)
+end
+function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
+	Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_COST)
+end
+function cm.filter(c)
+	return (aux.IsCodeListed(c,15005130) or c:IsCode(15005130)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER) and not c:IsCode(21080001)
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if #g>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+
+
+

expansions/script/c21080002.lua

+--圣海德威的开辟
+local m=21080002
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	aux.AddCodeList(c,15005130)
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_EXTRA_SYNCHRO_MATERIAL)
+	e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e0:SetRange(LOCATION_HAND)
+	e0:SetValue(cm.matval)
+	c:RegisterEffect(e0) 
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
+	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e2:SetRange(LOCATION_HAND)
+	e2:SetValue(cm.matval1)
+	c:RegisterEffect(e2)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
+	e1:SetType(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCountLimit(3,m)
+	e1:SetCost(cm.spcost)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+function cm.matval(e,c)
+	return (c:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_LINK)) and aux.IsCodeListed(c,15005130)
+end
+function cm.mfilter(c)
+	return true
+end
+function cm.matval1(e,c,mg,lc)
+	if not aux.IsCodeListed(c,15005130) then return false,nil end
+	return true,not mg or mg:IsExists(cm.mfilter,0,nil) and aux.IsCodeListed(c,15005130)
+end
+function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
+	Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_COST)
+end
+function cm.spfilter(c,e,tp,sc)
+	return (aux.IsCodeListed(c,15005130)) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_DECK,0,nil,e,tp,c)
+	local dcount=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
+	if dcount==0 then return end
+	if g:GetCount()==0 then
+		Duel.ConfirmDecktop(tp,dcount)
+		Duel.ShuffleDeck(tp)
+		return
+	end
+	local seq=-1
+	local tc=g:GetFirst()
+	local spcard=nil
+	while tc do
+		if tc:GetSequence()>seq then
+			seq=tc:GetSequence()
+			spcard=tc
+		end
+		tc=g:GetNext()
+	end
+	Duel.ConfirmDecktop(tp,dcount-seq)
+	if spcard:IsAbleToHand() then
+		Duel.SendtoHand(spcard,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,spcard)
+		Duel.ShuffleHand(tp)
+	end
+end
+
+
+

expansions/script/c21080010.lua

+--异帽机的渴求
+local m=21080010
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_MONSTER),3,99,cm.lcheck)
+	c:EnableReviveLimit()
+	aux.AddCodeList(c,15005130)
+	local e13=Effect.CreateEffect(c)
+	e13:SetDescription(aux.Stringid(m,1))
+	e13:SetCategory(CATEGORY_REMOVE)
+	e13:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e13:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e13:SetRange(LOCATION_MZONE)
+	e13:SetTarget(cm.destg)
+	e13:SetOperation(cm.desop)
+	c:RegisterEffect(e13)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_MATERIAL_CHECK)
+	e2:SetValue(cm.valcheck)
+	e2:SetLabelObject(e1)
+	c:RegisterEffect(e2)
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(m,2))
+	e4:SetCategory(CATEGORY_RELEASE+CATEGORY_SPECIAL_SUMMON)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_FREE_CHAIN)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCountLimit(1,m)
+	e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e4:SetTarget(cm.sptg)
+	e4:SetOperation(cm.spop)
+	c:RegisterEffect(e4)
+end
+function cm.lcheck(g)
+	return g:IsExists(aux.IsCodeListed,3,nil,15005130) or (g:IsExists(aux.IsCode,1,nil,15005130) and g:IsExists(aux.IsCodeListed,2,nil,15005130)) or (g:IsExists(aux.IsCode,2,nil,15005130) and g:IsExists(aux.IsCodeListed,1,nil,15005130)) or (g:IsExists(aux.IsCode,3,nil,15005130))
+end
+function cm.desfilter1(c)
+	return Duel.IsExistingMatchingCard(nil,0,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c)
+end
+function cm.cfilter(c,ec)
+	return c:IsFaceup() and ec:GetLinkedGroup():IsContains(c) and Duel.IsExistingMatchingCard(nil,0,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c)
+end
+function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.desfilter1,tp,LOCATION_ONFIELD,0,1,nil) end
+	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,2,0,0)
+end
+function cm.desop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g1=Duel.SelectMatchingCard(tp,cm.desfilter1,tp,LOCATION_ONFIELD,0,1,1,nil)
+	if #g1==0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g2=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,g1)
+	g1:Merge(g2)
+	Duel.HintSelection(g1)
+	Duel.Remove(g1,POS_FACEUP,REASON_EFFECT)
+end
+function cm.spfilter(c,e,tp,sc)
+	return (aux.IsCodeListed(c,15005130) or c:IsCode(15005130)) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetMZoneCount(tp,sc)>=1
+end
+function cm.spgcheck(g)
+	return g:GetSum(Card.GetLevel)>=10
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then
+		local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_DECK,0,nil,e,tp,c)
+		return e:GetHandler():IsReleasable() and Duel.IsPlayerCanSpecialSummon(tp) and g:CheckSubGroup(cm.spgcheck) and not Duel.IsPlayerAffectedByEffect(tp,63060238) and not Duel.IsPlayerAffectedByEffect(tp,97148796)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not (c:IsRelateToEffect(e) and c:IsReleasable()) then return end
+	if Duel.Release(c,REASON_EFFECT)~=0 and Duel.IsPlayerCanSpecialSummon(tp) then
+		local ct=1
+		local dcount=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
+		local spg=Group.CreateGroup()
+		local check=0
+		while (ct<=dcount and check==0) do
+			local g=Duel.GetDecktopGroup(tp,ct)
+			local fg=g:Filter(cm.spfilter,nil,e,tp,c)
+			if fg:CheckSubGroup(cm.spgcheck) then
+				check=1
+				spg=fg
+			end
+			ct=ct+1
+		end
+		if check==0 then
+			Duel.ConfirmDecktop(tp,dcount)
+			Duel.ShuffleDeck(tp)
+			return
+		end
+		Duel.ConfirmDecktop(tp,ct-1)
+		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+		if ft<=0 or spg:GetCount()==0 then return end
+		if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
+		if ft>=1 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+			local spcg=Group.CreateGroup()
+			if ft<=Duel.GetLocationCount(tp,LOCATION_MZONE) then
+				spcg=spg
+			else
+				spcg=spg:Select(tp,ft,ft,nil)
+			end
+			local tc=spcg:GetFirst()
+			while tc do
+				Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
+				tc=spcg:GetNext()
+			end
+			Duel.SpecialSummonComplete()
+		end
+	end
+end
\ No newline at end of file

expansions/script/c28308574.lua

@@ -9,7 +9,7 @@ function c28308574.initial_effect(c)
 	e1:SetCategory(CATEGORY_LEAVE_GRAVE+CATEGORY_TOHAND+CATEGORY_DAMAGE)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetCountLimit(1,28308574)
+	e1:SetCountLimit(1)
 	e1:SetCondition(c28308574.thcon1)
 	e1:SetTarget(c28308574.thtg)
 	e1:SetOperation(c28308574.thop)
@@ -34,6 +34,13 @@ function c28308574.initial_effect(c)
 	e4:SetOperation(c28308574.regop)
 	c:RegisterEffect(e4)
 	e4:SetLabelObject(e3)
+	--indes
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e5:SetCode(EVENT_BE_MATERIAL)
+	e5:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
+	e5:SetOperation(c28308574.indop)
+	c:RegisterEffect(e5)
 end
 function c28308574.mfilter(c)
 	return c:IsFusionSetCard(0x283) and c:IsFusionType(TYPE_PENDULUM)
@@ -146,5 +153,29 @@ function c28308574.atkop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 		e1:SetValue(-ct)
 		tc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(e:GetHandler())
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_DISABLE)
+		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+		local e3=e2:Clone()
+		e3:SetCode(EFFECT_DISABLE_EFFECT)
+		tc:RegisterEffect(e3)
 	end
 end
+function c28308574.indop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local rc=c:GetReasonCard()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_CANNOT_TO_DECK)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	rc:RegisterEffect(e1,true)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_CANNOT_CHANGE_CONTROL)
+	rc:RegisterEffect(e2,true)
+	rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(28308574,4))
+end

expansions/script/c28361833.lua

 --闪耀的放课后 五色的笑颜
 function c28361833.initial_effect(c)
 	--Synchro summon
-	aux.AddSynchroMixProcedure(c,aux.Tuner(Card.IsSetCard,0x283),aux.NonTuner(Card.IsSetCard,0x283),c28361833.mfilter,c28361833.mfilter,0,99)
+	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x283),aux.FilterBoolFunction(Card.IsSetCard,0x283),2)
 	c:EnableReviveLimit()
 	--synchro level
 	local ge0=Effect.CreateEffect(c)
@@ -23,7 +23,7 @@ function c28361833.initial_effect(c)
 	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(c28361833.synlimit)
+	e1:SetValue(aux.synlimit)
 	c:RegisterEffect(e1)
 	--hokura power
 	local e2=Effect.CreateEffect(c)
@@ -40,11 +40,10 @@ function c28361833.initial_effect(c)
 	c:RegisterEffect(e3)
 	--to hand
 	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(28361833,4))
 	e4:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
 	e4:SetType(EFFECT_TYPE_IGNITION)
 	e4:SetRange(LOCATION_MZONE)
-	e4:SetCountLimit(1,28361833)
+	e4:SetCountLimit(1)
 	e4:SetTarget(c28361833.thtg)
 	e4:SetOperation(c28361833.thop)
 	c:RegisterEffect(e4)
@@ -59,14 +58,8 @@ function c28361833.synclv(e,c)
 		return lv
 	end
 end
-function c28361833.mfilter(c,syncard)
-	return (c:IsTuner(syncard) or c:IsNotTuner(syncard)) and c:IsSetCard(0x283)
-end
-function c28361833.synlimit(e,se,sp,st)
-	return st&SUMMON_TYPE_SYNCHRO==SUMMON_TYPE_SYNCHRO and not se
-end
 function c28361833.valcheck(e,c)
-	local val=c:GetMaterial():GetClassCount(Card.GetAttribute)
+	local val=c:GetMaterial():GetClassCount(Card.GetOriginalAttribute)
 	e:SetLabel(val)
 end
 function c28361833.regcon(e,tp,eg,ep,ev,re,r,rp)
@@ -148,28 +141,23 @@ end
 function c28361833.cfilter(c)
 	return c:IsFaceup() and c:IsSetCard(0x283)
 end
-function c28361833.dthfilter(c)
+function c28361833.thfilter(c)
 	return c:IsSetCard(0x283) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
 end
-function c28361833.gthfilter(c)
-	return c:IsSetCard(0x283) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
-end
 function c28361833.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c28361833.dthfilter,tp,LOCATION_DECK,0,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c28361833.thfilter,tp,LOCATION_DECK,0,1,nil) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function c28361833.thop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(c28361833.cfilter,tp,LOCATION_MZONE,0,nil)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local dtg=Duel.SelectMatchingCard(tp,c28361833.dthfilter,tp,LOCATION_DECK,0,1,1,nil)
-	if #dtg>0 then
-		Duel.SendtoHand(dtg,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,dtg)
-		if g:GetClassCount(Card.GetAttribute)>=3 and Duel.IsExistingMatchingCard(c28361833.gthfilter,tp,LOCATION_GRAVE,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(28361833,5)) then
+	local tg=Duel.SelectMatchingCard(tp,c28361833.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if #tg>0 then
+		Duel.SendtoHand(tg,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,tg)
+		if g:GetClassCount(Card.GetAttribute)>=3 and Duel.SelectYesNo(tp,aux.Stringid(28361833,4)) then
 			Duel.BreakEffect()
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-			local gtg=Duel.SelectMatchingCard(tp,c28361833.gthfilter,tp,LOCATION_GRAVE,0,1,1,nil)
-			Duel.SendtoHand(gtg,nil,REASON_EFFECT)
+			Duel.Recover(tp,500,REASON_EFFECT)
 		end
 	end
 end

expansions/script/c28366995.lua

@@ -2,7 +2,7 @@
 function c28366995.initial_effect(c)
 	--synchro summon
 	c:EnableReviveLimit()
-	aux.AddSynchroMixProcedure(c,c28366995.matfilter1,nil,nil,aux.NonTuner(Card.IsSetCard,0x283),1,1)
+	aux.AddSynchroMixProcedure(c,c28366995.matfilter,nil,nil,aux.FilterBoolFunction(Card.IsSetCard,0x283),1,1)
 	--recover
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_RECOVER+CATEGORY_TOHAND)
@@ -33,8 +33,8 @@ function c28366995.initial_effect(c)
 	e3:SetOperation(c28366995.indop)
 	c:RegisterEffect(e3)
 end
-function c28366995.matfilter1(c,syncard)
-	return c:IsTuner(syncard) or (c:IsSetCard(0x287) and Duel.GetLP(c:GetControler())>=9000)
+function c28366995.matfilter(c,syncard)
+	return c:IsTuner(syncard) or Duel.GetLP(c:GetControler())>=9000
 end
 function c28366995.recon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
@@ -43,15 +43,15 @@ function c28366995.retg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,1000)
 end
-function c28366995.cfilter(c)
-	return c:IsAbleToHand() and c:IsLocation(LOCATION_GRAVE)
+function c28366995.cfilter(c,tp)
+	return c:IsAbleToHand() and c:IsLocation(LOCATION_GRAVE) and c:IsControler(tp)
 end
 function c28366995.reop(e,tp,eg,ep,ev,re,r,rp)
 	local mg=e:GetHandler():GetMaterial()
-	if Duel.Recover(tp,1000,REASON_EFFECT)>0 and Duel.GetLP(tp)>=10000 and mg:IsExists(c28366995.cfilter,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(28366995,0)) then
+	if Duel.Recover(tp,1000,REASON_EFFECT)>0 and Duel.GetLP(tp)>=10000 and mg:IsExists(c28366995.cfilter,1,nil,tp) and Duel.SelectYesNo(tp,aux.Stringid(28366995,0)) then
 		Duel.BreakEffect()
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local tg=mg:Filter(c28366995.cfilter,nil):Select(tp,1,1,nil)
+		local tg=mg:Filter(c28366995.cfilter,nil,tp):Select(tp,1,1,nil)
 		Duel.SendtoHand(tg,nil,REASON_EFFECT)
 	end
 end
@@ -75,7 +75,7 @@ function c28366995.thop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c28366995.indcon(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():GetReasonCard():IsSetCard(0x283) and e:GetHandler():GetReasonCard():IsType(TYPE_FUSION+TYPE_XYZ+TYPE_LINK)
+	return e:GetHandler():GetReasonCard():IsType(TYPE_FUSION+TYPE_XYZ+TYPE_LINK)
 end
 function c28366995.indop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()