Update 1106

Updated 244 cards

expansions/lflist.conf

@@ -5,6 +5,11 @@
 09910057 1 --
 09910052 1 --
 09910056 1 --
+09910031 1 --妖炎九尾 辉夜
+09910036 1 --折纸使的狂岚
+09910011 0 --灵式装置 黄泉凤凰
+09910114 1 --战车道少女·大吉岭
+09910101 1 --战车道少女·西住美穗
 
 09950016 1 --竹林组·量产型慧音球
 09950014 1 --
@@ -27,6 +32,21 @@
 09950076 1 --英灵召唤 
 09950073 1 --天下布武 
 09950091 1 --fate·武藏小姐 
+09950020 0 --竹林组·慧音老师
+09950002 1 --竹林组·温暖之炎
+09950082 1 --冲田总司「愚人节」
+09950086 0 --第六天魔王·织田信长「摇滚Berserker」
+09950068 0 --天下布武·魔神总司
+09950142 1 --fate·恩奇都
+09950145 0 --fate·武藏坊牟庆
+09950143 0 --神造兵器·恩齐都
+09950149 0 --fate·牛若丸〔Assassin〕
+09950111 0 --废柴金星女神·伊什塔尔小姐
+09950132 1 --黄金律的表现
+09950166 1 --凭依从者·玛修·基列莱特「愚人节」
+09950167 1 --凭依从者·玛修·基列莱特
+09950173 0 --凭依从者·玛修·基列莱特-花嫁
+09950193 0 --fate·福尔摩斯-灵基再临
 
 09961199 0 --
 
@@ -72,7 +92,7 @@
 09980715 1 --キャル
 09980774 2 --事到如今还数的清吗！
 09980853 2 --撒 ，show time!
-09980888 1 --起源之女
+#09980888 1 --起源之女
 09980713 1 --AWSL
 09980721 0 --一般通过夏色祭
 09980725 1 --奥尔加团长
@@ -132,6 +152,30 @@
 09981103 1 --最佳搭配build·忍忍漫画形态 
 09980635 1 --月骑·朱月 
 09980746 2 --盖亚记忆体-疾风-
+09980950 0 --幽灵骑士Ghost·平成魂
+#欲望战士：
+09980783 0 --
+09981513 0 --
+09981512 0 --
+09981507 0 --
+09981510 0 --
+09981514 0 --
+09981515 1 --
+#骑士时刻：
+09981153 0 --
+09981155 0 --
+09981152 0 --
+09981151 0 --
+09981532 0 --
+09981196 0 --
+09980654 0 --
+09980663 0 --
+
+09980836 1 --
+09980848 2 --
+09980851 0 --
+09981536 0 --
+09981517 0 --
 
 #132
 13257316 2 --超时空武装 装甲-护盾
@@ -148,6 +192,7 @@
 
 #300
 30000051 1 --
+30000004 0 --
 30000005 1 --
 30000029 0 --
 30000019 1 --
@@ -164,9 +209,9 @@
 
 #337
 33700036 0 --Protoform 咲夜
-33700058 0 --砂之星之奇迹
+33700058 1 --砂之星之奇迹
 33700081 0 --动物朋友 鲸头鹳
-33700082 0 --动物朋友 东之青龙
+33700082 1 --动物朋友 东之青龙
 33700085 1 --动物朋友 西之白虎
 33700093 0 --动物朋友 土狼
 33700181 2 --动物朋友 狞猫
@@ -183,32 +228,46 @@
 33700200 0 --天降妹抖 VIVIT
 33700902 0 --磷光的荒野 ～旅途开始之地～
 33700903 0 --青之峡谷 ～沉没的梦迹～
-33700905 0 --终点的高塔 ～无穷的次元壁～
+33700905 1 --终点的高塔 ～无穷的次元壁～
 33700746 0 --动物朋友 白头鹰&苍鹰&游隼
 33700316 2 --GearGal Abort
 
+#400
+40008599 1 --
+40008605 1 --
+40008603 1 --
+40008601 1 --
+40008160 1 --
+40008529 1 --
+40008530 1 --
+40008538 1 --
+40008590 1 --
+40008522 1 --
+40008150 1 --
+40008771 1 --
+40008515 1 --
+40008537 1 --
+40008564 1 --
+40008779 1 --
+40008597 1 --
+40008190 1 --
+40008400 1 --
+
 #650
+65010036 0 --
+65010038 0 --
+65010046 0 --
 65010087 1 --星光歌剧 神乐光Revue
 65010203 0 --八歧大狐
 65010105 2 --
 65010090 1 --
 65010102 0 --
-
-
-#777
-77770006 1 --城市废墟
-77770014 1 --爆裂魔法师 惠惠
-77770015 0 --人工智障 绊爱
-77770020 1 --歌姬 溶解
-77770021 0 --歌姬 REOL
-77770019 1 --虚拟偶像 猫宫日向
-77770050 0 --邪魔道士
-77777001 0 --白龙少女 康娜
-77770019 1 --
-77770023 1 --
-77770024 1 --
-77770010 0 --藤原千花
-77771010 1 --黑白视界·琴音
+65010124 1 --
+65010098 2 --
+65010099 1 --
+65010020 0 --
+65010105 1 --
+65010100 1 --
 
 #889
 88990194 0 --
@@ -216,6 +275,8 @@
 #987
 98745673 2 --Hellfire Blister
 
+
+
 #BUGs
 
 

expansions/script/c40006875.lua

 --一人千面·约翰娜
 function c40006875.initial_effect(c)
 	c:SetUniqueOnField(1,0,40006875)
-	--synchro limit
-	local e0=Effect.CreateEffect(c)
-	e0:SetType(EFFECT_TYPE_SINGLE)
-	e0:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
-	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e0:SetValue(c40006875.synlimit)
-	c:RegisterEffect(e0)
 	--equip
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(40006875,0))
@@ -49,10 +42,6 @@ function c40006875.initial_effect(c)
 	e4:SetValue(1)
 	c:RegisterEffect(e4)
 end
-function c40006875.synlimit(e,c)
-	if not c then return false end
-	return not c:IsAttribute(ATTRIBUTE_DARK)
-end
 function c40006875.filter(c)
 	return c:IsFaceup()
 end

expansions/script/c40006877.lua

@@ -160,16 +160,5 @@ function c40006877.spop(e,tp,eg,ep,ev,re,r,rp)
 	if tc:IsRelateToEffect(e) then
 		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
 	end
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e2:SetTargetRange(1,0)
-	e2:SetTarget(c40006877.splimit)
-	e2:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e2,tp)
-end
-function c40006877.splimit(e,c)
-	return not c:IsAttribute(ATTRIBUTE_DARK)
 end
 

expansions/script/c40008874.lua

+--SWAM-一人千面
+function c40008874.initial_effect(c)
+	aux.EnablePendulumAttribute(c)
+	--splimit
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_FIELD)
+	e0:SetRange(LOCATION_PZONE)
+	e0:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e0:SetTargetRange(1,0)
+	e0:SetTarget(c40008874.psplimit)
+	c:RegisterEffect(e0)   
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(40008874,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetCountLimit(1,40008874)
+	e1:SetCost(c40008874.spcost)
+	e1:SetTarget(c40008874.sptg)
+	e1:SetOperation(c40008874.spop)
+	c:RegisterEffect(e1) 
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(40008874,1))
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_HAND)
+	e2:SetCountLimit(1,40008875)
+	e2:SetCost(c40008874.setcost)
+	e2:SetTarget(c40008874.settg)
+	e2:SetOperation(c40008874.setop)
+	c:RegisterEffect(e2)
+	c40008874.discard_effect=e2
+	--spsummon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(40008874,2))
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_TO_DECK)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,40008876)
+	e3:SetCondition(c40008874.pencon)
+	e3:SetTarget(c40008874.pentg)
+	e3:SetOperation(c40008874.penop)
+	c:RegisterEffect(e3)
+end
+function c40008874.psplimit(e,c,tp,sumtp,sumpos)
+	return not c:IsRace(RACE_PSYCHO) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
+end
+function c40008874.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeckAsCost,tp,LOCATION_HAND,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeckAsCost,tp,LOCATION_HAND,0,1,1,nil)
+	if g:GetFirst():IsLocation(LOCATION_HAND) then
+		Duel.ConfirmCards(1-tp,g)
+	end
+	Duel.SendtoDeck(g,tp,2,REASON_COST)
+end
+function c40008874.spfilter(c,e,tp)
+	return c:IsCode(40008877) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
+end
+function c40008874.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return not Duel.IsPlayerAffectedByEffect(tp,59822133)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>1
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
+		and Duel.IsExistingMatchingCard(c40008874.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_PZONE+LOCATION_DECK)
+end
+function c40008874.spop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c40008874.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		g:AddCard(e:GetHandler())
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
+	end
+end
+function c40008874.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsAbleToDeckAsCost() end
+	if c:IsLocation(LOCATION_HAND) then
+		Duel.ConfirmCards(1-tp,c)
+	end
+	Duel.SendtoDeck(c,nil,2,REASON_COST)
+end
+function c40008874.setfilter(c)
+	return c:IsCode(40008877) and c:IsType(TYPE_PENDULUM) and not c:IsForbidden()
+end
+function c40008874.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
+		and Duel.IsExistingMatchingCard(c40008874.setfilter,tp,LOCATION_DECK,0,1,nil) end
+end
+function c40008874.setop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+	local g=Duel.SelectMatchingCard(tp,c40008874.setfilter,tp,LOCATION_DECK,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	end
+end
+function c40008874.pencon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsReason(REASON_COST) and re:IsHasType(0x7e0)
+		and not re:GetHandler():IsCode(40008874)
+end
+function c40008874.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
+end
+function c40008874.penop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e)
+		and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then
+		Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	end
+end
\ No newline at end of file

expansions/script/c40008877.lua

+--一人千面·辛德瑞拉
+function c40008877.initial_effect(c)
+	aux.EnablePendulumAttribute(c)  
+	--special summon
+	local e0=Effect.CreateEffect(c)
+	e0:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e0:SetType(EFFECT_TYPE_IGNITION)
+	e0:SetRange(LOCATION_PZONE)
+	e0:SetCountLimit(1,40008877)
+	e0:SetCost(c40008877.setcost)
+	e0:SetCondition(c40008877.spcon)
+	e0:SetTarget(c40008877.thtg)
+	e0:SetOperation(c40008877.thop)
+	c:RegisterEffect(e0)
+	if not c40008877.global_check then
+		c40008877.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
+		ge1:SetOperation(c40008877.checkop)
+		Duel.RegisterEffect(ge1,0)
+	end
+	--equip
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(40008877,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCategory(CATEGORY_EQUIP)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,40008878)
+	e1:SetTarget(c40008877.eqtg)
+	e1:SetOperation(c40008877.eqop)
+	c:RegisterEffect(e1) 
+	--apply effect
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(40008877,1))
+	e2:SetCategory(CATEGORY_TODECK)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetRange(LOCATION_HAND)
+	e2:SetCountLimit(1,40008879)
+	e2:SetCost(c40008877.setcost)
+	e2:SetTarget(c40008877.efftg)
+	e2:SetOperation(c40008877.effop)
+	c:RegisterEffect(e2)
+	--atk
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetCountLimit(1)
+	e3:SetCondition(c40008877.atkcon)
+	e3:SetOperation(c40008877.atkop)
+	c:RegisterEffect(e3)
+end
+function c40008877.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	while tc and tc:IsSummonType(SUMMON_TYPE_PENDULUM) do
+		Duel.RegisterFlagEffect(tc:GetSummonPlayer(),40008877,RESET_PHASE+PHASE_END,0,1)
+		tc=eg:GetNext()
+	end
+end
+function c40008877.lkfilter(c)
+	return not  c:IsSummonType(SUMMON_TYPE_PENDULUM)
+end
+function c40008877.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFlagEffect(tp,40008877)>=1 and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
+end
+function c40008877.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsAbleToDeckAsCost() end
+	if c:IsLocation(LOCATION_HAND) then
+		Duel.ConfirmCards(1-tp,c)
+	end
+	Duel.SendtoDeck(c,nil,2,REASON_COST)
+end
+function c40008877.thfilter(c)
+	return c:IsSetCard(0xdf1d) and not c:IsCode(40008877) and c:IsAbleToHand()
+end
+function c40008877.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c40008877.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c40008877.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c40008877.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
+function c40008877.filter(c)
+	return c:IsFaceup()
+end
+function c40008877.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c40008877.filter(chkc) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsExistingTarget(c40008877.filter,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+	Duel.SelectTarget(tp,c40008877.filter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c40008877.eqop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	local tc=Duel.GetFirstTarget()
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 or tc:IsFacedown() or not tc:IsRelateToEffect(e) or not tc:IsControler(tp) then
+		Duel.SendtoGrave(c,REASON_EFFECT)
+		return
+	end
+	Duel.Equip(tp,c,tc,true)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_EQUIP_LIMIT)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetReset(RESET_EVENT+0x1fe0000)
+	e1:SetValue(c40008877.eqlimit)
+	e1:SetLabelObject(tc)
+	c:RegisterEffect(e1)
+	--race
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_EQUIP)
+	e2:SetCode(EFFECT_CHANGE_RACE)
+	e2:SetValue(RACE_PSYCHO)
+	e2:SetReset(RESET_EVENT+0x1fe0000)
+	c:RegisterEffect(e2)
+	--equip effect
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_EQUIP)
+	e3:SetCode(EFFECT_SET_BASE_DEFENSE)
+	e3:SetValue(0)
+	e3:SetReset(RESET_EVENT+0x1fe0000)
+	c:RegisterEffect(e3)
+	--equip effect
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_EQUIP)
+	e4:SetCode(EFFECT_SET_BASE_ATTACK)
+	e4:SetReset(RESET_EVENT+0x1fe0000)
+	e4:SetValue(0)
+	c:RegisterEffect(e4)
+end
+function c40008877.eqlimit(e,c)
+	return c==e:GetLabelObject()
+end
+function c40008877.efffilter(c,e,tp,eg,ep,ev,re,r,rp)
+	if not (c:IsSetCard(0xdf1d) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck() and (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and not c:IsCode(40008877)) then return false end
+	local m=_G["c"..c:GetCode()]
+	if not m then return false end
+	local te=m.discard_effect
+	if not te then return false end
+	local tg=te:GetTarget()
+	return not tg or tg and tg(e,tp,eg,ep,ev,re,r,rp,0)
+end
+function c40008877.efftg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_ONFIELD) and chkc:IsControler(tp) and c40008877.efffilter(chkc,e,tp,eg,ep,ev,re,r,rp) end
+	if chk==0 then return Duel.IsExistingTarget(c40008877.efffilter,tp,LOCATION_GRAVE+LOCATION_ONFIELD,0,1,nil,e,tp,eg,ep,ev,re,r,rp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g=Duel.SelectTarget(tp,c40008877.efffilter,tp,LOCATION_GRAVE+LOCATION_ONFIELD,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+	local tc=g:GetFirst()
+	Duel.ClearTargetCard()
+	tc:CreateEffectRelation(e)
+	e:SetLabelObject(tc)
+	local m=_G["c"..tc:GetCode()]
+	local te=m.discard_effect
+	local tg=te:GetTarget()
+	if tg then tg(e,tp,eg,ep,ev,re,r,rp,1) end
+end
+function c40008877.effop(e,tp,eg,ep,ev,re,r,rp,chk)
+	local tc=e:GetLabelObject()
+	if tc:IsRelateToEffect(e) then
+		local m=_G["c"..tc:GetCode()]
+		local te=m.discard_effect
+		local op=te:GetOperation()
+		if op then op(e,tp,eg,ep,ev,re,r,rp) end
+		Duel.BreakEffect()
+			Duel.SendtoDeck(tc,nil,1,REASON_EFFECT)
+	end
+end
+function c40008877.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	local ec=e:GetHandler():GetEquipTarget()
+	local tc=ec:GetBattleTarget()
+	return ec and tc and tc:IsFaceup() and tc:IsControler(1-tp)
+end
+function c40008877.atkop(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local ec=e:GetHandler():GetEquipTarget()
+	if ec:IsRelateToBattle() and ec:IsFaceup() and ec:IsControler(tp) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+		e1:SetValue(ec:GetAttack()*2)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL)
+		ec:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
+		e2:SetValue(ec:GetDefense()*2)
+		ec:RegisterEffect(e2)
+	end
+end
\ No newline at end of file

expansions/script/c9910034.lua

@@ -8,9 +8,10 @@ function c9910034.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetRange(LOCATION_MZONE)
-	e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
+	e1:SetCountLimit(1)
 	e1:SetCondition(c9910034.condtion)
-	e1:SetValue(1)
+	e1:SetValue(c9910034.valcon)
 	c:RegisterEffect(e1)
 	--immune
 	local e2=Effect.CreateEffect(c)
@@ -42,6 +43,9 @@ function c9910034.condtion(e)
 	local mg=c:GetMaterial()
 	return c:IsSummonType(SUMMON_TYPE_SYNCHRO) and mg:GetCount()>0 and not mg:IsExists(c9910034.mfilter,1,nil)
 end
+function c9910034.valcon(e,re,r,rp)
+	return bit.band(r,REASON_BATTLE)~=0
+end
 function c9910034.efilter(e,te)
 	return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
 end

expansions/script/c9910040.lua

+--伏见祸津观
+function c9910040.initial_effect(c)
+	c:SetSPSummonOnce(9910040)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9910040,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,9910040)
+	e1:SetCondition(c9910040.spcon)
+	e1:SetCost(c9910040.spcost)
+	e1:SetTarget(c9910040.sptg)
+	e1:SetOperation(c9910040.spop)
+	c:RegisterEffect(e1)
+	if not c9910040.global_check then
+		c9910040.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_SUMMON_SUCCESS)
+		ge1:SetOperation(c9910040.checkop)
+		Duel.RegisterEffect(ge1,0)
+		local ge2=ge1:Clone()
+		ge2:SetCode(EVENT_SPSUMMON_SUCCESS)
+		Duel.RegisterEffect(ge2,0)
+	end
+	--cannot target
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+	e2:SetValue(aux.tgoval)
+	c:RegisterEffect(e2)
+	--indes
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	c:RegisterEffect(e4)
+	--equip
+	local e5=Effect.CreateEffect(c)
+	e5:SetDescription(aux.Stringid(9910040,0))
+	e5:SetCategory(CATEGORY_LEAVE_GRAVE+CATEGORY_EQUIP)
+	e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e5:SetTarget(c9910040.eqtg)
+	e5:SetOperation(c9910040.eqop)
+	c:RegisterEffect(e5)
+	--destroy
+	local e6=Effect.CreateEffect(c)
+	e6:SetDescription(aux.Stringid(9910040,1))
+	e6:SetType(EFFECT_TYPE_QUICK_O)
+	e6:SetCategory(CATEGORY_DESTROY)
+	e6:SetCode(EVENT_FREE_CHAIN)
+	e6:SetRange(LOCATION_MZONE)
+	e6:SetCountLimit(1,9910041)
+	e6:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e6:SetCondition(c9910040.descon)
+	e6:SetCost(c9910040.descost)
+	e6:SetTarget(c9910040.destg)
+	e6:SetOperation(c9910040.desop)
+	c:RegisterEffect(e6)
+end
+function c9910040.checkop(e,tp,eg,ep,ev,re,r,rp)
+	local turnp=Duel.GetTurnPlayer()
+	local tc=eg:GetFirst()
+	while tc do
+		if tc:IsRace(RACE_WARRIOR) then
+			Duel.RegisterFlagEffect(turnp,9910040,RESET_PHASE+PHASE_END,0,1)
+		end
+		tc=eg:GetNext()
+	end
+end
+function c9910040.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local turnp=Duel.GetTurnPlayer()
+	return Duel.GetFlagEffect(turnp,9910040)>=5
+		and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
+end
+function c9910040.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local turnp=Duel.GetTurnPlayer()
+	local g=Duel.GetMatchingGroup(nil,turnp,LOCATION_MZONE,0,nil)
+	e:SetLabel(g:GetCount())
+	if chk==0 then return g:GetCount()>0 and g:FilterCount(Card.IsReleasable,nil)==g:GetCount() end
+	Duel.Release(g,REASON_COST)
+end
+function c9910040.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local turnp=Duel.GetTurnPlayer()
+	if chk==0 then return Duel.GetLocationCount(turnp,LOCATION_MZONE)>-e:GetLabel()+1
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_ATTACK,turnp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c9910040.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local turnp=Duel.GetTurnPlayer()
+	if c:IsRelateToEffect(e) and Duel.GetLocationCount(turnp,LOCATION_MZONE,tp)>0 then
+		Duel.SpecialSummon(c,0,tp,turnp,false,false,POS_FACEUP_ATTACK)
+	end
+end
+function c9910040.filter(c)
+	return c:IsRace(RACE_WARRIOR) and c:IsType(TYPE_MONSTER) and not c:IsForbidden()
+end
+function c9910040.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9910040.filter(chkc) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and Duel.IsExistingTarget(c9910040.filter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+	local g=Duel.SelectTarget(tp,c9910040.filter,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_EQUIP,g,1,0,0)
+end
+function c9910040.eqop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsFaceup() and c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) then
+		if not Duel.Equip(tp,tc,c,false) then return end
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_OWNER_RELATE)
+		e1:SetCode(EFFECT_EQUIP_LIMIT)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetValue(c9910040.eqlimit)
+		tc:RegisterEffect(e1)
+	end
+end
+function c9910040.eqlimit(e,c)
+	return e:GetOwner()==c
+end
+function c9910040.descon(e)
+	return e:GetHandler():GetEquipCount()>0
+end
+function c9910040.descost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
+end
+function c9910040.destg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function c9910040.desop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	if g:GetCount()>0 then
+		Duel.Destroy(g,REASON_EFFECT)
+	end
+end

expansions/script/c9910065.lua

+--樱公馆
+function c9910065.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetOperation(c9910065.activate)
+	c:RegisterEffect(e1)
+	--to deck
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9910065,0))
+	e2:SetCategory(CATEGORY_TODECK)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCountLimit(1,9910065)
+	e2:SetCondition(c9910065.tdcon1)
+	e2:SetCost(c9910065.tdcost)
+	e2:SetTarget(c9910065.tdtg)
+	e2:SetOperation(c9910065.tdop)
+	c:RegisterEffect(e2)
+	local e3=e2:Clone()
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e3:SetCondition(c9910065.tdcon2)
+	c:RegisterEffect(e3)
+end
+function c9910065.filter(c)
+	return c:IsFaceup() and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToDeck()
+end
+function c9910065.activate(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local g=Duel.GetMatchingGroup(c9910065.filter,tp,0,LOCATION_ONFIELD,nil)
+	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(9910065,0)) then
+		Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
+	end
+end
+function c9910065.checkfilter(c)
+	return c:IsFaceup() and c:IsRace(RACE_FAIRY) and c:IsType(TYPE_MONSTER)
+end
+function c9910065.tdcon1(e,tp,eg,ep,ev,re,r,rp)
+	return not Duel.IsExistingMatchingCard(c9910065.checkfilter,tp,LOCATION_REMOVED,0,1,nil)
+end
+function c9910065.tdcon2(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(c9910065.checkfilter,tp,LOCATION_REMOVED,0,1,nil)
+end
+function c9910065.tdcost(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 c9910065.tdfilter(c)
+	return c:IsFaceup() and c:IsAbleToDeck()
+end
+function c9910065.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910065.tdfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,e:GetHandler()) end
+	local g=Duel.GetMatchingGroup(c9910065.tdfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+end
+function c9910065.tdop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c9910065.tdfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,nil)
+	Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
+end

expansions/script/c9910066.lua

+--血亲的羁绊
+function c9910066.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetTarget(c9910066.target)
+	e1:SetOperation(c9910066.activate)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOEXTRA+CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetCondition(aux.exccon)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c9910066.sptg)
+	e2:SetOperation(c9910066.spop)
+	c:RegisterEffect(e2)
+end
+function c9910066.synfilter(c,e,tp)
+	return c:IsFaceup() and c:IsRace(RACE_FAIRY) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9910066.synfilter2,tp,LOCATION_DECK,0,1,nil,e,tp,c)
+end
+function c9910066.synfilter2(c,e,tp,mc)
+	local mg=Group.FromCards(c,mc)
+	return c:IsRace(RACE_FAIRY) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+		and Duel.IsExistingMatchingCard(c9910066.synfilter3,tp,LOCATION_EXTRA,0,1,nil,mg)
+end
+function c9910066.synfilter3(c,mg)
+	return c:IsSynchroSummonable(nil,mg) and c:IsRace(RACE_FAIRY)
+end
+function c9910066.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9910066.synfilter(chkc,e,tp) end
+	if chk==0 then return Duel.IsPlayerCanSpecialSummonCount(tp,2)
+		and Duel.IsExistingTarget(c9910066.synfilter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c9910066.synfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,2,tp,LOCATION_EXTRA)
+end
+function c9910066.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) or tc:IsFacedown() or tc:IsControler(1-tp)
+		or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9910066.synfilter2,tp,LOCATION_DECK,0,1,1,nil,e,tp,tc)
+	local sc=g:GetFirst()
+	if sc and Duel.SpecialSummonStep(sc,0,tp,tp,false,false,POS_FACEUP) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		sc:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_DISABLE_EFFECT)
+		sc:RegisterEffect(e2)
+		Duel.SpecialSummonComplete()
+	end
+	local mg=Group.FromCards(tc,sc)
+	local tg=Duel.GetMatchingGroup(c9910066.synfilter3,tp,LOCATION_EXTRA,0,nil,mg)
+	if tg:GetCount()>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local tsg=tg:Select(tp,1,1,nil)
+		Duel.SynchroSummon(tp,tsg:GetFirst(),nil,mg)
+	end
+end
+function c9910066.cfilter(c)
+	return c:IsAbleToRemove() and c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK) and c:GetLevel()>0
+end
+function c9910066.filter(c,e,tp)
+	local g=Duel.GetMatchingGroup(c9910066.cfilter,tp,LOCATION_GRAVE,0,c)
+	local sg=Group.CreateGroup()
+	return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup()) and c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO)
+		and c:IsAbleToExtra() and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,true)
+		and g:IsExists(c9910066.selector,1,nil,tp,g,sg,c:GetLevel(),1)
+end
+function c9910066.selector(c,tp,g,sg,lv,i)
+	sg:AddCard(c)
+	g:RemoveCard(c)
+	local flag=false
+	if i<2 then
+		flag=g:IsExists(c9910066.selector,1,nil,tp,g,sg,lv,i+1)
+	else
+		flag=sg:FilterCount(Card.IsAttribute,nil,ATTRIBUTE_LIGHT)>0
+			and sg:FilterCount(Card.IsAttribute,nil,ATTRIBUTE_DARK)>0
+			and sg:CheckWithSumEqual(Card.GetLevel,lv,2,2)
+	end
+	sg:RemoveCard(c)
+	g:AddCard(c)
+	return flag
+end
+function c9910066.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return Duel.GetLocationCountFromEx(tp)>0
+		and aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
+		and Duel.IsExistingMatchingCard(c9910066.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,2,tp,LOCATION_GRAVE)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c9910066.spop(e,tp,eg,ep,ev,re,r,rp)
+	local ft=Duel.GetLocationCountFromEx(tp)
+	if ft<=0 or not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c9910066.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
+	local tc=g:GetFirst()
+	if tc and Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_EXTRA) then
+		local g=Duel.GetMatchingGroup(c9910066.cfilter,tp,LOCATION_GRAVE,0,tc)
+		local sg=Group.CreateGroup()
+		if chk==0 then return g:IsExists(c9910066.selector,1,nil,tp,g,sg,tc:GetLevel(),1) end
+		for i=1,2 do
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+			local g1=g:FilterSelect(tp,c9910066.selector,1,1,nil,tp,g,sg,tc:GetLevel(),i)
+			sg:Merge(g1)
+			g:Sub(g1)
+		end
+		Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
+		Duel.SpecialSummon(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
+		tc:CompleteProcedure()
+	end
+end

expansions/script/c9910141.lua

@@ -2,7 +2,7 @@
 require("expansions/script/c9910106")
 function c9910141.initial_effect(c)
 	--xyz summon
-	Zcd.AddXyzProcedure(c,nil,5,3,c9910141.xyzfilter,aux.Stringid(9910141,0),99)
+	Zcd.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_MACHINE),5,3,c9910141.xyzfilter,aux.Stringid(9910141,0),99)
 	c:EnableReviveLimit()
 	--material
 	local e1=Effect.CreateEffect(c)
@@ -20,30 +20,31 @@ function c9910141.initial_effect(c)
 	--immune
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(9910141,2))
-	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetCategory(CATEGORY_DAMAGE)
 	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)
+	e2:SetCondition(c9910141.imcon)
+	e2:SetCost(c9910141.imcost)
+	e2:SetTarget(c9910141.imtg)
+	e2:SetOperation(c9910141.imop)
 	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()))
+		and c:IsRace(RACE_MACHINE)
+end
+function c9910141.cfilter(c)
+	return c:IsRace(RACE_MACHINE) and c:IsType(TYPE_XYZ) and c:IsAbleToRemoveAsCost()
 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)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9910141.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectMatchingCard(tp,c9910141.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
 end
 function c9910141.xmfilter(c,tp)
-	return c:IsFaceup() and not c:IsType(TYPE_TOKEN) and (c:IsControler(tp) or c:IsAbleToChangeControler())
+	return 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()
@@ -67,29 +68,20 @@ function c9910141.xmoperation(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Overlay(c,Group.FromCards(tc))
 	end
 end
-function c9910141.imcost1(e,tp,eg,ep,ev,re,r,rp,chk)
+function c9910141.imcon(e,tp,eg,ep,ev,re,r,rp)
+	return rp==1-tp
+end
+function c9910141.imcost(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)
+function c9910141.imtg(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)
+function c9910141.imop(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)
@@ -98,24 +90,7 @@ function c9910141.imop1(e,tp,eg,ep,ev,re,r,rp)
 		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
+		Duel.Damage(1-tp,1000,REASON_EFFECT)
 	end
 end
 function c9910141.efilter(e,re)

expansions/script/c9910144.lua

+--战车道少女·阿萨姆
+function c9910144.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK+CATEGORY_POSITION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,9910144)
+	e1:SetCost(c9910144.spcost)
+	e1:SetTarget(c9910144.sptg)
+	e1:SetOperation(c9910144.spop)
+	c:RegisterEffect(e1)
+	--atk & def
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9910144,1))
+	e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
+	e2:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
+	e2:SetCountLimit(1)
+	e2:SetCondition(c9910144.atkcon)
+	e2:SetOperation(c9910144.atkop)
+	c:RegisterEffect(e2)
+end
+function c9910144.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return not e:GetHandler():IsPublic() end
+end
+function c9910144.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 c9910144.posfilter(c)
+	return c:IsFaceup() and c:IsCanChangePosition()
+end
+function c9910144.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
+		if not c:IsRelateToEffect(e) then return end
+		if Duel.SendtoDeck(c,nil,0,REASON_EFFECT)==0 then return end
+		local g=Duel.GetMatchingGroup(c9910144.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
+		if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(9910144,0)) then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
+			local sg=g:Select(tp,1,1,nil)
+			Duel.BreakEffect()
+			Duel.ChangePosition(sg,POS_FACEUP_DEFENSE,POS_FACEDOWN_DEFENSE,POS_FACEUP_ATTACK,POS_FACEUP_ATTACK)
+		end
+	end
+end
+function c9910144.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetBattleTarget()~=nil and e:GetHandler():IsDefenseAbove(0)
+end
+function c9910144.atkop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsFaceup() and c:IsDefenseAbove(0) then
+		local atk=c:GetBaseAttack()+c:GetBaseDefense()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
+		e1:SetValue(atk)
+		e1:SetReset(RESET_PHASE+PHASE_DAMAGE_CAL)
+		c:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
+		c:RegisterEffect(e2)
+	end
+end

expansions/script/c9910200.lua

+--念力飞行大师
+function c9910200.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,99,c9910200.lcheck)
+	c:EnableReviveLimit()
+end
+function c9910200.lcheck(g)
+	return g:IsExists(Card.IsLinkMarker,1,nil,LINK_MARKER_BOTTOM)
+		and g:IsExists(Card.IsLinkMarker,1,nil,LINK_MARKER_LEFT)
+		and g:IsExists(Card.IsLinkMarker,1,nil,LINK_MARKER_RIGHT)
+		and g:IsExists(Card.IsLinkMarker,1,nil,LINK_MARKER_TOP)
+end

expansions/script/c9950197.lua

+--圆桌骑士·特里斯坦「愚人节」
+function c9950197.initial_effect(c)
+	 --destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950197,0))
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetTarget(c9950197.destg)
+	e1:SetOperation(c9950197.desop)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950197,1))
+	e2:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_BE_MATERIAL)
+	e2:SetCountLimit(1,9950197)
+	e2:SetCondition(c9950197.thcon)
+	e2:SetTarget(c9950197.thtg)
+	e2:SetOperation(c9950197.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(c9950197.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950197.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950197,0))
+end
+function c9950197.desfilter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP)
+end
+function c9950197.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() and c9950197.desfilter(chkc) end
+	if chk==0 then return true end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,c9950197.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function c9950197.desop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end
+function c9950197.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 c9950197.filter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
+end
+function c9950197.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	 if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c9950197.filter(chkc) end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,2)
+		and Duel.IsExistingTarget(c9950197.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_GRAVE+LOCATION_REMOVED,10,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c9950197.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_GRAVE+LOCATION_REMOVED,10,10,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,1-tp,2)
+end
+function c9950197.thop(e,tp,eg,ep,ev,re,r,rp)
+   local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=10 then return end
+	Duel.SendtoDeck(tg,nil,0,REASON_EFFECT)
+	local g=Duel.GetOperatedGroup()
+	if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) end
+	local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
+	if ct==5 then
+		Duel.BreakEffect()
+		Duel.Draw(tp,2,REASON_EFFECT)
+		Duel.Draw(1-tp,2,REASON_EFFECT)
+	end
+end
\ No newline at end of file

expansions/script/c9950198.lua

+--圆桌骑士·特里斯坦
+function c9950198.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:SetCondition(c9950198.spcon)
+	c:RegisterEffect(e1)
+	--summon success
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950198,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e1:SetTarget(c9950198.sptg)
+	e1:SetOperation(c9950198.spop)
+	c:RegisterEffect(e1)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950198.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950198.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950198,0))
+end
+function c9950198.spcon(e,c)
+	if c==nil then return true end
+	return Duel.GetFieldGroupCount(c:GetControler(),LOCATION_MZONE,0)==0
+		and Duel.GetFieldGroupCount(c:GetControler(),0,LOCATION_MZONE)>0
+		and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
+end
+function c9950198.filter(c,e,tp)
+	return c:IsLevelBelow(4) and c:IsSetCard(0xcba5) and c:GetCode()~=9950198 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950198.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9950198.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c9950198.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c9950198.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c9950198.spop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
+		local fid=e:GetHandler():GetFieldID()
+		tc:RegisterFlagEffect(9950198,RESET_EVENT+RESETS_STANDARD,0,1,fid)
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_PHASE+PHASE_END)
+		e1:SetCountLimit(1)
+		e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+		e1:SetLabel(fid)
+		e1:SetLabelObject(tc)
+		e1:SetCondition(c9950198.descon)
+		e1:SetOperation(c9950198.desop)
+		Duel.RegisterEffect(e1,tp)
+	end
+end
+function c9950198.descon(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetLabelObject()
+	if tc:GetFlagEffectLabel(9950198)~=e:GetLabel() then
+		e:Reset()
+		return false
+	else return true end
+end
+function c9950198.desop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Destroy(e:GetLabelObject(),REASON_EFFECT)
+end

expansions/script/c9950199.lua

+--圆桌骑士·特里斯坦-灵基再临
+function c9950199.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,99,c9950199.lcheck)
+	c:EnableReviveLimit()
+	--destroy
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950199,0))
+	e3:SetCategory(CATEGORY_DESTROY)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e3:SetTarget(c9950199.destg)
+	e3:SetOperation(c9950199.desop)
+	c:RegisterEffect(e3)
+	--half atk
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetCode(EFFECT_SET_ATTACK_FINAL)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetProperty(EFFECT_FLAG_DELAY)
+	e4:SetTargetRange(0,LOCATION_MZONE)
+	e4:SetTarget(c9950199.atktg)
+	e4:SetValue(c9950199.atkval)
+	c:RegisterEffect(e4)
+	local e5=e4:Clone()
+	e5:SetCode(EFFECT_SET_DEFENSE_FINAL)
+	e5:SetValue(c9950199.defval)
+	c:RegisterEffect(e5)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950199,1))
+	e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e2:SetCountLimit(1,9950199)
+	e2:SetTarget(c9950199.sptg)
+	e2:SetOperation(c9950199.spop)
+	c:RegisterEffect(e2)
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950199.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950199.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950199,0))
+end
+function c9950199.lcheck(g,lc)
+	return g:IsExists(Card.IsLinkSetCard,1,nil,0xcba5)
+end
+function c9950199.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() end
+	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function c9950199.desop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
+	if tg:GetCount()>0 then
+		Duel.Destroy(tg,REASON_EFFECT)
+	end
+end
+function c9950199.atktg(e,c)
+	return c~=e:GetHandler()
+end
+function c9950199.atkval(e,c)
+	return math.ceil(c:GetAttack()/2)
+end
+function c9950199.defval(e,c)
+	return math.ceil(c:GetDefense()/2)
+end
+function c9950199.spfilter(c,ft)
+	return c:IsFaceup() and c:IsType(TYPE_EFFECT) and c:IsAbleToDeck() and (ft>0 or c:GetSequence()<5)
+end
+function c9950199.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9950199.spfilter(chkc,ft) end
+	if chk==0 then return Duel.IsExistingTarget(c9950199.spfilter,tp,LOCATION_MZONE,0,1,nil,ft)
+		and ft>-1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c9950199.spfilter,tp,LOCATION_MZONE,0,1,1,nil,ft)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c9950199.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end

expansions/script/c9950200.lua

+--圆桌骑士·高文「愚人节」
+function c9950200.initial_effect(c)
+	 --destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950200,0))
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetTarget(c9950200.destg)
+	e1:SetOperation(c9950200.desop)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950200,1))
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_BE_MATERIAL)
+	e2:SetCountLimit(1,9950200)
+	e2:SetCondition(c9950200.thcon)
+	e2:SetTarget(c9950200.thtg)
+	e2:SetOperation(c9950200.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(c9950200.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950200.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950200,0))
+end
+function c9950200.desfilter(c)
+	return c:IsType(TYPE_MONSTER)
+end
+function c9950200.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() and c9950200.desfilter(chkc) end
+	if chk==0 then return true end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,c9950200.desfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function c9950200.desop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc and tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end
+function c9950200.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 c9950200.tgfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
+end
+function c9950200.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950200.tgfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_EXTRA)
+end
+function c9950200.thop(e,tp,eg,ep,ev,re,r,rp)
+   Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950200.tgfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+end

expansions/script/c9950201.lua

+--圆桌骑士·高文
+function c9950201.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:SetCondition(c9950201.spcon)
+	c:RegisterEffect(e1)
+	--xyzlv
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_XYZ_LEVEL)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c9950201.xyzlv)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950201,1))
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_BE_MATERIAL)
+	e2:SetCountLimit(1,9950201)
+	e2:SetCondition(c9950201.thcon)
+	e2:SetTarget(c9950201.thtg)
+	e2:SetOperation(c9950201.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(c9950201.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950201.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950201,0))
+end
+function c9950201.xyzlv(e,c,rc)
+	return 0x40000+e:GetHandler():GetLevel()
+end
+function c9950201.cfilter(c)
+	return c:IsFaceup() and c:IsLevelAbove(8) 
+end
+function c9950201.spcon(e,c)
+	if c==nil then return true end
+	return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950201.cfilter,c:GetControler(),LOCATION_MZONE,0,1,nil)
+end
+function c9950201.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 c9950201.tgfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
+end
+function c9950201.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950201.tgfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_EXTRA)
+end
+function c9950201.thop(e,tp,eg,ep,ev,re,r,rp)
+   Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
+	local g=Duel.SelectMatchingCard(tp,c9950201.tgfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoGrave(g,REASON_EFFECT)
+	end
+end

expansions/script/c9950202.lua

+--圆桌骑士·高文-灵基再临
+function c9950202.initial_effect(c)
+	--xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),4,3)
+	c:EnableReviveLimit()
+	--to grave
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOGRAVE)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetTarget(c9950202.gytg)
+	e2:SetOperation(c9950202.gyop)
+	c:RegisterEffect(e2)
+	--atk
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950202,1))
+	e3:SetCategory(CATEGORY_ATKCHANGE)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
+	e3:SetCondition(c9950202.atkcon)
+	e3:SetCost(c9950202.atkcost)
+	e3:SetOperation(c9950202.atkop)
+	c:RegisterEffect(e3)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950202,1))
+	e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e2:SetCountLimit(1,9950202)
+	e2:SetTarget(c9950202.sptg)
+	e2:SetOperation(c9950202.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(c9950202.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950202.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950202,0))
+end
+function c9950202.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetBattleTarget()~=nil 
+end
+function c9950202.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:CheckRemoveOverlayCard(tp,3,REASON_COST) and c:GetFlagEffect(9950202)==0 end
+	c:RemoveOverlayCard(tp,3,3,REASON_COST)
+	c:RegisterFlagEffect(9950202,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL,0,1)
+end
+function c9950202.atkop(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_SET_ATTACK_FINAL)
+		e1:SetReset(RESET_PHASE+PHASE_DAMAGE_CAL)
+		e1:SetValue(7500)
+		c:RegisterEffect(e1)
+	end
+ Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950202,0))
+end
+function c9950202.tgfilter(c,tp)
+	return Duel.IsExistingMatchingCard(c9950202.gyfilter,tp,0,LOCATION_ONFIELD,1,nil,c:GetColumnGroup())
+end
+function c9950202.gyfilter(c,g)
+	return g:IsContains(c)
+end
+function c9950202.gytg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950202.tgfilter,tp,LOCATION_ONFIELD,0,1,nil,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,0,1-tp,LOCATION_ONFIELD)
+end
+function c9950202.gyop(e,tp,eg,ep,ev,re,r,rp)
+	local pg=Duel.SelectMatchingCard(tp,c9950202.tgfilter,tp,LOCATION_ONFIELD,0,1,1,nil,tp)
+	if pg:GetCount()==0 then return end
+	local g=Duel.GetMatchingGroup(c9950202.gyfilter,tp,0,LOCATION_ONFIELD,nil,pg:GetFirst():GetColumnGroup())
+	Duel.SendtoGrave(g,REASON_EFFECT)
+end
+function c9950202.spfilter(c,ft)
+	return c:IsFaceup() and c:IsType(TYPE_EFFECT) and c:IsAbleToDeck() and (ft>0 or c:GetSequence()<5)
+end
+function c9950202.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9950202.spfilter(chkc,ft) end
+	if chk==0 then return Duel.IsExistingTarget(c9950202.spfilter,tp,LOCATION_MZONE,0,1,nil,ft)
+		and ft>-1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c9950202.spfilter,tp,LOCATION_MZONE,0,1,1,nil,ft)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c9950202.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end

expansions/script/c9950203.lua

+--圆桌骑士·莫德雷德「愚人节」
+function c9950203.initial_effect(c)
+		--instant
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(9950203,0))
+	e3:SetCategory(CATEGORY_SUMMON)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetCondition(c9950203.condition2)
+	e3:SetCost(c9950203.cost2)
+	e3:SetTarget(c9950203.target2)
+	e3:SetOperation(c9950203.activate2)
+	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(c9950203.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950203.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950203,4))
+end
+function c9950203.filter(c)
+	return c:IsSetCard(0xcba5) and c:IsSummonable(true,nil) or c:IsMSetable(true,nil)
+end
+function c9950203.condition2(e,tp,eg,ep,ev,re,r,rp)
+	local tn=Duel.GetTurnPlayer()
+	local ph=Duel.GetCurrentPhase()
+	return (tn==tp and (ph==PHASE_MAIN1 or ph==PHASE_MAIN2)) or (tn~=tp and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
+end
+function c9950203.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckLPCost(tp,1000)
+	else Duel.PayLPCost(tp,1000) end
+end
+function c9950203.target2(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		if not e:GetHandler():IsStatus(STATUS_CHAINING) then
+			local ct=Duel.GetMatchingGroupCount(c9950203.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,nil)
+			e:SetLabel(ct)
+			return ct>0
+		else return e:GetLabel()>0 end
+	end
+	e:SetLabel(e:GetLabel()-1)
+	Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
+end
+function c9950203.activate2(e,tp,eg,ep,ev,re,r,rp)
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
+	local g=Duel.SelectMatchingCard(tp,c9950203.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
+	local tc=g:GetFirst()
+	if tc then
+		local s1=tc:IsSummonable(true,nil)
+		local s2=tc:IsMSetable(true,nil)
+		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)
+		else
+			Duel.MSet(tp,tc,true,nil)
+		end
+	end
+end

expansions/script/c9950204.lua

+--圆桌骑士·莫德雷德
+function c9950204.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950204,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_TO_HAND)
+	e1:SetCountLimit(1,9950204)
+	e1:SetCondition(c9950204.spcon)
+	e1:SetTarget(c9950204.sptg)
+	e1:SetOperation(c9950204.spop)
+	c:RegisterEffect(e1)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950204,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetCountLimit(1,99502040)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(c9950204.spcost)
+	e1:SetTarget(c9950204.sptg2)
+	e1:SetOperation(c9950204.spop2)
+	c:RegisterEffect(e1)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950204.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950204.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950204,0))
+end
+function c9950204.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return not e:GetHandler():IsReason(REASON_DRAW)
+end
+function c9950204.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function c9950204.spop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsRelateToEffect(e) then return end
+	Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+end
+function c9950204.cfilter(c)
+	return c:IsSetCard(0xba5) and c:IsDiscardable()
+end
+function c9950204.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950204.cfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	Duel.DiscardHand(tp,c9950204.cfilter,1,1,REASON_COST+REASON_DISCARD)
+end
+function c9950204.filter(c,e,tp)
+	return c:IsSetCard(0xcba5) and c:IsType(TYPE_LINK+TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950204.sptg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c9950204.filter(chkc,e,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c9950204.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c9950204.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c9950204.spop2(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
\ No newline at end of file

expansions/script/c9950205.lua

+--圆桌骑士·莫德雷德-灵基再临
+function c9950205.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,99,c9950205.lcheck)
+	c:EnableReviveLimit()
+	 --indes
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	c:RegisterEffect(e4)
+	--damage val
+	local e5=e3:Clone()
+	e5:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
+	c:RegisterEffect(e5)
+	--spsummon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950205,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,99502050)
+	e1:SetTarget(c9950205.sptg)
+	e1:SetOperation(c9950205.spop)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950205,1))
+	e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e2:SetCountLimit(1,9950205)
+	e2:SetTarget(c9950205.sptg2)
+	e2:SetOperation(c9950205.spop2)
+	c:RegisterEffect(e2)
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e8:SetOperation(c9950205.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950205.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950205,0))
+end
+function c9950205.lcheck(g,lc)
+	return g:IsExists(Card.IsLinkSetCard,1,nil,0xcba5)
+end
+function c9950205.spfilter(c,e,tp)
+	return c:IsSetCard(0xcba5) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c9950205.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c9950205.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c9950205.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,c9950205.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 c9950205.spfilter2(c,ft)
+	return c:IsFaceup() and c:IsType(TYPE_EFFECT) and c:IsAbleToDeck() and (ft>0 or c:GetSequence()<5)
+end
+function c9950205.sptg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9950205.spfilter2(chkc,ft) end
+	if chk==0 then return Duel.IsExistingTarget(c9950205.spfilter2,tp,LOCATION_MZONE,0,1,nil,ft)
+		and ft>-1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c9950205.spfilter2,tp,LOCATION_MZONE,0,1,1,nil,ft)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c9950205.spop2(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) then
+		Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
+	end
+end

expansions/script/c9950206.lua

+--隐藏不贞的头盔
+function c9950206.initial_effect(c)
+	--act in hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
+	e2:SetCondition(c9950206.handcon)
+	c:RegisterEffect(e2)
+	--effect gain
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetTarget(c9950206.target)
+	e1:SetOperation(c9950206.activate)
+	c:RegisterEffect(e1)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMING_END_PHASE+TIMING_EQUIP)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCost(aux.bfgcost)
+	e1:SetCountLimit(1,9950206)
+	e1:SetTarget(c9950206.target2)
+	e1:SetOperation(c9950206.activate2)
+	c:RegisterEffect(e1)
+end
+function c9950206.handcon(e)
+	return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_SZONE,0)==0
+end
+function c9950206.filter(c)
+	return c:IsFaceup() and c:IsSetCard(0xba5)
+end
+function c9950206.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9950206.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9950206.filter,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local g=Duel.SelectTarget(tp,c9950206.filter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c9950206.activate(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_IMMUNE_EFFECT)
+		e1:SetValue(c9950206.efilter)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+		e2:SetValue(1)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+		e3:SetCode(EVENT_DAMAGE_STEP_END)
+		e3:SetCondition(c9950206.descon)
+		e3:SetOperation(c9950206.desop)
+		e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e3)
+	end
+end
+function c9950206.efilter(e,re)
+	return e:GetHandler()~=re:GetOwner()
+end
+function c9950206.descon(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetHandler():GetBattleTarget()
+	return tc and tc:IsRelateToBattle()
+end
+function c9950206.desop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=e:GetHandler():GetBattleTarget()
+	Duel.Hint(HINT_CARD,0,9950206)
+	Duel.Destroy(tc,REASON_EFFECT)
+end
+function c9950206.filter2(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP)
+end
+function c9950206.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() and c9950206.filter2(chkc) and chkc~=e:GetHandler() end
+	if chk==0 then return Duel.IsExistingTarget(c9950206.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,c9950206.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
+end
+function c9950206.activate2(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end

expansions/script/c9950207.lua

+--圆桌骑士·莫德雷德-Rider
+function c9950207.initial_effect(c)
+	 --xyz summon
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0xba5),4,2)
+	c:EnableReviveLimit()
+	--set
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9950207,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,9950207)
+	e1:SetCost(c9950207.spcost)
+	e1:SetTarget(c9950207.settg)
+	e1:SetOperation(c9950207.setop)
+	c:RegisterEffect(e1)
+   --Trap activate in set turn
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950207,2))
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
+	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_SZONE,0)
+	e2:SetCountLimit(1,99502070)
+	c:RegisterEffect(e2)
+	--destroy replace
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EFFECT_DESTROY_REPLACE)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetTarget(c9950207.reptg)
+	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(c9950207.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950207.spcost(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 c9950207.setfilter(c)
+	return c:IsSetCard(0xba5) and c:IsType(TYPE_TRAP) and c:IsSSetable()
+end
+function c9950207.settg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950207.setfilter,tp,LOCATION_DECK,0,1,nil) end
+end
+function c9950207.setop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectMatchingCard(tp,c9950207.setfilter,tp,LOCATION_DECK,0,1,1,nil)
+	if #g>0 then
+		Duel.SSet(tp,g)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end
+function c9950207.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950207,0))
+end
+function c9950207.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
+		and c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT) end
+	if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
+		e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_EFFECT)
+		return true
+	else return false end
+end
\ No newline at end of file

expansions/script/c9950208.lua

+--圆桌骑士·兰斯洛特「愚人节」
+function c9950208.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:SetCondition(c9950208.spcon)
+	c:RegisterEffect(e1)
+	--tohand
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9950208,1))
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY)
+	e2:SetCode(EVENT_TO_GRAVE)
+	e2:SetCountLimit(1,9950208)
+	e2:SetCost(c9950208.cost)
+	e2:SetTarget(c9950208.thtg)
+	e2:SetOperation(c9950208.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(c9950208.sumsuc)
+	c:RegisterEffect(e8)
+	local e9=e8:Clone()
+	e9:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e9)
+end
+function c9950208.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9950208,0))
+end
+function c9950208.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+end
+function c9950208.filter(c)
+	return c:IsFaceup() and c:IsSetCard(0xcba5) and c:GetCode()~=9950208
+end
+function c9950208.spcon(e,c)
+	if c==nil then return true end
+	return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and
+		Duel.IsExistingMatchingCard(c9950208.filter,c:GetControler(),LOCATION_MZONE,0,1,nil)
+end
+function c9950208.thfilter(c)
+	return c:IsSetCard(0xcba5) and c:IsType(TYPE_MONSTER) and not c:IsCode(9950208) and c:IsAbleToHand()
+end
+function c9950208.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c9950208.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c9950208.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c9950208.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