Updatte 1108

Updated 496 cards

expansions/lflist.conf

@@ -78,6 +78,8 @@
 130005119 0
 130005120 0
 #
+14010108 0
+15000258 0
 72100104 0
 72100025 0
 72100125 0
@@ -142,13 +144,6 @@
 88888888 0
 49966666 0
 49999999 0
-82208110 0
-82208111 0
-82208112 0
-82208113 0
-82208114 0
-82208115 0
-82208116 0
 114620000 0
 114620001 0
 114620002 0

expansions/script/c10199991.lua

 --Real Scl Version - Variable
-local Version_Number=20200409
+local Version_Number=20201030
 local m=10199990
 local vm=10199991
+if rsv then return end
 rsv={}  --"Base Function"
 rscf={}   --"Card Function"
 rsgf={}   --"Group Function"
@@ -33,6 +34,7 @@ rsef.attacheffect ={} --"Effect information for attach effects"
 rsef.attacheffectf ={}
 rsef.solveeffect ={}
 rsop.baseop={}
+rscf.ssproce ={}
 
 rscf.synchro_material_action={} --"Custom syn material's action"
 rscf.xyz_material_action={} --"Custom xyz material's action" 
@@ -69,43 +71,93 @@ rscode.Utility_Xyz_Material =   m+400 --"Utility Xyz Material"
 rscode.Previous_Set_Code	=   m+500 --"Previous Set Code" 
 rscode.Synchro_Material =   m+600  --"Record synchro proceudre target"
 rscode.Pre_Complete_Proc = m+700 --"Previous c:CompleteProcedure" 
+rscode.Special_Procedure = m+900
 
 rscode.Set  =   m+800   --"EVENT_SET"
 
 --Hint Message Variable
-rshint.act=aux.Stringid(m,0) --"activate spell/trap"
-rshint.dis=aux.Stringid(38265153,3) --"cards will be disable effects "
-rshint.ad=aux.Stringid(m,2)  --"cards will be change Atk/Def"
-rshint.rtg=aux.Stringid(48976825,0) --"return to grave"
+rshint.act  =aux.Stringid(m,0) --"activate card"
+rshint.sact =aux.Stringid(m,1) --"select cards to activate"
+
+rshint.ce   =aux.Stringid(23912837,1)   --"choose 1 effect"
+
+rshint.neg  =aux.Stringid(19502505,1)   --"negate activation"
+rshint.negsum =aux.Stringid(m+1,1)	--"negate summon"
+rshint.negsp  =aux.Stringid(74892653,0) --"negate special summon"
+
+rshint.dis  =aux.Stringid(39185163,1) --"negate effect"
+rshint.sdis =aux.Stringid(38265153,3) --"Select cards to disable"
+rshint.wdis =aux.Stringid(25166510,2) --"would you disable?"
+
+rshint.sp   =aux.Stringid(74892653,2) --"special summon"
+rshint.wsp  =aux.Stringid(17535764,1) --"would you SS a monster?"
+rshint.sum  =aux.Stringid(65247798,0) --"face-up attack position summon"
+rshint.tk   =aux.Stringid(9929398,0)  --"special summon token"
+
+rshint.pos  =aux.Stringid(3648368,0)  --"change position"
+rshint.ctrl =aux.Stringid(4941482,0)  --"get control"
+rshint.set  =aux.Stringid(2521011,0)  --"set"
+
+rshint.dr   =aux.Stringid(4732017,0)  --"draw card"
+rshint.wdr=aux.Stringid(3679218,1)  --"would you draw?"
+
+rshint.dish =aux.Stringid(18407024,0) --"discard card from hand"
+rshint.disd =aux.Stringid(15939448,0) --"send decktop card to GY"
+
+rshint.dam  =aux.Stringid(3775068,0)  --"effect damage"
+rshint.rec  =aux.Stringid(16259549,0) --"effect recover"
+
+rshint.ct   =aux.Stringid(3070049,0)  --"add counter"
+
+rshint.an   =aux.Stringid(10809984,0) --"announce"
+
+rshint.coin =aux.Stringid(2196767,0)  --"toss coin"
+rshint.dice =aux.Stringid(3493058,0)  --"toss dice"
+
+rshint.se   =aux.Stringid(135598,0)   --"search card from deck"
+rshint.th   =aux.Stringid(1249315,0)  --"send to hand"
+rshint.wth  =aux.Stringid(26118970,1) --"would you send to hand?"
+rshint.rth  =aux.Stringid(13890468,0) --"return to hand"
+rshint.wrth =aux.Stringid(9464441,2)  --"would you return to hand?"
+
+rshint.des  =aux.Stringid(1571945,0)  --"destroy"
+rshint.wdes =aux.Stringid(20590515,2) --"would you destroy?"
+
+rshint.res  =aux.Stringid(33779875,0) --"Tribute monster"
+
+rshint.rm   =aux.Stringid(612115,0)   --"remove"
+rshint.wrm  =aux.Stringid(93191801,2) --"would you reomve?"
+
+rshint.tg=aux.Stringid(1050186,0)   --"send to GY"
+rshint.wtg=aux.Stringid(62834295,2)  --"would you send to GY?"
+rshint.rtg=aux.Stringid(28039390,1)  --"return to GY" 
+rshint.srtg=aux.Stringid(48976825,0) --"select cards to return to GY"
+
+rshint.td=aux.Stringid(4779823,1)   --"return to deck"
+rshint.wtd=aux.Stringid(m,6)		--"would you send to Deck?"
+rshint.te=aux.Stringid(18210764,0)  --"face-up add to EX"
+rshint.ste=aux.Stringid(24094258,3) --"select cards to face-up add to EX"
+
+rshint.eq   =aux.Stringid(68184115,0) --"equip"
+rshint.seq  =rshint.eq			  --"select cards to equip"
+rshint.weq  =aux.Stringid(35100834,0) --"would you equip?"
+
+--rshint.ua=aux.Stringid(1412158,0)  --"Update ATK"
+--rshint.ud=aux.Stringid(4997565,2)   --"update DEF"
+--rshint.uad=aux.Stringid(18563744,0) --"update ATK and DEF"
+rshint.ad  =aux.Stringid(7194917,0)  --"change ATK and DEF"
+rshint.cad =aux.Stringid(m,2)	   --"select cards to change Atk/Def"
+rshint.clv  =aux.Stringid(9583383,0) --"change level"
+
 rshint.spproc=aux.Stringid(m,4)	--"SS by self produce"
-rshint.negeffect=aux.Stringid(19502505,1) --"negate activation"
-rshint.eq=aux.Stringid(68184115,0)  --"cards will equip"
-rshint.te=aux.Stringid(24094258,3) --"add to extra deck"
-rshint.xyz=HINTMSG_XMATERIAL   --"cards will become overlay cards"
-rshint.diseffect=aux.Stringid(39185163,1) --"negate effect"
-rshint.negsum=aux.Stringid(m+1,1) --"negate summon"
-rshint.negsp=aux.Stringid(74892653,0) --"negate special summon"
+rshint.rstcp=aux.Stringid(43387895,1) --"reset copy effect"
+rshint.epleave=aux.Stringid(m,3)	  --"end phase leave field buff"
+
+rshint.stgct=aux.Stringid(83531441,2) --"select send to the GY number"
+rshint.sdrct=aux.Stringid(m,5)	  --"select draw number"
+
 rshint.darktuner=aux.Stringid(m,14)   --"treat as dark tuner"
 rshint.darksynchro=aux.Stringid(m,15) --"treat as dark synchro"
-rshint.choose=aux.Stringid(23912837,1) --"choose 1 effect"
-rshint.epleave=aux.Stringid(m,3)	--"end phase leave field"
-rshint.finshcopy=aux.Stringid(43387895,1) --"reset copy effect"
-rshint.act2=aux.Stringid(m,1)   --"select card to activate"
-rshint.tgct=aux.Stringid(83531441,2) --"select send to the GY number"
-rshint.drct=aux.Stringid(m,5) --"select draw number"
-
---[[
-rshint.isss=aux.Stringid(17535764,1)	--"would you SS a monster?"
-rshint.istg=aux.Stringid(62834295,2)	--"would you send to GY?"
-rshint.isdes=aux.Stringid(20590515,2)   --"would you destroy?"
-rshint.istd=aux.Stringid(m,1)   --"would you send to Deck?"
-rshint.isrm=aux.Stringid(93191801,2)	--"would you reomve?"
-rshint.isset=aux.Stringid(m,5)  --"would you set?"
-rshint.istf=aux.Stringid(m,6)   --"would you place to field?"
-rshint.isth=aux.Stringid(26118970,1)	--"would you send to hand?"
-rshint.isrh=aux.Stringid(31102447,2)	--"would you return to hand"
-rshint.isdr=aux.Stringid(3679218,1)  --"would you draw?"
---]]
 
 --Property Variable
 rsflag.flaglist =   { EFFECT_FLAG_CARD_TARGET,EFFECT_FLAG_PLAYER_TARGET,EFFECT_FLAG_DELAY,EFFECT_FLAG_DAMAGE_STEP,EFFECT_FLAG_DAMAGE_CAL,
@@ -210,5 +262,3 @@ function rsof.Escape_Old_Functions()
 		return rscf.AddSpecialSummonProcdure(reg_list,range,con,nil,op,desc_list,lim_list,nil,reset_list)
 	end
 end
-
-

expansions/script/c10199992.lua

@@ -37,6 +37,7 @@ local rsss  =   Star_Spirit
 local rsnm  =   Nightmare
 local rslf  =   Little_Fox 
 local rccv  =   Thermonuclear
+local rsfn  =   Fake_News
 
 #XiaoMi 643865567
 local rssg  =   Sex_Gun
@@ -67,6 +68,7 @@ local rsts  =   Trinity_Sword
 #Luoxing 1151483512
 local rsdt  =   Dark_Tale
 local rsod  =   Order
+local rsyzt  =   YanZeTown
 
 #YunZeZhun 1587361112
 local rsphh =   Phantom_Thieves_Of_Hearts
@@ -84,6 +86,7 @@ local rsgs  =   Gran_Sphere
 local rsoc  =   Oligocene_Civilization
 local rsgol =   Giant_of_Light
 local rssb  =   Space_Beasts
+local rsufo =   UFO_Saucer_Monster
 
 #HeiBai 1172777968
 local rstm  =   Toaru_Majutsu_no_Index
@@ -95,10 +98,16 @@ local rsgod =   God
 local rsva  =   VR_Aqua
 //local   =   Tian_Zhi
 local rswk =  White_Moon_Knight
+local rsisr = Israel
 
 #ReiKai 2404873791
 local rsch  =   Churck
 
+#XueXiao 3234454893
+local rsmd  =   Mrs_Dice
+
+#HuangWu 1103516856
+local rsdc  =   Dragon_Caller
 
 --Set Code
 #Scl

expansions/script/c11451461.lua

+--虚诞衍生物
+local m=11451461
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	--pendulum summon
+	aux.EnablePendulumAttribute(c)
+	--temporary remove
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(m)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetTargetRange(1,0)
+	e1:SetCondition(cm.condition)
+	c:RegisterEffect(e1)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetFlagEffect(11451468)==0
+end
\ No newline at end of file

expansions/script/c11451462.lua

+--灰黯音核「启」
+local m=11451462
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	--activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetCountLimit(1,m)
+	e1:SetOperation(cm.acop)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	--special summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,1))
+	e3:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCountLimit(1,m-40)
+	e3:SetCost(cm.spcost)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetRange(LOCATION_HAND)
+	e4:SetCost(cm.spcost2)
+	c:RegisterEffect(e4)
+end
+function cm.lvplus(c)
+	if c:GetLevel()>=1 and c:IsType(TYPE_MONSTER) then return c:GetLevel() else return 2 end
+end
+function cm.filter(c,tp)
+	return c:IsSetCard(0x97a) and c:IsType(TYPE_SPELL) and c:CheckActivateEffect(false,false,false)~=nil and c:GetActivateEffect():IsActivatable(tp,true,true)
+end
+function cm.filter2(c)
+	return c:IsSetCard(0x97a) and ((c:IsFaceup() and c:IsLocation(LOCATION_ONFIELD)) or (c:IsPublic() and c:IsLocation(LOCATION_HAND)) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToRemove()
+end
+function cm.filter3(c,e,tp)
+	return c:IsSetCard(0x97a) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.filter4(c)
+	return c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_TUNER)
+end
+function cm.filter5(c)
+	if Duel.IsPlayerAffectedByEffect(c:GetControler(),11451461) and ((c:IsOnField() and c:IsStatus(STATUS_EFFECT_ENABLED)) or c:IsLocation(LOCATION_HAND)) then return true end
+	return false
+end
+function cm.filter6(c,e)
+	return c:GetFlagEffectLabel(m)==e:GetLabel()
+end
+function cm.fselect(g,lv,tp)
+	return g:GetSum(cm.lvplus)==lv and g:IsExists(cm.filter4,1,nil) and Duel.GetMZoneCount(tp,g,tp,0,0x1f)>0
+end
+function cm.acop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,2))
+	local tg=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
+	if tg then
+		local t=tg:GetType()
+		if t==0x2 or t==0x82 or t==0x10002 or t==0x40002 then
+			Duel.MoveToField(tg,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			Duel.Hint(HINT_CARD,0,tg:GetOriginalCode())
+			local te,ceg,cep,cev,cre,cr,crp=tg:CheckActivateEffect(false,false,true)
+			te:UseCountLimit(tp,1,true)
+			local tep=tg:GetControler()
+			local cost=te:GetCost()
+			local target=te:GetTarget()
+			local operation=te:GetOperation()
+			if t~=0x40002 then tg:CancelToGrave(false) end
+			tg:CreateEffectRelation(te)
+			if cost then cost(te,tep,ceg,cep,cev,cre,cr,crp,1) end
+			if target then target(te,tep,ceg,cep,cev,cre,cr,crp,1) end
+			local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+			if g and g:GetCount()>0 then
+				local fg=g:GetFirst()
+				while fg do
+					fg:CreateEffectRelation(te)
+					fg=g:GetNext()
+				end
+			end
+			tg:SetStatus(STATUS_ACTIVATED,true)
+			if operation then operation(te,tep,ceg,cep,cev,cre,cr,crp) end
+			tg:ReleaseEffectRelation(te)
+			if g and g:GetCount()>0 then
+				fg=g:GetFirst()
+				while fg do
+					fg:ReleaseEffectRelation(te)
+					fg=g:GetNext()
+				end
+			end
+			Duel.RaiseEvent(tg,EVENT_CHAIN_SOLVED,te,0,tp,tp,Duel.GetCurrentChain())
+		elseif t==0x80002 then
+			local te=tg:GetActivateEffect()
+			local fc=Duel.GetFieldCard(tp,LOCATION_FZONE,0)
+			if fc then
+				Duel.SendtoGrave(fc,REASON_RULE)
+				Duel.BreakEffect()
+			end
+			Duel.MoveToField(tg,tp,tp,LOCATION_FZONE,POS_FACEUP,true)
+			te:UseCountLimit(tp,1,true)
+			local tep=tg:GetControler()
+			local cost=te:GetCost()
+			if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
+			Duel.RaiseEvent(tg,4179255,te,0,tp,tp,Duel.GetCurrentChain())
+			tg:RegisterFlagEffect(m-3,RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END,0,2)
+		elseif t==0x20002 then
+			local te=tg:GetActivateEffect()
+			Duel.MoveToField(tg,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			te:UseCountLimit(tp,1,true)
+			local tep=tg:GetControler()
+			local cost=te:GetCost()
+			if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
+			tg:RegisterFlagEffect(m-3,RESET_EVENT+0x1ee0000+RESET_PHASE+PHASE_END,0,2)
+		end
+	end
+end
+function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckLPCost(tp,2000) or Duel.GetTurnPlayer()==tp end
+	if Duel.GetTurnPlayer()~=tp then Duel.PayLPCost(tp,2000) end
+end
+function cm.spcost2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsPublic() and Duel.GetFlagEffect(tp,11451466)>0 and (Duel.CheckLPCost(tp,2000) or Duel.GetTurnPlayer()==tp) end
+	Duel.ResetFlagEffect(tp,11451466)
+	if Duel.GetTurnPlayer()~=tp then Duel.PayLPCost(tp,2000) end
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,0,tp,LOCATION_DECK)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local mg=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_ONFIELD,LOCATION_HAND+LOCATION_GRAVE+LOCATION_ONFIELD,nil)
+	local sg=Duel.GetMatchingGroup(cm.filter3,tp,LOCATION_DECK,0,nil,e,tp)
+	local tg=Group.CreateGroup()
+	for sc in aux.Next(sg) do
+		local tc=mg:CheckSubGroup(cm.fselect,1,#mg,cm.lvplus(sc),tp)
+		if tc then tg:AddCard(sc) end
+	end
+	if not tg or #tg==0 or not Duel.SelectYesNo(tp,aux.Stringid(11451461,2)) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local tc=tg:Select(tp,1,1,nil):GetFirst()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local rg=mg:SelectSubGroup(tp,cm.fselect,false,1,#mg,cm.lvplus(tc),tp)
+	Card.SetMaterial(tc,rg)
+	local tg=rg:Filter(cm.filter5,nil)
+	if not tg or #tg==0 then
+		Duel.Remove(rg,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL)
+	else
+		Duel.Hint(HINT_CARD,0,11451461)
+		local te0=Duel.IsPlayerAffectedByEffect(0,11451461)
+		local te1=Duel.IsPlayerAffectedByEffect(1,11451461)
+		local tg0=tg:Filter(Card.IsControler,nil,0)
+		local tg1=tg:Filter(Card.IsControler,nil,1)
+		rg:Sub(tg)
+		if te0 and tg0 then
+			te0:GetHandler():RegisterFlagEffect(11451468,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+			local tg0f=tg0:Filter(Card.IsOnField,nil)
+			local tg0h=tg0:Filter(Card.IsLocation,nil,LOCATION_HAND)
+			if tg0f and Duel.Remove(tg0f,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL+REASON_TEMPORARY)>0 then
+				tg0f:KeepAlive()
+				local e1=Effect.CreateEffect(e:GetHandler())
+				e1:SetDescription(aux.Stringid(11451461,0))
+				e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+				e1:SetCode(EVENT_PHASE+PHASE_END)
+				e1:SetReset(RESET_PHASE+PHASE_END)
+				e1:SetLabelObject(tg0f)
+				e1:SetCountLimit(1)
+				e1:SetOperation(cm.retop1)
+				Duel.RegisterEffect(e1,tp)
+			end
+			if tg0h and Duel.Remove(tg0h,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL)>0 then
+				Duel.ShuffleHand(tp)
+				local fid=c:GetFieldID()
+				tg0h:ForEach(Card.RegisterFlagEffect,m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
+				tg0h:KeepAlive()
+				local e2=Effect.CreateEffect(e:GetHandler())
+				e2:SetDescription(aux.Stringid(11451461,1))
+				e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+				e2:SetCode(EVENT_PHASE+PHASE_END)
+				e2:SetCountLimit(1)
+				e2:SetLabel(fid)
+				e2:SetLabelObject(tg0h)
+				e2:SetReset(RESET_PHASE+PHASE_END)
+				e2:SetOperation(cm.retop2)
+				Duel.RegisterEffect(e2,tp)
+			end
+		end
+		if te1 and tg1 then
+			te1:GetHandler():RegisterFlagEffect(11451468,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+			local tg1f=tg1:Filter(Card.IsOnField,nil)
+			local tg1h=tg1:Filter(Card.IsLocation,nil,LOCATION_HAND)
+			if tg1f and Duel.Remove(tg1f,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL+REASON_TEMPORARY)>0 then
+				tg1f:KeepAlive()
+				local e1=Effect.CreateEffect(e:GetHandler())
+				e1:SetDescription(aux.Stringid(11451461,0))
+				e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+				e1:SetCode(EVENT_PHASE+PHASE_END)
+				e1:SetReset(RESET_PHASE+PHASE_END)
+				e1:SetLabelObject(tg1f)
+				e1:SetCountLimit(1)
+				e1:SetOperation(cm.retop1)
+				Duel.RegisterEffect(e1,tp)
+			end
+			if tg1h and Duel.Remove(tg1h,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL)>0 then
+				Duel.ShuffleHand(tp)
+				local fid=c:GetFieldID()
+				tg1h:ForEach(Card.RegisterFlagEffect,m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
+				tg1h:KeepAlive()
+				local e2=Effect.CreateEffect(e:GetHandler())
+				e2:SetDescription(aux.Stringid(11451461,1))
+				e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+				e2:SetCode(EVENT_PHASE+PHASE_END)
+				e2:SetCountLimit(1)
+				e2:SetLabel(fid)
+				e2:SetLabelObject(tg1h)
+				e2:SetReset(RESET_PHASE+PHASE_END)
+				e2:SetOperation(cm.retop2)
+				Duel.RegisterEffect(e2,tp)
+			end
+		end
+		if rg then Duel.Remove(rg,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL) end
+	end
+	Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+end
+function cm.retop1(e,tp,eg,ep,ev,re,r,rp)
+	local g=e:GetLabelObject()
+	for tc in aux.Next(g) do
+		Duel.ReturnToField(tc)
+	end
+	g:DeleteGroup()
+end
+function cm.retop2(e,tp,eg,ep,ev,re,r,rp)
+	local g=e:GetLabelObject():Filter(cm.filter6,nil,e)
+	Duel.SendtoHand(g,nil,REASON_EFFECT)
+	e:GetLabelObject():DeleteGroup()
+end
\ No newline at end of file