fix

expansions/script/c10199991.lua

@@ -21,6 +21,8 @@ rsreset={}   --"Reset Function"
 rshint={}   --"Hint Function"
 rsloc={}	--"Location Function"
 
+rsdv="Divide_Variable"
+
 --Info Variable
 rsval.valinfo   ={} --"Value for inside series, inside type etc."
 rscost.costinfo ={} --"Cost information, for record cost value" 
@@ -57,20 +59,22 @@ rsreset.ered	=   RESET_EVENT+RESETS_REDIRECT
 
 --Code Variable 
 rscode.Extra_Effect_Activate   =   m+100   --"Attach Effect"
-rscode.Extra_Effect_BSolve   =   m+200 
-rscode.Extra_Effect_ASolve   =   m+800 
+rscode.Extra_Effect_BSolve   =   m+101 
+rscode.Extra_Effect_ASolve   =   m+102 
+
+rscode.Phase_Leave_Flag   =   m+200   --"Summon Flag for SummonBuff"
+rscode.Extra_Synchro_Material=  m+300 --"Extra Synchro Material"
+rscode.Extra_Xyz_Material   =   m+301 --"Extra Xyz Material" 
+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.Phase_Leave_Flag   =   m+300   --"Summon Flag for SummonBuff"
-rscode.Extra_Synchro_Material=  m+400 --"Extra Synchro Material"
-rscode.Extra_Xyz_Material   =   m+401 --"Extra Xyz Material" 
-rscode.Utility_Xyz_Material =   m+500 --"Utility Xyz Material" 
-rscode.Previous_Set_Code	=   m+600 --"Previous Set Code" 
-rscode.Synchro_Material =   m+700  --"Record synchro proceudre target"
-rscode.Pre_Complete_Proc = m+900 --"Previous c:CompleteProcedure" 
+rscode.Set  =   m+800   --"EVENT_SET"
 
 --Hint Message Variable
 rshint.act=aux.Stringid(m,0) --"activate spell/trap"
-rshint.dis=aux.Stringid(m,1) --"cards will be disable effects "
+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.spproc=aux.Stringid(m,4) --"SS by self produce"
@@ -86,6 +90,22 @@ 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,
@@ -125,6 +145,7 @@ rscf.exlist_rp  =   { TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ,TYPE_LINK,TYPE_PENDULUM,
 
 --Location Variable
 rsloc.hd=LOCATION_HAND+LOCATION_DECK 
+rsloc.ho=LOCATION_HAND+LOCATION_ONFIELD
 rsloc.hg=LOCATION_HAND+LOCATION_GRAVE  
 rsloc.dg=LOCATION_DECK+LOCATION_GRAVE 
 rsloc.gr=LOCATION_GRAVE+LOCATION_REMOVED 
@@ -139,6 +160,7 @@ rsloc.all=0xff
 
 --Escape Old Functions
 function rsof.Escape_Old_Functions()
+	--//
 	rsof.DefineCard  =   rscf.DefineCard
 	rscf.FilterFaceUp =  rscf.fufilter
 	rsof.SendtoHand  =   rsop.SendtoHand
@@ -151,7 +173,10 @@ function rsof.Escape_Old_Functions()
 	rsof.SelectOption_Page= rsop.SelectOption_Page
 	rsof.SelectNumber=   rsop.AnnounceNumber
 	rsof.SelectNumber_List= rsop.AnnounceNumber_List
-	rsof.IsSet   =   rscf.DefineSet 
+	rsof.IsSet   =   rscf.DefineSet
+	rscf.GetRelationThisCard = rscf.GetFaceUpSelf
+	rsop.eqop = rsop.Equip
+	--//
 	--some card use old SummonBuff's phase leave field parterment, must fix them in their luas
 	rssf.SummonBuff=function(attlist,isdis,isdistig,selfleave,phaseleave)
 		local bufflist={}
@@ -180,6 +205,10 @@ function rsof.Escape_Old_Functions()
 		end
 		return bufflist
 	end
+	--//
+	rscf.SetSpecialSummonProduce=function(reg_list,range,con,op,desc_list,lim_list,reset_list)
+		return rscf.AddSpecialSummonProcdure(reg_list,range,con,nil,op,desc_list,lim_list,nil,reset_list)
+	end
 end
 
 

expansions/script/c10199992.lua

 --Record Author
 local am=10199992
 local Version_Number=20200323
---Scl
+#Scl
 local rsdka =   Dakyria
 local rsdio =   Diablo
 local rsnr  =   Night_Raven 
@@ -10,12 +10,13 @@ local rsem  =   Eridiument
 local rsxb  =   XB
 local rsos  =   Oracle_Smith
 local rssp  =   Stellar_Pearl
---local rsgd	=   Ghostdom_Dragon
+//local rsgd	=   Ghostdom_Dragon
 local rsed  =   Epic_Dragon
 local rsdh  =   Devil_Hunter
 local rsds  =   Dark_Souls
+local rsca  =   Corona
 
---Scl - Special Mode
+#Scl - Special Mode
 local rssm  =   Special_Mode
 local rssmb =   Special_Mode_Change_Base_Function
 local rssmt =   Special_Mode_Turbo_Duel
@@ -26,18 +27,18 @@ local rssmf =   Special_Mode_Fast_Duel
 local rssmm =   Special_Mode_Multiple_Duel
 local rssmu =   Special_Mode_Universal_Duel
 
---Gale 1472676207
+#Gale 1472676207
 local rsve  =   Voison
 local rsneov=   Neons
 local tfrsv =   T.Fairies
 local rsss  =   Star_Spirit
 
---ChiJiang 626386490
+#ChiJiang 626386490
 local rsnm  =   Nightmare
 local rslf  =   Little_Fox 
 local rccv  =   Thermonuclear
 
---XiaoMi 643865567
+#XiaoMi 643865567
 local rssg  =   Sex_Gun
 local rsps  =   Pseudo_Soul
 local rsdcc =   Dragon_Chess_Corps
@@ -50,50 +51,59 @@ local rsik  =   Infernal_Knight
 local rsvw  =   Virus_Wrom
 local rsia  =   Indolent_Angel
 local rsso  =   Simulated_Organism
+local rstr  =   True_Ritual
 
---NianBao 583322404
+#NianBao 583322404
 local rslap =   Lapin
 local rskh  =   Karehana
 
---XiaoDaoHeng 1614895649
+#XiaoDaoHeng 1614895649
 local rslrd =   Life_DeathRound_Dance
 
---Huang 1184387005
+#Huang 1184387005
 local rsts  =   Trinity_Sword
 
---Luoxing 1151483512
+#Luoxing 1151483512
 local rsdt  =   Dark_Tale
 local rsod  =   Order
 
---YunZeZhun 1587361112
+#YunZeZhun 1587361112
 local rsphh =   Phantom_Thieves_Of_Hearts
 local rsgc  =   Guard_City
 
---ZhenDong 
+#ZhenDong 
 local rsfv  =   Fgo/Assassin
 
---JingJing 1772438857
+#JingJing 1772438857
 local rsba  =   BlueAngel
 
---Akashic 3204027606
+#Akashic 3204027606
 local rszg  =   Zogu
 local rsgs  =   Gran_Sphere
 local rsoc  =   Oligocene_Civilization
 local rsgol =   Giant_of_Light
 local rssb  =   Space_Beasts
 
---HeiBai 1172777968
+#HeiBai 1172777968
 local rstm  =   Toaru_Majutsu_no_Index
 
---2558566212
+#2558566212
 local rsgod =   God
 
+#02 1164477469
+local rsva  =   VR_Aqua
+//local   =   Tian_Zhi
+
+#ReiKai 2404873791
+local rsch  =   Churck
+
+
 --Set Code
---Scl
+#Scl
 --local   =   0x1330
 local Alchement_Bio  =   0x3330
 local Chaos_Alchemy  =   0x5330
-local Azure_Wing_Mercenary = 0x6330
+local Azure-Wing_Mercenary = 0x6330
 local Oracleoath	 =   0x9330
 local Zrouf_Mantra   =   0xa330
 local Autumntale	 =   0xc330

expansions/script/c10222044.lua

@@ -68,7 +68,8 @@ function cm.pop(e,tp,eg,ep,ev,re,r,rp)
 end
 
 function cm.refilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_CONTINUOUS+TYPE_TRAP) and c:IsAbleToRemove()
+	return c:IsFaceup() and c:IsAbleToRemove()
+	and c:IsType(TYPE_CONTINUOUS) and c:IsType(TYPE_TRAP)
 end
 function cm.retg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingTarget(cm.refilter,tp,LOCATION_ONFIELD,0,1,nil) end

expansions/script/c33310103.lua

 --可可莉柯特·兽耳布偶
 if not pcall(function() require("expansions/script/c10199990") end) then require("script/c10199990") end
-local m,cm=rsof.DefineCard(33310103,"Cochrot")
+local m,cm=rscf.DefineCard(33310103,"Cochrot")
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
-	local e1=rsef.I(c,{m,0},{1,m},"se,th,sp,dish,ga",nil,LOCATION_HAND,nil,nil,rsop.target({aux.FilterBoolFunction(Card.IsDiscardable,REASON_EFFECT),"dish",LOCATION_HAND },{cm.thfilter,"th",LOCATION_DECK }),cm.thop)
+	local e1=rsef.I(c,{m,0},{1,m},"se,th,sp,dish,ga",nil,LOCATION_HAND,nil,nil,rsop.target({1,"dish" },{cm.thfilter,"th",LOCATION_DECK }),cm.thop)
 	local e2=rsef.FC(c,EVENT_SPSUMMON_SUCCESS)
 	e2:SetOperation(cm.limitop)
 	local e3=rsef.RegisterClone(c,e2,"code",EVENT_SUMMON_SUCCESS)
@@ -16,17 +16,17 @@ end
 function cm.thfilter(c)
 	return c:IsCode(33310102) and c:IsAbleToHand()
 end
-function cm.thop(e,tp)
+function cm.thop(e,tp) 
 	local ct=Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_EFFECT,nil,REASON_EFFECT)
 	if ct==0 then return end
-	rsof.SelectHint(tp,"th")
+	rshint.Select(tp,"th")
 	local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
 	if #g<=0 or Duel.SendtoHand(g,nil,REASON_EFFECT)<=0 then return end
 	Duel.ConfirmCards(1-tp,g)
 	local sg=Duel.GetMatchingGroup(aux.NecroValleyFilter(cm.spfilter),tp,0,LOCATION_GRAVE,nil,e,tp)
 	if #sg>0 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
 		Duel.BreakEffect()
-		rsof.SelectHint(tp,"sp")
+		rshint.Select(tp,"sp")
 		local sc=sg:Select(tp,1,1,nil):GetFirst()
 		if Duel.SpecialSummon(sc,0,tp,1-tp,false,false,POS_FACEUP)>0 then
 			local e1,e2=rsef.SV_LIMIT({e:GetHandler(),sc,true},"dis,dise",nil,nil,rsreset.est)
@@ -71,7 +71,7 @@ function cm.thfilter2(c)
 	return c:IsAbleToHand() and c:GetType()&0x82==0x82
 end
 function cm.thop2(e,tp)
-	rsof.SelectHint(tp,"th")
+	rshint.Select(tp,"th")
 	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.thfilter2),tp,LOCATION_GRAVE,0,1,1,nil)
-	rsof.SendtoHand(g)
+	rsop.SendtoHand(g)
 end
\ No newline at end of file

expansions/script/c33310104.lua

---可 可 莉 柯 特 · 地 狱 尖 啸 者
+--可可莉柯特·地狱尖啸者
 if not pcall(function() require("expansions/script/c10199990") end) then require("script/c10199990") end
-local m,cm=rsof.DefineCard(33310104,"Cochrot")
+local m,cm=rscf.DefineCard(33310104,"Cochrot")
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
-	local e1=rsef.QO(c,nil,{m,0},{1,m},"se,th,rm,dish,ga",nil,LOCATION_HAND,nil,nil,rsop.target({aux.FilterBoolFunction(Card.IsDiscardable,REASON_EFFECT),"dish",LOCATION_HAND },{cm.thfilter,"th",LOCATION_DECK+LOCATION_GRAVE }),cm.thop) 
+	local e1=rsef.QO(c,nil,{m,0},{1,m},"se,th,rm,dish,ga",nil,LOCATION_HAND,nil,nil,rsop.target({1,"dish" },{cm.thfilter,"th",LOCATION_DECK }),cm.thop) 
 	--act limit
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_FIELD)
@@ -22,16 +22,16 @@ end
 function cm.thop(e,tp)
 	local ct=Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_EFFECT,nil,REASON_EFFECT)
 	if ct==0 then return end
-	rsof.SelectHint(tp,"th")
-	local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
+	rshint.Select(tp,"th")
+	local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
 	if #g<=0 or Duel.SendtoHand(g,nil,REASON_EFFECT)<=0 then return end
 	Duel.ConfirmCards(1-tp,g)
 	local rg=Duel.GetMatchingGroup(aux.NecroValleyFilter(Card.IsAbleToRemove),tp,LOCATION_GRAVE,0,nil)
 	if #rg>0 and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
 		Duel.BreakEffect()
-		rsof.SelectHint(tp,"rm")
+		rshint.Select(tp,"rm")
 		rg=rg:Select(tp,1,1,nil)
-		rsof.Remove(rg)
+		rsop.Remove(rg)
 	end
 end
 function cm.con(e)
@@ -42,7 +42,7 @@ function cm.aclimit(e,re,tp)
 	return not re:GetOwnerPlayer()~=e:GetOwnerPlayer()
 end
 function cm.tdop(e,tp)
-	rsof.SelectHint(tp,"td")
+	rshint.Select(tp,"td")
 	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(Card.IsAbleToDeck),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
-	rsof.SendtoDeck(g)
+	rsop.SendtoDeck(g)
 end
\ No newline at end of file

expansions/script/c33330102.lua

@@ -42,8 +42,8 @@ end
 function cm.matfilter(c)
 	return c:IsLinkType(TYPE_EFFECT) and not c:IsLinkRace(RACE_MACHINE)
 end
-function cm.thfilter(c,e)
-	local se=e:GetHandler():GetSequence()
+function cm.thfilter(c,e,tp)
+	local se=e:GetHandler():GetSequence() 
 	if  se ==5 then
 		se=1
 	elseif se==6 then
@@ -55,16 +55,19 @@ function cm.thfilter(c,e)
 	elseif seq==6 then
 		seq=3
 	end
+	if c:IsControler(1-tp) then 
+		seq=math.abs(seq-4)
+	end
 	return math.abs(se-seq)==1--g:IsContains(c)
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,e) end
-	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,e)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,e,tp) end
+	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,e,tp)
 	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,g:GetCount(),0,0)
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,e)
+	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,e,tp)
 	local atj=Duel.SendtoGrave(g,REASON_EFFECT)
 	if atj~=0 then
 		--atkup

expansions/script/c33500615.lua

@@ -35,6 +35,7 @@ function cm.initial_effect(c)
 	e3:SetCode(EVENT_DAMAGE)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetCountLimit(1,m)
+	e3:SetCondition(cm.condition)
 	e3:SetTarget(cm.rectg2)
 	e3:SetOperation(cm.recop2)
 	c:RegisterEffect(e3)
@@ -53,6 +54,9 @@ function cm.recop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Damage(p,d,REASON_RULE)
 end
 --e2
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return ep==tp and ev>=1
+end
 function cm.rectg2(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetTargetPlayer(tp)

expansions/script/c65010508.lua

@@ -74,8 +74,9 @@ function c65010508.op(e,tp,eg,ep,ev,re,r,rp)
 		if Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 and Duel.IsExistingMatchingCard(Card.IsCanBeSpecialSummoned,tp,0,LOCATION_EXTRA,1,nil,e,0,1-tp,true,false) and Duel.GetLocationCountFromEx(1-tp)>0 then
 			local g=Duel.GetMatchingGroup(Card.IsCanBeSpecialSummoned,tp,0,LOCATION_EXTRA,nil,e,0,1-tp,true,false)
 			local sg=g:RandomSelect(1-tp,1)
-			Duel.SpecialSummon(sg,0,1-tp,1-tp,true,false,POS_FACEUP)
 			local tc=sg:GetFirst()
+			Duel.SpecialSummonStep(tc,0,1-tp,1-tp,true,false,POS_FACEUP)
+		   
 			 local e1=Effect.CreateEffect(e:GetHandler())
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_DISABLE)
@@ -87,6 +88,7 @@ function c65010508.op(e,tp,eg,ep,ev,re,r,rp)
 		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
 		tc:RegisterEffect(e2)
 			tc:RegisterFlagEffect(65010508,RESET_EVENT+RESETS_STANDARD,0,1)
+			 Duel.SpecialSummonComplete()
 			local e3=Effect.CreateEffect(e:GetHandler())
 		e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 		e3:SetCode(EVENT_PHASE+PHASE_END)

expansions/script/c65020166.lua

@@ -109,7 +109,7 @@ end
 function c65020166.activate1(e,tp,eg,ep,ev,re,r,rp)
 	local tc=eg:GetFirst()
 	if tc and tc:IsRelateToEffect(e) and tc:IsFaceup() then
-		Duel.Destroy(tc,REASON_EFFECT,LOCATION_REMOVED)
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
 	end
 end
 function c65020166.filter20(c,tp)

expansions/script/c65050229.lua

 --星月转夜 至高之月
 function c65050229.initial_effect(c)
 	 --xyz summon
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_FAIRY),8,2)
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_FAIRY),10,2)
 	c:EnableReviveLimit()
 	--special summon
 	local e1=Effect.CreateEffect(c)
@@ -9,7 +9,7 @@ function c65050229.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetRange(LOCATION_MZONE)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e1:SetCountLimit(1+EFFECT_COUNT_CODE_SINGLE)
 	e1:SetCondition(c65050229.spcon)
@@ -63,7 +63,7 @@ function c65050229.spop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		if tc:IsType(TYPE_XYZ) and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_GRAVE,0,1,nil,0x5da9) and Duel.SelectYesNo(aux.Stringid(65050229,0)) then
+		if tc:IsType(TYPE_XYZ) and Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_GRAVE,0,1,nil,0x5da9) and Duel.SelectYesNo(tp,aux.Stringid(65050229,0)) then
 			local g=Duel.SelectMatchingCard(tp,Card.IsSetCard,tp,LOCATION_GRAVE,0,1,1,nil,0x5da9)
 			Duel.Overlay(tc,g)
 		end

expansions/script/c65050250.lua

@@ -98,7 +98,7 @@ function c65050250.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
 end
 function c65050250.filter(c)
-	return (c:IsSetCard(0x5da9) or c:IsSetCard(0x9da9)) and c:IsAbleToHand()
+	return (c:IsSetCard(0x5da9) or c:IsSetCard(0x9da9)) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
 end
 function c65050250.tgfilter(c)
 	return c:IsFaceup() and c:IsLevelAbove(1)

expansions/script/c65060057.lua

@@ -32,6 +32,19 @@ function c65060057.initial_effect(c)
 	e4:SetCode(EFFECT_UPDATE_DEFENSE)
 	e4:SetValue(c65060057.val2)
 	c:RegisterEffect(e4)
+	--without release
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_FIELD)
+	e0:SetCode(EFFECT_SUMMON_PROC)
+	e0:SetRange(LOCATION_FZONE)
+	e0:SetCondition(c65060057.ntcon)
+	e0:SetValue(SUMMON_TYPE_NORMAL)
+	c:RegisterEffect(e0)
+	e2:SetLabelObject(e0)
+end
+function c65060057.ntcon(e,c,minc)
+	if c==nil then return true end
+	return minc==0 and Duel.CheckTribute(c,0)
 end
 function c65060057.valfil(c)
 	return c:IsFaceup() and bit.band(c:GetOriginalType(),TYPE_MONSTER)==TYPE_MONSTER 
@@ -79,19 +92,20 @@ function c65060057.fil(c,e)
 	return c:IsSetCard(0x5daa) and c:IsSummonable(true,e)
 end
 function c65060057.tg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c65060057.fil,tp,LOCATION_HAND,0,1,nil,e) and Duel.IsPlayerCanDraw(tp) end
+	local ce=e:GetLabelObject()
+	if chk==0 then return Duel.IsExistingMatchingCard(c65060057.fil,tp,LOCATION_HAND,0,1,nil,ce) and Duel.IsPlayerCanDraw(tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
 end
 function c65060057.op(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local ce=e:GetLabelObject()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
 	if Duel.Draw(tp,1,REASON_EFFECT)~=0 then
-	local g=Duel.SelectMatchingCard(tp,c65060057.fil,tp,LOCATION_HAND,0,1,1,nil,e)
+	local g=Duel.SelectMatchingCard(tp,c65060057.fil,tp,LOCATION_HAND,0,1,1,nil,ce)
 	local tc=g:GetFirst()
 	if tc then
-		Duel.Summon(tp,tc,true,e)
-		
+		Duel.Summon(tp,tc,true,ce)	
 	end
 	end
 end
\ No newline at end of file