Update 1030

changed 131 cards

expansions/script/c30000027.lua

 --终焉邪魂 暗尸
 function c30000027.initial_effect(c)
 	--link summon
+	aux.AddLinkProcedure(c,c30000027.matfilter,1,1)
 	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0x920),1,1)
-	--link summon
+	--atkup
 	 local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(30000027,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
@@ -27,7 +27,9 @@ function c30000027.initial_effect(c)
 	e7:SetOperation(c30000027.activate)
 	c:RegisterEffect(e7)
 end
-
+function c30000027.matfilter(c)
+	return c:IsLinkSetCard(0x920) and c:IsLinkAbove(2)
+end
 function c30000027.con0(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
 end

expansions/script/c65010019.lua

+--星光歌剧 神乐光·花嫁
+function c65010019.initial_effect(c)
+	 --xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x9da0),6,2)
+	c:EnableReviveLimit()
+	--to grave
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCondition(c65010019.tgcon)
+	e1:SetTarget(c65010019.tgtg)
+	e1:SetOperation(c65010019.tgop)
+	c:RegisterEffect(e1)
+	--Activate
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCost(c65010019.cost)
+	e2:SetTarget(c65010019.target)
+	e2:SetOperation(c65010019.activate)
+	c:RegisterEffect(e2)
+	--recover
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCategory(CATEGORY_RECOVER)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e3:SetCode(EVENT_REMOVE)
+	e3:SetTarget(c65010019.rectg)
+	e3:SetOperation(c65010019.recop)
+	c:RegisterEffect(e3)
+end
+function c65010019.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(500)
+	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,500)
+end
+function c65010019.recop(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Recover(p,d,REASON_EFFECT)
+end
+function c65010019.tgcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
+end
+function c65010019.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)>0 end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,0,LOCATION_MZONE)
+end
+function c65010019.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(nil,1-tp,LOCATION_MZONE,0,nil)
+	if g:GetCount()>0 then
+		Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
+		local sg=g:Select(1-tp,1,1,nil)
+		Duel.HintSelection(sg)
+		Duel.SendtoGrave(sg,REASON_RULE)
+	end
+end
+
+function c65010019.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c65010019.filter(c,e,tp)
+	return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x9da0)
+end
+function c65010019.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c65010019.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c65010019.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c65010019.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c65010126.filter2(c)
+	return (c:IsSummonable(true,nil,1) or c:IsMSetable(true,nil,1)) and c:IsSetCard(0x9da0)
+end
+function c65010019.activate(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		if Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 and Duel.IsExistingMatchingCard(c65010126.filter,tp,LOCATION_HAND,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(65010126,0)) then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
+			local g=Duel.SelectMatchingCard(tp,c65010126.filter,tp,LOCATION_HAND,0,1,1,nil)
+			local tc=g:GetFirst()
+			if tc then
+				local s1=tc:IsSummonable(true,nil,1)
+				local s2=tc:IsMSetable(true,nil,1)
+				if (s1 and s2 and Duel.SelectPosition(tp,tc,POS_FACEUP_ATTACK+POS_FACEDOWN_DEFENSE)==POS_FACEUP_ATTACK) or not s2 then
+					Duel.Summon(tp,tc,true,nil,1)
+				else
+					Duel.MSet(tp,tc,true,nil,1)
+				end
+			end
+		end
+	end
+end
\ No newline at end of file

expansions/script/c65010020.lua

+--『Lost One的号哭』美竹兰
+function c65010020.initial_effect(c)
+	--destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_HANDES+CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,65010020)
+	e1:SetTarget(c65010020.destg)
+	e1:SetOperation(c65010020.desop)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetRange(LOCATION_HAND)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetCountLimit(1,65010021)
+	e3:SetTarget(c65010020.target2)
+	e3:SetOperation(c65010020.activate2)
+	c:RegisterEffect(e3)
+	local e2=e3:Clone()
+	e2:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+end
+function c65010020.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil,REASON_EFFECT)
+		and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,1-tp,LOCATION_ONFIELD)
+end
+function c65010020.desop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_EFFECT+REASON_DISCARD,nil,REASON_EFFECT)~=0 then
+		local sig=0
+		local g=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,1,nil)
+		if g:GetCount()>0 then
+			Duel.HintSelection(g)
+			local num=Duel.Destroy(g,REASON_EFFECT)
+			if num>0 then
+				local dg=Duel.GetOperatedGroup()
+				if dg:FilterCount(Card.IsLocation,nil,LOCATION_GRAVE)==0 then
+					sig=1
+				end
+			else
+				sig=1
+			end
+		else
+			sig=1
+		end
+		if sig==1 then
+			local tdg=Duel.SelectMatchingCard(1-tp,Card.IsAbleToDeck,1-tp,LOCATION_ONFIELD,0,1,1,nil)
+			if tdg:GetCount()>0 then
+				Duel.HintSelection(tdg)
+				Duel.SendtoDeck(tdg,nil,2,REASON_RULE)
+			end
+		end
+	end
+end
+
+function c65010020.filter2(c)
+	return c:IsLocation(LOCATION_MZONE) and c:IsFaceup() and c:GetAttack()>=2000 and c:IsAbleToGrave() 
+end
+function c65010020.filter3(c,tp)
+	return Duel.GetMZoneCount(tp,c,tp)>0
+end
+function c65010020.filter4(c,e)
+	return c:IsLocation(LOCATION_MZONE) and c:IsFaceup() and c:GetAttack()>=2000 and c:IsAbleToGrave() and c:IsRelateToEffect(e) 
+end
+function c65010020.target2(e,tp,eg,ep,ev,re,r,rp,chk)
+	local sg=eg:Filter(c65010020.filter2,nil)
+	if chk==0 then return sg:GetCount()>0 and sg:IsExists(c65010020.filter3,1,nil,tp) and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetTargetCard(eg)
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,sg,sg:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c65010020.activate2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=eg:Filter(c65010020.filter4,nil,e)
+	if g:GetCount()>0 then
+		if Duel.SendtoGrave(g,REASON_EFFECT)~=0 and Duel.GetMZoneCount(tp)>0 and c:IsRelateToEffect(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) then
+			Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+		end
+	end
+end
\ No newline at end of file

expansions/script/c65010022.lua

+--水晶之歌 凑友希那
+function c65010022.initial_effect(c)
+	 --synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	c:EnableReviveLimit()
+	--disable
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e2:SetTarget(c65010022.disable)
+	e2:SetCode(EFFECT_DISABLE)
+	c:RegisterEffect(e2)
+end
+function c65010022.disable(e,c)
+	return (c:IsType(TYPE_EFFECT) or bit.band(c:GetOriginalType(),TYPE_EFFECT)==TYPE_EFFECT) and c~=e:GetHandler()
+end
\ No newline at end of file

expansions/script/c65010100.lua

@@ -27,6 +27,7 @@ function cm.xyzop(e,tp)
 		if #og>0 then
 			Duel.SendtoGrave(og,REASON_RULE)
 		end
+		tc:CancelToGrave()
 		Duel.Overlay(c,Group.FromCards(tc))
 	end
 end

expansions/script/c9910014.lua

@@ -2,7 +2,7 @@
 function c9910014.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
-	aux.AddFusionProcFunRep(c,c9910014.ffilter,2,false)
+	aux.AddFusionProcFunRep(c,c9910014.ffilter,2,true)
 	aux.AddContactFusionProcedure(c,Card.IsAbleToRemoveAsCost,LOCATION_MZONE,0,Duel.Remove,POS_FACEUP,REASON_COST+REASON_FUSION+REASON_MATERIAL):SetValue(1)
 	--spsummon condition
 	local e1=Effect.CreateEffect(c)
@@ -47,8 +47,7 @@ function c9910014.ffilter(c)
 		and c:GetSummonLocation()==LOCATION_EXTRA
 end
 function c9910014.splimit(e,se,sp,st)
-	return not e:GetHandler():IsLocation(LOCATION_EXTRA)
-		or st&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
+	return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION 
 end
 function c9910014.mfilter(c)
 	return not c:IsType(TYPE_PENDULUM)
@@ -78,15 +77,14 @@ function c9910014.opdisable(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
 	local g1=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_HAND,0,nil)
 	local g2=Duel.GetMatchingGroup(Card.IsAbleToRemove,1-tp,LOCATION_HAND,0,nil)
-	if not c:IsFaceup() or not c:IsRelateToEffect(e) or g1:GetCount()==0 or g2:GetCount()==0
-		or Duel.GetCurrentChain()~=ev+1 or c:IsStatus(STATUS_BATTLE_DESTROYED) then return
-	end
-	Duel.NegateActivation(ev)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
 	local sg1=g1:Select(tp,1,1,nil)
 	Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
 	local sg2=g2:Select(1-tp,1,1,nil)
 	sg1:Merge(sg2)
 	Duel.HintSelection(sg1)
-	Duel.Remove(sg1,POS_FACEUP,REASON_EFFECT)
+	if Duel.Remove(sg1,POS_FACEUP,REASON_EFFECT)~=2 then return end
+	if not c:IsFaceup() or not c:IsRelateToEffect(e)
+		or Duel.GetCurrentChain()~=ev+1 or c:IsStatus(STATUS_BATTLE_DESTROYED) then return end
+	Duel.NegateActivation(ev)
 end

expansions/script/c9910061.lua

+--布琉艾特·妮科莱特·普朗凯特
+function c9910061.initial_effect(c)
+	--double
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9910061,0))
+	e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetRange(LOCATION_MZONE+LOCATION_HAND)
+	e1:SetCountLimit(1,9910061)
+	e1:SetCondition(c9910061.condition)
+	e1:SetCost(c9910061.cost)
+	e1:SetTarget(c9910061.target)
+	e1:SetOperation(c9910061.operation)
+	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(c9910061.thregop)
+	c:RegisterEffect(e2)
+end
+function c9910061.condition(e,tp,eg,ep,ev,re,r,rp)
+	local rec=re:GetHandler()
+	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)
+	return (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
+		and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_MZONE and rec:IsSummonType(SUMMON_TYPE_SPECIAL)
+		and ((rec:IsOnField() and rec:GetControler()~=tp) or (not rec:IsOnField() and rec:GetPreviousControler()~=tp))
+end
+function c9910061.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+end
+function c9910061.rmfilter(c)
+	return (c:IsCode(9910052) or c:IsCode(9910063)) and c:IsAbleToRemove()
+end
+function c9910061.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910061.rmfilter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_GRAVE+LOCATION_DECK)
+end
+function c9910061.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9910061.rmfilter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()<=0 or Duel.Remove(g,POS_FACEUP,REASON_EFFECT)<=0 then return end
+	local c=e:GetHandler()
+	local ph=Duel.GetCurrentPhase()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCondition(c9910061.drcon1)
+	e1:SetOperation(c9910061.drop1)
+	e1:SetReset(RESET_PHASE+ph)
+	Duel.RegisterEffect(e1,tp)
+	--sp_summon effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetCondition(c9910061.regcon)
+	e2:SetOperation(c9910061.regop)
+	e2:SetReset(RESET_PHASE+ph)
+	Duel.RegisterEffect(e2,tp)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e3:SetCode(EVENT_CHAIN_SOLVED)
+	e3:SetCondition(c9910061.drcon2)
+	e3:SetOperation(c9910061.drop2)
+	e3:SetReset(RESET_PHASE+ph)
+	Duel.RegisterEffect(e3,tp)
+end
+function c9910061.filter(c,sp)
+	return c:GetSummonPlayer()==sp
+end
+function c9910061.drcon1(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c9910061.filter,1,nil,1-tp)
+		and (not re:IsHasType(EFFECT_TYPE_ACTIONS) or re:IsHasType(EFFECT_TYPE_CONTINUOUS))
+end
+function c9910061.drop1(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Draw(tp,1,REASON_EFFECT)
+end
+function c9910061.regcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c9910061.filter,1,nil,1-tp)
+		and re:IsHasType(EFFECT_TYPE_ACTIONS) and not re:IsHasType(EFFECT_TYPE_CONTINUOUS)
+end
+function c9910061.regop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,9910061,RESET_CHAIN,0,1)
+end
+function c9910061.drcon2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,9910061)>0
+end
+function c9910061.drop2(e,tp,eg,ep,ev,re,r,rp)
+	local n=Duel.GetFlagEffect(tp,9910061)
+	Duel.ResetFlagEffect(tp,9910061)
+	Duel.Draw(tp,n,REASON_EFFECT)
+end
+function c9910061.thregop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9910061,1))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
+	e1:SetRange(LOCATION_REMOVED)
+	e1:SetCountLimit(1,9910062)
+	e1:SetCost(c9910061.thcost)
+	e1:SetTarget(c9910061.thtg)
+	e1:SetOperation(c9910061.thop)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	c:RegisterEffect(e1)
+end
+function c9910061.cfilter(c)
+	return c:IsRace(RACE_FAIRY) and c:IsAbleToDeckAsCost()
+end
+function c9910061.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910061.cfilter,tp,LOCATION_HAND,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c9910061.cfilter,tp,LOCATION_HAND,0,1,1,nil)
+	Duel.ConfirmCards(1-tp,g)
+	Duel.SendtoDeck(g,nil,2,REASON_COST)
+end
+function c9910061.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToHand() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
+end
+function c9910061.thop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e) then
+		Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
+	end
+end

expansions/script/c9910063.lua

+--梅丽尔·琳琪
+function c9910063.initial_effect(c)
+	--double
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9910063,0))
+	e1:SetCategory(CATEGORY_REMOVE+CATEGORY_HANDES)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_CUSTOM+9910063)
+	e1:SetRange(LOCATION_MZONE+LOCATION_HAND)
+	e1:SetCountLimit(1,9910063)
+	e1:SetCondition(c9910063.condition)
+	e1:SetCost(c9910063.cost)
+	e1:SetTarget(c9910063.target)
+	e1:SetOperation(c9910063.operation)
+	c:RegisterEffect(e1)
+	if not c9910063.global_check then
+		c9910063.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_TO_HAND)
+		ge1:SetCondition(c9910063.regcon)
+		ge1:SetOperation(c9910063.regop)
+		Duel.RegisterEffect(ge1,0)
+	end
+	--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(c9910063.thregop)
+	c:RegisterEffect(e2)
+end
+function c9910063.checkfilter(c,tp)
+	return c:IsControler(tp) and c:IsPreviousLocation(LOCATION_DECK)
+end
+function c9910063.regcon(e,tp,eg,ep,ev,re,r,rp)
+	if not (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2) then return false end
+	local v=0
+	if eg:IsExists(c9910063.checkfilter,1,nil,0) then v=v+1 end
+	if eg:IsExists(c9910063.checkfilter,1,nil,1) then v=v+2 end
+	if v==0 then return false end
+	e:SetLabel(({0,1,PLAYER_ALL})[v])
+	return true
+end
+function c9910063.regop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RaiseEvent(eg,EVENT_CUSTOM+9910063,re,r,rp,ep,e:GetLabel())
+end
+function c9910063.condition(e,tp,eg,ep,ev,re,r,rp)
+	return ev==1-tp or ev==PLAYER_ALL
+end
+function c9910063.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+end
+function c9910063.rmfilter(c)
+	return (c:IsCode(9910052) or c:IsCode(9910061)) and c:IsAbleToRemove()
+end
+function c9910063.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910063.rmfilter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_GRAVE+LOCATION_DECK)
+end
+function c9910063.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9910063.rmfilter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()<=0 or Duel.Remove(g,POS_FACEUP,REASON_EFFECT)<=0 then return end
+	local c=e:GetHandler()
+	local ph=Duel.GetCurrentPhase()
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_TO_HAND)
+	e1:SetCondition(c9910063.dccon1)
+	e1:SetOperation(c9910063.dcop1)
+	e1:SetReset(RESET_PHASE+ph)
+	Duel.RegisterEffect(e1,tp)
+	--sp_summon effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e2:SetCode(EVENT_TO_HAND)
+	e2:SetCondition(c9910063.dcregcon)
+	e2:SetOperation(c9910063.dcregop)
+	e2:SetReset(RESET_PHASE+ph)
+	Duel.RegisterEffect(e2,tp)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e3:SetCode(EVENT_CHAIN_SOLVED)
+	e3:SetCondition(c9910063.dccon2)
+	e3:SetOperation(c9910063.dcop2)
+	e3:SetReset(RESET_PHASE+ph)
+	Duel.RegisterEffect(e3,tp)
+end
+function c9910063.filter(c,tp)
+	return c:IsControler(tp) and c:IsPreviousLocation(LOCATION_DECK)
+end
+function c9910063.dccon1(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c9910063.filter,1,nil,1-tp)
+		and rp==1-tp and (not re:IsHasType(EFFECT_TYPE_ACTIONS) or re:IsHasType(EFFECT_TYPE_CONTINUOUS))
+end
+function c9910063.dcop1(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
+	if g:GetCount()>0 then
+		local sg=g:RandomSelect(1-tp,1)
+		Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)
+	end
+end
+function c9910063.dcregcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c9910063.filter,1,nil,1-tp)
+		and rp==1-tp and re:IsHasType(EFFECT_TYPE_ACTIONS) and not re:IsHasType(EFFECT_TYPE_CONTINUOUS)
+end
+function c9910063.dcregop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.RegisterFlagEffect(tp,9910064,RESET_CHAIN,0,1)
+end
+function c9910063.dccon2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,9910064)>0
+end
+function c9910063.dcop2(e,tp,eg,ep,ev,re,r,rp)
+	local n=Duel.GetFlagEffect(tp,9910064)
+	Duel.ResetFlagEffect(tp,9910064)
+	local g=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
+	if g:GetCount()>=n then
+		local sg=g:RandomSelect(1-tp,n)
+		Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)
+	else
+		Duel.SendtoGrave(g,REASON_EFFECT+REASON_DISCARD)
+	end
+end
+function c9910063.thregop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9910063,1))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
+	e1:SetRange(LOCATION_REMOVED)
+	e1:SetCountLimit(1,9910064)
+	e1:SetCost(c9910063.thcost)
+	e1:SetTarget(c9910063.thtg)
+	e1:SetOperation(c9910063.thop)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	c:RegisterEffect(e1)
+end
+function c9910063.cfilter(c)
+	return c:IsRace(RACE_FAIRY) and c:IsAbleToDeckAsCost()
+end
+function c9910063.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910063.cfilter,tp,LOCATION_HAND,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c9910063.cfilter,tp,LOCATION_HAND,0,1,1,nil)
+	Duel.ConfirmCards(1-tp,g)
+	Duel.SendtoDeck(g,nil,2,REASON_COST)
+end
+function c9910063.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToHand() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
+end
+function c9910063.thop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e) then
+		Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
+	end
+end

expansions/script/c9910126.lua

 --战车道整备仓库
 function c9910126.initial_effect(c)
 	--link summon
+	c:SetSPSummonOnce(9910126)
 	c:EnableReviveLimit()
 	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_XYZ),1,1)
 	--special summon
@@ -10,7 +11,7 @@ function c9910126.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1,9910126)
+	e1:SetCountLimit(1)
 	e1:SetCode(EVENT_PHASE+PHASE_END)
 	e1:SetTarget(c9910126.sptg)
 	e1:SetOperation(c9910126.spop)

expansions/script/c9910134.lua

@@ -47,13 +47,9 @@ function c9910134.operation(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(nil,1-tp,LOCATION_MZONE+LOCATION_HAND,0,nil)
 	if c:GetOverlayGroup():IsExists(Card.IsSetCard,1,nil,0x952) and g:GetCount()>0 then
 		Duel.BreakEffect()
+		Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
 		local sg=g:Select(1-tp,1,1,nil)
 		Duel.HintSelection(sg)
-		local sc=sg:GetFirst()
-		local osg=sc:GetOverlayGroup()
-		if osg:GetCount()>0 then
-			Duel.SendtoGrave(osg,REASON_RULE)
-		end
-		Duel.Overlay(c,Group.FromCards(sc))
+		Duel.SendtoGrave(sg,REASON_RULE)
 	end
 end

expansions/script/c9910141.lua

+--战车道装甲·IS-2
+require("expansions/script/c9910106")
+function c9910141.initial_effect(c)
+	--xyz summon
+	Zcd.AddXyzProcedure(c,nil,5,3,c9910141.xyzfilter,aux.Stringid(9910141,0),99)
+	c:EnableReviveLimit()
+	--material
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9910141,1))
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetCost(c9910141.xmcost)
+	e1:SetTarget(c9910141.xmtarget)
+	e1:SetOperation(c9910141.xmoperation)
+	c:RegisterEffect(e1)
+	--immune
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9910141,2))
+	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCost(c9910141.imcost1)
+	e2:SetTarget(c9910141.imtarget1)
+	e2:SetOperation(c9910141.imop1)
+	c:RegisterEffect(e2)
+	local e3=e2:Clone()
+	e3:SetDescription(aux.Stringid(9910141,3))
+	e3:SetCost(c9910141.imcost2)
+	e3:SetTarget(c9910141.imtarget2)
+	e3:SetOperation(c9910141.imop2)
+	c:RegisterEffect(e3)
+end
+function c9910141.xyzfilter(c)
+	return (c:IsType(TYPE_MONSTER) or (c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSetCard(0x952) and c:IsFaceup()))
+end
+function c9910141.xmcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
+end
+function c9910141.xmfilter(c,tp)
+	return c:IsFaceup() and not c:IsType(TYPE_TOKEN) and (c:IsControler(tp) or c:IsAbleToChangeControler())
+end
+function c9910141.xmtarget(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chkc then return chkc:IsOnField() and c9910141.xmfilter(chkc) end
+	if chk==0 then return c:GetFlagEffect(9910141)<=1
+		and Duel.IsExistingTarget(c9910141.xmfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	Duel.SelectTarget(tp,c9910141.xmfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,c,tp)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	c:RegisterFlagEffect(9910141,RESET_CHAIN,0,1)
+end
+function c9910141.xmoperation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
+		local og=tc:GetOverlayGroup()
+		if og:GetCount()>0 then
+			Duel.SendtoGrave(og,REASON_RULE)
+		end
+		tc:CancelToGrave()
+		Duel.Overlay(c,Group.FromCards(tc))
+	end
+end
+function c9910141.imcost1(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c9910141.imcost2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,2,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,2,2,REASON_COST)
+end
+function c9910141.imtarget1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:GetFlagEffect(9910141)<=1 end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	c:RegisterFlagEffect(9910141,RESET_CHAIN,0,1)
+end
+function c9910141.imtarget2(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:GetFlagEffect(9910141)<=1
+		and Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>0 end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	c:RegisterFlagEffect(9910141,RESET_CHAIN,0,1)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,1-tp,LOCATION_ONFIELD)
+end
+function c9910141.imop1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsFaceup() then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_IMMUNE_EFFECT)
+		e1:SetValue(c9910141.efilter)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_CHAIN)
+		c:RegisterEffect(e1)
+	end
+end
+function c9910141.imop2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsFaceup() then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_IMMUNE_EFFECT)
+		e1:SetValue(c9910141.efilter)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_CHAIN)
+		c:RegisterEffect(e1)
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+		local g=Duel.SelectMatchingCard(tp,nil,tp,0,LOCATION_ONFIELD,1,1,nil)
+		if g:GetCount()>0 then
+			Duel.BreakEffect()
+			Duel.HintSelection(g)
+			Duel.Destroy(g,REASON_EFFECT)
+		end
+	end
+end
+function c9910141.efilter(e,re)
+	return re:GetOwner()~=e:GetOwner()
+end

expansions/script/c9910142.lua

+--战车道计策·禁锢
+function c9910142.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_EQUIP)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetCost(c9910142.cost)
+	e1:SetTarget(c9910142.target)
+	e1:SetOperation(c9910142.operation)
+	c:RegisterEffect(e1)
+end
+function c9910142.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local c=e:GetHandler()
+	local cid=Duel.GetChainInfo(0,CHAININFO_CHAIN_ID)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_REMAIN_FIELD)
+	e1:SetProperty(EFFECT_FLAG_OATH)
+	e1:SetReset(RESET_CHAIN)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EVENT_CHAIN_DISABLED)
+	e2:SetOperation(c9910142.tgop)
+	e2:SetLabel(cid)
+	e2:SetReset(RESET_CHAIN)
+	Duel.RegisterEffect(e2,tp)
+end
+function c9910142.tgop(e,tp,eg,ep,ev,re,r,rp)
+	local cid=Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID)
+	if cid~=e:GetLabel() then return end
+	if e:GetOwner():IsRelateToChain(ev) then
+		e:GetOwner():CancelToGrave(false)
+	end
+end
+function c9910142.filter(c)
+	return c:IsFaceup() and c:IsType(TYPE_EFFECT)
+end
+function c9910142.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c9910142.filter(chkc) end
+	if chk==0 then return e:IsHasType(EFFECT_TYPE_ACTIVATE)
+		and Duel.IsExistingTarget(c9910142.filter,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+	Duel.SelectTarget(tp,c9910142.filter,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
+end
+function c9910142.eqlimit(e,c)
+	return c:GetControler()~=e:GetHandlerPlayer() and c:IsType(TYPE_EFFECT)
+end
+function c9910142.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsLocation(LOCATION_SZONE) then return end
+	if not c:IsRelateToEffect(e) or c:IsStatus(STATUS_LEAVE_CONFIRMED) then return end
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() and tc:IsType(TYPE_MONSTER) then
+		if not Duel.Equip(tp,c,tc) then return end
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_EQUIP)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(-1500)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		c:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		c:RegisterEffect(e2)
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_EQUIP)
+		e3:SetCode(EFFECT_DISABLE)
+		e3:SetReset(RESET_EVENT+RESETS_STANDARD)
+		c:RegisterEffect(e3)
+		local e4=Effect.CreateEffect(c)
+		e4:SetType(EFFECT_TYPE_SINGLE)
+		e4:SetCode(EFFECT_EQUIP_LIMIT)
+		e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e4:SetValue(c9910142.eqlimit)
+		e4:SetReset(RESET_EVENT+RESETS_STANDARD)
+		c:RegisterEffect(e4)
+		--disable spsummon
+		local e11=Effect.CreateEffect(c)
+		e11:SetDescription(aux.Stringid(9910142,0))
+		e11:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
+		e11:SetType(EFFECT_TYPE_QUICK_O)
+		e11:SetCode(EVENT_SPSUMMON)
+		e11:SetRange(LOCATION_SZONE)
+		e11:SetCountLimit(1)
+		e11:SetCondition(c9910142.discon)
+		e11:SetCost(c9910142.discost)
+		e11:SetTarget(c9910142.distg)
+		e11:SetOperation(c9910142.disop)
+		e11:SetReset(RESET_EVENT+RESETS_STANDARD)
+		c:RegisterEffect(e11)
+		--cannot be material
+		local e5=Effect.CreateEffect(c)
+		e5:SetType(EFFECT_TYPE_SINGLE)
+		e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e5:SetCode(EFFECT_UNRELEASABLE_SUM)
+		e5:SetRange(LOCATION_MZONE)
+		e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		e5:SetValue(1)
+		tc:RegisterEffect(e5)
+		local e6=e5:Clone()
+		e6:SetCode(EFFECT_UNRELEASABLE_NONSUM)
+		tc:RegisterEffect(e6)
+		local e7=e5:Clone()
+		e7:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+		e7:SetValue(c9910142.fuslimit)
+		tc:RegisterEffect(e7)
+		local e8=e5:Clone()
+		e8:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
+		tc:RegisterEffect(e8)
+		local e9=e5:Clone()
+		e9:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
+		tc:RegisterEffect(e9)
+		local e10=e5:Clone()
+		e10:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
+		tc:RegisterEffect(e10)
+	else
+		c:CancelToGrave(false)
+	end
+end
+function c9910142.fuslimit(e,c,sumtype)
+	return sumtype==SUMMON_TYPE_FUSION
+end
+function c9910142.discon(e,tp,eg,ep,ev,re,r,rp)
+	return tp~=ep and Duel.GetCurrentChain()==0
+end
+function c9910142.rmfilter(c)
+	return c:IsSetCard(0x952) and c:IsType(TYPE_XYZ) and c:IsAbleToRemoveAsCost()
+		and (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup())
+end
+function c9910142.discost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910142.rmfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9910142.rmfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+end
+function c9910142.distg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE_SUMMON,eg,eg:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,eg:GetCount(),0,0)
+end
+function c9910142.disop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.NegateSummon(eg)
+	Duel.Destroy(eg,REASON_EFFECT)
+	e:GetHandler():RegisterFlagEffect(74892653,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+end

expansions/script/c9910143.lua

+--战车道少女·蔷薇果
+function c9910143.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK+CATEGORY_DAMAGE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,9910143)
+	e1:SetCost(c9910143.spcost)
+	e1:SetTarget(c9910143.sptg)
+	e1:SetOperation(c9910143.spop)
+	c:RegisterEffect(e1)
+	--attack twice
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9910143,0))
+	e2:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCountLimit(1)
+	e2:SetLabelObject(c)
+	e2:SetCondition(c9910143.atcon)
+	e2:SetCost(c9910143.atcost)
+	e2:SetTarget(c9910143.attg)
+	e2:SetOperation(c9910143.atop)
+	c:RegisterEffect(e2)
+end
+function c9910143.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return not e:GetHandler():IsPublic() end
+end
+function c9910143.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+		and c:IsAbleToDeck() end
+end
+function c9910143.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end
+	Duel.ConfirmDecktop(tp,1)
+	local g=Duel.GetDecktopGroup(tp,1)
+	local tc=g:GetFirst()
+	if tc:IsSetCard(0x952) and tc:IsType(TYPE_MONSTER) then
+		if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0
+			and not tc:IsForbidden() then
+			Duel.DisableShuffleCheck()
+			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			local e1=Effect.CreateEffect(c)
+			e1:SetCode(EFFECT_CHANGE_TYPE)
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
+			e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+			tc:RegisterEffect(e1)
+		end
+	else
+		Duel.Damage(1-tp,750,REASON_EFFECT)
+		if not c:IsRelateToEffect(e) then return end
+		Duel.BreakEffect()
+		Duel.SendtoDeck(c,nil,0,REASON_EFFECT)
+	end
+end
+function c9910143.atcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsAbleToEnterBP()
+end
+function c9910143.atcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	local c=e:GetLabelObject()
+	local g=e:GetHandler():GetOverlayGroup()
+	if not g:IsContains(c) then return false end
+	g:RemoveCard(c)
+	if g:GetCount()==0 or (g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(9910143,1))) then
+		Duel.SendtoGrave(c,REASON_COST)
+	elseif Duel.SelectYesNo(tp,aux.Stringid(9910143,2)) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVEXYZ)
+		local tg=g:Select(tp,1,1,nil)
+		if tg:GetCount()>0 then
+			Duel.SendtoGrave(tg,REASON_COST)
+		end
+	else e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) end
+end
+function c9910143.atfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:GetEffectCount(EFFECT_EXTRA_ATTACK)==0
+end
+function c9910143.attg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local c=e:GetHandler()
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c9910143.atfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9910143.atfilter,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c9910143.atfilter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c9910143.atop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_EXTRA_ATTACK)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetValue(1)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+	end
+end

expansions/script/c9950086.lua

@@ -111,7 +111,7 @@ function c9950086.spop(e,tp,eg,ep,ev,re,r,rp)
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 then return end
 	if not Duel.IsPlayerCanSpecialSummonMonster(tp,9950075,0x3ba5,0x4011,200,200,1,RACE_WARRIOR,ATTRIBUTE_FIRE) then return end
 	for i=1,2 do
-		local token=Duel.CreateToken(tp,9950086+i)
+		local token=Duel.CreateToken(tp,9950075)
 		Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
 		local e1=Effect.CreateEffect(e:GetHandler())
 		e1:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c9950125.lua

@@ -65,19 +65,14 @@ function c9950125.spfilter(c,e,tp)
 	return c:IsCode(9950126) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function c9950125.atktg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
 	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
 end
 function c9950125.atkop2(e,tp,eg,ep,ev,re,r,rp)
-	 local dg=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
-	if dg:GetCount()>0 and Duel.Destroy(dg,REASON_EFFECT)>0 then
 		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 		local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c9950125.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
 		if g:GetCount()>0 then
 			Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 		end
-	end
 end

expansions/script/c9950129.lua

@@ -42,19 +42,19 @@ end
 function c9950129.atktg(e,c)
 	return c:IsSetCard(0x9ba5)
 end
-function c9950129.filter(c,e,sp)
+function c9950129.filter2(c,e,sp)
 	return c:IsSetCard(0x9ba5) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,sp,false,false)
 end
 function c9950129.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c9950129.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+		and Duel.IsExistingMatchingCard(c9950129.filter2,tp,LOCATION_HAND,0,1,nil,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
 end
 function c9950129.operation(e,tp,eg,ep,ev,re,r,rp)
 	if not e:GetHandler():IsRelateToEffect(e) then return end
 	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,c9950129.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+	local g=Duel.SelectMatchingCard(tp,c9950129.filter2,tp,LOCATION_HAND,0,1,1,nil,e,tp)
 	if g:GetCount()>0 then
 		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
 	end

expansions/script/c9950130.lua

@@ -51,12 +51,14 @@ function c9950130.ottg(e,c)
 	return c:IsSetCard(0x9ba5)
 end
 function c9950130.otop(e,tp,eg,ep,ev,re,r,rp)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_EXTRA_RELEASE_SUM)
-	e1:SetTargetRange(0,LOCATION_MZONE)
-	e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
-	Duel.RegisterEffect(e1,tp)
+	  local e1=Effect.CreateEffect(e:GetHandler())
+	  e1:SetType(EFFECT_TYPE_SINGLE)
+	  e1:SetCode(EFFECT_EXTRA_RELEASE)
+	  e1:SetTargetRange(0,LOCATION_MZONE)
+	  e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	  e1:SetCountLimit(1)
+	  e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	  Duel.RegisterEffect(e1,tp)
 end
 function c9950130.thfilter(c)
 	return c:IsSetCard(0xba5) and c:IsType(TYPE_EQUIP) and c:IsAbleToHand()

expansions/script/c9950147.lua

@@ -55,7 +55,7 @@ function c9950147.remop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:IsRelateToEffect(e) then
 		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-		if atk>0 and tc:IsType(TYPE_MONSTER) then
+		if tc:atk>0 and tc:IsType(TYPE_MONSTER) then
 		local atk=Duel.GetAttacker():GetAttack()
 		local e1=Effect.CreateEffect(c)
 		e1:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c9950154.lua

@@ -30,7 +30,6 @@ function c9950154.initial_effect(c)
 	e3:SetTarget(c9950154.sptg2)
 	e3:SetOperation(c9950154.spop2)
 	c:RegisterEffect(e3)
-	Duel.AddCustomActivityCounter(9950154,ACTIVITY_SPSUMMON,c9950154.counterfilter)
 	--spsummon bgm
 	local e8=Effect.CreateEffect(c)
 	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
@@ -48,12 +47,12 @@ function c9950154.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsDiscardable() end
 	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
 end
-function c9950154.filter(c,tp)
+function c9950154.filter2(c,tp)
 	return c:IsFaceup() and c:GetSummonPlayer()~=tp and c:IsCanTurnSet()
 end
 function c9950154.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return eg:IsExists(c9950154.filter,1,nil,tp) end
-	local g=eg:Filter(c9950154.filter,nil,tp)
+	if chk==0 then return eg:IsExists(c9950154.filter2,1,nil,tp) end
+	local g=eg:Filter(c9950154.filter2,nil,tp)
 	Duel.SetTargetCard(g)
 end
 function c9950154.target2(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -77,7 +76,6 @@ function c9950154.activate(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function c9950154.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetCustomActivityCount(9950154,tp,ACTIVITY_SPSUMMON)==0 end
 	local e1=Effect.CreateEffect(e:GetHandler())
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)

expansions/script/c9950160.lua

@@ -50,6 +50,7 @@ function c9950160.operation(e,tp,eg,ep,ev,re,r,rp)
 	e2:SetCode(EFFECT_CANNOT_DRAW)
 	e2:SetReset(RESET_PHASE+PHASE_END)
 	e2:SetTargetRange(0,1)
+	c:RegisterEffect(e2)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_CANNOT_TO_GRAVE)
@@ -62,7 +63,6 @@ function c9950160.operation(e,tp,eg,ep,ev,re,r,rp)
 	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
 	e2:SetTargetRange(0,1)
 	e2:SetReset(RESET_PHASE+PHASE_END)
-	c:RegisterEffect(e2)
 	Duel.RegisterEffect(e2,tp)
 end
 function c9950160.cfilter(c)

expansions/script/c9950162.lua

+--圆桌骑士·贝狄威尔「愚人节」
+function c9950162.initial_effect(c)
+	 --special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950162,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetCode(EVENT_BATTLE_DAMAGE)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCondition(c9950162.spcon)
+	e1:SetTarget(c9950162.sptg)
+	e1:SetOperation(c9950162.spop)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950162,1))
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_BE_MATERIAL)
+	e2:SetCountLimit(1,9950162)
+	e2:SetCondition(c9950162.thcon)
+	e2:SetTarget(c9950162.thtg)
+	e2:SetOperation(c9950162.thop)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950162.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950162.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950162,0))
+end
+function c9950162.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return ep==1-tp
+end
+function c9950162.spfilter(c,e,tp)
+	return not c:IsCode(9950162) and c:IsLevelBelow(4) and c:IsSetCard(0xcba5) 
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950162.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 
+		and Duel.IsExistingMatchingCard(c9950162.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c9950162.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950162.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function c9950162.thcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local rc=c:GetReasonCard()
+	return c:IsLocation(LOCATION_GRAVE) and r==REASON_LINK and rc:IsSetCard(0xba5) and rc:IsLinkAbove(2)
+end
+function c9950162.thfilter(c)
+	return c:IsType(TYPE_SPELL) and c:IsSetCard(0x3ba6) and c:IsAbleToHand()
+end
+function c9950162.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950162.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c9950162.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c9950162.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,tp,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
\ No newline at end of file

expansions/script/c9950163.lua

+--圆桌骑士·贝狄威尔
+function c9950163.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_SPSUMMON_PROC)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,9950163)
+	e1:SetCondition(c9950163.spcon)
+	c:RegisterEffect(e1)
+	--atk down
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950163,1))
+	e3:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
+	e3:SetHintTiming(TIMING_DAMAGE_STEP+TIMING_END_PHASE)
+	e3:SetCountLimit(1)
+	e3:SetCondition(c9950163.atkcon)
+	e3:SetTarget(c9950163.atktg)
+	e3:SetOperation(c9950163.atkop)
+	c:RegisterEffect(e3)
+   --lv
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950163,2))
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCost(c9950163.lvcost)
+	e2:SetTarget(c9950163.lvtg)
+	e2:SetOperation(c9950163.lvop)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950163.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950163.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950163,0))
+end
+function c9950163.filter(c)
+	return c:IsFaceup() and c:IsSetCard(0xcba5) and c:GetCode()~=9950163
+end
+function c9950163.spcon(e,c)
+	if c==nil then return true end
+	return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950163.filter,c:GetControler(),LOCATION_MZONE,0,1,nil)
+end
+function c9950163.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()~=PHASE_DAMAGE or not Duel.IsDamageCalculated()
+end
+function c9950163.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.SetChainLimit(c9950163.chlimit)
+end
+function c9950163.chlimit(e,ep,tp)
+	return tp==ep
+end
+function c9950163.atkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	local c=e:GetHandler()
+	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetValue(-500)
+		tc:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		tc:RegisterEffect(e2)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950163,3))
+end
+function c9950163.lvcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsReleasable() end
+	Duel.Release(e:GetHandler(),REASON_COST)
+end
+function c9950163.lvfilter(c)
+	return c:IsFaceup() and not c:IsLevel(8) and c:GetLevel()>0
+end
+function c9950163.lvtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950163.lvfilter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end
+end
+function c9950163.lvop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c9950163.lvfilter,tp,LOCATION_MZONE,0,nil)
+	local lc=g:GetFirst()
+	while lc do
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetCode(EFFECT_CHANGE_LEVEL)
+		e1:SetValue(8)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		lc:RegisterEffect(e1)
+		lc=g:GetNext()
+	end
+Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950163,3))
+end

expansions/script/c9950164.lua

+--圆桌骑士·贝狄威尔-灵基再临
+function c9950164.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),4,2)
+	c:EnableReviveLimit()
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950164,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_TOGRAVE+CATEGORY_DECKDES)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCost(c9950164.cost)
+	e1:SetTarget(c9950164.target)
+	e1:SetOperation(c9950164.operation)
+	c:RegisterEffect(e1)
+	--search
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(9950164,2))
+	e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e4:SetCode(EVENT_TO_GRAVE)
+	e4:SetCountLimit(1,9950164)
+	e4:SetTarget(c9950164.thtg)
+	e4:SetOperation(c9950164.thop)
+	c:RegisterEffect(e4)
+   --spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950164.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950164.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950164,0))
+end
+function c9950164.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c9950164.filter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0xcba5) and (c:IsAbleToHand() or c:IsAbleToGrave())
+end
+function c9950164.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950164.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+end
+function c9950164.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(9950164,1))
+	local g=Duel.SelectMatchingCard(tp,c9950164.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()<=0 then return end
+	local tc=g:GetFirst()
+	if tc:IsAbleToHand() and (not tc:IsAbleToGrave() or Duel.SelectOption(tp,1190,1191)==0) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,tc)
+	else
+		Duel.SendtoGrave(tc,REASON_EFFECT)
+	end
+  Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950164,2))
+end
+function c9950164.thfilter(c)
+	return c:IsSetCard(0x3ba6) and not c:IsCode(9950164) and c:IsAbleToHand()
+end
+function c9950164.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c9950164.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c9950164.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
\ No newline at end of file

expansions/script/c9950165.lua

+--失去的右臂
+function c9950165.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOGRAVE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c9950165.target)
+	e1:SetOperation(c9950165.activate)
+	c:RegisterEffect(e1)
+end
+function c9950165.tgfilter(c)
+	return c:IsSetCard(0xba5) and c:IsAbleToGrave()
+end
+function c9950165.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950165.tgfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_EXTRA)
+end
+function c9950165.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950165.tgfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c9950166.lua

+--圆桌骑士·玛修·基列莱特「愚人节」
+function c9950166.initial_effect(c)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetTarget(c9950166.sptg)
+	e1:SetOperation(c9950166.spop)
+	c:RegisterEffect(e1)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BE_BATTLE_TARGET)
+	e2:SetTarget(c9950166.target)
+	e2:SetOperation(c9950166.operation)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950166.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950166.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950166,0))
+end
+function c9950166.spfilter1(c,e,tp)
+	return not c:IsType(TYPE_TUNER) and c:IsSetCard(0xba5) and c:IsLevel(1) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950166.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950166.spfilter1,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
+end
+function c9950166.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950166.spfilter1,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function c9950166.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c9950166.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950166,1))
+end
\ No newline at end of file

expansions/script/c9950167.lua

+--凭依从者·玛修·基列莱特
+function c9950167.initial_effect(c)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetTarget(c9950167.sptg)
+	e1:SetOperation(c9950167.spop)
+	c:RegisterEffect(e1)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BE_BATTLE_TARGET)
+	e2:SetTarget(c9950167.target)
+	e2:SetOperation(c9950167.operation)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950167.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950167.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950167,0))
+end
+function c9950167.spfilter1(c,e,tp)
+	return not c:IsType(TYPE_TUNER) and c:IsSetCard(0xba5) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950167.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950167.spfilter1,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
+end
+function c9950167.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950167.spfilter1,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function c9950167.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c9950167.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950167,1))
+end

expansions/script/c9950168.lua

+--凭依从者·玛修·基列莱特-灵基再临
+function c9950168.initial_effect(c)
+	 --xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),4,2)
+	c:EnableReviveLimit()
+	--untargetable
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetTargetRange(0,LOCATION_MZONE)
+	e1:SetValue(c9950168.atlimit)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+	e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e2:SetTarget(c9950168.tglimit)
+	e2:SetValue(aux.tgoval)
+	c:RegisterEffect(e2)
+	--defense attack
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_DEFENSE_ATTACK)
+	e1:SetValue(1)
+	c:RegisterEffect(e1)
+	 --attack up
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetDescription(aux.Stringid(9950168,2))
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(TIMING_DAMAGE_STEP)
+	e1:SetCost(c9950168.cost)
+	e1:SetTarget(c9950168.target)
+	e1:SetOperation(c9950168.operation)
+	c:RegisterEffect(e1)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950168,3))
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BE_BATTLE_TARGET)
+	e2:SetTarget(c9950168.target)
+	e2:SetOperation(c9950168.operation)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950168.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950168.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950168,0))
+end
+function c9950168.atlimit(e,c)
+	return c:IsFaceup() and c:IsSetCard(0xba5) and c~=e:GetHandler()
+end
+function c9950168.tglimit(e,c)
+	return c:IsSetCard(0xba5) and c~=e:GetHandler()
+end
+function c9950168.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c9950168.filter(c)
+	return c:IsFaceup() and c:IsSetCard(0x3d) and c:IsDefenseBelow(5000)
+end
+function c9950168.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9950168.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9950168.filter,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c9950168.filter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c9950168.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and c9950168.filter(tc) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetCode(EFFECT_SET_BASE_DEFENSE)
+		e1:SetValue(5000)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950168,1))
+end
+function c9950168.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c9950168.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950168,1))
+end

expansions/script/c9950169.lua

+--凭依从者·玛修·基列莱特-盛夏
+function c9950169.initial_effect(c)
+	--link summon
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xba5),2,2)
+	--to hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950169,0))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,9950169)
+	e1:SetCondition(c9950169.thcon)
+	e1:SetTarget(c9950169.thtg)
+	e1:SetOperation(c9950169.thop)
+	c:RegisterEffect(e1)
+	--to grave
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950169,1))
+	e3:SetCategory(CATEGORY_TOGRAVE)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,99501690)
+	e3:SetTarget(c9950169.tgtg)
+	e3:SetOperation(c9950169.tgop)
+	c:RegisterEffect(e3)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BE_BATTLE_TARGET)
+	e2:SetTarget(c9950169.target)
+	e2:SetOperation(c9950169.operation)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950169.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950169.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950169,0))
+end
+function c9950169.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function c9950169.thfilter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function c9950169.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9950169.thfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9950169.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectTarget(tp,c9950169.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c9950169.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end
+function c9950169.tgfilter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGrave()
+end
+function c9950169.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950169.tgfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+end
+function c9950169.tgop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950169.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950169,1))
+end
+function c9950169.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c9950169.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950169,1))
+end
\ No newline at end of file

expansions/script/c9950170.lua

+--凭依从者·玛修·基列莱特2.0
+function c9950170.initial_effect(c)
+	 --extra summon
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e6:SetCode(EVENT_SUMMON_SUCCESS)
+	e6:SetOperation(c9950170.sumop)
+	c:RegisterEffect(e6)
+	local e7=e6:Clone()
+	e7:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e7)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BE_BATTLE_TARGET)
+	e2:SetTarget(c9950170.target)
+	e2:SetOperation(c9950170.operation)
+	c:RegisterEffect(e2)
+	--special summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950170,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetCountLimit(1,9950170)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCost(c9950170.spcost)
+	e2:SetTarget(c9950170.sptg)
+	e2:SetOperation(c9950170.spop)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950170.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950170.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950170,0))
+end
+function c9950170.sumop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetFlagEffect(tp,9950170)~=0 then return end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetDescription(aux.Stringid(9950170,2))
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
+	e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+	Duel.RegisterFlagEffect(tp,9950170,RESET_PHASE+PHASE_END,0,1)
+end
+function c9950170.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c9950170.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950170,1))
+end
+function c9950170.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	e:SetLabel(100)
+	return true
+end
+function c9950170.cfilter(c)
+	return c:IsSetCard(0xba5) and c:IsAbleToRemoveAsCost()
+end
+function c9950170.spfilter(c,e,tp,lv)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_FUSION) and c:IsLevelBelow(lv) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
+end
+function c9950170.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then
+		if e:GetLabel()~=100 then return false end
+		e:SetLabel(0)
+		local cg=Duel.GetMatchingGroup(c9950170.cfilter,tp,LOCATION_GRAVE,0,nil)
+		return c:IsAbleToRemoveAsCost()
+			and Duel.GetLocationCountFromEx(tp)>0
+			and Duel.IsExistingMatchingCard(c9950170.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,cg:GetCount())
+	end
+	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
+	local cg=Duel.GetMatchingGroup(c9950170.cfilter,tp,LOCATION_GRAVE,0,nil)
+	local tg=Duel.GetMatchingGroup(c9950170.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,cg:GetCount())
+	local lvt={}
+	local tc=tg:GetFirst()
+	while tc do
+		local tlv=0
+		tlv=tlv+tc:GetLevel()
+		lvt[tlv]=tlv
+		tc=tg:GetNext()
+	end
+	local pc=1
+	for i=1,12 do
+		if lvt[i] then lvt[i]=nil lvt[pc]=i pc=pc+1 end
+	end
+	lvt[pc]=nil
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(9950170,3))
+	local lv=Duel.AnnounceNumber(tp,table.unpack(lvt))
+	local rg1=Group.CreateGroup()
+	if lv>1 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+		local rg2=cg:Select(tp,lv-1,lv-1,c)
+		rg1:Merge(rg2)
+	end
+	rg1:AddCard(c)
+	Duel.Remove(rg1,POS_FACEUP,REASON_COST)
+	e:SetLabel(lv)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c9950170.sfilter(c,e,tp,lv)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_FUSION) and c:IsLevel(lv) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
+end
+function c9950170.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCountFromEx(tp)<=0 then return end
+	local lv=e:GetLabel()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950170.sfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv)
+	local tc=g:GetFirst()
+	Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
+end
\ No newline at end of file

expansions/script/c9950171.lua

+--凭依从者·玛修·基列莱特-謹賀新年
+function c9950171.initial_effect(c)
+	--link summon
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkSetCard,0xba5),2,2)
+	--to hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950171,0))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,9950171)
+	e1:SetCondition(c9950171.thcon)
+	e1:SetTarget(c9950171.thtg)
+	e1:SetOperation(c9950171.thop)
+	c:RegisterEffect(e1)
+	--to grave
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950171,1))
+	e3:SetCategory(CATEGORY_TOGRAVE)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,99501710)
+	e3:SetTarget(c9950171.tgtg)
+	e3:SetOperation(c9950171.tgop)
+	c:RegisterEffect(e3)
+	--draw
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_BE_BATTLE_TARGET)
+	e2:SetTarget(c9950171.target)
+	e2:SetOperation(c9950171.operation)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950171.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950171.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950171,0))
+end
+function c9950171.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function c9950171.thfilter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
+end
+function c9950171.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9950171.thfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9950171.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectTarget(tp,c9950171.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c9950171.thop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end
+function c9950171.tgfilter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
+end
+function c9950171.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950171.tgfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
+end
+function c9950171.tgop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950171.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950171,1))
+end
+function c9950171.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c9950171.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950171,1))
+end

expansions/script/c9950172.lua

+--凭依从者·玛修·基列莱特-蕾姆
+function c9950172.initial_effect(c)
+	  --xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),5,2,c9950172.ovfilter,aux.Stringid(9950172,2))
+	c:EnableReviveLimit()
+   --damage
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950172,0))
+	e2:SetCategory(CATEGORY_DAMAGE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetCode(EVENT_BATTLE_DESTROYING)
+	e2:SetCondition(aux.bdgcon)
+	e2:SetTarget(c9950172.damtg)
+	e2:SetOperation(c9950172.damop)
+	c:RegisterEffect(e2)
+	--atkup
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EFFECT_UPDATE_ATTACK)
+	e3:SetValue(c9950172.atkup)
+	c:RegisterEffect(e3)
+	--copy trap
+	local e5=Effect.CreateEffect(c)
+	e5:SetDescription(aux.Stringid(9950172,1))
+	e5:SetType(EFFECT_TYPE_QUICK_O)
+	e5:SetRange(LOCATION_MZONE)
+	e5:SetCode(EVENT_FREE_CHAIN)
+	e5:SetCountLimit(1,9950172)
+	e5:SetCost(c9950172.cost)
+	e5:SetTarget(c9950172.target)
+	e5:SetOperation(c9950172.operation)
+	c:RegisterEffect(e5)
+	local e6=Effect.CreateEffect(c)
+	e6:SetDescription(aux.Stringid(9950172,1))
+	e6:SetType(EFFECT_TYPE_QUICK_O)
+	e6:SetRange(LOCATION_MZONE)
+	e6:SetCode(EVENT_CHAINING)
+	e6:SetRange(LOCATION_MZONE)
+	e6:SetCountLimit(1,9950172)
+	e6:SetCost(c9950172.cost)
+	e6:SetTarget(c9950172.target2)
+	e6:SetOperation(c9950172.operation)
+	c:RegisterEffect(e6)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950172.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950172.ovfilter(c)
+	return c:IsFaceup() and c:IsCode(9950168)
+end
+function c9950172.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950172,0))
+end
+function c9950172.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local bc=e:GetHandler():GetBattleTarget()
+	Duel.SetTargetCard(bc)
+	local dam=bc:GetAttack()
+	if dam<0 then dam=0 end
+	Duel.SetTargetPlayer(1-tp)
+	Duel.SetTargetParam(dam)
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
+end
+function c9950172.damop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
+		local dam=tc:GetAttack()
+		if dam<0 then dam=0 end
+		Duel.Damage(p,dam,REASON_EFFECT)
+	end
+end
+function c9950172.atkup(e,c)
+	return Duel.GetMatchingGroupCount(Card.IsSetCard,c:GetControler(),LOCATION_GRAVE,0,nil,0xba5)*300
+end
+function c9950172.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	e:SetLabel(1)
+	if chk==0 then return e:GetHandler():GetFlagEffect(9950172)==0 end
+	e:GetHandler():RegisterFlagEffect(9950172,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+end
+function c9950172.filter1(c)
+	return c:GetType()==TYPE_TRAP+TYPE_SPELL and c:IsSetCard(0xba5) and c:IsAbleToGraveAsCost()
+		and c:CheckActivateEffect(false,true,false)~=nil
+end
+function c9950172.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		if e:GetLabel()==0 then return false end
+		e:SetLabel(0)
+		return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)
+			and Duel.IsExistingMatchingCard(c9950172.filter1,tp,LOCATION_DECK,0,1,nil)
+	end
+	e:SetLabel(0)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950172.filter1,tp,LOCATION_DECK,0,1,1,nil)
+	local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(false,true,true)
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+	Duel.SendtoGrave(g,REASON_COST)
+	e:SetCategory(te:GetCategory())
+	e:SetProperty(te:GetProperty())
+	local tg=te:GetTarget()
+	if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end
+	te:SetLabelObject(e:GetLabelObject())
+	e:SetLabelObject(te)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,0,0)
+end
+function c9950172.operation(e,tp,eg,ep,ev,re,r,rp)
+	local te=e:GetLabelObject()
+	if not te then return end
+	e:SetLabelObject(te:GetLabelObject())
+	local op=te:GetOperation()
+	if op then op(e,tp,eg,ep,ev,re,r,rp) end
+end
+function c9950172.filter2(c,e,tp,eg,ep,ev,re,r,rp)
+	if c:GetType()==TYPE_TRAP+TYPE_SPELL and c:IsSetCard(0xba5) and c:IsAbleToGraveAsCost() then
+		if c:CheckActivateEffect(false,true,false)~=nil then return true end
+		local te=c:GetActivateEffect()
+		if te:GetCode()~=EVENT_CHAINING then return false end
+		local con=te:GetCondition()
+		if con and not con(e,tp,eg,ep,ev,re,r,rp) then return false end
+		local tg=te:GetTarget()
+		if tg and not tg(e,tp,eg,ep,ev,re,r,rp,0) then return false end
+		return true
+	else return false end
+end
+function c9950172.target2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		if e:GetLabel()==0 then return false end
+		e:SetLabel(0)
+		return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)
+			and Duel.IsExistingMatchingCard(c9950172.filter2,tp,LOCATION_DECK,0,1,nil,e,tp,eg,ep,ev,re,r,rp)
+	end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950172.filter2,tp,LOCATION_DECK,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
+	local tc=g:GetFirst()
+	local te,ceg,cep,cev,cre,cr,crp
+	local fchain=c9950172.filter1(tc)
+	if fchain then
+		te,ceg,cep,cev,cre,cr,crp=tc:CheckActivateEffect(false,true,true)
+	else
+		te=tc:GetActivateEffect()
+	end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+	Duel.SendtoGrave(g,REASON_COST)
+	e:SetCategory(te:GetCategory())
+	e:SetProperty(te:GetProperty())
+	local tg=te:GetTarget()
+	if tg then
+		if fchain then
+			tg(e,tp,ceg,cep,cev,cre,cr,crp,1)
+		else
+			tg(e,tp,eg,ep,ev,re,r,rp,1)
+		end
+	end
+	te:SetLabelObject(e:GetLabelObject())
+	e:SetLabelObject(te)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,0,0,0)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950172,0))
+end

expansions/script/c9950173.lua

+--凭依从者·玛修·基列莱特-花嫁
+function c9950173.initial_effect(c)
+	  --xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),5,2,c9950173.ovfilter,aux.Stringid(9950173,2))
+	c:EnableReviveLimit()
+	--set
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950173,0))
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,9950173)
+	e1:SetCondition(c9950173.setcon)
+	e1:SetTarget(c9950173.settg)
+	e1:SetOperation(c9950173.setop)
+	c:RegisterEffect(e1)
+	--negate activate
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950173,1))
+	e2:SetCategory(CATEGORY_NEGATE+CATEGORY_HANDES)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetCost(c9950173.cost)
+	e2:SetTarget(c9950173.target)
+	e2:SetOperation(c9950173.operation)
+	c:RegisterEffect(e2)
+   --spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950173.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950173.ovfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0xba5) and c:IsType(TYPE_XYZ) and c:IsRank(5)
+end
+function c9950173.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950173,0))
+end
+function c9950173.setcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
+end
+function c9950173.filter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
+end
+function c9950173.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950173.filter,tp,LOCATION_DECK,0,1,nil) end
+end
+function c9950173.setop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectMatchingCard(tp,c9950173.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SSet(tp,g:GetFirst())
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+function c9950173.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c9950173.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
+end
+function c9950173.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and Duel.GetFieldGroupCount(1-tp,LOCATION_HAND,0)>0
+		and Duel.SelectYesNo(tp,aux.Stringid(9950173,2)) then
+		local g=Duel.GetFieldGroup(1-tp,LOCATION_HAND,0):RandomSelect(1-tp,1)
+		Duel.SendtoGrave(g,REASON_EFFECT)
+		Duel.SetLP(1-tp,Duel.GetLP(1-tp)/2)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950173,1))
+end
\ No newline at end of file

expansions/script/c9950174.lua

+--凭依从者·玛修·基列莱特-万圣节
+function c9950174.initial_effect(c)
+	 --xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),4,2)
+	c:EnableReviveLimit()
+	--material
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950174,0))
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_BATTLE_START)
+	e1:SetTarget(c9950174.target)
+	e1:SetOperation(c9950174.operation)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950174,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,9950174)
+	e2:SetCondition(c9950174.spcon)
+	e2:SetTarget(c9950174.sptg)
+	e2:SetOperation(c9950174.spop)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950174.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950174.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950174,0))
+end
+function c9950174.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	local tc=c:GetBattleTarget()
+	if chk==0 then return tc and c:IsType(TYPE_XYZ) and not tc:IsType(TYPE_TOKEN) and tc:IsAbleToChangeControler() end
+end
+function c9950174.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=c:GetBattleTarget()
+	if c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToBattle() and not tc:IsImmuneToEffect(e) then
+		local og=tc:GetOverlayGroup()
+		if og:GetCount()>0 then
+			Duel.SendtoGrave(og,REASON_RULE)
+		end
+		Duel.Overlay(c,Group.FromCards(tc))
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950174,0))
+end
+function c9950174.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_XYZ)
+end
+function c9950174.spfilter2(c,e,tp)
+	return c:IsSetCard(0x3ba6) and c:IsRace(RACE_WARRIOR) and not c:IsCode(9950174) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950174.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCountFromEx(tp)>0
+		and Duel.IsExistingMatchingCard(c9950174.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c9950174.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCountFromEx(tp)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950174.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c9950175.lua

+--已然遥远的理想之城
+function c9950175.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_EQUIP)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetTarget(c9950175.target)
+	e1:SetOperation(c9950175.operation)
+	c:RegisterEffect(e1)
+	--Atk up
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_EQUIP)
+	e2:SetCode(EFFECT_UPDATE_DEFENSE)
+	e2:SetValue(1000)
+	c:RegisterEffect(e2)
+	--cannot be destroyed
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_EQUIP)
+	e2:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
+	e2:SetValue(c9950175.valcon)
+	e2:SetCountLimit(1)
+	c:RegisterEffect(e2)
+	--Equip limit
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_EQUIP_LIMIT)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e3:SetValue(c9950175.equiplimit)
+	c:RegisterEffect(e3)
+	--negate
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950175,0))
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c9950175.condition)
+	e2:SetCost(c9950175.cost)
+	e2:SetOperation(c9950175.activate)
+	c:RegisterEffect(e2)
+	--to hand
+	local e4=Effect.CreateEffect(c)
+	e4:SetCategory(CATEGORY_TOHAND)
+	e4:SetDescription(aux.Stringid(9950175,1))
+	e4:SetType(EFFECT_TYPE_IGNITION)
+	e4:SetRange(LOCATION_GRAVE)
+	e4:SetCountLimit(1,9950175)
+	e4:SetCost(c9950175.thcost)
+	e4:SetTarget(c9950175.thtg)
+	e4:SetOperation(c9950175.thop)
+	c:RegisterEffect(e4)
+end
+function c9950175.equiplimit(e,c)
+	return c:IsRace(RACE_WARRIOR)
+end
+function c9950175.filter(c)
+	return c:IsFaceup() and c:IsRace(RACE_WARRIOR)
+end
+function c9950175.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:GetLocation()==LOCATION_MZONE and c9950175.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9950175.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+	Duel.SelectTarget(tp,c9950175.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
+end
+function c9950175.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
+		Duel.Equip(tp,e:GetHandler(),tc)
+	end
+end
+function c9950175.valcon(e,re,r,rp)
+	return bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0
+end
+function c9950175.condition(e,tp,eg,ep,ev,re,r,rp)
+	return tp~=Duel.GetTurnPlayer()
+end
+function c9950175.cfilter(c)
+	return c:IsRace(RACE_WARRIOR) and c:IsAbleToRemoveAsCost()
+end
+function c9950175.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950175.cfilter,tp,LOCATION_HAND,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9950175.cfilter,tp,LOCATION_HAND,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+end
+function c9950175.activate(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e) and Duel.NegateAttack() then
+		Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1)
+	end
+end
+function c9950175.thfilter(c)
+	return c:IsRace(RACE_WARRIOR) and c:IsAbleToRemoveAsCost()
+end
+function c9950175.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950175.thfilter,tp,LOCATION_GRAVE,0,2,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9950175.thfilter,tp,LOCATION_GRAVE,0,2,2,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+end
+function c9950175.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToHand() end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
+end
+function c9950175.thop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) then
+		Duel.SendtoHand(c,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,c)
+	end
+end
+

expansions/script/c9950176.lua

+--圆桌骑士·加雷斯
+function c9950176.initial_effect(c)
+	--draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950176,0))
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,9950176)
+	e1:SetTarget(c9950176.drtg)
+	e1:SetOperation(c9950176.drop)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCountLimit(1,99501760)
+	e2:SetCondition(c9950176.thcon)
+	e2:SetTarget(c9950176.thtg)
+	e2:SetOperation(c9950176.thop)
+	c:RegisterEffect(e2)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950176.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950176.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950176,0))
+end
+function c9950176.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	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)
+end
+function c9950176.drop(e,tp,eg,ep,ev,re,r,rp)
+	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
+	Duel.Draw(p,d,REASON_EFFECT)
+end
+function c9950176.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_LINK)
+end
+function c9950176.thfilter(c)
+	return c:IsRace(RACE_WARRIOR) and c:IsLevelBelow(4) and c:IsAbleToHand()
+end
+function c9950176.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950176.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c9950176.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c9950176.thfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
\ No newline at end of file

expansions/script/c9950177.lua

+--圆桌骑士·加雷斯-灵基再临
+function c9950177.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,c9950177.mfilter,1,1)
+	c:EnableReviveLimit()
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950177.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+   --special summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950177,0))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,9950177)
+	e2:SetTarget(c9950177.sptg1)
+	e2:SetOperation(c9950177.spop1)
+	c:RegisterEffect(e2)
+	--special summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950177,1))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCode(EVENT_DESTROYED)
+	e3:SetCountLimit(1,99501770)
+	e3:SetCondition(c9950177.spcon2)
+	e3:SetTarget(c9950177.sptg2)
+	e3:SetOperation(c9950177.spop2)
+	c:RegisterEffect(e3)
+end
+function c9950177.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950177,0))
+end
+function c9950177.mfilter(c)
+	return c:IsLevelBelow(4) and c:IsLinkSetCard(0x3ba6)
+end
+function c9950177.spfilter1(c,e,tp,zone)
+	return c:IsRace(RACE_WARRIOR) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
+end
+function c9950177.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local zone=bit.band(e:GetHandler():GetLinkedZone(tp),0x1f)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950177.spfilter1,tp,LOCATION_HAND,0,1,nil,e,tp,zone) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c9950177.spop1(e,tp,eg,ep,ev,re,r,rp)
+	local zone=bit.band(e:GetHandler():GetLinkedZone(tp),0x1f)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or zone<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950177.spfilter1,tp,LOCATION_HAND,0,1,1,nil,e,tp,zone)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP,zone)
+	end
+end
+function c9950177.spcon2(e,tp,eg,ep,ev,re,r,rp)
+	return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
+end
+function c9950177.spfilter2(c,e,tp)
+	return c:IsSetCard(0xba5) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950177.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950177.spfilter2,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c9950177.spop2(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950177.spfilter2,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+end

expansions/script/c9950178.lua

+--fate·达·芬奇-Rider
+function c9950178.initial_effect(c)
+	--salvage
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetDescription(aux.Stringid(9950178,1))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,9950178)
+	e1:SetCost(c9950178.thcost)
+	e1:SetTarget(c9950178.thtg)
+	e1:SetOperation(c9950178.thop)
+	c:RegisterEffect(e1)
+	--summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950178,2))
+	e2:SetCategory(CATEGORY_SUMMON)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c9950178.sumcon)
+	e2:SetTarget(c9950178.sumtg)
+	e2:SetOperation(c9950178.sumop)
+	c:RegisterEffect(e2)
+	--decrease tribute
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetOperation(c9950178.decop)
+	c:RegisterEffect(e3)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950178.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950178.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950178,0))
+end
+function c9950178.rmfilter(c,tp)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
+		and Duel.IsExistingTarget(c9950178.filter,tp,LOCATION_GRAVE,0,1,c)
+end
+function c9950178.filter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function c9950178.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950178.rmfilter,tp,LOCATION_GRAVE,0,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9950178.rmfilter,tp,LOCATION_GRAVE,0,1,1,nil,tp)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+end
+function c9950178.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c9950178.filter(chkc) end
+	if chk==0 then return true end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+	local g=Duel.SelectTarget(tp,c9950178.filter,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c9950178.thop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+	if c:IsRelateToEffect(e) and c:IsFaceup() then
+		c:RegisterFlagEffect(9950178,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
+	end
+end
+function c9950178.sumcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetFlagEffect(9950178)~=0
+end
+function c9950178.sumfilter(c)
+	return c:IsSetCard(0xba5) and c:IsSummonable(true,nil)
+end
+function c9950178.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950178.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
+end
+function c9950178.sumop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950178.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.Summon(tp,tc,true,nil)
+	end
+end
+function c9950178.decop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if Duel.GetFlagEffect(tp,78358522)~=0 then return end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_DECREASE_TRIBUTE)
+	e1:SetTargetRange(LOCATION_HAND,LOCATION_HAND)
+	e1:SetTarget(c9950178.rfilter)
+	e1:SetCondition(c9950178.econ)
+	e1:SetCountLimit(1)
+	e1:SetValue(0x1)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(0x10000000+78358523)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetTargetRange(1,0)
+	e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	c:RegisterEffect(e2)
+	Duel.RegisterFlagEffect(tp,78358522,RESET_PHASE+PHASE_END,0,1)
+end
+function c9950178.econ(e)
+	return Duel.GetFlagEffect(e:GetHandlerPlayer(),78358523)~=0
+end
+function c9950178.rfilter(e,c)
+	return c:IsSetCard(0xba5)
+end
+	
+