duiduiduiduidui

expansions/script/c1102021.lua

@@ -67,7 +67,7 @@ end
 function cm.tfop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
-	local tc=Duel.SelectMatchingCard(tp,cm.tffilter,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
+	local tc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.tffilter),tp,LOCATION_DECK+LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,tp):GetFirst()
 	if tc then
 		Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
 	end

expansions/script/c1111026.lua

@@ -20,7 +20,7 @@ function c1111026.initial_effect(c)
 	c:RegisterEffect(e2)
 --
 end
---
+c1111026.has_text_type=TYPE_SPIRIT
 function c1111026.tfilter1_1(c)
 	return c:IsFaceup() and c:IsCanBeFusionMaterial()
 end

expansions/script/c1111202.lua

@@ -39,7 +39,7 @@ function c1111202.initial_effect(c)
 	c:RegisterEffect(e4)
 --
 end
---
+c1111202.has_text_type=TYPE_SPIRIT
 function c1111202.con2(e,tp,eg,ep,ev,re,r,rp)
 	return re:IsActiveType(TYPE_MONSTER)
 end

expansions/script/c1111222.lua

@@ -28,7 +28,7 @@ function c1111222.initial_effect(c)
 	c:RegisterEffect(e2)
 --
 end
---
+c1111222.has_text_type=TYPE_SPIRIT
 function c1111222.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:SetLabel(100)
 	if chk==0 then return true end

expansions/script/c1111511.lua

@@ -23,7 +23,7 @@ function c1111511.initial_effect(c)
 	c:RegisterEffect(e2)
 --
 end
---
+c1111511.has_text_type=TYPE_SPIRIT
 function c1111511.ofilter1(c,e,tp)
 	return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_SPIRIT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

expansions/script/c1150040.lua

@@ -21,7 +21,7 @@ function c1150040.initial_effect(c)
 	e2:SetOperation(c1150040.op2)
 	c:RegisterEffect(e2)
 end
---
+c1150040.has_text_type=TYPE_SPIRIT
 function c1150040.cfilter1(c)
 	return c:IsFaceup()
 end

expansions/script/c1170005.lua

@@ -11,7 +11,7 @@ function c1170005.initial_effect(c)
 	c:RegisterEffect(e1)
 --
 end
---
+c1170005.has_text_type=TYPE_SPIRIT
 function c1170005.tfilter1(c,e,tp)
 	return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_SPIRIT) and Duel.IsPlayerCanSpecialSummonMonster(tp,c:GetCode(),0,0x4011,0,0,1,RACE_ZOMBIE,ATTRIBUTE_DARK)
 end

expansions/script/c11900003.lua

@@ -29,6 +29,11 @@ function cm.initial_effect(c)
 	e1:SetTarget(cm.sptg)
 	e1:SetOperation(cm.spop)
 	c:RegisterEffect(e1)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	ee:SetCode(21142671)
+	c:RegisterEffect(ee)
 end
 function cm.mfilter1(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsType(TYPE_TUNER)

expansions/script/c14800778.lua

@@ -54,6 +54,7 @@ function cm.initial_effect(c)
 	e5:SetOperation(cm.desop)
 	c:RegisterEffect(e5)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.splimit(e,se,sp,st)
 	if e:GetHandler():IsLocation(LOCATION_EXTRA) then
 		return bit.band(st,SUMMON_TYPE_SYNCHRO)==SUMMON_TYPE_SYNCHRO 

expansions/script/c17033150.lua

@@ -51,6 +51,22 @@ function c17033150.initial_effect(c)
 	e7:SetValue(1000)
 	e7:SetCondition(c17033150.atkcon)
 	c:RegisterEffect(e7)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c17033150.valcheck)
+	c:RegisterEffect(ee)
+end
+function c17033150.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function c17033150.descon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)

expansions/script/c17033160.lua

@@ -47,6 +47,22 @@ function c17033160.initial_effect(c)
 	e5:SetTarget(c17033160.rectg)
 	e5:SetOperation(c17033160.recop)
 	c:RegisterEffect(e5)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c17033160.valcheck)
+	c:RegisterEffect(ee)
+end
+function c17033160.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function c17033160.regop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c17033170.lua

@@ -50,6 +50,22 @@ function c17033170.initial_effect(c)
 	e6:SetTarget(c17033170.damtg)
 	e6:SetOperation(c17033170.damop)
 	c:RegisterEffect(e6)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c17033170.valcheck)
+	c:RegisterEffect(ee)
+end
+function c17033170.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function c17033170.thcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c17055060.lua

@@ -34,6 +34,7 @@ function cm.initial_effect(c)
 	e3:SetOperation(cm.pcop)
 	c:RegisterEffect(e3)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.tgrfilter(c)
 	return c:IsFaceup() and c:GetCurrentScale()>=0 and c:IsReleasable()
 end

expansions/script/c18017208.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e6:SetCode(EVENT_LEAVE_FIELD)
 	e6:SetCondition(s.pencon)
 	c:RegisterEffect(e6)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.thfilter(c)
 	return c:IsFaceupEx() and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x66e5) and c:IsAbleToHand()

expansions/script/c18017209.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e6:SetCode(EVENT_LEAVE_FIELD)
 	e6:SetCondition(s.pencon)
 	c:RegisterEffect(e6)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.thfilter(c)
 	return c:IsFaceupEx() and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x66e5) and c:IsAbleToHand()

expansions/script/c18017210.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e6:SetCode(EVENT_LEAVE_FIELD)
 	e6:SetCondition(s.pencon)
 	c:RegisterEffect(e6)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.thfilter(c)
 	return c:IsFaceupEx() and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x66e5) and c:IsAbleToHand()

expansions/script/c18017216.lua

@@ -48,6 +48,22 @@ function s.initial_effect(c)
 	e6:SetCode(EVENT_LEAVE_FIELD)
 	e6:SetCondition(s.pencon)
 	c:RegisterEffect(e6)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.costfilter(c)
 	return c:IsType(TYPE_PENDULUM) and c:IsAbleToGraveAsCost()

expansions/script/c18017408.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e5:SetTarget(s.eqtg2)
 	e5:SetOperation(s.eqop2)
 	c:RegisterEffect(e5)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.mfilter(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_MACHINE)

expansions/script/c18017409.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e5:SetTarget(s.eqtg2)
 	e5:SetOperation(s.eqop2)
 	c:RegisterEffect(e5)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.mfilter(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_MACHINE)

expansions/script/c18017410.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e5:SetTarget(s.eqtg2)
 	e5:SetOperation(s.eqop2)
 	c:RegisterEffect(e5)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.mfilter(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_MACHINE)

expansions/script/c18017411.lua

@@ -46,6 +46,22 @@ function s.initial_effect(c)
 	e5:SetTarget(s.eqtg3)
 	e5:SetOperation(s.eqop3)
 	c:RegisterEffect(e5)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.mfilter(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_MACHINE)

expansions/script/c18020058.lua

@@ -3,6 +3,7 @@ local m=18020058
 local cm=_G["c"..m]
 Duel.LoadScript("c18020051.lua")
 cm.Mechavanus=true
+cm.material_type=TYPE_SYNCHRO
 function cm.initial_effect(c)
 	local e1=Mechavanus.D_roar(c,m,cm.op1,cm.op2)
 end

expansions/script/c18020059.lua

@@ -3,6 +3,7 @@ local m=18020059
 local cm=_G["c"..m]
 Duel.LoadScript("c18020051.lua")
 cm.Mechavanus=true
+cm.material_type=TYPE_SYNCHRO
 function cm.initial_effect(c)
 	local e1=Mechavanus.D_roar(c,m,cm.op1,cm.op2)
 end

expansions/script/c18020060.lua

@@ -3,6 +3,7 @@ local m=18020060
 local cm=_G["c"..m]
 Duel.LoadScript("c18020051.lua")
 cm.Mechavanus=true
+cm.material_type=TYPE_SYNCHRO
 function cm.initial_effect(c)
 	local e1=Mechavanus.D_roar(c,m,cm.op1,cm.op2)
 end

expansions/script/c18021013.lua

@@ -49,6 +49,22 @@ function c18021013.initial_effect(c)
 	e4:SetTarget(s.distg)
 	e4:SetOperation(s.disop)
 	c:RegisterEffect(e4)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
+end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function s.pencon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c18023002.lua

@@ -40,6 +40,7 @@ function c18023002.initial_effect(c)
 	e3:SetOperation(s.penop)
 	c:RegisterEffect(e3)
 end
+cm.material_type=TYPE_SYNCHRO
 function s.ncost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local b1=Duel.CheckReleaseGroup(REASON_COST,tp,Card.IsSetCard,1,nil,0xc6e1)
 	local b2=Duel.IsPlayerAffectedByEffect(tp,18023010) and Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_MZONE+LOCATION_PZONE,0,1,nil,tp)

expansions/script/c19500002.lua

@@ -49,6 +49,7 @@ function c19500002.initial_effect(c)
 	e5:SetOperation(c19500002.thop)
 	c:RegisterEffect(e5)
 end
+c19500002.material_type=TYPE_SYNCHRO
 function c19500002.mfilter(c,syncard,c1)
 	return c:IsSetCard(0x3991) and c:IsType(TYPE_SYNCHRO) and (c:IsType(TYPE_TUNER) or c1:IsType(TYPE_TUNER))
 end

expansions/script/c23003014.lua

@@ -27,6 +27,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.disop)
 	c:RegisterEffect(e2)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.sfilter(c)
 	return c:IsSetCard(0x362) 
 end

expansions/script/c23003015.lua

@@ -43,6 +43,7 @@ function cm.initial_effect(c)
 	e3:SetCode(EVENT_REMOVE)
 	c:RegisterEffect(e3)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.sfilter(c)
 	return c:IsSetCard(0x362) and c:IsType(TYPE_SYNCHRO)
 end

expansions/script/c33503212.lua

@@ -47,6 +47,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.sumsuc)  
 	c:RegisterEffect(e1)  
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.econ(e,tp)
 	return Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler(),code)
 end

expansions/script/c33503726.lua

@@ -43,6 +43,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.disop)
 	c:RegisterEffect(e2)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsAbleToGrave() end
 	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToGrave,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end

expansions/script/c33503731.lua

@@ -34,6 +34,7 @@ function cm.initial_effect(c)
 	e3:SetOperation(cm.disop)
 	c:RegisterEffect(e3)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.lvfilter(c)
 	return c:IsFaceup() and c:GetLevel()>0
 end

expansions/script/c33503736.lua

@@ -52,6 +52,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and chkc:IsControler(tp) end
 	if chk==0 then return Duel.IsExistingTarget(Card.IsOnField,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) end

expansions/script/c33538069.lua

@@ -44,6 +44,7 @@ function cm.initial_effect(c)
 	e6:SetValue(cm.e6val)
 	c:RegisterEffect(e6)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return true end
 	if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) and Duel.GetLocationCount(tp,LOCATION_SZONE,0)>0 end

expansions/script/c33700337.lua

@@ -25,6 +25,11 @@ function cm.initial_effect(c)
 		return te:GetOwner()~=e:GetOwner() and not Duel.IsExistingMatchingCard(nil,tp,LOCATION_MZONE,0,1,e:GetHandler())
 	end)
 	c:RegisterEffect(e4)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	ee:SetCode(21142671)
+	c:RegisterEffect(ee)
 end
 function cm.mfilter1(c)
 	return c:IsAttribute(ATTRIBUTE_LIGHT)

expansions/script/c33700351.lua

@@ -66,6 +66,7 @@ function c33700351.initial_effect(c)
 	e7:SetOperation(cm.operation1)
 	c:RegisterEffect(e7)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.lvcon(e)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
 end

expansions/script/c33700372.lua

@@ -14,6 +14,11 @@ function c33700372.initial_effect(c)
 	e1:SetTarget(c33700372.destg)
 	e1:SetOperation(c33700372.desop)
 	c:RegisterEffect(e1)  
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	ee:SetCode(21142671)
+	c:RegisterEffect(ee)
 end
 function c33700372.disfilter(c)
 	return aux.disfilter1(c)

expansions/script/c33700917.lua

@@ -76,6 +76,11 @@ function c33700917.initial_effect(c)
 	e42:SetTarget(c33700917.sptg)
 	e42:SetOperation(c33700917.spop)
 	c:RegisterEffect(e42)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	ee:SetCode(21142671)
+	c:RegisterEffect(ee)
 end
 function c33700917.synfilter(c,sync)
 	return c:IsNotTuner(nil)(sync) and not c:IsAttribute(ATTRIBUTE_LIGHT)

expansions/script/c33711103.lua

@@ -23,6 +23,23 @@ function c33711103.initial_effect(c)
 	e2:SetTarget(c33711103.desreptg)
 	e2:SetOperation(c33711103.desrepop)
 	c:RegisterEffect(e2)
+		--
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c33711103.valcheck)
+	c:RegisterEffect(ee)
+end
+function c33711103.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 function c33711103.netg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0 end

expansions/script/c33720012.lua

@@ -56,6 +56,11 @@ function s.initial_effect(c)
 	e5:SetLabelObject(e1)
 	e5:SetValue(1)
 	c:RegisterEffect(e5)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	ee:SetCode(21142671)
+	c:RegisterEffect(ee)
 end
 function s.valcheck(e,c)
 	local g=c:GetMaterial()

expansions/script/c33720065.lua

@@ -33,7 +33,7 @@ function s.initial_effect(c)
 	e1:SetLabelObject(e1x)
 end
 function s.gcheck(c)
-	return	function(g)
+	return  function(g)
 				return g:GetClassCount(Card.GetCode)==#g and g:GetSum(Card.GetSynchroLevel,c)==8
 			end
 end
@@ -80,6 +80,14 @@ function s.valcheck(e,c)
 		effs=effs|0x2
 	end
 	e:SetLabel(effs)
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
 end
 
 function s.condition(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c35800291.lua

@@ -24,6 +24,7 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.spop1)
 	c:RegisterEffect(e4)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.descon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO 
 end

expansions/script/c35800561.lua

@@ -92,6 +92,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.atkop)
 	c:RegisterEffect(e1)
 end
+cm.has_text_type=TYPE_SPIRIT
 function cm.cfilter2(c,tp)
 	return c:IsType(TYPE_SPIRIT) and c:IsFaceup()
 end

expansions/script/c35800573.lua

@@ -26,6 +26,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.op3)
 	c:RegisterEffect(e2)
 end
+cm.has_text_type=TYPE_SPIRIT
 function cm.filter(c)
 	return c:IsAbleToHand() and c:IsFaceup()
 end

expansions/script/c40010222.lua

@@ -51,6 +51,7 @@ function cm.initial_effect(c)
 	e5:SetLabelObject(e4)
 	c:RegisterEffect(e5) 
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local d=c:GetBattleTarget()

expansions/script/c40010826.lua

@@ -37,6 +37,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)  
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.necon(e,tp,eg,ep,ev,re,r,rp)
 	return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
 		and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)

expansions/script/c4231015.lua

@@ -43,6 +43,7 @@ function c4231015.initial_effect(c)
 	e4:SetOperation(c4231015.activate)
 	c:RegisterEffect(e4)
 end
+c4231015.has_text_type=TYPE_DUAL
 function c4231015.filter(c)
 	return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_MONSTER)
 end

expansions/script/c4231020.lua

@@ -27,7 +27,7 @@ function cm.initial_effect(c)
 		.e("SetType",EFFECT_TYPE_EQUIP)
 		.e("SetCode",EFFECT_ADD_TYPE)
 		.e("SetValue",TYPE_TUNER)
-		.e("SetCondition",function(e,c) return not e:GetHandler():GetEquipTarget():IsType(TYPE_DUAL) end)	   
+		.e("SetCondition",function(e,c) return not e:GetHandler():GetEquipTarget():IsType(TYPE_DUAL) end)	  
 	.Return()).c("RegisterEffect",iFunc(c)  
 		.e("SetType",EFFECT_TYPE_EQUIP)
 		.e("SetCode",EFFECT_DUAL_STATUS)
@@ -44,7 +44,7 @@ function cm.initial_effect(c)
 			and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 			local g=Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
-			Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_GRAVE)	
+			Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_GRAVE)  
 		end)   
 		.e("SetOperation",function(e,tp,eg,ep,ev,re,r,rp)
 			local tc=Duel.GetFirstTarget()
@@ -75,6 +75,7 @@ function cm.initial_effect(c)
 		end)  
 	.Return())
 end
+cm.has_text_type=TYPE_DUAL
 function cm.filter(c)
 	return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_MONSTER)
 end

expansions/script/c4231025.lua

@@ -33,7 +33,7 @@ function cm.initial_effect(c)
 			else
 				Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
 			end
-			Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)		 
+			Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)		
 		end)
 		.e("SetOperation",function(e,tp,eg,ep,ev,re,r,rp)
 			if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
@@ -74,6 +74,7 @@ function cm.initial_effect(c)
 		end)
 	.Return())
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.eqfilter(c)
 	return c:IsType(TYPE_SPELL) and c:IsType(TYPE_EQUIP) and c:IsFaceup()
 end

expansions/script/c45745917.lua

@@ -38,7 +38,7 @@ function c45745917.initial_effect(c)
 	c:RegisterEffect(e4)
 
 end
-
+c45745917.material_type=TYPE_SYNCHRO
 function c45745917.matfilter1(c)
 	return c:IsType(TYPE_TUNER) or c:IsSetCard(0x881) 
 end

expansions/script/c47320010.lua

 --N×M 居所
 local s,id=GetID()
 function s.summon(c)
-    local e1=Effect.CreateEffect(c)
+	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
@@ -10,6 +10,7 @@ function s.summon(c)
 	e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x3ca3))
 	c:RegisterEffect(e1)
 end
+s.has_text_type=TYPE_SPIRIT
 function s.indes(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c47320011.lua

@@ -11,6 +11,7 @@ function s.active(c)
 	e1:SetOperation(s.activate)
 	c:RegisterEffect(e1)
 end
+s.has_text_type=TYPE_SPIRIT
 function s.filter(c)
 	return c:IsSetCard(0x3ca3) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

expansions/script/c47320012.lua

@@ -11,6 +11,7 @@ function s.active(c)
 	e1:SetOperation(s.activate)
 	c:RegisterEffect(e1)
 end
+s.has_text_type=TYPE_SPIRIT
 function s.filter(c)
 	return c:IsType(TYPE_TOKEN) and c:IsReleasable()
 end

expansions/script/c47344568.lua

 --乐园妖精 阿尔托莉雅·阿瓦隆
 local s,id=GetID()
 function s.initial_effect(c)
-    aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x9ca4),aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1,1)
+	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x9ca4),aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1,1)
 	c:EnableReviveLimit()
-    --code
+	--code
 	aux.EnableChangeCode(c,47344566,LOCATION_MZONE)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
@@ -12,7 +12,7 @@ function s.initial_effect(c)
 	e1:SetValue(0x6ca4)
 	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 	c:RegisterEffect(e1)
-    --neg atk
+	--neg atk
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,0))
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
@@ -22,7 +22,7 @@ function s.initial_effect(c)
 	e2:SetCost(s.incost)
 	e2:SetOperation(s.inop)
 	c:RegisterEffect(e2)
-    --indes self
+	--indes self
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE)
 	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
@@ -34,7 +34,7 @@ function s.initial_effect(c)
 	e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
 	e4:SetValue(aux.tgoval)
 	c:RegisterEffect(e4)
-    --to hand
+	--to hand
 	local e5=Effect.CreateEffect(c)
 	e5:SetDescription(aux.Stringid(id,1))
 	e5:SetCategory(CATEGORY_TOHAND+CATEGORY_REMOVE)
@@ -47,6 +47,7 @@ function s.initial_effect(c)
 	e5:SetOperation(s.thop)
 	c:RegisterEffect(e5)
 end
+s.material_type=TYPE_SYNCHRO
 function s.incon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetAttacker():IsControler(1-tp)
 end
@@ -57,13 +58,13 @@ function s.incost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:GetFlagEffect(47344568)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,c) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-    local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,c)
-    Duel.Remove(tc,POS_FACEUP,REASON_COST)
+	local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,c)
+	Duel.Remove(tc,POS_FACEUP,REASON_COST)
 	Duel.SetChainLimit(s.chlimit)
 	c:RegisterFlagEffect(47344568,RESET_CHAIN,0,1)
 end
 function s.efilter(e,te)
-    local rctype=e:GetLabel()
+	local rctype=e:GetLabel()
 	return te:GetHandler():IsType(rctype) and e:GetHandlerPlayer()~=te:GetOwnerPlayer()
 end
 function s.inop(e,tp,eg,ep,ev,re,r,rp)
@@ -108,9 +109,9 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
 	if tc:IsRelateToEffect(e) then
 		if Duel.SendtoHand(tc,nil,REASON_EFFECT) then
 			Duel.BreakEffect()
-            Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-            local g=Duel.SelectMatchingCard(tp,s.rmfilter,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil,tc:GetType()&0x7)
-            Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
-        end
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+			local g=Duel.SelectMatchingCard(tp,s.rmfilter,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,nil,tc:GetType()&0x7)
+			Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+		end
 	end
 end
\ No newline at end of file

expansions/script/c47344573.lua

@@ -4,8 +4,8 @@ function s.initial_effect(c)
 	aux.AddSynchroProcedure(c,nil,aux.NonTuner(s.sync),1,1)
 	c:EnableReviveLimit()
 
-    c:EnableCounterPermit(0xcaf)
-    c:SetCounterLimit(0xcaf,5)
+	c:EnableCounterPermit(0xcaf)
+	c:SetCounterLimit(0xcaf,5)
 	-- todeck
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
@@ -38,10 +38,28 @@ function s.initial_effect(c)
 	e3:SetTarget(s.sptg)
 	e3:SetOperation(s.spop)
 	c:RegisterEffect(e3)
+	--
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(s.valcheck)
+	c:RegisterEffect(ee)
 end
+s.material_type=TYPE_SYNCHRO
 function s.sync(c)
 	return c:IsCode(47344572) or c:IsCode(47344562)
 end
+function s.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
 function s.cfilter(c)
 	return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsRace(RACE_MACHINE)
 end
@@ -53,7 +71,7 @@ function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_TODECK,eg,1,0,0)
 end
 function s.acfilter(c)
-    return (c:IsSetCard(0x6ca4) or c:IsSetCard(0x9ca4)) and c:IsCanAddCounter(0xacf,1) and c:IsFaceup()
+	return (c:IsSetCard(0x6ca4) or c:IsSetCard(0x9ca4)) and c:IsCanAddCounter(0xacf,1) and c:IsFaceup()
 end
 function s.tdop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=re:GetHandler()
@@ -61,7 +79,7 @@ function s.tdop(e,tp,eg,ep,ev,re,r,rp)
 		tc:CancelToGrave()
 		if Duel.SendtoDeck(tc,nil,1,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_DECK) then
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_COUNTER)
-    		local ag=Duel.SelectMatchingCard(tp,s.acfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
+			local ag=Duel.SelectMatchingCard(tp,s.acfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
 			if #ag>0 then
 				ag:GetFirst():AddCounter(0xacf,1)
 			end

expansions/script/c47344575.lua

 --夏之妖精 阿尔托莉雅·阿瓦隆
 local s,id=GetID()
 function s.initial_effect(c)
-    aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x9ca4),aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1,1)
+	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x9ca4),aux.NonTuner(Card.IsSynchroType,TYPE_SYNCHRO),1,1)
 	c:EnableReviveLimit()
-    --code
+	--code
 	aux.EnableChangeCode(c,47344566,LOCATION_MZONE)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
@@ -12,7 +12,7 @@ function s.initial_effect(c)
 	e1:SetValue(0x6ca4)
 	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 	c:RegisterEffect(e1)
-    -- atk up
+	-- atk up
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,0))
 	e2:SetCategory(CATEGORY_ATKCHANGE)
@@ -25,7 +25,7 @@ function s.initial_effect(c)
 	e2:SetCost(s.atkcost)
 	e2:SetOperation(s.atkop)
 	c:RegisterEffect(e2)
-    --indes self
+	--indes self
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE)
 	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
@@ -37,7 +37,7 @@ function s.initial_effect(c)
 	e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
 	e4:SetValue(aux.tgoval)
 	c:RegisterEffect(e4)
-    --to hand
+	--to hand
 	local e5=Effect.CreateEffect(c)
 	e5:SetDescription(aux.Stringid(id,1))
 	e5:SetCategory(CATEGORY_DRAW+CATEGORY_REMOVE)
@@ -50,6 +50,7 @@ function s.initial_effect(c)
 	e5:SetOperation(s.thop)
 	c:RegisterEffect(e5)
 end
+s.material_type=TYPE_SYNCHRO
 function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
 	local phase=Duel.GetCurrentPhase()
 	if phase~=PHASE_DAMAGE or Duel.IsDamageCalculated() then return false end
@@ -62,12 +63,12 @@ function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()
 	if chk==0 then return c:GetFlagEffect(47344575)==0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,c) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-    local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,c)
-    Duel.Remove(tc,POS_FACEUP,REASON_COST)
+	local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToRemoveAsCost,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,1,1,c)
+	Duel.Remove(tc,POS_FACEUP,REASON_COST)
 	c:RegisterFlagEffect(47344575,RESET_CHAIN,0,1)
 end
 function s.efilter(e,te)
-    local rctype=e:GetLabel()
+	local rctype=e:GetLabel()
 	return te:GetHandler():IsType(rctype) and e:GetHandlerPlayer()~=te:GetOwnerPlayer()
 end
 function s.atkop(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c47500012.lua

@@ -36,6 +36,7 @@ function c47500012.initial_effect(c)
 	e3:SetOperation(c47500012.wzop)
 	c:RegisterEffect(e3)
 end
+c47500012.material_type=TYPE_SYNCHRO
 function c47500012.synfilter(c)
 	return c:IsAttribute(ATTRIBUTE_FIRE) and c:IsType(TYPE_SYNCHRO)
 end

expansions/script/c5012969.lua

@@ -31,6 +31,7 @@ end
 --function s.sfliter1(c)
 	--return c:IsType(TYPE_SYNCHRO) and c:IsAttribute(ATTRIBUTE_FIRE)
 --end
+cm.material_type=TYPE_SYNCHRO
 function s.destg(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
 	local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)

expansions/script/c50223140.lua

@@ -26,6 +26,7 @@ function c50223140.initial_effect(c)
 	e2:SetOperation(c50223140.disop)
 	c:RegisterEffect(e2)
 end
+c50223140.material_type=TYPE_SYNCHRO
 function c50223140.matfilter1(c,syncard)
 	return c:IsTuner(syncard) or (c:IsSynchroType(TYPE_NORMAL) and c:IsSetCard(0xcb1))
 end

expansions/script/c50223405.lua

@@ -39,6 +39,7 @@ function c50223405.initial_effect(c)
 	e3:SetOperation(c50223405.op2)
 	c:RegisterEffect(e3)	
 end
+c50223405.material_type=TYPE_SYNCHRO
 function c50223405.sfilter(c,syncard)
 	return (c:IsTuner(syncard) and bit.band(c:GetOriginalAttribute(),ATTRIBUTE_DARK)~=0 and c:IsSetCard(0xcb2)) 
 		or (c:IsCode(50218210) and c:IsAttribute(ATTRIBUTE_LIGHT))

expansions/script/c53715014.lua

@@ -17,6 +17,7 @@ function cm.initial_effect(c)
 	e5:SetOperation(cm.thop)
 	c:RegisterEffect(e5)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.thfilter(c)
 	return c:IsFaceup() and c:IsAbleToHand()
 end

expansions/script/c53715015.lua

@@ -12,6 +12,7 @@ function cm.initial_effect(c)
 	e7:SetOperation(cm.op)
 	c:RegisterEffect(e7)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.con(e)
 	return (Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()) and e:GetHandler():GetBattleTarget()
 end

expansions/script/c53715016.lua

@@ -17,6 +17,7 @@ function cm.initial_effect(c)
 	e5:SetOperation(cm.thop)
 	c:RegisterEffect(e5)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return false end
 	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToDeck,tp,LOCATION_GRAVE,LOCATION_GRAVE,2,nil) end

expansions/script/c53728009.lua

@@ -29,6 +29,7 @@ function cm.initial_effect(c)
 	e3:SetCost(cm.cost)
 	c:RegisterEffect(e3)
 end
+cm.has_text_type=TYPE_UNION
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED) end
 	Duel.SendtoGrave(e:GetHandler(),REASON_COST)

expansions/script/c53728015.lua

@@ -45,6 +45,7 @@ function cm.initial_effect(c)
 	e5:SetOperation(cm.chainop)
 	c:RegisterEffect(e5)
 end
+cm.has_text_type=TYPE_UNION
 function cm.adjustop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(function(c,tp)return c:IsFaceup() and c:IsType(TYPE_UNION) and Duel.GetFlagEffect(tp,m+c:GetOriginalCode())==0 end,tp,LOCATION_ONFIELD,0,nil,tp)
 	if #g==0 then return end

expansions/script/c53728019.lua

@@ -28,6 +28,7 @@ function cm.initial_effect(c)
 	e3:SetCost(cm.cost)
 	c:RegisterEffect(e3)
 end
+cm.has_text_type=TYPE_UNION
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED) end
 	Duel.SendtoGrave(e:GetHandler(),REASON_COST)

expansions/script/c53728020.lua

@@ -22,6 +22,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
+cm.has_text_type=TYPE_UNION
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:SetLabel(100)
 	if chk==0 then return true end

expansions/script/c53786003.lua

@@ -20,6 +20,12 @@ function cm.initial_effect(c)
 	e1:SetCondition(cm.atkcon)
 	e1:SetValue(cm.ctval)
 	c:RegisterEffect(e1)
+	--
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(cm.valcheck)
+	c:RegisterEffect(ee)
 end
 function cm.atkcon(e)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
@@ -28,3 +34,14 @@ function cm.ctval(e,c)
 	local oc=e:GetHandler():GetMaterialCount()
 	return math.max(0,oc)
 end
+function cm.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end

expansions/script/c64000046.lua

@@ -54,7 +54,7 @@ function cm.initial_effect(c)
 	e9:SetCode(21142671)
 	c:RegisterEffect(e9)
 end
-
+c64000046.material_type=TYPE_SYNCHRO
 function c64000046.prcon(e,tp,eg,ep,ev,re,r,rp)
 	local ph=Duel.GetCurrentPhase()
 	return (ph==PHASE_MAIN1 or (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE) or ph==PHASE_MAIN2)

expansions/script/c64800022.lua

@@ -52,6 +52,12 @@ function cm.initial_effect(c)
 	e1:SetTarget(cm.sptg)
 	e1:SetOperation(cm.spop)
 	c:RegisterEffect(e1)
+	--
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(cm.valcheck)
+	c:RegisterEffect(ee)
 end
 cm.material_type=TYPE_SYNCHRO
 function cm.mfilter1(c)
@@ -60,7 +66,17 @@ end
 function cm.mfilter2(c)
 	return  c:IsType(TYPE_TUNER) 
 end
-
+function cm.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
 function cm.bgm(e,tp,eg,ep,ev,re,r,rp)
 	  Duel.Hint(HINT_MUSIC,0,aux.Stringid(m,0))
 end

expansions/script/c64800089.lua

@@ -31,6 +31,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.xyzop)
 	c:RegisterEffect(e1)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
 	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)

expansions/script/c64800146.lua

@@ -23,9 +23,25 @@ function c64800146.initial_effect(c)
 	e2:SetTarget(c64800146.sptg)
 	e2:SetOperation(c64800146.spop)
 	c:RegisterEffect(e2)
+	--
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c64800146.valcheck)
+	c:RegisterEffect(ee)
 end
 c64800146.material_type=TYPE_SYNCHRO
-
+function c64800146.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
 --e1
 function c64800146.accon(e)
 	local c=e:GetHandler()

expansions/script/c64831009.lua

@@ -46,6 +46,7 @@ function c64831009.initial_effect(c)
 	c:RegisterEffect(e4)
 end
 c64831009.setname="RagnaTravellers"
+c64831009.material_type=TYPE_SYNCHRO
 function c64831009.matfil(c)
 	return c.setname=="RagnaTravellers" and not c:IsType(TYPE_TUNER) 
 end

expansions/script/c64831010.lua

@@ -34,6 +34,7 @@ function c64831010.initial_effect(c)
 	e2:SetOperation(c64831010.activate)
 	c:RegisterEffect(e2)
 end
+c64831010.material_type=TYPE_SYNCHRO
 function c64831010.matfil(c)
 	return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_DARK)
 end

expansions/script/c64831012.lua

@@ -44,6 +44,7 @@ function c64831012.initial_effect(c)
 	e5:SetCode(EFFECT_CANNOT_DISEFFECT)
 	c:RegisterEffect(e5)
 end
+c64831012.material_type=TYPE_SYNCHRO
 function c64831012.tunefil(c)
 	return c:IsType(TYPE_TUNER) and c:IsType(TYPE_SYNCHRO) and c:IsSetCard(0x5410)
 end

expansions/script/c64831013.lua

@@ -37,6 +37,7 @@ function c64831013.initial_effect(c)
 	e3:SetTarget(c64831013.distg)
 	c:RegisterEffect(e3)
 end
+c64831013.material_type=TYPE_SYNCHRO
 function c64831013.matfil(c)
 	return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_DARK)
 end

expansions/script/c64837000.lua

@@ -35,6 +35,7 @@ function c64837000.initial_effect(c)
 	e4:SetValue(aux.tgoval)
 	c:RegisterEffect(e4)
 end
+c64837000.material_type=TYPE_SYNCHRO
 function c64837000.descon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
 end

expansions/script/c64837027.lua

@@ -18,8 +18,25 @@ function cm.initial_effect(c)
 	e3:SetTarget(cm.negtg)
 	e3:SetOperation(cm.negop)
 	c:RegisterEffect(e3)
+	--
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(cm.valcheck)
+	c:RegisterEffect(ee)
 end
 cm.material_type=TYPE_SYNCHRO
+function cm.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
 function cm.actlimit(e,re,tp)
 	return re:IsActiveType(TYPE_MONSTER) and not re:GetHandler():IsLocation(LOCATION_MZONE)
 end

expansions/script/c65001051.lua

@@ -49,6 +49,7 @@ function c65001051.initial_effect(c)
 	e5:SetOperation(c65001051.op2)
 	c:RegisterEffect(e5)
 end
+c65001051.has_text_type=TYPE_DUAL
 function c65001051.tgfil(c)
 	return c:IsSetCard(0x9da4) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end

expansions/script/c65020017.lua

@@ -25,7 +25,7 @@ function c65020017.initial_effect(c)
 	e2:SetOperation(c65020017.tgop)
 	c:RegisterEffect(e2)
 end
-
+c65020017.material_type=TYPE_SYNCHRO
 function c65020017.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_ONFIELD) end
 	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end

expansions/script/c65020140.lua

@@ -22,6 +22,7 @@ function c65020140.initial_effect(c)
 	c:RegisterEffect(e2)
 	Duel.AddCustomActivityCounter(65020140,ACTIVITY_SPSUMMON,c65020140.counterfilter)
 end
+c65020140.has_text_type=TYPE_SPIRIT
 function c65020140.counterfilter(c)
 	return c:GetSummonLocation()~=LOCATION_EXTRA 
 end

expansions/script/c65020178.lua

@@ -55,6 +55,7 @@ function c65020178.initial_effect(c)
 	c:RegisterEffect(e0)
 	e4:SetLabelObject(e0)
 end
+c65020178.has_text_type=TYPE_SPIRIT
 function c65020178.ntcon(e,c,minc)
 	if c==nil then return true end
 	return minc==0 and Duel.CheckTribute(c,0)

expansions/script/c65020179.lua

@@ -20,6 +20,7 @@ function c65020179.initial_effect(c)
 	e2:SetOperation(c65020179.op)
 	c:RegisterEffect(e2)
 end
+c65020179.has_text_type=TYPE_SPIRIT
 function c65020179.costfil(c)
 	return (c:IsSetCard(0x5da7) or c:IsType(TYPE_SPIRIT)) and c:IsAbleToDeckAsCost()
 end

expansions/script/c65030083.lua

@@ -38,6 +38,7 @@ function c65030083.initial_effect(c)
 	e5:SetOperation(c65030083.op)
 	c:RegisterEffect(e5)
 end
+c65030083.material_type=TYPE_SYNCHRO
 function c65030083.synfil(c)
 	return aux.IsCodeListed(c,65030086) and c:IsType(TYPE_SYNCHRO)
 end

expansions/script/c65050047.lua

@@ -33,6 +33,7 @@ function c65050047.initial_effect(c)
 	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
 	c:RegisterEffect(e3)
 end
+c65050047.has_text_type=TYPE_UNION
 function c65050047.con(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp
 end

expansions/script/c65060059.lua

@@ -20,6 +20,7 @@ function c65060059.initial_effect(c)
 	e2:SetOperation(c65060059.activate)
 	c:RegisterEffect(e2)
 end
+c65060059.has_text_type=TYPE_UNION
 function c65060059.filter(c)
 	return c:IsSetCard(0x5daa) and c:IsFaceup() and c:IsAbleToDeck()
 end

expansions/script/c65060060.lua

@@ -25,6 +25,7 @@ function c65060060.initial_effect(c)
 	e2:SetOperation(c65060060.negop)
 	c:RegisterEffect(e2)
 end
+c65060060.has_text_type=TYPE_UNION
 function c65060060.negfilter(c,tp)
 	return c:IsFaceup() and c:IsSetCard(0x5daa) and c:IsControler(tp) and c:IsLocation(LOCATION_SZONE) and c:GetSequence()<5
 end

expansions/script/c67200037.lua

@@ -22,9 +22,25 @@ function c67200037.initial_effect(c)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetTarget(c67200037.tg)
 	e2:SetOperation(c67200037.op)
-	c:RegisterEffect(e2)   
+	c:RegisterEffect(e2)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c67200037.valcheck)
+	c:RegisterEffect(ee) 
 end
 --
+function c67200037.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
 function c67200037.stgcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
 end

expansions/script/c72413460.lua

@@ -37,10 +37,27 @@ function c72413460.initial_effect(c)
 	e3:SetTarget(c72413460.thtg)
 	e3:SetOperation(c72413460.thop)
 	c:RegisterEffect(e3)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c72413460.valcheck)
+	c:RegisterEffect(ee)
 end
+c72413460.material_type=TYPE_SYNCHRO
 function c72413460.sfilter(c)
 	return c:IsSetCard(0x5727)  and c:IsType(TYPE_SYNCHRO)
 end
+function c72413460.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end
 function c72413460.drcon(e,tp,eg,ep,ev,re,r,rp)
 	local tc=eg:GetFirst()
 	return eg:GetCount()==1 and tc~=e:GetHandler() and tc:IsSummonType(SUMMON_TYPE_SYNCHRO) and tc:IsSummonPlayer(tp)

expansions/script/c75646123.lua

@@ -26,5 +26,21 @@ function c75646123.initial_effect(c)
 	e4:SetCode(202)
 	e4:SetValue(1)
 	c:RegisterEffect(e4)
+	local ee=Effect.CreateEffect(c)
+	ee:SetType(EFFECT_TYPE_SINGLE)
+	ee:SetCode(EFFECT_MATERIAL_CHECK)
+	ee:SetValue(c75646123.valcheck)
+	c:RegisterEffect(ee)
 end
 c75646123.material_type=TYPE_SYNCHRO
+function c75646123.valcheck(e,c)
+	local g=c:GetMaterial()
+	if g:IsExists(Card.IsType,2,nil,TYPE_TUNER) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e1:SetCode(21142671)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
+		c:RegisterEffect(e1)
+	end
+end

expansions/script/c75646545.lua

@@ -25,6 +25,11 @@ function c75646545.initial_effect(c)
 	e3:SetRange(LOCATION_MZONE)
 	e3:SetOperation(c75646545.drop)
 	c:RegisterEffect(e3)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e4:SetCode(21142671)
+	c:RegisterEffect(e4)
 end
 c75646545.material_type=TYPE_SYNCHRO
 function c75646545.sfilter(c)

expansions/script/c81004007.lua

@@ -43,7 +43,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp,chk)
 	end
 end
 function cm.thfilter(c)
-	return c.Attack_Defense_Listed and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() and (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE))
+	return c.att1550_def1050 and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() and (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE))
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end

expansions/script/c81004100.lua

@@ -23,7 +23,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.cfilter(c,e,tp,m)
 	if bit.band(c:GetType(),0x81)~=0x81 or not c:IsType(TYPE_PENDULUM)
 		or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end

expansions/script/c81004102.lua

@@ -15,7 +15,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c)
 	return c:IsType(TYPE_PENDULUM)
 end

expansions/script/c81004107.lua

@@ -13,7 +13,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.activate)
 	c:RegisterEffect(e1)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp,m)
 	if not (c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)) or bit.band(c:GetType(),0x81)~=0x81
 		or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end

expansions/script/c81004200.lua

@@ -24,7 +24,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.thop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.thfilter(c)
 	return c:IsCode(81004100) and c:IsAbleToHand()
 end

expansions/script/c81004201.lua

@@ -23,7 +23,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c)
 	return c:IsAttack(1550) and c:IsDefense(1050) and (c:IsAbleToHand() or c:IsAbleToGrave())
 end

expansions/script/c81004203.lua

@@ -25,7 +25,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.lvfilter(c)
 	return ((c:IsAttack(1550) and c:IsDefense(1050)) or (c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM))) and c:IsFaceup() and c:GetLevel()>0
 end

expansions/script/c81004204.lua

@@ -27,7 +27,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.sumop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.dfilter(c)
 	return c:IsAttack(1550) and c:IsDefense(1050) and c:IsAbleToDeck()
 end

expansions/script/c81004205.lua

@@ -29,7 +29,7 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.activate2)
 	c:RegisterEffect(e4)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.cfilter(c)
 	return c:IsAttack(1550) and c:IsDefense(1050)
 		and not c:IsStatus(STATUS_BATTLE_DESTROYED)

expansions/script/c81004206.lua

@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.operation)
 	c:RegisterEffect(e1)
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 end   
 function cm.cfilter(c)
 	return c:IsFaceup() and c:IsAttack(1550) and c:IsDefense(1050)

expansions/script/c81004304.lua

@@ -21,7 +21,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=0
+cm.att1550_def1050=false
 function cm.splimit(e,se,sp,st)
 	return se:IsHasType(EFFECT_TYPE_ACTIONS)
 end
@@ -48,7 +48,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 end
 function cm.thfilter(c)
-	return c.Attack_Defense_Listed and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
+	return c.att1550_def1050 and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c81024005.lua

@@ -22,7 +22,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.damop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c81024008.lua

@@ -23,7 +23,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.recop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 	return ep==tp and Duel.GetAttacker():IsControler(1-tp)
 end

expansions/script/c81024009.lua

@@ -27,7 +27,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.recop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.cfilter(c)
 	return c:IsFaceup() and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81024010.lua

@@ -23,7 +23,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.damop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.cfilter(c)
 	return c:IsFaceup() and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81024011.lua

@@ -24,7 +24,7 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.drop)
 	c:RegisterEffect(e4)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.tfilter(c,e,tp)
 	return c:IsAttack(1550) and c:IsDefense(1050) and c:IsCanBeSpecialSummoned(e,0x8,tp,false,false)
 		and not Duel.IsExistingMatchingCard(cm.bfilter,tp,LOCATION_ONFIELD,0,1,nil,c)

expansions/script/c81024012.lua

@@ -21,7 +21,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.repop)
 	c:RegisterEffect(e1)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 	local a=Duel.GetAttacker()
 	local d=Duel.GetAttackTarget()

expansions/script/c81024021.lua

@@ -27,7 +27,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 	Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.counterfilter(c)
 	return c:GetAttack()==1550 and c:GetDefense()==1050
 end

expansions/script/c81024022.lua

@@ -22,7 +22,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.skipop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.cfilter(c)
 	return c:IsFaceup() and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81024024.lua

@@ -38,7 +38,7 @@ function cm.initial_effect(c)
 	e3:SetCode(EFFECT_MUST_ATTACK)
 	c:RegisterEffect(e3)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.spfilter(c,e,tp)
 	return c:IsAttack(1550) and c:IsDefense(1050) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end

expansions/script/c81024025.lua

@@ -27,7 +27,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.setop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.cfilter(c)
 	return c:IsFaceup() and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81024032.lua

@@ -26,7 +26,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.thop)
 	c:RegisterEffect(e2)	
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 	if not (ep==1-tp and Duel.IsChainDisablable(ev)) then return false end
 	if re:IsHasCategory(CATEGORY_NEGATE)

expansions/script/c81024041.lua

@@ -36,7 +36,7 @@ function cm.initial_effect(c)
 	e3:SetOperation(cm.desop)
 	c:RegisterEffect(e3)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,tp)
 	return c:IsCode(81024000) and c:GetActivateEffect() and c:GetActivateEffect():IsActivatable(tp,true,true)
 end

expansions/script/c81041005.lua

@@ -22,7 +22,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.op)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp)
 	return c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81041011.lua

@@ -24,7 +24,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.psop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp)
 	return c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81041016.lua

@@ -25,7 +25,7 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.spop)
 	c:RegisterEffect(e4)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp)
 	return c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81041021.lua

@@ -25,7 +25,7 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.thop)
 	c:RegisterEffect(e4)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c)
 	return (aux.IsCodeListed(c,81041005) or c:IsCode(81041005)) and not c:IsCode(m) and c:IsAbleToHand() and c:IsType(TYPE_SPELL+TYPE_TRAP)
 end

expansions/script/c81041033.lua

@@ -25,7 +25,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.tdop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.thfilter(c)
 	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050) and c:IsAbleToHand()
 end

expansions/script/c81041034.lua

@@ -26,7 +26,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.matop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp)
 	return c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81041036.lua

@@ -24,7 +24,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.lvop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 cm.toss_dice=true
 function cm.cfilter(c)
 	return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsLevelAbove(13)

expansions/script/c81041037.lua

@@ -26,7 +26,7 @@ function cm.initial_effect(c)
 	e1:SetOperation(cm.atkop)
 	c:RegisterEffect(e1)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp)
 	return c:IsType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
 end

expansions/script/c81041038.lua

@@ -23,7 +23,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.teop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.filter(c,e,tp)
 	return ((c:IsLocation(LOCATION_GRAVE) and c:IsType(TYPE_LINK)) or (c:IsFaceup() and c:IsDefense(1050) and c:IsType(TYPE_RITUAL)))
 		and c:IsAttack(1550)

expansions/script/c81041039.lua

@@ -24,7 +24,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.ssop)
 	c:RegisterEffect(e2)
 end
-cm.Attack_Defense_Listed=1
+cm.att1550_def1050=true
 function cm.costfilter(c)
 	return c:IsAttack(1550) and c:IsDefense(1050) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM)
 		and (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) and c:IsAbleToGraveAsCost()

expansions/script/c81046051.lua

@@ -39,6 +39,7 @@ function cm.initial_effect(c)
 	e6:SetValue(aux.tgoval)
 	c:RegisterEffect(e6)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.splimit(e,se,sp,st)
 	return not e:GetHandler():IsLocation(LOCATION_EXTRA) or (bit.band(st,SUMMON_TYPE_SYNCHRO)==SUMMON_TYPE_SYNCHRO and not se)
 end

expansions/script/c9310023.lua

@@ -43,6 +43,7 @@ function c9310023.initial_effect(c)
 	e5:SetCode(21142671)
 	c:RegisterEffect(e5)
 end
+cm.material_type=TYPE_SYNCHRO
 function c9310023.splimit(e,se,sp,st)
 	return not e:GetHandler():IsLocation(LOCATION_EXTRA) or 
 		   (bit.band(st,SUMMON_TYPE_SYNCHRO)==SUMMON_TYPE_SYNCHRO and (not se or not se:IsHasType(EFFECT_TYPE_ACTIONS)))

expansions/script/c9399300.lua

@@ -24,6 +24,7 @@ function c9399300.initial_effect(c)
 	e3:SetValue(100)
 	c:RegisterEffect(e3)
 end
+c9399300.has_text_type=TYPE_DUAL
 function c9399300.filter(c)
 	return c:IsFaceup() and not c:IsSetCard(0x3f99)
 end

expansions/script/c9399400.lua

@@ -37,6 +37,7 @@ function c9399400.initial_effect(c)
 	c:RegisterEffect(e4)
 	Duel.AddCustomActivityCounter(9399400,ACTIVITY_CHAIN,c9399400.chainfilter)
 end
+c9399400.has_text_type=TYPE_DUAL
 function c9399400.chainfilter(re,tp,cid)
 	local rc=re:GetHandler()
 	return not (re:IsActiveType(TYPE_MONSTER) and not rc:IsSetCard(0x3f99))

expansions/script/c98628113.lua

@@ -49,6 +49,7 @@ function cm.initial_effect(c)
 	e6:SetTarget(cm.distg)
 	c:RegisterEffect(e6)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.imcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
 end

expansions/script/c98628115.lua

@@ -21,6 +21,7 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.chainop)
 	c:RegisterEffect(e2)
 end
+cm.material_type=TYPE_SYNCHRO
 function cm.synlimit(e,se,sp,st)
 	return st&SUMMON_TYPE_SYNCHRO==SUMMON_TYPE_SYNCHRO and not se
 end