watele

expansions/script/c12000000.lua

@@ -99,6 +99,12 @@ end
 function srre.check_effect_ignite(c)
 	return srre.check_effect(c,"ignite") 
 end
+function srre.check_set_GDRT(c)  --
+	return srre.check_set(c,"GDRT") or srre.check_set(c,"GDRT_DG")
+end
+function srre.check_set_GDRT_DG(c)  --
+	return srre.check_set(c,"GDRT_DG")
+end
 function srre.SPSummoneffect(c,m,des,tt,cate,pro,limit,con,cost,tg,op)
 	--tograve
 	local e1=Effect.CreateEffect(c)

expansions/script/c12014003.lua

 --电脑娘 德涅波拉
 local m=12014003
 local cm=_G["c"..m]
+cm.effect_with_ignite=true
 function cm.initial_effect(c)
 	--change race
 	local e1=Effect.CreateEffect(c)

expansions/script/c12028020.lua

@@ -27,8 +27,8 @@ function cm.initial_effect(c)
 	e2:SetCondition(aux.exccon)
 	e2:SetCountLimit(1,m+100)
 	e2:SetCost(aux.bfgcost)
-	e2:SetTarget(cm.sptg)
-	e2:SetOperation(cm.spop)
+	e2:SetTarget(cm.sptg1)
+	e2:SetOperation(cm.spop1)
 	c:RegisterEffect(e2)
 end
 function cm.filter(c)
@@ -49,12 +49,12 @@ end
 function cm.spfilter(c,e,tp)
 	return Senya.check_set_prism(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
 end
-function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+function cm.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
 end
-function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+function cm.spop1(e,tp,eg,ep,ev,re,r,rp)
 	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
 	local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE,0,nil,e,tp)
 	if ft<1 or g:GetCount()==0 then return end

expansions/script/c12044027.lua

@@ -39,7 +39,7 @@ function cm.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCondition(cm.spcon)
+	e2:SetCondition(cm.spcon1)
 	e2:SetTarget(cm.sptg)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
@@ -75,8 +75,8 @@ function cm.spcon(e,c)
 	local tp=c:GetControler()
 	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsFaceup() and ( Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)==7 or Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)==9 or Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)==11 )
 end
-function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return c:GetSummonLocation()==LOCATION_DECK
+function cm.spcon1(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetSummonLocation()==LOCATION_DECK
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

expansions/script/c12044089.lua

@@ -18,8 +18,8 @@ function cm.initial_effect(c)
 	e2:SetDescription(aux.Stringid(m,1))
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_GRAVE)
-	e2:SetTarget(cm.thtg)
-	e2:SetOperation(cm.thop)
+	e2:SetTarget(cm.thtg1)
+	e2:SetOperation(cm.thop1)
 	c:RegisterEffect(e2)
 end
 function cm.thfilter(c)
@@ -52,11 +52,11 @@ end
 function cm.thfilter1(c)
 	return c:IsSetCard(0x6fac) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
 end
-function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+function cm.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter1,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) and e:GetHandler():IsAbleToHand() end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
 end
-function cm.thop(e,tp,eg,ep,ev,re,r,rp)
+function cm.thop1(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
 	local g=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)

expansions/script/c12047007.lua

@@ -47,7 +47,7 @@ function cm.drcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(cm.cfilter,1,nil,tp,SUMMON_TYPE_FUSION)
 end
 function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)  end
 	Duel.SetTargetPlayer(tp)
 	Duel.SetTargetParam(1)
 	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)

expansions/script/c12062080.lua

@@ -142,7 +142,8 @@ function cm.efop2(e,tp,eg,ep,ev,re,r,rp)
 	if #g==1 then
 		local tg=g:FilterCount(Card.IsRelateToEffect,nil,e)
 		if #tg>0 then
-		Duel.Destroy(tg,REASON_EFFECT) end
+		Duel.Destroy(tg,REASON_EFFECT)
+		end
 	end
 end
 function cm.spfilter(c,e,tp)

expansions/script/c12062086.lua

 --虚数领域的咏叹调
 local m=12062086
 local cm=_G["c"..m]
+Duel.LoadScript("c12000000.lua")
 function cm.initial_effect(c)
-	--level up
+
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(70252926,0))
+	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetCountLimit(1,m)
-	e1:SetCondition(cm.rmcon)
-	e1:SetTarget(cm.rmtg)
-	e1:SetOperation(cm.rmop)
+	e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
+	e1:SetCondition(cm.con1)
+	e1:SetTarget(cm.tg1)
+	e1:SetOperation(cm.op1)
 	c:RegisterEffect(e1)
-	--to hand
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-	e2:SetCode(EVENT_REMOVE)
-	e2:SetOperation(cm.regop)
-	c:RegisterEffect(e2)
+	Duel.AddCustomActivityCounter(m,ACTIVITY_CHAIN,cm.chainfilter)
+	--to grave
 	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_PHASE+PHASE_END)
-	e3:SetRange(LOCATION_REMOVED)
-	e3:SetCountLimit(1,m+900)
-	e3:SetCondition(cm.thcon)
-	e3:SetTarget(cm.thtg)
-	e3:SetOperation(cm.thop)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e3:SetCode(EVENT_REMOVE)
+	e3:SetOperation(cm.regop)
 	c:RegisterEffect(e3)
-	Duel.AddCustomActivityCounter(m,ACTIVITY_CHAIN,cm.chainfilter)
+	--to hand/spsummon
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(m,1))
+	e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e4:SetCode(EVENT_PHASE+PHASE_END)
+	e4:SetRange(LOCATION_REMOVED)
+	e4:SetCountLimit(1,m+100)
+	e4:SetCondition(cm.thcon)
+	e4:SetTarget(cm.thtg)
+	e4:SetOperation(cm.thop)
+	c:RegisterEffect(e4)
+	--indes
+	local e22=Effect.CreateEffect(c)
+	e22:SetDescription(aux.Stringid(m,2))
+	e22:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e22:SetType(EFFECT_TYPE_QUICK_O)
+	e22:SetRange(LOCATION_MZONE)
+	e22:SetCountLimit(1,m+200)
+	e22:SetCode(EVENT_FREE_CHAIN)
+	e22:SetCondition(cm.condition)
+	e22:SetTarget(cm.target)
+	e22:SetOperation(cm.activate)
+	c:RegisterEffect(e22)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()~=tp and Duel.GetFlagEffect(tp,12026080)>4
+end
+function cm.filter(c,e,tp)
+	return c:IsFaceup() and not c:IsCode(m) and c:IsRace(RACE_DRAGON) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return
+		Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,5,LOCATION_HAND+LOCATION_GRAVE)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	local ft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if ft1>0 then
+		if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft1=1 end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,ft1,ft1,nil,e,tp)
+		if g:GetCount()>0 then
+			local tc=g:GetFirst()
+			while tc do
+				Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
+				tc=g:GetNext()
+			end
+		end
+	end
+	Duel.SpecialSummonComplete()
 end
 function cm.chainfilter(re,tp,cid)
-	return not (re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsCode(12062080))
+	return not ( re:GetHandler():IsCode(12062080) and re:IsHasType(EFFECT_TYPE_ACTIVATE) )
 end
-function cm.rmcon(e,tp,eg,ep,ev,re,r,rp)
+function cm.con1(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.GetCustomActivityCount(m,tp,ACTIVITY_CHAIN)~=0
 end
-function cm.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)>0 and e:GetHandler():IsAbleToRemove() end
+function cm.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsAbleToRemove() end
 	Duel.SetOperationInfo(0,CATEGORY_REMOVE,e:GetHandler(),1,0,0)
 end
-function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
+--
+function cm.op1(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)>0 then
-		if Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-			local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil)
-			if g:GetCount()>0 then
-				Duel.BreakEffect()
-				Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
-			end
+	if Duel.Remove(c,POS_FACEUP,REASON_EFFECT)==0 then return end
+	if Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD,1,1,nil)
+		if g:GetCount()>0 then
+			Duel.BreakEffect()
+			Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
 		end
 	end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_REMOVE)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,1)
+	e1:SetValue(1)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
 end
 function cm.regop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
@@ -68,11 +118,16 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
 		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
-	e:GetHandler():ResetFlagEffect(m)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) then
-		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	if e:GetHandler():IsRelateToEffect(e) then
+		Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e1:SetCode(EFFECT_SKIP_TURN)
+		e1:SetTargetRange(1,1)
+		e1:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
+		Duel.RegisterEffect(e1,tp)
 	end
-end
+end
\ No newline at end of file

expansions/script/c12899008.lua

@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET)
 	e1:SetCountLimit(1,m)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.activate)
@@ -139,7 +139,7 @@ function cm.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(false,true,true)
 	local g1=g
 	g1:AddCard(e:GetHandler())
-	Duel.Remove(g1,POS_FACEUP,REASON_COST)	
+	Duel.Remove(g1,POS_FACEUP,REASON_COST)  
 	Duel.ClearTargetCard()
 	g:GetFirst():CreateEffectRelation(e)
 	local tg=te:GetTarget()

expansions/script/c12899009.lua

@@ -54,7 +54,7 @@ function cm.handcon(e)
 end
 
 function cm.filter0(c)
-	return c:IsSetCard(0x5a71) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+	return c:IsSetCard(0x5a71) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE))
 end
 function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter0,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end

expansions/script/c16110001.lua

@@ -46,6 +46,8 @@ end
 function rkst.advop(e,tp,eg,ep,ev,re,r,rp,c)
 	local tp=e:GetHandlerPlayer()
 	local res1=false
+	local mg=Duel.GetMatchingGroup(rkst.otfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
+	local res = Duel.CheckTribute(c,1,1,mg)
 	if Duel.IsPlayerAffectedByEffect(tp,16110026) then
 		res1=Duel.IsPlayerCanDiscardDeckAsCost(tp,1)
 	end
@@ -56,6 +58,11 @@ function rkst.advop(e,tp,eg,ep,ev,re,r,rp,c)
 	e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
 	e1:SetCountLimit(1)
 	Duel.RegisterEffect(e1,tp)
+	if not res and res1 then
+		Duel.DiscardDeck(tp,1,REASON_COST)
+		e1:Reset()
+		return
+	end
 	if res1==true and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
 		Duel.DiscardDeck(tp,1,REASON_COST)
 		e1:Reset()

expansions/script/c16110018.lua

@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 end
 function cm.mfilter(c)
-	return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_ADVANCE)
+	return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_ADVANCE) and c:IsSetCard(0xcc5)
 end
 function cm.condition(e,tp,eg,ep,ev,re,r,rp)
 	return Duel.IsExistingMatchingCard(cm.mfilter,tp,LOCATION_MZONE,0,1,nil)

expansions/script/c16110024.lua

@@ -49,11 +49,11 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
 		e9:SetValue(POS_FACEUP_ATTACK+POS_FACEDOWN_DEFENSE)
 		local e10=Effect.CreateEffect(c)
 		e10:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
-		e10:SetTargetRange(LOCATION_HAND+LOCATION_ONFIELD,0)
+		e10:SetTargetRange(LOCATION_HAND,0)
 		e10:SetTarget(cm.advtg)
 		e10:SetLabelObject(e9)
-		e10:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		c:RegisterEffect(e10)
+		e10:SetReset(RESET_PHASE+PHASE_END)
+		Duel.RegisterEffect(e10,tp)
 		Duel.SpecialSummonComplete()
 	end
 end

expansions/script/c16110028.lua

@@ -24,13 +24,11 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.setop)
 	c:RegisterEffect(e2)
 end
-function cm.cfilter(c)
-	return c:IsSummonType(SUMMON_TYPE_ADVANCE)
+function cm.mfilter(c)
+	return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_ADVANCE) and c:IsSetCard(0xcc5)
 end
-function cm.condition(e)
-	local tp=e:GetHandlerPlayer()
-	return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)
-		and not Duel.IsExistingMatchingCard(cm.cfilter,tp,0,LOCATION_MZONE,1,nil)
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(cm.mfilter,tp,LOCATION_MZONE,0,1,nil)
 end
 function cm.locfilter(c)
 	return c:IsLocation(LOCATION_SZONE) and not c:IsLocation(LOCATION_FZONE)

expansions/script/c33701394.lua

@@ -21,7 +21,8 @@ function cm.cfilter(c,tp)
 	return c:GetPreviousControler()==tp
 end
 function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(cm.cfilter,1,nil,tp) and Duel.GetTurnPlayer()~=tp and Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)<=0
+	return eg:FilterCount(cm.cfilter,nil,tp)==1 and Duel.GetTurnPlayer()~=tp
+		and Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)<=0
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()

expansions/script/c47530165.lua

 --高达试作1号机 玉兰
 function c47530165.initial_effect(c)
-    --xyz summon
-    aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),4,2)
-    c:EnableReviveLimit()
-    --Full Boost
-    local e1=Effect.CreateEffect(c)
-    e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
-    e1:SetCode(EFFECT_DESTROY_REPLACE)
-    e1:SetRange(LOCATION_MZONE)
-    e1:SetCountLimit(1,47530165)
-    e1:SetTarget(c47530165.desreptg)
-    e1:SetOperation(c47530165.desrepop)
-    c:RegisterEffect(e1)      
-    --Gundam VS Gundam
-    local e2=Effect.CreateEffect(c)
-    e2:SetType(EFFECT_TYPE_FIELD)
-    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-    e2:SetCode(EFFECT_CANNOT_ACTIVATE)
-    e2:SetRange(LOCATION_MZONE)
-    e2:SetTargetRange(0,1)
-    e2:SetValue(1)
-    e2:SetCondition(c47530165.actcon)
-    c:RegisterEffect(e2)
-    local e3=Effect.CreateEffect(c)
-    e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-    e3:SetRange(LOCATION_MZONE)
-    e3:SetCode(EVENT_ATTACK_ANNOUNCE)
-    e3:SetCondition(c47530165.atkcon)
-    e3:SetOperation(c47530165.atkop)
-    c:RegisterEffect(e3)    
-    --sps voice
-    local e5=Effect.CreateEffect(c)
-    e5:SetCategory(CATEGORY_ATKCHANGE)
-    e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-    e5:SetCode(EVENT_SPSUMMON_SUCCESS)
-    e5:SetCondition(c47530165.spscon)
-    e5:SetOperation(c47530165.spssuc)
-    c:RegisterEffect(e5)
-    --atk voice
-    local e6=Effect.CreateEffect(c)
-    e6:SetCategory(CATEGORY_ATKCHANGE)
-    e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-    e6:SetCode(EVENT_ATTACK_ANNOUNCE)
-    e6:SetCondition(c47530165.atkcon2)
-    e6:SetOperation(c47530165.atksuc)
-    c:RegisterEffect(e6)  
+	--xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),4,2)
+	c:EnableReviveLimit()
+	--Full Boost
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_DESTROY_REPLACE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,47530165)
+	e1:SetTarget(c47530165.desreptg)
+	e1:SetOperation(c47530165.desrepop)
+	c:RegisterEffect(e1)	  
+	--Gundam VS Gundam
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(0,1)
+	e2:SetValue(1)
+	e2:SetCondition(c47530165.actcon)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e3:SetCondition(c47530165.atkcon)
+	e3:SetOperation(c47530165.atkop)
+	c:RegisterEffect(e3)	
+	--sps voice
+	local e5=Effect.CreateEffect(c)
+	e5:SetCategory(CATEGORY_ATKCHANGE)
+	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e5:SetCondition(c47530165.spscon)
+	e5:SetOperation(c47530165.spssuc)
+	c:RegisterEffect(e5)
+	--atk voice
+	local e6=Effect.CreateEffect(c)
+	e6:SetCategory(CATEGORY_ATKCHANGE)
+	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e6:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e6:SetCondition(c47530165.atkcon2)
+	e6:SetOperation(c47530165.atksuc)
+	c:RegisterEffect(e6)  
 end
 function c47530165.mfilter(c,xyzc)
-    return c:IsRace(RACE_MACHINE) and c:IsLevelAbove(5)
+	return c:IsRace(RACE_MACHINE) and c:IsLevelAbove(5)
 end
 function c47530165.xyzcheck(g)
-    return g:GetClassCount(Card.GetLevel)==1
+	return g:GetClassCount(Card.GetLevel)==1
 end
 function c47530165.actcon(e)
-    local bc=e:GetHandler():GetBattleTarget()
-    return bc and bc:IsSetCard(0x5d5) and bc:IsRace(RACE_MACHINE)
+	local bc=e:GetHandler():GetBattleTarget()
+	return bc and bc:IsSetCard(0x5d5) and bc:IsRace(RACE_MACHINE)
 end
 function c47530165.atkcon(e)
-    local ph=Duel.GetCurrentPhase()
-    local bc=e:GetHandler():GetBattleTarget()
-    return bc and bc:IsRace(RACE_MACHINE)
+	local ph=Duel.GetCurrentPhase()
+	local bc=e:GetHandler():GetBattleTarget()
+	return bc and bc:IsRace(RACE_MACHINE)
 end
 function c47530165.atkop(e,tp,eg,ep,ev,re,r,rp)
-    local a=Duel.GetAttacker()
-    local e1=Effect.CreateEffect(e:GetHandler())
-    e1:SetType(EFFECT_TYPE_SINGLE)
-    e1:SetCode(EFFECT_SET_ATTACK_FINAL)
-    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL)
-    e1:SetValue(math.ceil(a:GetAttack()/2))
-    a:RegisterEffect(e1)
+	local a=e:GetHandler():GetBattleTarget()
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL)
+	e1:SetValue(math.ceil(a:GetAttack()/2))
+	a:RegisterEffect(e1)
 end
 function c47530165.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
-    local c=e:GetHandler()
-    if chk==0 then return not c:IsReason(REASON_REPLACE) end
-    if Duel.SelectEffectYesNo(tp,c,96) then
-        return true
-    else return false end
+	local c=e:GetHandler()
+	if chk==0 then return not c:IsReason(REASON_REPLACE) end
+	if Duel.SelectEffectYesNo(tp,c,96) then
+		return true
+	else return false end
 end
 function c47530165.spfilter(c,e,tp,mc)
-    return c:IsSetCard(0x5d5) and mc:IsCanBeXyzMaterial(c) and c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
+	return c:IsSetCard(0x5d5) and mc:IsCanBeXyzMaterial(c) and c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
 end
 function c47530165.desrepop(e,tp,eg,ep,ev,re,r,rp)
-    local c=e:GetHandler()
-    Duel.Hint(HINT_CARD,0,47530165)
-    local g=Duel.SelectMatchingCard(tp,c47530165.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,c)
-    local tc=g:GetFirst()
-    if tc then
-        local mg=c:GetOverlayGroup()
-        if mg:GetCount()~=0 then
-            Duel.Overlay(tc,mg)
-        end
-        tc:SetMaterial(Group.FromCards(c))
-        Duel.Overlay(tc,Group.FromCards(c))
-        Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
-        tc:CompleteProcedure()
-    end
+	local c=e:GetHandler()
+	Duel.Hint(HINT_CARD,0,47530165)
+	local g=Duel.SelectMatchingCard(tp,c47530165.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,c)
+	local tc=g:GetFirst()
+	if tc then
+		local mg=c:GetOverlayGroup()
+		if mg:GetCount()~=0 then
+			Duel.Overlay(tc,mg)
+		end
+		tc:SetMaterial(Group.FromCards(c))
+		Duel.Overlay(tc,Group.FromCards(c))
+		Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
+		tc:CompleteProcedure()
+	end
 end
 function c47530165.spscon(e,tp,eg,ep,ev,re,r,rp)
-    return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
 end
 function c47530165.spssuc(e,tp,eg,ep,ev,re,r,rp)
-    Duel.Hint(HINT_MUSIC,0,aux.Stringid(47530165,0))
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(47530165,0))
 end
 function c47530165.atkcon2(e)
-    local bc=e:GetHandler():GetBattleTarget()
-    return bc and bc:IsCode(47530163)
+	local bc=e:GetHandler():GetBattleTarget()
+	return bc and bc:IsCode(47530163)
 end
 function c47530165.atksuc(e,tp,eg,ep,ev,re,r,rp)
-    Duel.Hint(HINT_SOUND,0,aux.Stringid(47530165,1))  
+	Duel.Hint(HINT_SOUND,0,aux.Stringid(47530165,1))  
 end
\ No newline at end of file

expansions/script/c65040004.lua

@@ -12,7 +12,7 @@ function c65040004.initial_effect(c)
 	c:RegisterEffect(e1)
 	--tohand
 	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
 	e2:SetCode(EVENT_RELEASE)

expansions/script/c66915073.lua

@@ -7,6 +7,13 @@ function cm.initial_effect(c)
 	c:EnableReviveLimit()
    --code
 	aux.EnableChangeCode(c,m-3,LOCATION_MZONE+LOCATION_GRAVE) 
+	--splimit
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(cm.splimit)
+	c:RegisterEffect(e1)	
 	--X M
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,1))
@@ -29,6 +36,10 @@ function cm.initial_effect(c)
 	e2:SetTarget(cm.target1)
 	e2:SetOperation(cm.operation1)
 	c:RegisterEffect(e2)
+end  
+function cm.splimit(e,se,sp,st)
+	if not StarLight_from_K then return true end
+	return not StarLight_from_K.Brightstarlight_Effect[se]
 end
 function cm.mfilter(c)
 	return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_LIGHT)

expansions/script/c66915074.lua

@@ -10,6 +10,13 @@ function cm.initial_effect(c)
 	--S summon
 	cm.AddSynchroMixProcedure(c,nil,nil,nil,nil,1,99,nil)
 	c:EnableReviveLimit()
+	--splimit
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(cm.splimit)
+	c:RegisterEffect(e1)   
 	--code
 	aux.EnableChangeCode(c,66915070,LOCATION_MZONE+LOCATION_GRAVE) 
 	--cannot be target
@@ -70,6 +77,10 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e8)
 	StarLight_from_K.Brightstarlight_Effect[e8]=true
 end
+function cm.splimit(e,se,sp,st)
+	if not StarLight_from_K then return true end
+	return not StarLight_from_K.Brightstarlight_Effect[se]
+end
 function cm.fuslimit(e,c,sumtype)
 	return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
 end

expansions/script/c66915075.lua

@@ -5,6 +5,13 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcFunRep(c,cm.fsilter,2,true)
+	--splimit
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(cm.splimit)
+	c:RegisterEffect(e1)   
 	--code
 	aux.EnableChangeCode(c,m-5,LOCATION_MZONE+LOCATION_GRAVE) 
 	local e1=Effect.CreateEffect(c)
@@ -31,6 +38,10 @@ function cm.initial_effect(c)
 	e2:SetOperation(cm.desop)
 	c:RegisterEffect(e2)
 end
+function cm.splimit(e,se,sp,st)
+	if not StarLight_from_K then return true end
+	return not StarLight_from_K.Brightstarlight_Effect[se]
+end
 function cm.ffilter(c)
 	return c:IsFusionType(TYPE_FUSION) and c:IsRace(RACE_FAIRY)
 end

expansions/script/c66915077.lua

@@ -4,6 +4,13 @@ local cm=_G["c"..m]
 Duel.LoadScript("c16199990.lua")
 function cm.initial_effect(c)
 	c:EnableReviveLimit()
+	--splimit
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(cm.splimit)
+	c:RegisterEffect(e1) 
    --code
 	aux.EnableChangeCode(c,66915070,LOCATION_MZONE+LOCATION_GRAVE) 
 	local e1=Effect.CreateEffect(c)
@@ -46,6 +53,10 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.repop)
 	c:RegisterEffect(e4)
 end
+function cm.splimit(e,se,sp,st)
+	if not StarLight_from_K then return true end
+	return StarLight_from_K.Brightstarlight_Effect[se]
+end
 function cm.condition(e,tp)
 	return Duel.IsExistingMatchingCard(nil,tp,LOCATION_SZONE,0,4,nil)
 end

expansions/script/c81001000.lua

@@ -79,6 +79,7 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
 	if g:GetCount()>0 then