得得得得得

expansions/script/c10050021.lua

@@ -129,9 +129,6 @@ function cm.fftg(e,tp,eg,ep,ev,re,r,rp,chk)
 		return res
 	end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
-		Duel.SetChainLimit(aux.FALSE)
-	end
 end
 function cm.ffop(e,tp,eg,ep,ev,re,r,rp)
 	local chkf=tp

expansions/script/c12026016.lua

@@ -42,6 +42,11 @@ function cm.initial_effect(c)
 	e4:SetOperation(cm.thop)
 	c:RegisterEffect(e4)
 end
+cm.lighting_with_Raphael=1
+function cm.describe_with_Raphael(c)
+	local m=_G["c"..c:GetCode()]
+	return m and m.lighting_with_Raphael
+end
 function cm.chainop(e,tp,eg,ep,ev,re,r,rp)
 	if (re:GetHandler()==e:GetHandler() or re:GetHandler():IsCode(12026000)) and ep==tp then
 		Duel.SetChainLimit(cm.chainlm)
@@ -50,16 +55,16 @@ end
 function cm.chainlm(e,rp,tp)
 	return tp==rp 
 end
-function cm.thfilter1(c)
+function cm.thfilter(c)
 	return c:IsSetCard(0x1fbd) and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
 end
 function cm.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter1,tp,LOCATION_DECK,0,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function cm.thop1(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK,0,1,1,nil)
+	local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
 	if g:GetCount()>0 then
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 		Duel.ConfirmCards(1-tp,g)
@@ -69,7 +74,7 @@ function cm.thfilter1(c,tp)
 	if not c:IsType(TYPE_PENDULUM) then return false end
 	local scale=c:GetLeftScale()
 	return (c:IsLocation(LOCATION_DECK) or (c:IsFaceup() and c:IsType(TYPE_PENDULUM))) and scale>0 and c:IsCanHaveCounter(0x1)
-		and Duel.IsCanRemoveCounter(tp,1,0,0x1,lv,REASON_COST) and c:IsAbleToHand()
+		and Duel.IsCanRemoveCounter(tp,1,0,0x1,scale,REASON_COST) and c:IsAbleToHand()
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter1,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil,tp) end
@@ -88,7 +93,7 @@ function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	lvt[pc]=nil
 	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,3))
 	local scale=Duel.AnnounceNumber(tp,table.unpack(lvt))
-	Duel.RemoveCounter(tp,1,0,0x1,lv,REASON_COST)
+	Duel.RemoveCounter(tp,1,0,0x1,scale,REASON_COST)
 	e:SetLabel(scale)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA)
 end

expansions/script/c12031007.lua

@@ -32,9 +32,9 @@ function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsDefenseAbove(0) end
-	if chk==0 then return Duel.IsExistingTarget(Card.IsDefenseAbove,tp,LOCATION_MZONE,0,1,nil,0) end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil,0) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
-	Duel.SelectTarget(tp,Card.IsDefenseAbove,tp,LOCATION_MZONE,0,1,1,nil,0)
+	Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil,0)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c12086003.lua

@@ -101,7 +101,7 @@ function cm.setop(e,tp,eg,ep,ev,re,r,rp)
 		if ALSTYE_fpl and (ALSTYE_fpl+tt)%2==0 then
 			local tt=g:FilterCount(cm.setfilter,nil)
 			if tt>0 and Duel.SelectYesNo(tp,aux.Stringid(m,5)) then
-				local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,tt,nil)
+				local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,tt,nil)
 				if g:GetCount()>0 then
 					Duel.HintSelection(g)
 					Duel.Destroy(g,REASON_EFFECT)

expansions/script/c30678475.lua

@@ -48,16 +48,16 @@ function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=1 then return false end
 		local cg=Duel.GetMatchingGroup(cm.chkfilter,tp,LOCATION_EXTRA,0,nil,tp)
 		if #cg==0 then return false end
-		local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE+LOCATION_HAND+LOCATION_DECK,0,nil,e,tp)
+		local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE+LOCATION_DECK,0,nil,e,tp)
 		return g:CheckSubGroup(cm.fselect,2,2,tp)
 	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_GRAVE+LOCATION_HAND+LOCATION_DECK)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_GRAVE+LOCATION_DECK)
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.IsPlayerCanSpecialSummonCount(tp,2) and not Duel.IsPlayerAffectedByEffect(tp,59822133) and Duel.GetLocationCount(tp,LOCATION_MZONE)>1 then
 		local cg=Duel.GetMatchingGroup(cm.chkfilter,tp,LOCATION_EXTRA,0,nil,tp)
 		if #cg>0 then
-			local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE+LOCATION_HAND+LOCATION_DECK,0,nil,e,tp)
+			local g=Duel.GetMatchingGroup(cm.spfilter,tp,LOCATION_GRAVE+LOCATION_DECK,0,nil,e,tp)
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 			local sg=g:SelectSubGroup(tp,cm.fselect,false,2,2,tp)
 			if sg then

expansions/script/c30678520.lua

@@ -23,7 +23,6 @@ function cm.initial_effect(c)
 	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e2:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetCondition(cm.tgcon)
 	e2:SetValue(aux.imval1)
 	c:RegisterEffect(e2)
 	local e3=e2:Clone()
@@ -45,12 +44,8 @@ function cm.initial_effect(c)
 
 end
 function cm.mfilter(c)
-	return c:IsSetCard(0xc13) and c:GetLink()>=1 and c:IsLinkType(TYPE_LINK) and not c:IsLinkCode(m)
+	return c:IsLinkType(TYPE_LINK) and c:GetLink()>=1 and c:IsSetCard(0xc13) and not c:IsLinkCode(m)
 end
-function cm.tgcon(e)
-	return Duel.IsExistingMatchingCard(cm.tgfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
-end
-
 
 
 
@@ -85,14 +80,6 @@ end
 
 
 
-
-
-
-
-
-function cm.mfilter(c)
-	return c:IsSetCard(0xc13) and c:GetLink()>=0
-end
 function cm.tkcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
 end

expansions/script/c33503503.lua

@@ -42,7 +42,7 @@ function cm.setoperation(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
 	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
 	if g:GetCount()>0 then
-		if Duel.SendtoDeck(g,tp,2,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) and c:IsFaceup() then
+		if Duel.SendtoDeck(g,nil,2,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) and c:IsFaceup() then
 			local e1=Effect.CreateEffect(c)
 			e1:SetType(EFFECT_TYPE_SINGLE)
 			e1:SetCode(EFFECT_UPDATE_ATTACK)

expansions/script/c33503602.lua

@@ -26,6 +26,11 @@ function cm.initial_effect(c)
 	e2:SetTarget(cm.syntg)
 	e2:SetOperation(cm.synop)
 	c:RegisterEffect(e2)
+	--
+	if not rk.Side_Check then
+		rk.Side_Check=true
+		local ce=rk.side_do(c)
+	end
 end
 function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()

expansions/script/c33503607.lua

@@ -25,6 +25,11 @@ function cm.initial_effect(c)
 	e2:SetTarget(cm.tgtg)
 	e2:SetOperation(cm.tgop)
 	c:RegisterEffect(e2)
+	--
+	if not rk.Side_Check then
+		rk.Side_Check=true
+		local ce=rk.side_do(c)
+	end
 end
 function cm.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() end

expansions/script/c35700120.lua

@@ -53,8 +53,11 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 		tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
 	end
 end
+function cm.gvfilter1(c,tc)
+	return c:IsFaceup() and c:GetFlagEffect(m)~=0
+end
 function cm.gvfilter(c,tc)
-	return c:IsFaceup() and (c:GetFlagEffect(m)~=0 or c==tc)
+	return c:IsFaceup() and c==tc
 end
 function cm.spfilter(c,e,tp)
 	return c:IsFacedown() and c:IsSetCard(0xb71) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
@@ -62,17 +65,19 @@ end
 function cm.gvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
 	if chkc then return chkc:IsLocation(LOCATION_MZONE) and cm.gvfilter(chkc,e:GetHandler()) end
-	if chk==0 then return ft>-1 and Duel.IsExistingTarget(cm.gvfilter,tp,LOCATION_MZONE,0,1,nil,e:GetHandler())
+	if chk==0 then return ft>-1 and Duel.IsExistingTarget(cm.gvfilter,tp,LOCATION_MZONE,0,1,nil,e:GetHandler()) and Duel.IsExistingTarget(cm.gvfilte1,tp,LOCATION_MZONE,0,1,nil,e:GetHandler())
 		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-	local g=Duel.SelectTarget(tp,cm.gvfilter,tp,LOCATION_MZONE,0,1,1,nil,e:GetHandler())
-	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0)
+	local g1=Duel.SelectTarget(tp,cm.gvfilter,tp,LOCATION_MZONE,0,1,1,nil,e:GetHandler())
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g2=Duel.SelectTarget(tp,cm.gvfilter1,tp,LOCATION_MZONE,0,1,1,nil,e:GetHandler())
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g1+g2,2,0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
 end
 function cm.gvop(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		if Duel.SendtoGrave(tc,REASON_EFFECT)~=0 
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	if #g==2 then
+		if Duel.SendtoGrave(g,REASON_EFFECT)~=0 
 			and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) then
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 			local sc=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()

expansions/script/c53729006.lua

@@ -6,7 +6,7 @@ cm.downside_code=m+25
 if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
 function cm.initial_effect(c)
 	SNNM.HartrazCheck(c)
-	SNNM.ORsideLink(c,function(c)return c:IsLevel(4) and c:IsLinkSetCard(0x5533)end,1,1,nil,53729006)
+	SNNM.ORsideLink(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0x5533),1,1,nil,53729006)
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
 	e0:SetCode(EVENT_SPSUMMON_SUCCESS)

expansions/script/c64800042.lua

@@ -12,7 +12,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_CUSTOM+m)
+	e2:SetCode(EVENT_CUSTOM+m+EFFECT_COUNT_CODE_DUEL)
 	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
 	e2:SetRange(LOCATION_HAND)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)

expansions/script/c67200278.lua

@@ -47,12 +47,13 @@ function c67200278.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function c67200278.spop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then		
-	Duel.BreakEffect()
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c67200278.pfilter,tp,LOCATION_EXTRA,0,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
+	if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then	   
+		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+		local g=Duel.SelectMatchingCard(tp,c67200278.pfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+		if g:GetCount()>0 then
+			Duel.SendtoHand(g,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,g)
+		end
 	end
 end
\ No newline at end of file