ndyd

expansions/script/c23000305.lua

@@ -48,6 +48,12 @@ function c23000305.initial_effect(c)
 	e5:SetTarget(c23000305.destg)
 	e5:SetOperation(c23000305.desop)
 	c:RegisterEffect(e5)
+	--double tuner
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_SINGLE)
+	e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e6:SetCode(21142671)
+	c:RegisterEffect(e6)
 end
 function c23000305.spfilter2(c,e,tp)
 	return c:IsSetCard(0x35b) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)

expansions/script/c23000309.lua

@@ -47,12 +47,13 @@ function c23000309.initial_effect(c)
 	e5:SetOperation(c23000309.spop)
 	c:RegisterEffect(e5)
 	--double tuner
-	local e9=Effect.CreateEffect(c)
-	e9:SetType(EFFECT_TYPE_SINGLE)
-	e9:SetCode(EFFECT_MATERIAL_CHECK)
-	e9:SetValue(c23000309.valcheck)
-	c:RegisterEffect(e9)
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_SINGLE)
+	e6:SetCode(EFFECT_MATERIAL_CHECK)
+	e6:SetValue(c23000309.valcheck)
+	c:RegisterEffect(e6)
 end
+c23000309.material_type=TYPE_SYNCHRO
 function c23000309.indct(e,re,r,rp)
 	if bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0 then
 		return 1
@@ -129,4 +130,4 @@ function c23000309.valcheck(e,c)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
 		c:RegisterEffect(e1)
 	end
-end
+end
\ No newline at end of file

expansions/script/c81006001.lua

@@ -13,9 +13,9 @@ function cm.initial_effect(c)
 	e1:SetHintTiming(0,TIMING_END_PHASE)
 	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,m)
-	e1:SetCost(cm.tkcost)
-	e1:SetTarget(cm.tktg)
-	e1:SetOperation(cm.tkop)
+	e1:SetCost(cm.spcost)
+	e1:SetTarget(cm.sptg)
+	e1:SetOperation(cm.spop)
 	c:RegisterEffect(e1)
 	--spsummon
 	local e4=Effect.CreateEffect(c)
@@ -33,28 +33,30 @@ end
 function cm.ffilter(c,fc,sub,mg,sg)
 	return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
 end
-function cm.tkcostfilter(c)
+function cm.cfilter(c)
 	return c:IsAbleToRemoveAsCost()
 end
-function cm.tkcost(e,tp,eg,ep,ev,re,r,rp,chk)
+function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
 	local loc=LOCATION_ONFIELD
 	if ft==0 then loc=LOCATION_MZONE end
-	if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(cm.tkcostfilter,tp,loc,0,1,e:GetHandler()) end
+	if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(cm.cfilter,tp,loc,0,1,e:GetHandler()) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectMatchingCard(tp,cm.tkcostfilter,tp,loc,0,1,1,e:GetHandler())
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,loc,0,1,1,e:GetHandler())
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
 end
-function cm.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,TYPES_TOKEN_MONSTER,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,0x4011,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) end
 	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end
-function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or not e:GetHandler():IsRelateToEffect(e) then return end
-	if not Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,TYPES_TOKEN_MONSTER,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) then return end
-	local token=Duel.CreateToken(tp,81006099)
-	Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	if Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,0x4011,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) then
+		local token=Duel.CreateToken(tp,81006099)
+		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+	end
 end
 function cm.tpcon(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetTurnPlayer()~=tp

expansions/script/c81006002.lua

@@ -31,13 +31,13 @@ function cm.ffilter(c,fc,sub,mg,sg)
 end
 function cm.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,TYPES_TOKEN_MONSTER,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) end
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,0x4011,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) end
 	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
 end
 function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	if Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,TYPES_TOKEN_MONSTER,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) then
+	if Duel.IsPlayerCanSpecialSummonMonster(tp,81006099,0,0x4011,2800,2000,8,RACE_PLANT,ATTRIBUTE_EARTH) then
 		local token=Duel.CreateToken(tp,81006099)
 		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
 	end