2019.12.2

deck/2019.11.17_new_card1.ydk

-#created by ... 
-#main 
-1000378
-1000400
-1000401
-1000402
-1000403
-1000404
-1000405
-1000406
-1000407
-1000408
-1000409
-1000410
-1000411
-1000412
-1000413
-1000414
-1000415
-1000416
-1000417
-1000418
-1000419
-1000420
-1000421
-1000422
-1000424
-1000425
-1000428
-1111029
-10907000
-10907001
-10907002
-10907003
-10907004
-10907005
-11200029
-11200030
-11200032
-11200039
-11200040
-11200041
-11200044
-11200046
-11200048
-11200049
-17029903
-17030001
-17030002
-17030003
-17030004
-17030005
-17030006
-17030007
-17030008
-#extra 
-1000361
-1000362
-1000363
-1000364
-1000371
-1000376
-1000427
-1195011
-10907006
-11200031
-11200033
-11200034
-11200047

deck/2019.11.17_new_card2.ydk

-#created by ... 
-#main 
-17030009
-17030010
-17030011
-17030012
-17030013
-17030022
-17030023
-17030024
-17030026
-17030028
-17030029
-17030031
-17030032
-17030033
-17030035
-17030036
-17030037
-17030038
-17030039
-17030040
-17030041
-17030042
-17030043
-17030044
-17030045
-17030047
-17030048
-17030049
-17030054
-17030056
-17030057
-17030058
-17030059
-17061155
-17061156
-17061157
-26802006
-26807001
-26807005
-26807007
-26807013
-26808006
-26808007
-26809027
-26809029
-26809030
-26810016
-26810017
-26810018
-26810019
-33400259
-33400320
-33400321
-#extra 
-17030014
-17030015
-17030016
-17030017
-17030018
-17030019
-17030020
-17030021
-17030030
-17030034
-17030046
-17030050
-17030051

deck/2019.11.17_new_card3.ydk

-#created by ... 
-#main 
-33400360
-33400361
-33400362
-33400401
-33400404
-33400405
-33400412
-33400413
-33400414
-33400427
-33400429
-33400430
-33400431
-33400464
-33400473
-33400474
-33401301
-65040043
-65040044
-65040045
-65040046
-65040047
-65050017
-65050018
-65050019
-65050193
-65050195
-65059999
-65071005
-65071055
-65071066
-65071067
-65071070
-65071158
-65071159
-81006001
-81006002
-81010000
-81010028
-81012006
-81012037
-81014030
-81015005
-81016014
-81017020
-81018024
-81021001
-81021003
-81022005
-81040003
-81040010
-81040012
-#extra 
-17030052
-17030053
-26802004
-26806057
-26807009
-26807010
-26807014
-26808008
-26809025
-26809026
-26809028
-26810020
-33330103

deck/2019.11.17_new_card4.ydk

-#created by ... 
-#main 
-#extra 
-33330107
-33400035
-33400220
-33400305
-33400314
-33400406
-33400407
-33400408
-33400409
-33400410
-33400411
-33400426
-33401308

deck/2019.11.17_new_card5.ydk

-#created by ... 
-#main 
-#extra 
-33401309
-33401313
-65040041
-65040042
-65050200
-65050202
-65050204
-65050206
-81006006
-81007031
-81011002
-81011020
-81013005

deck/2019.11.17_new_card6.ydk

-#created by ... 
-#main 
-#extra 
-81013007
-81015009
-81015016
-81015042
-81017004
-81017005
-81017010
-81017021
-81018005
-81018027
-81021005
-81040037

deck/2019.12.2_new_card1.ydk

+#created by ... 
+#main 
+1197001
+9910101
+9910103
+9910104
+9910108
+9910109
+9910110
+9910113
+9910114
+9910115
+9910116
+9910119
+9910120
+9910122
+9910123
+9910124
+9910127
+9910130
+9910132
+9910136
+9910137
+9910139
+9910142
+9910143
+9910144
+9910145
+9910147
+9910148
+9910149
+9910152
+9910153
+9910251
+9910252
+9910253
+9910255
+9910256
+9910258
+9910260
+9910261
+9910262
+9910263
+9910264
+11200039
+11200044
+11200048
+11200105
+11200112
+11200210
+17091005
+17091006
+21520101
+21520102
+21520103
+21520104
+21520105
+21520106
+21520107
+21520108
+#extra 
+9910105
+9910112
+9910117
+9910121
+9910126
+9910129
+9910134
+9910140
+9910141
+9910150
+9910154
+9910155
+11200088
+17050933

deck/2019.12.2_new_card2.ydk

+#created by ... 
+#main 
+21520109
+21520110
+21520111
+21520112
+21520113
+21520114
+21520115
+21520116
+21520117
+21520118
+21520119
+21520120
+21520121
+21520122
+21520123
+21520124
+21520125
+21520126
+21520127
+21520128
+21520129
+21520130
+21520131
+21520132
+21520133
+21520134
+21520135
+21520136
+21520137
+21520138
+21520139
+21520140
+21520141
+21520142
+21520143
+21520144
+21520145
+21520146
+21520147
+21520148
+21520149
+21520150
+21520151
+21520152
+21520153
+21520154
+21520155
+21520156
+21520239
+21520240
+26805008
+26806007
+26806010
+26806059
+26807030
+26807059
+26809006
+#extra 
+17060870
+17060882
+17060883
+17060884
+17060890
+17060907
+17060910
+17091003
+21520157
+21520158
+21520159
+21520160
+21520211
+21520212

deck/2019.12.2_new_card3.ydk

+#created by ... 
+#main 
+26809031
+30000200
+30000205
+65050001
+65050006
+65050008
+65050010
+81003004
+81005003
+81006036
+81010003
+81010041
+81010047
+81010056
+81011027
+81011033
+81015051
+81018046
+81018047
+81019002
+82206000
+82206001
+82206002
+82206003
+82206011
+82206012
+82206013
+82206014
+82206015
+82206016
+82206017
+82206018
+82206019
+82206020
+82206021
+82206024
+82206025
+82206026
+82207000
+82207005
+82207006
+82207007
+82207008
+82221045
+82221055
+82221057
+82221058
+82224001
+82224003
+82224004
+82224017
+82224019
+82224020
+82224444
+82228498
+82228499
+82299999
+#extra 
+21520213
+21520214
+21520215
+21520216
+21520217
+21520218
+21520219
+21520220
+21520221
+21520222
+21520223
+21520224
+21520225
+21520226

deck/2019.12.2_new_card4.ydk

+#created by ... 
+#main 
+#extra 
+21520227
+21520228
+21520229
+21520230
+21520231
+21520232
+21520233
+21520234
+21520235
+21520236
+21520237
+21520238
+26806011
+26806020

deck/2019.12.2_new_card5.ydk

+#created by ... 
+#main 
+#extra 
+26806058
+26809032
+75646535
+75646536
+81000003
+81003001
+81003002
+81003003
+81005001
+81005002
+81011039
+81011040
+81012068

deck/2019.12.2_new_card6.ydk

+#created by ... 
+#main 
+#extra 
+82206005
+82206006
+82206007
+82206008
+82207001
+82207002
+82207003
+82207004
+82224006
+82224011
+82224023
+82228497
+98600008

expansions/lflist.conf

@@ -10,7 +10,7 @@
 00960011 0 --葱喵·幻想见习魔术师
 00960007 1 --投影魔术 - 永久遥远的黄金之剑
 #10
-01000406 2 --梦幻传说 冈崎梦美
+#01000406 2 --梦幻传说 冈崎梦美
 01000409 2 --朦胧的梦幻
 01000411 0 --纯真无邪～空白少女
 01000416 1 --梦幻游戏
@@ -18,6 +18,7 @@
 01000376 1 --美丽的公主·姬丝秀忒
 01000369 1 --怪异杀手·姬丝秀忒
 01000378 1 --美丽善良的金发神明
+01000428 0 --梦时空
 #11
 01150023 0 --仙女的水滴·夏
 01150024 0 --仙女的水滴·冬
@@ -69,7 +70,7 @@
 10905002 2 --离苦的记忆 小河坂千波
 10905006 2 --轮回的记忆 乙津梦
 10905003 1 --群星的记忆 苍衣铃
-10969998 0 --御魂术
+10969998 1 --御魂术
 10919000 0 --叛逆的魔女 花菱
 10907000 2 --花寄女子寮
 10907001 2 --花寄女子Live
@@ -238,6 +239,9 @@
 17030007 1 --勇气玛纳
 17030033 1 --宏大的回归
 17030059 0 --孤独的王座
+17060882 0 --多莫维依
+17060890 1 --电波型主持
+17091003 0 --独角兽高达 报丧女妖
 #180
 18004008 0 --性感手枪拔枪术
 18005010 0 --封锁的拟魂
@@ -274,7 +278,11 @@
 21520176 1 --成形时刻
 21520177 1 --扭曲揉合
 21520183 0 --曲形魔-克莱因
-
+21520061 1   --玲珑法师-夕雾
+21520066 1   --玲珑法师-鸢尾
+21520067 0 --玲珑法师-海棠
+21520074 1   --玲珑术-韵
+21520075 1   --玲珑术-昭
 #220
 22000270 0 --从者Ruler 夏洛克·福尔摩斯
 #222
@@ -327,15 +335,20 @@
 26809025 0 --Despair of Infinite
 26809026 0 --Precious Sword
 26810010 2 --无限冲击·如月千早
+#300
+30000200 0 --暗魔力的爆发
 #305
 30556807 2 --向流星祈愿的少女
 30556001 1 --空中都市-[艾拉01]-
-30556002 1 --空中都市 调查者
+30556002 0 --空中都市 调查者
 30556005 1 --空中都市 研究者
 30556006 1 --空中都市 执行者
 30556008 1 --空中都市潜影 —[真理]—
 30556010 1 --空中都市原核 -[SEED]-
 30556012 1 --空中都市计划 —[S.O.W]—
+30556004 1 --空中都市 监察者
+30556009 1 --空中都市顶点 —[永辉之眼]—
+30556011 1 --空中都市计划 —[Dispersal]—
 #328
 32828002 1 --风卷浪
 #333
@@ -448,7 +461,7 @@
 37564330 1 --源数网络
 37564338 0 --恋色的舞姬·纱由里
 37564342 0 --西行寺·绫
-37564415 1 --百慕 拼搏才能·香蒂
+37564415 2 --百慕 拼搏才能·香蒂
 37564455 2 --百慕 依偎的浅眠·一夏
 37564505 1 --Nanahira & Halozy
 37564508 1 --Too Late Snow
@@ -586,7 +599,7 @@
 60150919 2 --FantasiaT the Temptation of Mona
 60150931 1 --Unlimited Cloister
 60150932 1 --FT the Ice Sill
-60152002 2 --告解的壁障 佐仓杏子
+#60152002 2 --告解的壁障 佐仓杏子
 60152016 2 --无休止的征伐
 60151701 2 --天空的水晶部队 应急工程师
 60151704 2 --天空的水晶部队 狡猾的女仆贼
@@ -671,7 +684,7 @@
 65040046 0 --深晦的原海
 65010008 1 --「为了适应超出我体系的环境」
 65010010 1 --「02加入了游戏」
-65010122 1 --星光歌剧 花柳香子Revue
+65010122 2 --星光歌剧 花柳香子Revue
 65010127 1 --『星光歌剧』台本-约定Revue
 65071159 0 --光之种
 #666
@@ -756,7 +769,7 @@
 #81040033 0 --散花世界·小雅
 81040037 1 --冬日回忆·周子
 81040019 1 --周子·红叶秋风
-81041016 1 --那一片真实的天空
+81041016 2 --那一片真实的天空
 81041024 1 --国见洸太郎 & 四条凛香
 81014004 1 --康娜卡姆依
 81014011 2 --见习OL 艾露玛
@@ -777,6 +790,10 @@
 82228501 1 --光之精灵王 斯嘉丽
 82228505 1 --神秘之精灵王 米斯蒂克
 82228519 1 --王之意念
+82207007 0 --咒术·死司凭血
+82224003 2 --你不要过来啊！！！
+82224017 0 --森之守护者
+82224020 1 --龙舌兰姑娘的诱惑
 
 #888
 

expansions/script/c11200039.lua

@@ -17,16 +17,15 @@ function c11200039.initial_effect(c)
 	e2:SetTarget(c11200039.drtg)
 	e2:SetOperation(c11200039.drop)
 	c:RegisterEffect(e2)
-	--spsummon
+	--special summon
 	local e3=Effect.CreateEffect(c)
 	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetProperty(EFFECT_FLAG_NO_TURN_RESET)
 	e3:SetRange(LOCATION_FZONE)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e3:SetCountLimit(1,11200039)
-	e3:SetCost(c11200039.spcost2)
-	e3:SetTarget(c11200039.target)
-	e3:SetOperation(c11200039.activate)
+	e3:SetTarget(c11200039.sptg)
+	e3:SetOperation(c11200039.spop)
 	c:RegisterEffect(e3)
 end
 function c11200039.cfilter(c)
@@ -46,65 +45,19 @@ function c11200039.drop(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 c11200039.spcost2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
-	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+function c11200039.spfilter(c,e,tp)
+	return c:IsCode(11200029) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
-function c11200039.filter(c,e,tp)
-	return c:IsCanBeEffectTarget(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCode(11200029)
+function c11200039.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c11200039.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
 end
-function c11200039.xyzfilter(c,mg)
-	return c:IsRace(RACE_AQUA) and c:IsRank(2) and c:IsXyzSummonable(mg,2,2)
-end
-function c11200039.mfilter1(c,mg,exg)
-	return mg:IsExists(c11200039.mfilter2,1,c,c,exg)
-end
-function c11200039.mfilter2(c,mc,exg)
-	return exg:IsExists(Card.IsXyzSummonable,1,nil,Group.FromCards(c,mc))
-end
-function c11200039.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return false end
-	local mg=Duel.GetMatchingGroup(c11200039.filter,tp,LOCATION_GRAVE,0,nil,e,tp)
-	local exg=Duel.GetMatchingGroup(c11200039.xyzfilter,tp,LOCATION_EXTRA,0,nil,mg)
-	if chk==0 then return Duel.IsPlayerCanSpecialSummonCount(tp,2)
-		and not Duel.IsPlayerAffectedByEffect(tp,59822133)
-		and Duel.GetLocationCount(tp,LOCATION_MZONE)>1
-		and exg:GetCount()>0 end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local sg1=mg:FilterSelect(tp,c11200039.mfilter1,1,1,nil,mg,exg)
-	local tc1=sg1:GetFirst()
+function c11200039.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 sg2=mg:FilterSelect(tp,c11200039.mfilter2,1,1,tc1,tc1,exg)
-	sg1:Merge(sg2)
-	Duel.SetTargetCard(sg1)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg1,2,0,0)
-end
-function c11200039.filter2(c,e,tp)
-	return c:IsRelateToEffect(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c11200039.activate(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<2 then return end
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c11200039.filter2,nil,e,tp)
-	if g:GetCount()<2 then return end
-	local tc=g:GetFirst()
-	while tc do
-		Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_DISABLE_EFFECT)
-		tc:RegisterEffect(e2)
-		tc=g:GetNext()
-	end
-	Duel.SpecialSummonComplete()
-	local xyzg=Duel.GetMatchingGroup(c11200039.xyzfilter,tp,LOCATION_EXTRA,0,nil,g)
-	if xyzg:GetCount()>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local xyz=xyzg:Select(tp,1,1,nil):GetFirst()
-		Duel.XyzSummon(tp,xyz,g)
+	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c11200039.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,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/c11200048.lua

@@ -7,7 +7,6 @@ function c11200048.initial_effect(c)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetCountLimit(1,11200048)
 	e1:SetTarget(c11200048.target)
 	e1:SetOperation(c11200048.operation)
 	c:RegisterEffect(e1)

expansions/script/c11200088.lua

@@ -3,15 +3,14 @@ function c11200088.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsFusionAttribute,ATTRIBUTE_FIRE),3,false)
-	--equip
+	--remove
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_EQUIP)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1,11200088)
-	e1:SetCost(c11200088.eqcost)
-	e1:SetTarget(c11200088.eqtg)
-	e1:SetOperation(c11200088.eqop)
+	e1:SetCategory(CATEGORY_REMOVE)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetTarget(c11200088.target)
+	e1:SetOperation(c11200088.operation)
 	c:RegisterEffect(e1)
 	--spsummon
 	local e2=Effect.CreateEffect(c)
@@ -19,7 +18,7 @@ function c11200088.initial_effect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e2:SetCode(EVENT_REMOVE)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCountLimit(1,11209088)
+	e2:SetCountLimit(1,11200088)
 	e2:SetTarget(c11200088.sptg)
 	e2:SetOperation(c11200088.spop)
 	c:RegisterEffect(e2)
@@ -43,38 +42,28 @@ function c11200088.initial_effect(c)
 	e4:SetCondition(c11200088.actcon)
 	c:RegisterEffect(e4)
 end
-function c11200088.costfilter(c,tp)
-	return c:IsCode(11200103,11200104) and c:IsAbleToDeckAsCost()
+function c11200088.filter(c)
+	return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsAbleToRemove()
 end
-function c11200088.eqcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c11200088.costfilter,tp,LOCATION_REMOVED,0,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-	local g=Duel.SelectMatchingCard(tp,c11200088.costfilter,tp,LOCATION_REMOVED,0,1,1,nil)
-	Duel.SendtoDeck(g,nil,2,REASON_COST)
+function c11200088.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c11200088.filter,tp,LOCATION_EXTRA,LOCATION_EXTRA,1,nil) end
+	local g=Duel.GetMatchingGroup(c11200088.filter,tp,LOCATION_EXTRA,LOCATION_EXTRA,nil)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
 end
-function c11200088.eqfilter(c,ec)
-	return c:IsType(TYPE_EQUIP) and c:CheckEquipTarget(ec)
-end
-function c11200088.eqtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
-		and Duel.IsExistingMatchingCard(c11200088.eqfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e:GetHandler()) end
-	Duel.SetOperationInfo(0,CATEGORY_EQUIP,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
-end
-function c11200088.eqop(e,tp,eg,ep,ev,re,r,rp)
+function c11200088.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c11200088.filter,tp,LOCATION_EXTRA,LOCATION_EXTRA,nil)
+	local ct=Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
 	local c=e:GetHandler()
-	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 or c:IsFacedown() or not c:IsRelateToEffect(e) then return end
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(11200088,1))
-	local g=Duel.SelectMatchingCard(tp,c11200088.eqfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,c)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.Equip(tp,tc,c)
+	if ct>0 and c:IsFaceup() and c:IsRelateToEffect(e) then
 		local e1=Effect.CreateEffect(c)
 		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_REDIRECT)
-		e1:SetValue(LOCATION_HAND)
-		tc:RegisterEffect(e1)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
+		e1:SetValue(ct*300)
+		c:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		c:RegisterEffect(e2)
 	end
 end
 function c11200088.sptg(e,tp,eg,ep,ev,re,r,rp,chk)

expansions/script/c11200105.lua

@@ -45,8 +45,11 @@ function c11200105.activate(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoGrave(sg,REASON_EFFECT+REASON_RETURN)
 	end
 end
+function c11200105.nfilter(c)
+	return c:IsFaceup() and (c:IsType(TYPE_RITUAL) or c:IsType(TYPE_FUSION)) and c:IsAttribute(ATTRIBUTE_FIRE)
+end
 function c11200105.actcon(e)
-	return Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_REMOVED,0,1,nil,11200103) or Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_REMOVED,0,1,nil,11200104)
+	return Duel.IsExistingMatchingCard(c11200105.nfilter,e:GetHandlerPlayer(),LOCATION_REMOVED,0,1,nil)
 end
 function c11200105.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0

expansions/script/c11200112.lua

@@ -8,22 +8,22 @@ function c11200112.initial_effect(c)
 	e1:SetTarget(c11200112.target)
 	e1:SetOperation(c11200112.activate)
 	c:RegisterEffect(e1)
-	--spsummon
+	--fusion summon
 	local e2=Effect.CreateEffect(c)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCode(EVENT_REMOVE)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_REMOVED)
 	e2:SetCountLimit(1,11200112)
-	e2:SetTarget(c11200112.ktarget)
-	e2:SetOperation(c11200112.kactivate)
+	e2:SetCost(c11200112.pspcost)
+	e2:SetTarget(c11200112.psptg)
+	e2:SetOperation(c11200112.pspop)
 	c:RegisterEffect(e2)
 end
 function c11200112.filter1(c,e)
 	return not c:IsImmuneToEffect(e)
 end
 function c11200112.filter2(c,e,tp,m,f,chkf)
-	return c:IsType(TYPE_FUSION) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_SPELLCASTER) and (not f or f(c))
+	return c:IsType(TYPE_FUSION) and c:IsAttribute(ATTRIBUTE_FIRE) and (not f or f(c))
 		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
 end
 function c11200112.target(e,tp,eg,ep,ev,re,r,rp,chk)
@@ -77,49 +77,52 @@ function c11200112.activate(e,tp,eg,ep,ev,re,r,rp)
 		tc:CompleteProcedure()
 	end
 end
-function c11200112.kfilter0(c)
-	return c:IsFaceup() and c:IsCanBeFusionMaterial() and c:IsAbleToDeck()
+function c11200112.pspcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
+	Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_COST)
+end
+function c11200112.pfilter0(c)
+	return c:IsFaceup() and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
 end
-function c11200112.kfilter1(c,e)
-	return c:IsFaceup() and c:IsCanBeFusionMaterial() and c:IsAbleToDeck() and not c:IsImmuneToEffect(e)
+function c11200112.pfilter1(c,e)
+	return c:IsFaceup() and c:IsType(TYPE_MONSTER) and not c:IsImmuneToEffect(e) and c:IsAbleToDeck()
 end
-function c11200112.kfilter2(c,e,tp,m,f,chkf)
+function c11200112.pfilter2(c,e,tp,m,f,chkf)
 	return c:IsType(TYPE_FUSION) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_SPELLCASTER) and (not f or f(c))
 		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
 end
-function c11200112.kfilter3(c)
-	return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToDeck()
-end
-function c11200112.ktarget(e,tp,eg,ep,ev,re,r,rp,chk)
+function c11200112.psptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then
 		local chkf=tp
-		local mg=Duel.GetMatchingGroup(c11200112.kfilter0,tp,LOCATION_REMOVED,0,nil)
-		local res=Duel.IsExistingMatchingCard(c11200112.kfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg,nil,chkf)
+		local mg1=Duel.GetMatchingGroup(c11200112.pfilter0,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
+		local res=Duel.IsExistingMatchingCard(c11200112.pfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
 		if not res then
 			local ce=Duel.GetChainMaterial(tp)
 			if ce~=nil then
 				local fgroup=ce:GetTarget()
-				local mg3=fgroup(ce,e,tp)
+				local mg2=fgroup(ce,e,tp)
 				local mf=ce:GetValue()
-				res=Duel.IsExistingMatchingCard(c11200112.kfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
+				res=Duel.IsExistingMatchingCard(c11200112.pfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
 			end
 		end
 		return res
 	end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
 end
-function c11200112.kactivate(e,tp,eg,ep,ev,re,r,rp)
+function c11200112.pspop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
 	local chkf=tp
-	local mg=Duel.GetMatchingGroup(c11200112.kfilter1,tp,LOCATION_REMOVED,0,nil,e)
-	local sg1=Duel.GetMatchingGroup(c11200112.kfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg,nil,chkf)
-	local mg3=nil
+	local mg1=Duel.GetMatchingGroup(c11200112.pfilter1,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil,e)
+	local sg1=Duel.GetMatchingGroup(c11200112.pfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
+	local mg2=nil
 	local sg2=nil
 	local ce=Duel.GetChainMaterial(tp)
 	if ce~=nil then
 		local fgroup=ce:GetTarget()
-		mg3=fgroup(ce,e,tp)
+		mg2=fgroup(ce,e,tp)
 		local mf=ce:GetValue()
-		sg2=Duel.GetMatchingGroup(c11200112.kfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
+		sg2=Duel.GetMatchingGroup(c11200112.pfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
 	end
 	if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
 		local sg=sg1:Clone()
@@ -127,47 +130,48 @@ function c11200112.kactivate(e,tp,eg,ep,ev,re,r,rp)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 		local tg=sg:Select(tp,1,1,nil)
 		local tc=tg:GetFirst()
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
-		e1:SetValue(0)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD)
-		tc:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
-		tc:RegisterEffect(e2)
 		if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
-			local mat=Duel.SelectFusionMaterial(tp,tc,mg,nil,chkf)
-			tc:SetMaterial(mat)
-			Duel.SendtoDeck(mat,nil,2,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
+			local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
+			tc:SetMaterial(mat1)
+			Duel.SendtoDeck(mat1,nil,2,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
 			Duel.BreakEffect()
-			Duel.SpecialSummonStep(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
-				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:SetLabelObject(tc)
-				e1:SetCondition(c11200112.rmcon)
-				e1:SetOperation(c11200112.rmop)
-				e1:SetLabel(Duel.GetTurnCount())
-				e1:SetReset(RESET_PHASE+PHASE_END+RESET_SELF_TURN,2)
-				Duel.RegisterEffect(e1,tp)
-			Duel.SpecialSummonComplete()
-			tc:RegisterFlagEffect(11200112,RESET_EVENT+RESETS_STANDARD,0,1)
+			Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
 		else
-			local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,nil,chkf)
+			local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
 			local fop=ce:GetOperation()
 			fop(ce,e,tp,tc,mat2)
 		end
+		tc:RegisterFlagEffect(11200112,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
 		tc:CompleteProcedure()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e1:SetCode(EVENT_PHASE+PHASE_END)
+		e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+		e1:SetCountLimit(1)
+		e1:SetLabel(fid)
+		e1:SetLabelObject(tc)
+		e1:SetCondition(c11200112.rmcon)
+		e1:SetOperation(c11200112.rmop)
+		e1:SetReset(RESET_PHASE+PHASE_END)
+		Duel.RegisterEffect(e1,tp)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_FIELD)
+		e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+		e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e2:SetTargetRange(1,0)
+		e2:SetTarget(c11200112.splimit)
+		e2:SetReset(RESET_PHASE+PHASE_END)
+		Duel.RegisterEffect(e2,tp)
 	end
 end
 function c11200112.rmcon(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()
-	return Duel.GetTurnPlayer()==tp and Duel.GetTurnCount()~=e:GetLabel() and tc:GetFlagEffect(11200112)~=0
+	return tc:GetFlagEffectLabel(11200112)==e:GetLabel()
 end
 function c11200112.rmop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()
 	Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
 end
+function c11200112.splimit(e,c)
+	return not c:IsType(TYPE_FUSION) and c:IsLocation(LOCATION_EXTRA)
+end

expansions/script/c11200210.lua

@@ -48,6 +48,9 @@ end
 function c11200210.subcon(e)
 	return e:GetHandler():IsLocation(LOCATION_ONFIELD)
 end
+function c11200210.nfilter(c)
+	return c:IsFaceup() and (c:IsType(TYPE_RITUAL) or c:IsType(TYPE_FUSION)) and c:IsAttribute(ATTRIBUTE_FIRE)
+end
 function c11200210.actcon(e)
-	return Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_REMOVED,0,1,nil,11200103) or Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_REMOVED,0,1,nil,11200104)
+	return Duel.IsExistingMatchingCard(c11200210.nfilter,e:GetHandlerPlayer(),LOCATION_REMOVED,0,1,nil)
 end

expansions/script/c1197001.lua

+--受托之愿·梅特蕾
+function c1197001.initial_effect(c)
+--
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET) 
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,1197001)
+	e1:SetTarget(c1197001.tg1)
+	e1:SetOperation(c1197001.op1)
+	c:RegisterEffect(e1)
+--
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(1197001,0))
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_TODECK+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,1197001+500)
+	e2:SetCondition(c1197001.con2)
+	e2:SetCost(c1197001.cost2)
+	e2:SetTarget(c1197001.tg2)
+	e2:SetOperation(c1197001.op2)
+	c:RegisterEffect(e2)
+--
+end
+--
+function c1197001.tfilter(c,tp)
+	return c:IsFaceup() and c:IsAbleToHand()
+		and c:IsRace(RACE_SEASERPENT) and Duel.GetMZoneCount(tp,c,tp)>0
+end
+function c1197001.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and c1197001.tfilter(chkc,tp) end
+	if chk==0 then
+		return Duel.GetMZoneCount(tp)>0
+			and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false)
+			and Duel.IsExistingTarget(c1197001.tfilter,tp,LOCATION_MZONE,0,1,nil,tp)
+	end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+	local g=Duel.SelectTarget(tp,c1197001.tfilter,tp,LOCATION_MZONE,0,1,1,nil,tp)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_MZONE)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+--
+function c1197001.op1(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if not c:IsRelateToEffect(e) then return end
+	if not tc:IsRelateToEffect(e) then return end
+	if Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 then
+		if Duel.GetMZoneCount(tp)<1 then return end
+		if c:IsCanBeSpecialSummoned(e,0,tp,false,false) then
+			Duel.BreakEffect()
+			if Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) then
+				c:RegisterFlagEffect(1197001,RESET_EVENT+0x1fe0000,0,1)
+				Duel.SpecialSummonComplete()
+			end
+		end
+	end
+end
+--
+function c1197001.con2(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetFlagEffect(1197001)>0
+end
+--
+function c1197001.cfilter2(c,tc)
+	return (c==tc and c:IsReleasable()) or (c:IsLocation(LOCATION_HAND) and c:IsDiscardable() and c:IsRace(RACE_SEASERPENT))
+end
+function c1197001.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.IsExistingMatchingCard(c1197001.cfilter2,tp,LOCATION_MZONE+LOCATION_HAND,0,1,nil,c) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELF)
+	local g=Duel.SelectMatchingCard(tp,c1197001.cfilter2,tp,LOCATION_MZONE+LOCATION_HAND,0,1,1,nil,c)
+	if c==g:GetFirst() then Duel.Release(g,REASON_COST)
+	else Duel.SendtoGrave(g,REASON_DISCARD+REASON_COST) end
+end
+--
+function c1197001.tg2(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 c1197001.op2(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
+--

expansions/script/c17060870.lua

@@ -3,11 +3,11 @@ local m=17060870
 local cm=_G["c"..m]
 function cm.initial_effect(c)
 	--link summon
-	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_PENDULUM),2,2,cm.lcheck)
+	aux.AddLinkProcedure(c,nil,2,2,cm.lcheck)
 	c:EnableReviveLimit()
 	--sp summon
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetDescription(aux.Stringid(17060870,0))
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
@@ -18,7 +18,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 	--cannot be target/battle indestructable
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,1))
+	e2:SetDescription(aux.Stringid(17060870,1))
 	e2:SetType(EFFECT_TYPE_FIELD)
 	e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
 	e2:SetRange(LOCATION_MZONE)

expansions/script/c17060882.lua

@@ -5,16 +5,13 @@ function cm.initial_effect(c)
 	--link summon
 	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_EFFECT),2)
 	c:EnableReviveLimit()
-	--destroy replace
+	--summon success
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e1:SetCode(EFFECT_DESTROY_REPLACE)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCondition(cm.descon)
-	e1:SetTarget(cm.reptg)
-	e1:SetValue(cm.repval)
-	e1:SetOperation(cm.repop)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCondition(cm.regcon)
+	e1:SetOperation(cm.regop)
 	c:RegisterEffect(e1)
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE)
@@ -28,17 +25,34 @@ function cm.initial_effect(c)
 	e3:SetCategory(CATEGORY_CONTROL)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_DAMAGE_STEP_END)
-	e3:SetCountLimit(1,m)
 	e3:SetCondition(cm.rmcon)
 	e3:SetTarget(cm.rmtg)
 	e3:SetOperation(cm.rmop)
 	c:RegisterEffect(e3)
+	--destroy replace
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e4:SetCode(EFFECT_DESTROY_REPLACE)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCondition(cm.descon)
+	e4:SetTarget(cm.reptg)
+	e4:SetValue(cm.repval)
+	e4:SetOperation(cm.repop)
+	c:RegisterEffect(e4)
 end
 cm.is_named_with_domovo_i=1
 cm.is_named_with_Ma_Elf=1
-function cm.descon(e,tp,eg,ep,ev,re,r,rp)
+function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK) and e:GetLabel()==1
 end
+function cm.regop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	c:RegisterFlagEffect(17060882,RESET_EVENT+RESETS_STANDARD,0,1)
+	c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(17060882,2))
+end
+function cm.descon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetFlagEffect(17060882)>0
+end
 function cm.valcheck(e,c)
 	local g=c:GetMaterial()
 	if g:IsExists(Card.IsType,1,nil,TYPE_PENDULUM) then
@@ -49,13 +63,14 @@ function cm.valcheck(e,c)
 end
 function cm.repfilter(c,tp,hc)
 	return c:IsFaceup() and c:IsLocation(LOCATION_MZONE)
-		and (c:IsControler(tp) or c:IsControler(1-tp)) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and hc:GetLinkedGroup():IsContains(c)
+		and (c:IsReason(REASON_BATTLE) or (c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp)) and hc:GetLinkedGroup():IsContains(c)
 end
 function cm.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
 	if chk==0 then return ((Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
 	or (Duel.CheckLocation(1-tp,LOCATION_PZONE,0) or Duel.CheckLocation(1-tp,LOCATION_PZONE,1))) 
 	and eg:IsExists(cm.repfilter,1,nil,tp,e:GetHandler()) end
-	return Duel.SelectYesNo(tp,aux.Stringid(m,2))
+	return Duel.SelectEffectYesNo(tp,c,96)
 end
 function cm.repval(e,c)
 	return cm.repfilter(c,e:GetHandlerPlayer(),e:GetHandler())
@@ -64,23 +79,29 @@ function cm.psfilter(c)
 	return c:IsType(TYPE_PENDULUM) and not c:IsForbidden()
 end
 function cm.repop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
-	local g=Duel.SelectMatchingCard(tp,cm.psfilter,tp,LOCATION_DECK,0,1,1,nil)
-	if g:GetCount()>0 then
 	local b1=(Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
 	local b2=(Duel.CheckLocation(1-tp,LOCATION_PZONE,0) or Duel.CheckLocation(1-tp,LOCATION_PZONE,1))
-	local op=0
-	if b1 and b2 then
-		op=Duel.SelectOption(tp,aux.Stringid(m,3),aux.Stringid(m,4))
-	elseif b1 then
-		op=Duel.SelectOption(tp,aux.Stringid(m,3))
-	elseif b2 then
-		op=Duel.SelectOption(tp,aux.Stringid(m,4))+1
-	else return end
-	if op==0 then
-		Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	local off=1
+	local ops={}
+	local opval={}
+	if b1 then
+		ops[off]=aux.Stringid(17060882,0)
+		opval[off-1]=1
+		off=off+1
+	end
+	if b2 then
+		ops[off]=aux.Stringid(17060882,1)
+		opval[off-1]=2
+		off=off+1
+	end
+		local op=Duel.SelectOption(tp,table.unpack(ops))
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
+		local g=Duel.SelectMatchingCard(tp,cm.psfilter,tp,LOCATION_DECK,0,1,1,nil)
+		if g:GetCount()>0 then
+		if op==0 then
+			Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
 		else 
-		Duel.MoveToField(g:GetFirst(),tp,1-tp,LOCATION_SZONE,POS_FACEUP,true)
+			Duel.MoveToField(g:GetFirst(),tp,1-tp,LOCATION_SZONE,POS_FACEUP,true)
 		end
 	end
 end

expansions/script/c17060883.lua

@@ -33,32 +33,16 @@ function cm.initial_effect(c)
 	e5:SetCode(EVENT_FREE_CHAIN)
 	e5:SetRange(LOCATION_MZONE)
 	e5:SetHintTiming(0,0x1e0)
-	e5:SetCountLimit(1,m)
+	e5:SetCountLimit(1,17060883)
 	e5:SetCondition(cm.ctcon)
 	e5:SetTarget(cm.cttg)
 	e5:SetOperation(cm.ctop)
 	c:RegisterEffect(e5)
-	--
-	if not Card.IsLinkState then
-		function Card.IsLinkState(c)
-			if not c then return false end
-			if c:IsType(TYPE_LINK) and c:GetLinkedGroupCount()>0 then return true end
-			local g=Duel.GetMatchingGroup(Card.IsType,0,LOCATION_MZONE,LOCATION_MZONE,nil,TYPE_LINK)
-			local lc=g:GetFirst()
-			while lc do
-				local lg=lc:GetLinkedGroup()
-				if lg and lg:IsContains(c) then return true end
-				lc=g:GetNext()
-			end
-			return false
-		end
-	end
 end
 cm.is_named_with_domovo_i=1
 cm.is_named_with_Ma_Elf=1
 function cm.incon(e)
-	local c=e:GetHandler()
-	return c:IsLinkState()
+	return e:GetHandler():IsLinkState()
 end
 function cm.atlimit(e,c)
 	return c~=e:GetHandler()

expansions/script/c17060884.lua

@@ -11,19 +11,15 @@ function cm.initial_effect(c)
 	e0:SetCode(EFFECT_EXTRA_ATTACK)
 	e0:SetValue(cm.ctval)
 	c:RegisterEffect(e0)
-	--eff
+	--indes
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
 	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 	e1:SetRange(LOCATION_MZONE)
-	e1:SetCode(EFFECT_IMMUNE_EFFECT)
-	e1:SetValue(cm.efilter)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
 	e1:SetCondition(cm.efcon)
+	e1:SetValue(1)
 	c:RegisterEffect(e1)
-	local e2=e1:Clone()
-	e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
-	e2:SetValue(1)
-	c:RegisterEffect(e2)
 	--atk
 	local e3=Effect.CreateEffect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE)
@@ -35,7 +31,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 	--negate+copy
 	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(m,3))
+	e4:SetDescription(aux.Stringid(17060884,0))
 	e4:SetCategory(CATEGORY_DISABLE+CATEGORY_CONTROL)
 	e4:SetType(EFFECT_TYPE_QUICK_O)
 	e4:SetCode(EVENT_FREE_CHAIN)
@@ -72,13 +68,15 @@ function cm.necon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():GetMutualLinkedGroupCount()>=3
 end
 function cm.necost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():GetFlagEffect(m)==0 end
-	e:GetHandler():RegisterFlagEffect(m,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
+	if chk==0 then return e:GetHandler():GetFlagEffect(17060884)==0 end
+	e:GetHandler():RegisterFlagEffect(17060884,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
+end
+function c6958551.filter(c)
+	return c:IsFaceup() and c:IsControlerCanBeChanged()
 end
-
 function cm.netg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsControlerCanBeChanged() end
-	if chk==0 then return Duel.IsExistingTarget(Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,nil) end
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c6958551.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c6958551.filter,tp,0,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
 	local g=Duel.SelectTarget(tp,Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)

expansions/script/c17060890.lua

@@ -65,7 +65,7 @@ function c17060890.filter(c,e,tp,zone)
 	return c:IsType(TYPE_PENDULUM) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
 end
 function c17060890.scfilter(c,pc)
-	return c:GetLeftScale()>=3
+	return c:GetLeftScale()~=1
 end
 function c17060890.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chkc then return chkc:IsLocation(LOCATION_PZONE) and chkc:IsControler(tp) and c17060890.scfilter(chkc) end
@@ -79,15 +79,15 @@ function c17060890.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 end
 function c17060890.spop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) and tc:GetLeftScale()>=3 then
+	if tc:IsRelateToEffect(e) and tc:GetLeftScale()~=1 then
 		local e1=Effect.CreateEffect(e:GetHandler())
 		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_UPDATE_LSCALE)
-		e1:SetValue(-3)
+		e1:SetCode(EFFECT_CHANGE_LSCALE)
+		e1:SetValue(1)
 		e1:SetReset(RESET_EVENT+0x1fe0000)
 		tc:RegisterEffect(e1)
 		local e2=e1:Clone()
-		e2:SetCode(EFFECT_UPDATE_RSCALE)
+		e2:SetCode(EFFECT_CHANGE_RSCALE)
 		tc:RegisterEffect(e2)
 		local zone=e:GetHandler():GetLinkedZone()
 		if zone==0 then return end

expansions/script/c17060910.lua

@@ -15,7 +15,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e1)
 	--des
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,0))
+	e2:SetDescription(aux.Stringid(17060910,0))
 	e2:SetCategory(CATEGORY_DESTROY)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
 	e2:SetCode(EVENT_FREE_CHAIN)

expansions/script/c17091003.lua

 --ユニコーンガンダム バンシー
 function c17091003.initial_effect(c)
 	--link summon
-	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2)
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_MACHINE),2)
 	c:EnableReviveLimit()
+	--FTK
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(17091003,0))
+	e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
 	e1:SetProperty(EFFECT_FLAG_DELAY)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
 	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
+	e1:SetCountLimit(1,17091003)
 	e1:SetCondition(c17091003.atkcon)
 	e1:SetOperation(c17091003.atkop)
 	c:RegisterEffect(e1)

expansions/script/c17091005.lua

+--Valvrave Ⅰ
+local m=17091005
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	--atk up
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(cm.atkval)
+	c:RegisterEffect(e1)
+	--special summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(17091005,1))
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetOperation(cm.lvop)
+	c:RegisterEffect(e2)
+	--selfdes
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e3:SetRange(LOCATION_ONFIELD)
+	e3:SetCode(EFFECT_SELF_DESTROY)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetTargetRange(0,LOCATION_ONFIELD)
+	e4:SetCondition(cm.sdcon)
+	e4:SetLabelObject(e3)
+	c:RegisterEffect(e4)
+	--atklimit
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_SINGLE)
+	e5:SetCode(EFFECT_CANNOT_ATTACK)
+	e5:SetCondition(cm.atkcon)
+	c:RegisterEffect(e5)
+end
+function cm.atkval(e,c)
+	return c:GetLevel()*100
+end
+function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local lv=c:GetLevel()*2
+	if lv>666 then lv=666 end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_CHANGE_LEVEL)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(lv)
+	e1:SetReset(RESET_EVENT+0xff0000)
+	c:RegisterEffect(e1)
+end
+function cm.sdcon(e)
+	return e:GetHandler():GetLevel()==666
+end
+function cm.atkcon(e)
+	return e:GetHandler():GetLevel()>100 and e:GetHandler():GetLevel()<666
+end
\ No newline at end of file

expansions/script/c17091006.lua

+--Valvrave Ⅰ
+local m=17091006
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	aux.EnablePendulumAttribute(c)
+	--atk up
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(cm.atkval)
+	c:RegisterEffect(e1)
+	--level up 
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(17091006,0))
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetOperation(cm.lvop)
+	c:RegisterEffect(e2)
+	--halve LP
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(17091006,1))
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e3:SetCode(EVENT_PHASE+PHASE_END)
+	e3:SetRange(LOCATION_PZONE)
+	e3:SetCountLimit(1)
+	e3:SetCondition(cm.hvcon)
+	e3:SetOperation(cm.hvop)
+	c:RegisterEffect(e3)
+	--destroy replace
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e4:SetRange(LOCATION_ONFIELD)
+	e4:SetCode(EFFECT_DESTROY_REPLACE)
+	e4:SetTarget(cm.reptg)
+	c:RegisterEffect(e4)
+	--atklimit
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_SINGLE)
+	e5:SetCode(EFFECT_CANNOT_ATTACK)
+	e5:SetCondition(cm.atkcon)
+	c:RegisterEffect(e5)
+end
+function cm.atkval(e,c)
+	return c:GetLevel()*100
+end
+function cm.lvop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local lv=c:GetLevel()*2
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_CHANGE_LEVEL)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(lv)
+	e1:SetReset(RESET_EVENT+0xff0000)
+	c:RegisterEffect(e1)
+end
+function cm.sdcon(e)
+	return e:GetHandler():GetLevel()==666
+end
+function cm.atkcon(e)
+	return e:GetHandler():GetLevel()>100 and e:GetHandler():GetLevel()<666
+end
+function cm.spfilter(c,e,tp)
+	return c:IsCode(17091005) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.hvcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
+function cm.hvop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SetLP(tp,math.ceil(Duel.GetLP(tp)/2))
+end
+
+function cm.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 c:IsReason(REASON_REPLACE)
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=1 then return end
+	if Duel.SelectEffectYesNo(tp,c,96) then
+		Duel.SendtoDeck(c,nil,2,REASON_EFFECT+REASON_REPLACE)
+		Duel.BreakEffect()
+		if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+		return true
+	else return false end
+end

expansions/script/c26805008.lua

@@ -37,15 +37,5 @@ function c26805008.atkop(e,tp,eg,ep,ev,re,r,rp)
 		e1:SetValue(1000)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 		tc:RegisterEffect(e1)
-		local e3=Effect.CreateEffect(c)
-		e3:SetType(EFFECT_TYPE_SINGLE)
-		e3:SetCode(EFFECT_DISABLE)
-		e3:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e3)
-		local e4=Effect.CreateEffect(c)
-		e4:SetType(EFFECT_TYPE_SINGLE)
-		e4:SetCode(EFFECT_DISABLE_EFFECT)
-		e4:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e4)
 	end
 end

expansions/script/c26806007.lua

@@ -8,15 +8,18 @@ function c26806007.initial_effect(c)
 	e0:SetCode(EFFECT_SUMMON_PROC)
 	e0:SetCondition(c26806007.ntcon)
 	c:RegisterEffect(e0)
-	--special summon
+	--remove
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_GRAVE)
+	e1:SetCategory(CATEGORY_REMOVE)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
 	e1:SetCountLimit(1,26806007)
-	e1:SetCost(c26806007.spcost)
-	e1:SetTarget(c26806007.sptg)
-	e1:SetOperation(c26806007.spop)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetCost(c26806007.rmcost)
+	e1:SetTarget(c26806007.rmtg)
+	e1:SetOperation(c26806007.rmop)
 	c:RegisterEffect(e1)
 end
 function c26806007.filter(c)
@@ -27,36 +30,24 @@ function c26806007.ntcon(e,c,minc)
 	return minc==0 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
 		and Duel.IsExistingMatchingCard(c26806007.filter,c:GetControler(),LOCATION_MZONE,0,1,nil)
 end
-function c26806007.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
-	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
-end
-function c26806007.spfilter(c,e,tp)
-	return c:IsAttack(2200) and c:IsDefense(600) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c26806007.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c26806007.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
-end
-function c26806007.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,c26806007.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
-	local tc=g:GetFirst()
-	if tc and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-		e1:SetRange(LOCATION_MZONE)
-		e1:SetCode(EFFECT_IMMUNE_EFFECT)
-		e1:SetValue(c26806007.efilter)
-		e1:SetOwnerPlayer(tp)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		tc:RegisterEffect(e1,true)
-		Duel.SpecialSummonComplete()
+function c26806007.cfilter(c)
+	return c:IsAttack(2200) and c:IsDefense(600)
+end
+function c26806007.rmcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,c26806007.cfilter,1,nil) end
+	local g=Duel.SelectReleaseGroup(tp,c26806007.cfilter,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c26806007.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_ONFIELD) and chkc:IsAbleToRemove() end
+	if chk==0 then return true end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
+end
+function c26806007.rmop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
 	end
 end
-function c26806007.efilter(e,re)
-	return e:GetOwnerPlayer()~=re:GetOwnerPlayer() and (re:IsActiveType(TYPE_TRAP) or re:IsActiveType(TYPE_SPELL))
-end

expansions/script/c26806010.lua

@@ -11,7 +11,6 @@ function c26806010.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
 	e3:SetCode(EVENT_BATTLE_DAMAGE)
 	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetCountLimit(1,26806010)
 	e3:SetCondition(c26806010.descon)
 	e3:SetTarget(c26806010.destg)
 	e3:SetOperation(c26806010.desop)

expansions/script/c26806011.lua

 --星海空间·海伊
 function c26806011.initial_effect(c)
 	--xyz summon
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_WATER),6,2)
+	aux.AddXyzProcedure(c,nil,6,2)
 	c:EnableReviveLimit()
 	--multi attack
 	local e1=Effect.CreateEffect(c)
@@ -33,8 +33,7 @@ function c26806011.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
 end
 function c26806011.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():GetEffectCount(EFFECT_EXTRA_ATTACK)==0
-		and e:GetHandler():GetEffectCount(EFFECT_EXTRA_ATTACK_MONSTER)==0 end
+	if chk==0 then return e:GetHandler():GetEffectCount(EFFECT_EXTRA_ATTACK)==0 end
 end
 function c26806011.atkop(e,tp,eg,ep,ev,re,r,rp)
 	local c=e:GetHandler()
@@ -42,7 +41,7 @@ function c26806011.atkop(e,tp,eg,ep,ev,re,r,rp)
 		local e1=Effect.CreateEffect(c)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
+		e1:SetCode(EFFECT_EXTRA_ATTACK)
 		e1:SetValue(1)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		c:RegisterEffect(e1)

expansions/script/c26806020.lua

@@ -70,7 +70,7 @@ function c26806020.indtg(e,c)
 	return e:GetHandler():GetLinkedGroup():IsContains(c) or e:GetHandler()==c
 end
 function c26806020.tscon(e,tp,eg,ep,ev,re,r,rp)
-	return rp==tp and re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsType(TYPE_CONTINUOUS) and re:GetHandler():IsType(TYPE_SPELL)
+	return rp==tp and re and re:GetHandler():IsCode(26806009)
 		and e:GetHandler():GetFlagEffect(1)>0
 end
 function c26806020.tsfilter(c)

expansions/script/c26806058.lua

+--渡桥挽歌·星尘
+function c26806058.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	c:EnableReviveLimit()
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,26806058)
+	e1:SetTarget(c26806058.target)
+	e1:SetOperation(c26806058.operation)
+	c:RegisterEffect(e1)
+	--atkup
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_ATKCHANGE)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetCountLimit(1,26806958)
+	e3:SetTarget(c26806058.atktg2)
+	e3:SetOperation(c26806058.atkop2)
+	c:RegisterEffect(e3)
+end
+function c26806058.filter(c,e,tp)
+	return c:IsAttack(2200) and c:IsDefense(600) and c:IsSummonableCard() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c26806058.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c26806058.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c26806058.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c26806058.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+end
+function c26806058.operation(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
+function c26806058.atkfilter2(c)
+	return c:IsFaceup() and ((c:IsAttack(2200) and c:IsDefense(600)) or (c:IsAttack(3200) and c:IsType(TYPE_LINK)))
+end
+function c26806058.atktg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c26806058.atkfilter2(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c26806058.atkfilter2,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c26806058.atkfilter2,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c26806058.atkop2(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(1800)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1)
+	end
+end

expansions/script/c26806059.lua

+--绮·凝·盏
+function c26806059.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetCondition(c26806059.condition)
+	e1:SetTarget(c26806059.target)
+	e1:SetOperation(c26806059.activate)
+	c:RegisterEffect(e1)
+	--immune
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_CHAINING)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,26806059)
+	e2:SetCondition(c26806059.immcon)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c26806059.immtg)
+	e2:SetOperation(c26806059.immop)
+	c:RegisterEffect(e2)
+end
+function c26806059.cfilter(c)
+	return c:IsFaceup() and ((c:IsAttack(2200) and c:IsDefense(600)) or (c:IsAttack(3200) and c:IsType(TYPE_LINK)))
+end
+function c26806059.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(c26806059.cfilter,tp,LOCATION_MZONE,0,1,nil)
+	and rp==1-tp and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE))
+		and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_GRAVE+LOCATION_REMOVED,1,nil,re:GetHandler():GetCode())
+		and Duel.IsChainNegatable(ev)
+end
+function c26806059.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)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+	end
+end
+function c26806059.activate(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Destroy(eg,REASON_EFFECT)
+	end
+end
+function c26806059.immcon(e,tp,eg,ep,ev,re,r,rp)
+	return rp==1-tp and re:IsActiveType(TYPE_MONSTER)
+end
+function c26806059.immfilter(c)
+	return c:IsFaceup() and c:IsAttack(2200) and c:IsDefense(600) and not c:IsSummonableCard()
+end
+function c26806059.immtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c26806059.immfilter,tp,LOCATION_MZONE,0,1,nil) end
+end
+function c26806059.immop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c26806059.immfilter,tp,LOCATION_MZONE,0,nil)
+	local tc=g:GetFirst()
+	while tc do
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e1:SetCode(EFFECT_IMMUNE_EFFECT)
+		e1:SetRange(LOCATION_MZONE)
+		e1:SetValue(c26806059.efilter)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+		tc=g:GetNext()
+	end
+end
+function c26806059.efilter(e,te,c)
+	return te:GetOwner()~=c
+end

expansions/script/c26807030.lua

@@ -19,7 +19,7 @@ function c26807030.filter(c,e,tp,m)
 	return m:CheckWithSumEqual(Card.GetRitualLevel,c:GetLevel(),1,99,c)
 end
 function c26807030.matfilter(c)
-	return c:IsCode(81011000,81000000,26807000,26800000) and c:IsAbleToGrave()
+	return c:IsType(TYPE_NORMAL) and c:IsAttribute(ATTRIBUTE_WIND) and c:IsAbleToGrave()
 end
 function c26807030.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then

expansions/script/c26807059.lua

@@ -13,8 +13,8 @@ end
 function c26807059.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end
 	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(1500)
-	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,1500)
+	Duel.SetTargetParam(1000)
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,tp,1000)
 	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
 		Duel.SetChainLimit(aux.FALSE)
 	end

expansions/script/c26809006.lua

---难受火炉房
+--鱼禁止上岸人禁止下水
 function c26809006.initial_effect(c)
 	--Activate
 	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_DESTROY)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetCondition(c26809006.condition)
-	e1:SetTarget(c26809006.target)
-	e1:SetOperation(c26809006.activate)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCondition(c26809006.actcon)
 	c:RegisterEffect(e1)
+	--atk/def
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_SET_ATTACK_FINAL)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e2:SetTarget(c26809006.target)
+	e2:SetValue(0)
+	c:RegisterEffect(e2)
+	local e3=e2:Clone()
+	e3:SetCode(EFFECT_SET_DEFENSE_FINAL)
+	c:RegisterEffect(e3)
+	--Pos Change
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD)
+	e5:SetCode(EFFECT_SET_POSITION)
+	e5:SetRange(LOCATION_MZONE)
+	e5:SetTarget(c26809006.target)
+	e5:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e5:SetValue(POS_FACEUP_DEFENSE)
+	c:RegisterEffect(e5)
 end
-function c26809006.cfilter(c,tp)
-	return c:IsFaceup() and c:IsPreviousLocation(LOCATION_GRAVE) and c:GetPreviousControler()==1-tp
-		and c:IsControler(tp)
+function c26809006.cfilter(c)
+	return c:IsRace(RACE_FISH)
 end
-function c26809006.condition(e,tp,eg,ep,ev,re,r,rp,chk)
-	return eg:IsExists(c26809006.cfilter,1,nil,1-tp)
+function c26809006.actcon(e,tp,eg,ep,ev,re,r,rp)
+	return not Duel.IsExistingMatchingCard(c26809006.cfilter,tp,LOCATION_MZONE,0,1,nil)
 end
-function c26809006.target(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,2,e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,2,2,e:GetHandler())
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,2,0,0)
-end
-function c26809006.activate(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
-	Duel.Destroy(g,REASON_EFFECT)
+function c26809006.target(e,c)
+	return c:IsRace(RACE_FISH)
 end

expansions/script/c26809031.lua

+--S·O·R·A
+function c26809031.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:SetCost(c26809031.cost)
+	e1:SetTarget(c26809031.target)
+	e1:SetOperation(c26809031.operation)
+	c:RegisterEffect(e1)
+	--destroy
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e2:SetCode(EVENT_LEAVE_FIELD_P)
+	e2:SetOperation(c26809031.checkop)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+	e3:SetCode(EVENT_LEAVE_FIELD)
+	e3:SetOperation(c26809031.desop)
+	e3:SetLabelObject(e2)
+	c:RegisterEffect(e3)
+	Duel.AddCustomActivityCounter(26809031,ACTIVITY_SUMMON,c26809031.counterfilter)
+	Duel.AddCustomActivityCounter(26809031,ACTIVITY_SPSUMMON,c26809031.counterfilter)
+	Duel.AddCustomActivityCounter(26809031,ACTIVITY_FLIPSUMMON,c26809031.counterfilter)
+	Duel.AddCustomActivityCounter(26809031,ACTIVITY_CHAIN,c26809031.chainfilter)
+end
+function c26809031.chainfilter(re,tp)
+	return not re:IsActiveType(TYPE_MONSTER)
+end
+function c26809031.counterfilter(c)
+	return not c:IsType(TYPE_EFFECT)
+end
+function c26809031.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(26809031,tp,ACTIVITY_SUMMON)==0
+		and Duel.GetCustomActivityCount(26809031,tp,ACTIVITY_SPSUMMON)==0 
+		and Duel.GetCustomActivityCount(26809031,tp,ACTIVITY_FLIPSUMMON)==0 and Duel.GetCustomActivityCount(26809031,tp,ACTIVITY_CHAIN)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c26809031.sumlimit)
+	Duel.RegisterEffect(e1,tp)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_CANNOT_SUMMON)
+	Duel.RegisterEffect(e2,tp)
+	local e3=e1:Clone()
+	e3:SetCode(EFFECT_CANNOT_FLIP_SUMMON)
+	Duel.RegisterEffect(e3,tp)
+	local e4=Effect.CreateEffect(e:GetHandler())
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e4:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e4:SetTargetRange(1,0)
+	e4:SetValue(c26809031.aclimit)
+	e4:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e4,tp)
+end
+function c26809031.sumlimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return c:IsType(TYPE_EFFECT)
+end
+function c26809031.aclimit(e,re,tp)
+	return re:IsActiveType(TYPE_MONSTER)
+end
+function c26809031.spfilter(c,e,tp)
+	return c:IsType(TYPE_NORMAL) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c26809031.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c26809031.spfilter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(c26809031.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectTarget(tp,c26809031.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
+end
+function c26809031.operation(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 Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
+		Duel.Equip(tp,c,tc)
+		--Add Equip limit
+		local e1=Effect.CreateEffect(tc)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_EQUIP_LIMIT)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetValue(c26809031.eqlimit)
+		c:RegisterEffect(e1)
+		Duel.SpecialSummonComplete()
+	end
+end
+function c26809031.eqlimit(e,c)
+	return e:GetOwner()==c
+end
+function c26809031.checkop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsDisabled() then
+		e:SetLabel(1)
+	else e:SetLabel(0) end
+end
+function c26809031.desop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetLabelObject():GetLabel()~=0 then return end
+	local tc=e:GetHandler():GetFirstCardTarget()
+	if tc and tc:IsLocation(LOCATION_MZONE) then
+		Duel.Destroy(tc,REASON_EFFECT)
+	end
+end

expansions/script/c26809032.lua

+--死亡之力·黛冬优子
+function c26809032.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	c:EnableReviveLimit()
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,26809032)
+	e1:SetCondition(c26809032.tdcon)
+	e1:SetTarget(c26809032.tdtg)
+	e1:SetOperation(c26809032.tdop)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,26809932)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c26809032.thtg)
+	e2:SetOperation(c26809032.thop)
+	c:RegisterEffect(e2)
+	--reset atk
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_DEFCHANGE)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_BATTLE_CONFIRM)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCondition(c26809032.atkcon2)
+	e3:SetOperation(c26809032.atkop2)
+	c:RegisterEffect(e3)
+end
+function c26809032.tdcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
+end
+function c26809032.filter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToDeck()
+end
+function c26809032.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c26809032.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	local g=Duel.GetMatchingGroup(c26809032.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	Duel.SetChainLimit(c26809032.chlimit)
+end
+function c26809032.chlimit(e,ep,tp)
+	return tp==ep
+end
+function c26809032.tdop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c26809032.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
+	end
+end
+function c26809032.atkcon2(e,tp,eg,ep,ev,re,r,rp)
+	local a=Duel.GetAttacker()
+	local d=a:GetBattleTarget()
+	if a:IsControler(tp) then a,d=d,a end
+	return a and a:IsControler(1-tp) and c:IsDefensePos() and not a:IsDefense(0)
+end
+function c26809032.atkop2(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetAttacker()
+	if tc:IsControler(tp) then tc=tc:GetBattleTarget() end
+	if tc and tc:IsFaceup() and not tc:IsDefense(0) then
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_DEFENSE_FINAL)
+		e1:SetValue(0)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE_CAL)
+		tc:RegisterEffect(e1)
+	end
+end
+function c26809032.thfilter(c)
+	return c:IsRace(RACE_CYBERSE) and c:IsType(TYPE_TUNER) and c:IsAbleToHand()
+end
+function c26809032.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c26809032.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c26809032.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c26809032.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

expansions/script/c30000200.lua

+--暗魔力的爆发
+function c30000200.initial_effect(c)
+  --Activate
+    local e1=Effect.CreateEffect(c)
+    e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+    e1:SetType(EFFECT_TYPE_ACTIVATE)
+    e1:SetCode(EVENT_FREE_CHAIN)
+    e1:SetCountLimit(1,30000200+EFFECT_COUNT_CODE_OATH)
+    e1:SetCost(c30000200.cost)
+    e1:SetTarget(c30000200.target)
+    e1:SetOperation(c30000200.activate)
+    c:RegisterEffect(e1)
+end
+function c30000200.cost(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 c30000200.filter(c)
+    return c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsDefenseAbove(2000)and c:IsLevelAbove(6) and c:IsAbleToHand()
+end
+function c30000200.target(e,tp,eg,ep,ev,re,r,rp,chk)
+    if chk==0 then return Duel.IsExistingMatchingCard(c30000200.filter,tp,LOCATION_DECK+LOCATION_REMOVED,0,1,nil) end
+    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_REMOVED)
+end
+function c30000200.activate(e,tp,eg,ep,ev,re,r,rp)
+    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+    local g=Duel.SelectMatchingCard(tp,c30000200.filter,tp,LOCATION_DECK+LOCATION_REMOVED,0,1,2,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/c30000205.lua

+--不灭的黑暗
+function c30000205.initial_effect(c)
+	  --Activate
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_ACTIVATE)
+	e0:SetCode(EVENT_FREE_CHAIN)
+	c:RegisterEffect(e0)
+	--set
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(30000205,0))
+	e1:SetCategory(CATEGORY_DRAW+CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_SZONE)
+	e1:SetCountLimit(1,30000205)
+	e1:SetTarget(c30000205.target)
+	e1:SetOperation(c30000205.activate)
+	c:RegisterEffect(e1)
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(30000205,1))
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetCountLimit(1,30000205)
+	e2:SetCost(c30000205.cost)
+	e2:SetTarget(c30000205.target1)
+	e2:SetOperation(c30000205.operation)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e3:SetCode(EVENT_REMOVE)
+	e3:SetCountLimit(1,30000206)
+	e3:SetTarget(c30000205.sttg)
+	e3:SetOperation(c30000205.stop)
+	c:RegisterEffect(e3)
+end
+
+function c30000205.filter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsAbleToDeck()
+end
+
+function c30000205.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c30000205.filter(chkc) end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
+		and Duel.IsExistingTarget(c30000205.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,3,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,c30000205.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,3,3,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+
+function c30000205.activate(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)~=3 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==3 then
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+end
+
+function c30000205.cost(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 c30000205.filter(c)
+	return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) and c:IsAbleToHand()
+end
+function c30000205.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED+LOCATION_GRAVE) and c30000205.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c30000205.filter,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectTarget(tp,c30000205.filter,tp,LOCATION_REMOVED+LOCATION_GRAVE,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+
+function c30000205.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,tc)
+	end
+end
+
+function c30000205.sttg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and not c:IsForbidden() and c:CheckUniqueOnField(tp) end
+end
+function c30000205.stop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
+	Duel.MoveToField(e:GetHandler(),tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+end
\ No newline at end of file

expansions/script/c65050001.lua

@@ -18,49 +18,44 @@ function c65050001.initial_effect(c)
 	c:RegisterEffect(e1)
 	--tohand
 	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_RELEASE)
 	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_FZONE)
-	e2:SetCost(c65050001.thcost)
 	e2:SetTarget(c65050001.thtg)
 	e2:SetOperation(c65050001.thop)
 	c:RegisterEffect(e2)
 end
-function c65050001.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsType,1,nil,TYPE_TOKEN) end
-	local lv=0
-	local g=Duel.SelectReleaseGroup(tp,Card.IsType,1,99,nil,TYPE_TOKEN)
-	local rc=g:GetFirst()
-	while rc do
-		lv=lv+rc:GetLevel()
-		rc=g:GetNext()
-	end
-	Duel.Release(g,REASON_COST)
-	e:SetLabel(lv)
+function c65050001.thfilter(c,mg)
+	if not c:IsSetCard(0x3da1) or bit.band(c:GetType(),0x81)~=0x81
+		or not c:IsAbleToHand() then return false end
+	return mg:CheckWithSumGreater(Card.GetLevel,c:GetLevel(),c)
 end
-function c65050001.thfil(c,lv)
-	return c:IsType(TYPE_RITUAL) and c:IsLevelBelow(lv) and c:IsAbleToHand()
+function c65050001.gmfil(c)
+	return c:IsCode(65050012) and c:IsLevelAbove(1) and c:IsReleasable()
 end
 function c65050001.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local rg=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_MZONE,0,nil,TYPE_TOKEN)
-	local rc=rg:GetFirst()
-	local lv=0
-	while rc do
-		lv=lv+rc:GetLevel()
-		rc=rg:GetNext()
+	local mg=Duel.GetMatchingGroup(c65050001.gmfil,tp,LOCATION_MZONE,0,1,nil)
+	if chk==0 then
+		return Duel.IsExistingMatchingCard(c65050001.thfilter,tp,LOCATION_DECK,0,1,nil,mg)
 	end
-	if chk==0 then return Duel.IsExistingMatchingCard(c65050001.thfil,tp,LOCATION_DECK,0,1,nil,lv) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK)
+	Duel.SetOperationInfo(0,CATEGORY_RELEASE,nil,1,tp,LOCATION_MZONE)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
 function c65050001.thop(e,tp,eg,ep,ev,re,r,rp)
-	local lv=e:GetLabel()
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c65050001.thfil,tp,LOCATION_DECK,0,1,1,nil,lv)
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,tp,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
+	local mg=Duel.GetMatchingGroup(c65050001.gmfil,tp,LOCATION_MZONE,0,1,nil)
+	local tg=Duel.SelectMatchingCard(tp,c65050001.thfilter,tp,LOCATION_DECK,0,1,1,nil,mg)
+	local tc=tg:GetFirst()
+	if tc then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+		local g=mg:SelectWithSumGreater(tp,Card.GetLevel,tc:GetLevel(),tc)
+		if Duel.Release(g,REASON_EFFECT)~=0 then
+			Duel.SendtoHand(tc,tp,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		end
 	end
 end
+
+
 function c65050001.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c65050001.spcofil,1,nil) and eg:GetCount()==1 
 end

expansions/script/c65050006.lua

@@ -30,9 +30,6 @@ function c65050006.initial_effect(c)
 	e2:SetTarget(c65050006.sptg)
 	e2:SetOperation(c65050006.spop)
 	c:RegisterEffect(e2)
-	local e3=e2:Clone()
-	e3:SetCode(EVENT_LEAVE_FIELD)
-	c:RegisterEffect(e3)
 end
 function c65050006.descofil(c)
 	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x3da1) and c:IsReleasable()

expansions/script/c65050008.lua

@@ -28,9 +28,6 @@ function c65050008.initial_effect(c)
 	e2:SetTarget(c65050008.sptg)
 	e2:SetOperation(c65050008.spop)
 	c:RegisterEffect(e2)
-	local e3=e2:Clone()
-	e3:SetCode(EVENT_LEAVE_FIELD)
-	c:RegisterEffect(e3)
 end
 function c65050008.cocofil(c)
 	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x3da1) and c:IsReleasable()
@@ -48,7 +45,6 @@ function c65050008.cotg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chk==0 then return Duel.IsExistingTarget(Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 	local g=Duel.SelectTarget(tp,Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
 end
 function c65050008.coop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()

expansions/script/c75646535.lua

+--风色绘卷 温蒂
+function c75646535.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,99,c75646535.lcheck)
+	c:EnableReviveLimit()
+	--tohand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(75646535,0))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,75646535)
+	e1:SetTarget(c75646535.target)
+	e1:SetOperation(c75646535.operation)
+	c:RegisterEffect(e1)
+	--Destroy
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(75646535,1))
+	e2:SetCategory(CATEGORY_DESTROY)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e2:SetCountLimit(1,75646535)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCondition(c75646535.descon)
+	e2:SetTarget(c75646535.destg)
+	e2:SetOperation(c75646535.desop)
+	c:RegisterEffect(e2)
+end
+function c75646535.lcheck(g)
+	return g:IsExists(Card.IsLinkAttribute,1,nil,ATTRIBUTE_WIND)
+end
+function c75646535.thfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function c75646535.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE+LOCATION_GRAVE) and c75646535.thfilter(e,tp) end
+	if chk==0 then return true end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+	local g=Duel.SelectTarget(tp,c75646535.thfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE,1,1,e:GetHandler())
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c75646535.operation(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 c75646535.cfilter(c,lg)
+	return c:IsAttribute(ATTRIBUTE_WIND) and lg:IsContains(c)
+end
+function c75646535.descon(e,tp,eg,ep,ev,re,r,rp)
+	local lg=e:GetHandler():GetLinkedGroup()
+	return eg:IsExists(c75646535.cfilter,1,nil,lg)
+end
+function c75646535.filter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP)
+end
+function c75646535.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() and c75646535.filter(chkc) and chkc~=e:GetHandler() end
+	if chk==0 then return Duel.IsExistingTarget(c75646535.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
+	local g=Duel.SelectTarget(tp,c75646535.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function c75646535.desop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	Duel.Destroy(g,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c75646536.lua

+--同构时空 黛尔塔
+function c75646536.initial_effect(c)
+	--link summon
+	aux.AddLinkProcedure(c,nil,2,99,c75646536.lcheck)
+	c:EnableReviveLimit()
+	--Equip
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(75646536,0))
+	e1:SetCategory(CATEGORY_EQUIP)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(2,75646536)
+	e1:SetCode(EVENT_TO_GRAVE)
+	e1:SetTarget(c75646536.tg)
+	e1:SetOperation(c75646536.op)
+	c:RegisterEffect(e1)
+end
+function c75646536.lcheck(g,lc)
+	return g:IsExists(Card.IsLevel,1,nil,4)
+end
+function c75646536.filter(c,e,tp)
+	return c:IsType(TYPE_MONSTER) and c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_GRAVE) and c:IsCanBeEffectTarget(e) and not c:IsForbidden()
+end
+function c75646536.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return eg:IsContains(chkc) and c75646536.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
+		and eg:IsExists(c75646536.filter,1,nil,e,tp) end
+	local g=eg:Filter(c75646536.filter,nil,e,tp)
+	local tc=nil
+	if g:GetCount()>1 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+		tc=g:Select(tp,1,1,nil):GetFirst()
+	else
+		tc=g:GetFirst()
+	end
+	Duel.SetTargetCard(tc)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,tc,1,0,0)
+end
+function c75646536.op(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) then
+		local atk=tc:GetTextAttack()
+		if atk<0 then atk=0 end
+		if not Duel.Equip(tp,tc,c,false) then return end
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_EQUIP_LIMIT)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e1:SetValue(c75646536.eqlimit)
+		tc:RegisterEffect(e1)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_EQUIP)
+		e2:SetProperty(EFFECT_FLAG_OWNER_RELATE+EFFECT_FLAG_IGNORE_IMMUNE)
+		e2:SetCode(EFFECT_UPDATE_ATTACK)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+		e2:SetValue(atk)
+		tc:RegisterEffect(e2)
+	end
+end
+function c75646536.eqlimit(e,c)
+	return e:GetOwner()==c
+end
\ No newline at end of file

expansions/script/c77765004.lua

@@ -14,7 +14,7 @@ function cm.initial_effect(c)
 	e1:SetTarget(cm.target)
 	e1:SetOperation(cm.activate)
 	c:RegisterEffect(e1)
-	for _,code in ipairs({EFFECT_CANNOT_BE_XYZ_MATERIAL,EFFECT_CANNOT_BE_SYNCHRO_MATERIAL,EFFECT_CANNOT_BE_FUSION_MATERIAL,EFFECT_CANNOT_BE_LINK_MATERIAL,m}) do
+	--[[for _,code in ipairs({EFFECT_CANNOT_BE_XYZ_MATERIAL,EFFECT_CANNOT_BE_SYNCHRO_MATERIAL,EFFECT_CANNOT_BE_FUSION_MATERIAL,EFFECT_CANNOT_BE_LINK_MATERIAL,m}) do
 		local e2=Effect.CreateEffect(c)
 		e2:SetType(EFFECT_TYPE_FIELD)
 		e2:SetCode(code)
@@ -28,7 +28,46 @@ function cm.initial_effect(c)
 			return c and c:IsControler(1-e:GetHandlerPlayer())
 		end)
 		c:RegisterEffect(e2)
-	end
+	end]]
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DISABLE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	--e1:SetCode(EVENT_FREE_CHAIN)
+	--e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
+    e1:SetRange(LOCATION_SZONE)
+	e1:SetCountLimit(1)
+	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
+		if chk==0 then return true end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
+		Duel.SetTargetParam(Duel.SelectOption(tp,1056,1063,1073,1076))
+	end)
+	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+		local c=e:GetHandler()
+		local opt=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
+		local ct=nil
+		if opt==0 then ct=TYPE_FUSION end
+		if opt==1 then ct=TYPE_SYNCHRO end
+		if opt==2 then ct=TYPE_XYZ end
+		if opt==3 then ct=TYPE_LINK end
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_FIELD)
+		e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		e1:SetLabel(ct)
+		e1:SetTargetRange(0,1)
+		e1:SetTarget(cm.sumlimit)
+		e1:SetReset(RESET_PHASE+PHASE_END,2)
+		Duel.RegisterEffect(e1,tp)
+		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_FIELD)
+		e2:SetCode(EFFECT_DISABLE)
+		e2:SetTargetRange(0,LOCATION_MZONE)
+		e2:SetTarget(cm.distg)
+		e2:SetLabel(ct)
+		e2:SetReset(RESET_PHASE+PHASE_END,2)
+		Duel.RegisterEffect(e2,tp)
+	end)
+	c:RegisterEffect(e1)
 	local function KaguyaFilter(c,e,tp,cc)
 		local p=c:GetControler()
 		local tc=Senya.GetDFCBackSideCard(cc)
@@ -105,3 +144,9 @@ function cm.desop(e,tp,eg,ep,ev,re,r,rp)
 		c:ResetFlagEffect(1082946)
 	end
 end
+function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp)
+	return c:IsType(e:GetLabel())
+end
+function cm.distg(e,c)
+	return c:IsType(e:GetLabel())
+end

expansions/script/c81000003.lua

+--甜美之花·大崎甜花
+function c81000003.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,99,c81000003.lcheck)
+	--search
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,81000003)
+	e1:SetCondition(c81000003.thcon)
+	e1:SetTarget(c81000003.thtg)
+	e1:SetOperation(c81000003.thop)
+	c:RegisterEffect(e1)
+	--splimit
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e2:SetTargetRange(1,0)
+	e2:SetTarget(c81000003.splimit)
+	c:RegisterEffect(e2)
+	--ritual summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
+	e3:SetCode(EVENT_DAMAGE)
+	e3:SetCountLimit(1,81000903)
+	e3:SetCondition(c81000003.spcondition)
+	e3:SetCost(c81000003.spcost)
+	e3:SetTarget(c81000003.sptg)
+	e3:SetOperation(c81000003.spop)
+	c:RegisterEffect(e3)
+end
+function c81000003.lcheck(g,lc)
+	return g:IsExists(c81000003.mzfilter,1,nil)
+end
+function c81000003.mzfilter(c)
+	return c:IsLinkType(TYPE_RITUAL) and c:IsLinkType(TYPE_PENDULUM)
+end
+function c81000003.thcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function c81000003.thfilter(c)
+	return c:GetType()==0x82 and c:IsAbleToHand()
+end
+function c81000003.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81000003.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c81000003.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c81000003.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 c81000003.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return not c:IsType(TYPE_PENDULUM) and bit.band(sumtype,SUMMON_TYPE_RITUAL)==SUMMON_TYPE_RITUAL
+end
+function c81000003.spcondition(e,tp,eg,ep,ev,re,r,rp)
+	return ep==tp and (bit.band(r,REASON_BATTLE)~=0 or (bit.band(r,REASON_EFFECT)~=0 and rp==1-tp))
+end
+function c81000003.cfilter(c,e,tp)
+	return c:GetType()&0x81==0x81 and c:IsType(TYPE_PENDULUM) and Duel.IsExistingMatchingCard(c81000003.spfilter,tp,LOCATION_HAND,0,1,c,e,tp)
+		and Duel.GetMZoneCount(tp,c)>0
+end
+function c81000003.spfilter(c,e,tp)
+	return c:GetType()&0x81==0x81 and c:IsType(TYPE_PENDULUM) and c:IsLevel(4,8) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,true,false)
+end
+function c81000003.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroupEx(tp,c81000003.cfilter,1,nil,e,tp) end
+	local g=Duel.SelectReleaseGroupEx(tp,c81000003.cfilter,1,1,nil,e,tp)
+	Duel.Release(g,REASON_COST)
+end
+function c81000003.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81000003.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c81000003.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,c81000003.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
+	local tc=g:GetFirst()
+	if tc and Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,true,false,POS_FACEUP) then
+		tc:CompleteProcedure()
+	end
+end

expansions/script/c81003001.lua

+--灰色少女 森永Miu
+function c81003001.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	c:EnableReviveLimit()
+	--destroy
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCountLimit(1,81003001)
+	e1:SetCondition(c81003001.descon)
+	e1:SetTarget(c81003001.destg)
+	e1:SetOperation(c81003001.desop)
+	c:RegisterEffect(e1)
+	--spsummon
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_DESTROYED)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCountLimit(1,81003901)
+	e3:SetCondition(c81003001.spcon)
+	e3:SetTarget(c81003001.sptg)
+	e3:SetOperation(c81003001.spop)
+	c:RegisterEffect(e3)
+end
+function c81003001.descon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
+end
+function c81003001.setfilter(c,tp)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable(true) and (c:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0)
+end
+function c81003001.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_GRAVE) and c81003001.setfilter(chkc,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c81003001.setfilter,tp,0,LOCATION_GRAVE,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectTarget(tp,c81003001.setfilter,tp,0,LOCATION_GRAVE,1,1,nil,tp)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
+end
+function c81003001.desop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and (tc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) then
+		Duel.SSet(tp,tc)
+		Duel.ConfirmCards(1-tp,tc)
+		local e0=Effect.CreateEffect(e:GetHandler())
+		e0:SetType(EFFECT_TYPE_SINGLE)
+		e0:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
+		e0:SetReset(RESET_EVENT+RESETS_REDIRECT)
+		e0:SetValue(LOCATION_REMOVED)
+		tc:RegisterEffect(e0,true)
+		if tc:IsType(TYPE_QUICKPLAY) then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+		end
+		if tc:IsType(TYPE_TRAP) then
+			local e2=Effect.CreateEffect(e:GetHandler())
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e2:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
+			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e2)
+		end
+	end
+end
+function c81003001.spfilter(c,e,tp)
+	return c:IsSetCard(0x817) and not c:IsCode(81003001) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c81003001.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():GetPreviousControler()==tp and rp==1-tp
+end
+function c81003001.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c81003001.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
+end
+function c81003001.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,aux.NecroValleyFilter(c81003001.spfilter),tp,LOCATION_GRAVE,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/c81003002.lua

+--万圣魔女 森永Miu
+function c81003002.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
+	c:EnableReviveLimit()
+	--destroy replace
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_DESTROY_REPLACE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,81003902)
+	e1:SetTarget(c81003002.reptg)
+	e1:SetValue(c81003002.repval)
+	e1:SetOperation(c81003002.repop)
+	c:RegisterEffect(e1)
+	--set
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,81003002)
+	e2:SetHintTiming(0,TIMING_END_PHASE)
+	e2:SetTarget(c81003002.settg)
+	e2:SetOperation(c81003002.setop)
+	c:RegisterEffect(e2)
+end
+function c81003002.setfilter(c,e,tp,tid)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable(true) and (c:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) and c:GetTurnID()==tid
+end
+function c81003002.settg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local tid=Duel.GetTurnCount()
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_GRAVE) and c81003002.setfilter(chkc,e,tp,tid) end
+	if chk==0 then return Duel.IsExistingTarget(c81003002.setfilter,tp,0,LOCATION_GRAVE,1,nil,e,tp,tid) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectTarget(tp,c81003002.setfilter,tp,0,LOCATION_GRAVE,1,1,nil,e,tp,tid)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
+end
+function c81003002.setop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and (tc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) then
+		Duel.SSet(tp,tc)
+		Duel.ConfirmCards(1-tp,tc)
+		local e0=Effect.CreateEffect(e:GetHandler())
+		e0:SetType(EFFECT_TYPE_SINGLE)
+		e0:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
+		e0:SetReset(RESET_EVENT+RESETS_REDIRECT)
+		e0:SetValue(LOCATION_REMOVED)
+		tc:RegisterEffect(e0,true)
+		if tc:IsType(TYPE_QUICKPLAY) then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+		end
+		if tc:IsType(TYPE_TRAP) then
+			local e2=Effect.CreateEffect(e:GetHandler())
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e2:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
+			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e2)
+		end
+	end
+end
+function c81003002.repfilter(c,tp)
+	return c:IsControler(tp) and c:IsLocation(LOCATION_MZONE)
+		and (c:IsReason(REASON_BATTLE) or (c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp)) and not c:IsReason(REASON_REPLACE)
+end
+function c81003002.desfilter(c,e,tp)
+	return c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsType(TYPE_SPELL+TYPE_TRAP)
+		and c:IsDestructable(e) and not c:IsStatus(STATUS_DESTROY_CONFIRMED+STATUS_BATTLE_DESTROYED)
+end
+function c81003002.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return eg:IsExists(c81003002.repfilter,1,nil,tp)
+		and Duel.IsExistingMatchingCard(c81003002.desfilter,tp,LOCATION_ONFIELD,0,1,nil,e,tp) end
+	if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESREPLACE)
+		local g=Duel.SelectMatchingCard(tp,c81003002.desfilter,tp,LOCATION_ONFIELD,0,1,1,nil,e,tp)
+		e:SetLabelObject(g:GetFirst())
+		g:GetFirst():SetStatus(STATUS_DESTROY_CONFIRMED,true)
+		return true
+	end
+	return false
+end
+function c81003002.repval(e,c)
+	return c81003002.repfilter(c,e:GetHandlerPlayer())
+end
+function c81003002.repop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,1-tp,81003002)
+	local tc=e:GetLabelObject()
+	tc:SetStatus(STATUS_DESTROY_CONFIRMED,false)
+	Duel.Destroy(tc,REASON_EFFECT+REASON_REPLACE)
+end

expansions/script/c81003003.lua

+--约会 森永Miu
+function c81003003.initial_effect(c)
+	--fusion material
+	aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsRace,RACE_CYBERSE),3,true)
+	c:EnableReviveLimit()
+	--atkup
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetValue(c81003003.atkval)
+	c:RegisterEffect(e1)
+	--set
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,81003003)
+	e2:SetHintTiming(0,TIMING_END_PHASE)
+	e2:SetCost(c81003003.setcost)
+	e2:SetTarget(c81003003.settg)
+	e2:SetOperation(c81003003.setop)
+	c:RegisterEffect(e2)
+end
+function c81003003.atkfilter1(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup())
+end
+function c81003003.atkval(e,c)
+	return Duel.GetMatchingGroupCount(c81003003.atkfilter1,c:GetControler(),0,LOCATION_GRAVE+LOCATION_REMOVED,nil)*200
+end
+function c81003003.cfilter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsReleasable()
+end
+function c81003003.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81003003.cfilter,tp,LOCATION_ONFIELD,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+	local g=Duel.SelectMatchingCard(tp,c81003003.cfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
+	Duel.Release(g,REASON_COST)
+end
+function c81003003.setfilter(c,tp)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable(true) and (c:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0)
+end
+function c81003003.settg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_REMOVED) and c81003003.setfilter(chkc,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c81003003.setfilter,tp,0,LOCATION_REMOVED,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectTarget(tp,c81003003.setfilter,tp,0,LOCATION_REMOVED,1,1,nil,tp)
+end
+function c81003003.setop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and (tc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) then
+		Duel.SSet(tp,tc)
+		Duel.ConfirmCards(1-tp,tc)
+		local e0=Effect.CreateEffect(e:GetHandler())
+		e0:SetType(EFFECT_TYPE_SINGLE)
+		e0:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
+		e0:SetReset(RESET_EVENT+RESETS_REDIRECT)
+		e0:SetValue(LOCATION_REMOVED)
+		tc:RegisterEffect(e0,true)
+		if tc:IsType(TYPE_QUICKPLAY) then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+		end
+		if tc:IsType(TYPE_TRAP) then
+			local e2=Effect.CreateEffect(e:GetHandler())
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e2:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
+			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e2)
+		end
+	end
+end

expansions/script/c81003004.lua

+--夏风 森永Miu
+function c81003004.initial_effect(c)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_HAND)
+	e1:SetCountLimit(1,81003004)
+	e1:SetCondition(c81003004.sscon)
+	e1:SetTarget(c81003004.sstg)
+	e1:SetOperation(c81003004.ssop)
+	c:RegisterEffect(e1)
+	--disable attack
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1,81003904)
+	e2:SetTarget(c81003004.settg)
+	e2:SetOperation(c81003004.setop)
+	c:RegisterEffect(e2)
+end
+function c81003004.filter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:GetOwner()~=c:GetControler()
+end
+function c81003004.sscon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsExistingMatchingCard(c81003004.filter,tp,LOCATION_ONFIELD,0,1,nil)
+end
+function c81003004.sstg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+function c81003004.ssop(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 c81003004.setfilter(c,tp)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable(true) and (c:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0)
+end
+function c81003004.settg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_GRAVE) and c81003004.setfilter(chkc,tp) end
+	if chk==0 then return Duel.IsExistingTarget(c81003004.setfilter,tp,0,LOCATION_GRAVE,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
+	local g=Duel.SelectTarget(tp,c81003004.setfilter,tp,0,LOCATION_GRAVE,1,1,nil,tp)
+	Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
+end
+function c81003004.setop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and (tc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) then
+		Duel.SSet(tp,tc)
+		Duel.ConfirmCards(1-tp,tc)
+		local e0=Effect.CreateEffect(e:GetHandler())
+		e0:SetType(EFFECT_TYPE_SINGLE)
+		e0:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
+		e0:SetReset(RESET_EVENT+RESETS_REDIRECT)
+		e0:SetValue(LOCATION_REMOVED)
+		tc:RegisterEffect(e0,true)
+		if tc:IsType(TYPE_QUICKPLAY) then
+			local e1=Effect.CreateEffect(e:GetHandler())
+			e1:SetType(EFFECT_TYPE_SINGLE)
+			e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
+			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e1)
+		end
+		if tc:IsType(TYPE_TRAP) then
+			local e2=Effect.CreateEffect(e:GetHandler())
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
+			e2:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
+			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e2)
+		end
+	end
+end

expansions/script/c81005001.lua

+--反转世界·绫濑亚梦
+function c81005001.initial_effect(c)
+	--fusion material
+	c:EnableReviveLimit()
+	aux.AddFusionProcFunRep(c,c81005001.ffilter,3,true)
+	--spsummon condition
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SINGLE_RANGE)
+	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e0:SetRange(LOCATION_EXTRA)
+	e0:SetValue(c81005001.splimit)
+	c:RegisterEffect(e0)
+	--
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,81005001)
+	e1:SetTarget(c81005001.sptg)
+	e1:SetOperation(c81005001.spop)
+	c:RegisterEffect(e1)
+	--to hand
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetHintTiming(0,TIMING_MAIN_END)
+	e2:SetCountLimit(1,81005901)
+	e2:SetCondition(c81005001.sscon)
+	e2:SetTarget(c81005001.target)
+	e2:SetOperation(c81005001.operation)
+	c:RegisterEffect(e2)
+end
+function c81005001.ffilter(c,fc,sub,mg,sg)
+	return (not c:IsType(TYPE_TOKEN)) and (not sg or sg:FilterCount(aux.TRUE,c)==0 or sg:IsExists(Card.IsFusionCode,1,c,c:GetFusionCode()))
+end
+function c81005001.splimit(e,se,sp,st)
+	return not e:GetHandler():IsLocation(LOCATION_EXTRA) or bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
+end
+function c81005001.eqfilter(c,cd)
+	return c:IsCode(cd) and c:IsFaceup()
+end
+function c81005001.spfilter(c,e,tp)
+	return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+		and Duel.IsExistingMatchingCard(c81005001.eqfilter,tp,LOCATION_ONFIELD,0,1,nil,c:GetCode())
+end
+function c81005001.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c81005001.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+end
+function c81005001.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,c81005001.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
+	if #g>0 then
+		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
+	end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetLabel(g:GetFirst():GetCode())
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c81005001.splimit2)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function c81005001.splimit2(e,c)
+	return not c:IsCode(e:GetLabel()) and c:IsLocation(LOCATION_DECK+LOCATION_GRAVE)
+end
+function c81005001.sscon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()~=tp and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
+end
+function c81005001.filter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function c81005001.filter1(c,g)
+	return g:IsExists(Card.IsCode,1,c,c:GetCode())
+end
+function c81005001.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		local g=Duel.GetMatchingGroup(c81005001.filter,tp,LOCATION_DECK,0,nil)
+		return g:IsExists(c81005001.filter1,1,nil,g)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
+end
+function c81005001.operation(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c81005001.filter,tp,LOCATION_DECK,0,nil)
+	local sg=g:Filter(c81005001.filter1,nil,g)
+	if sg:GetCount()==0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local hg=sg:Select(tp,1,1,nil)
+	local hc=sg:Filter(Card.IsCode,hg:GetFirst(),hg:GetFirst():GetCode()):GetFirst()
+	hg:AddCard(hc)
+	Duel.SendtoHand(hg,nil,REASON_EFFECT)
+	Duel.ConfirmCards(1-tp,hg)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	Duel.RegisterEffect(e1,tp)
+end

expansions/script/c81005003.lua

+--Pure Ruby
+function c81005003.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.EnablePendulumAttribute(c)
+	--to hand
+	local e0=Effect.CreateEffect(c)
+	e0:SetCategory(CATEGORY_TOHAND+CATEGORY_DESTROY)
+	e0:SetType(EFFECT_TYPE_IGNITION)
+	e0:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e0:SetRange(LOCATION_PZONE)
+	e0:SetCountLimit(1,81005003)
+	e0:SetTarget(c81005003.thtg)
+	e0:SetOperation(c81005003.thop)
+	c:RegisterEffect(e0)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCondition(c81005003.ppcon)
+	e1:SetTarget(c81005003.pptg)
+	e1:SetOperation(c81005003.ppop)
+	c:RegisterEffect(e1)
+	--spsummon condition
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e2:SetCode(EFFECT_SPSUMMON_CONDITION)
+	c:RegisterEffect(e2)
+	--special summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_SPSUMMON_PROC)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetCountLimit(1,81005002)
+	e3:SetRange(LOCATION_EXTRA+LOCATION_HAND)
+	e3:SetCondition(c81005003.spcon)
+	e3:SetOperation(c81005003.spop)
+	c:RegisterEffect(e3)
+	--Negate
+	local e4=Effect.CreateEffect(c)
+	e4:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+	e4:SetType(EFFECT_TYPE_QUICK_O)
+	e4:SetCode(EVENT_CHAINING)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetCountLimit(1,81005903)
+	e4:SetCondition(c81005003.discon)
+	e4:SetCost(c81005003.discost)
+	e4:SetTarget(c81005003.distg)
+	e4:SetOperation(c81005003.disop)
+	c:RegisterEffect(e4)
+end
+function c81005003.thfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsAbleToHand() and (c:IsType(TYPE_PENDULUM) or c:IsType(TYPE_SPELL))
+end
+function c81005003.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c81005003.thfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c81005003.thfilter,tp,LOCATION_REMOVED,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectTarget(tp,c81005003.thfilter,tp,LOCATION_REMOVED,0,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function c81005003.thop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)~=0 and tc:IsRelateToEffect(e) then
+		Duel.SendtoHand(tc,nil,REASON_EFFECT)
+	end
+end
+function c81005003.spfiltera(c)
+	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsAbleToRemoveAsCost()
+end
+function c81005003.spfilterb(c)
+	return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_SPELL) and c:IsAbleToRemoveAsCost()
+end
+function c81005003.spcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	return ((c:IsLocation(LOCATION_HAND) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0) or
+		(c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp)>0))
+		and Duel.IsExistingMatchingCard(c81005003.spfiltera,tp,LOCATION_GRAVE,0,1,nil)
+		and Duel.IsExistingMatchingCard(c81005003.spfilterb,tp,LOCATION_GRAVE,0,1,nil)
+end
+function c81005003.spop(e,tp,eg,ep,ev,re,r,rp,c)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g1=Duel.SelectMatchingCard(tp,c81005003.spfiltera,tp,LOCATION_GRAVE,0,1,1,nil)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local g2=Duel.SelectMatchingCard(tp,c81005003.spfilterb,tp,LOCATION_GRAVE,0,1,1,nil)
+	g1:Merge(g2)
+	Duel.Remove(g1,POS_FACEUP,REASON_COST)
+end
+function c81005003.ppcon(e,tp,eg,ep,ev,re,r,rp)
+	local ph=Duel.GetCurrentPhase()
+	return ph~=PHASE_DAMAGE and ph~=PHASE_DAMAGE_CAL
+end
+function c81005003.qfilter(c,e,tp,m,ft)
+	if not c:IsType(TYPE_PENDULUM) or bit.band(c:GetType(),0x81)~=0x81
+		or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
+	local mg=m:Filter(Card.IsCanBeRitualMaterial,c,c)
+	if ft>0 then
+		return mg:CheckWithSumGreater(Card.GetRitualLevel,c:GetLevel(),c)
+	else
+		return mg:IsExists(c81005003.qfilterF,1,nil,tp,mg,c)
+	end
+end
+function c81005003.qfilterF(c,tp,mg,rc)
+	if c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:GetSequence()<5 then
+		Duel.SetSelectedCard(c)
+		return mg:CheckWithSumGreater(Card.GetRitualLevel,rc:GetLevel(),rc)
+	else return false end
+end
+function c81005003.pptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		local mg=Duel.GetRitualMaterial(tp)
+		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+		return ft>-1 and Duel.IsExistingMatchingCard(c81005003.qfilter,tp,LOCATION_HAND,0,1,nil,e,tp,mg,ft)
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function c81005003.ppop(e,tp,eg,ep,ev,re,r,rp)
+	local mg=Duel.GetRitualMaterial(tp)
+	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local tg=Duel.SelectMatchingCard(tp,c81005003.qfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp,mg,ft)
+	local tc=tg:GetFirst()
+	if tc then
+		mg=mg:Filter(Card.IsCanBeRitualMaterial,tc,tc)
+		local mat=nil
+		if ft>0 then
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+			mat=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
+		else
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+			mat=mg:FilterSelect(tp,c81005003.qfilterF,1,1,nil,tp,mg,tc)
+			Duel.SetSelectedCard(mat)
+			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+			local mat2=mg:SelectWithSumGreater(tp,Card.GetRitualLevel,tc:GetLevel(),tc)
+			mat:Merge(mat2)
+		end
+		tc:SetMaterial(mat)
+		Duel.ReleaseRitualMaterial(mat)
+		Duel.BreakEffect()
+		Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
+		tc:CompleteProcedure()
+	end
+end
+function c81005003.discon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if ep==tp or c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end
+	return (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(ev)
+end
+function c81005003.costfilter(c)
+	return bit.band(c:GetType(),0x81)==0x81 and c:IsFaceup() and c:IsAbleToDeckAsCost()
+end
+function c81005003.discost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81005003.costfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c81005003.costfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,2,REASON_COST)
+end
+function c81005003.distg(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)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+	end
+end
+function c81005003.disop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Destroy(eg,REASON_EFFECT)
+	end
+end

expansions/script/c81006036.lua

+--微妙世界
+function c81006036.initial_effect(c)
+	--Activate
+	local e1=aux.AddRitualProcGreater2(c,c81006036.ritual_filter,LOCATION_HAND+LOCATION_DECK,nil,c81006036.mfilter)
+	e1:SetCountLimit(1,81006036+EFFECT_COUNT_CODE_OATH)
+	--destroy replace
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EFFECT_DESTROY_REPLACE)
+	e1:SetRange(LOCATION_GRAVE)
+	e1:SetTarget(c81006036.reptg)
+	e1:SetValue(c81006036.repval)
+	e1:SetOperation(c81006036.repop)
+	c:RegisterEffect(e1)
+end
+function c81006036.repfilter(c,tp)
+	return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:IsSetCard(0x81c)
+		and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
+end
+function c81006036.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(c81006036.repfilter,1,nil,tp) end
+	return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
+end
+function c81006036.repval(e,c)
+	return c81006036.repfilter(c,e:GetHandlerPlayer())
+end
+function c81006036.repop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
+end
+function c81006036.ritual_filter(c)
+	return c:IsSetCard(0x81c) and c:IsRace(RACE_CYBERSE)
+end
+function c81006036.mfilter(c)
+	return c:IsType(TYPE_RITUAL)
+end

expansions/script/c81010003.lua

+--Lapis
+function c81010003.initial_effect(c)
+	--Activate
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_ACTIVATE)
+	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetTarget(c81010003.regtg)
+	e0:SetOperation(c81010003.bgmop)
+	c:RegisterEffect(e0)
+	--cannot be destroyed
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetValue(1)
+	c:RegisterEffect(e1)
+	--cannot set/activate
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_SSET)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetTargetRange(1,0)
+	e2:SetTarget(c81010003.setlimit)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e3:SetRange(LOCATION_FZONE)
+	e3:SetTargetRange(1,0)
+	e3:SetValue(c81010003.actlimit)
+	c:RegisterEffect(e3)
+	--draw
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e4:SetRange(LOCATION_FZONE)
+	e4:SetCode(EVENT_RELEASE)
+	e4:SetProperty(EFFECT_FLAG_DELAY)
+	e4:SetCountLimit(3)
+	e4:SetCondition(c81010003.drcon)
+	e4:SetOperation(c81010003.drop)
+	c:RegisterEffect(e4)
+	--indes
+	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_FIELD)
+	e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e5:SetRange(LOCATION_FZONE)
+	e5:SetTargetRange(LOCATION_MZONE,0)
+	e5:SetTarget(c81010003.xyztarget)
+	e5:SetValue(c81010003.indesval)
+	c:RegisterEffect(e5)
+	--cannot be target
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_FIELD)
+	e6:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+	e6:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+	e6:SetRange(LOCATION_FZONE)
+	e6:SetTargetRange(LOCATION_MZONE,0)
+	e6:SetTarget(c81010003.xyztarget)
+	e6:SetValue(aux.tgoval)
+	c:RegisterEffect(e6)
+	--attack twice
+	local e7=Effect.CreateEffect(c)
+	e7:SetType(EFFECT_TYPE_IGNITION)
+	e7:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e7:SetRange(LOCATION_FZONE)
+	e7:SetCountLimit(1,81010003)
+	e7:SetCondition(c81010003.atcon)
+	e7:SetCost(c81010003.atcost)
+	e7:SetTarget(c81010003.attg)
+	e7:SetOperation(c81010003.atop)
+	c:RegisterEffect(e7)
+end
+function c81010003.setlimit(e,c,tp)
+	return c:IsType(TYPE_FIELD)
+end
+function c81010003.actlimit(e,re,tp)
+	return re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
+end
+function c81010003.regtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		return true
+	end
+	local c=e:GetHandler()
+	--to grave
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
+	e1:SetCountLimit(1)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetCondition(c81010003.gycon)
+	e1:SetOperation(c81010003.gyop)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	c:SetTurnCounter(0)
+	c:RegisterEffect(e1)
+end
+function c81010003.gycon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
+function c81010003.gyop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ct=c:GetTurnCounter()
+	ct=ct+1
+	c:SetTurnCounter(ct)
+	if ct==4 then
+		Duel.SendtoGrave(c,REASON_RULE)
+	end
+end
+function c81010003.bgmop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(81010003,0))
+end 
+function c81010003.cfilter(c,tp)
+	return ((c:GetPreviousAttackOnField()==1550 and c:IsPreviousLocation(LOCATION_MZONE)) or (c:IsAttack(1550) and c:IsPreviousLocation(LOCATION_HAND))) and c:IsReason(REASON_RELEASE) and c:GetPreviousControler()==tp
+end
+function c81010003.drcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c81010003.cfilter,1,nil,tp)
+end
+function c81010003.drop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_CARD,0,e:GetHandler():GetCode())
+	Duel.Draw(tp,1,REASON_EFFECT)
+end
+function c81010003.indesval(e,re,rp)
+	return rp~=e:GetHandlerPlayer()
+end
+function c81010003.xyztarget(e,c)
+	return c:IsType(TYPE_PENDULUM) and c:IsType(TYPE_RITUAL) and c:IsStatus(STATUS_SPSUMMON_TURN)
+end
+function c81010003.atcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.IsAbleToEnterBP()
+end
+function c81010003.costfilter(c)
+	return bit.band(c:GetType(),0x81)==0x81 and c:IsFaceup() and c:IsAbleToDeckAsCost()
+end
+function c81010003.atcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81010003.costfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c81010003.costfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,2,REASON_COST)
+end
+function c81010003.filter(c)
+	return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsType(TYPE_RITUAL) and not (c:IsHasEffect(EFFECT_PIERCE) and c:IsHasEffect(EFFECT_EXTRA_ATTACK))
+end
+function c81010003.attg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c81010003.filter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c81010003.filter,tp,LOCATION_MZONE,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	Duel.SelectTarget(tp,c81010003.filter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c81010003.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)
+		local e2=Effect.CreateEffect(e:GetHandler())
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_PIERCE)
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+	end
+end

expansions/script/c81010041.lua

+--Vinteren Intethet
+function c81010041.initial_effect(c)
+	--Activate
+	local e0=Effect.CreateEffect(c)
+	e0:SetCategory(CATEGORY_REMOVE)
+	e0:SetType(EFFECT_TYPE_ACTIVATE)
+	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetTarget(c81010041.regtg)
+	e0:SetOperation(c81010041.bgmop)
+	c:RegisterEffect(e0)
+	--cannot be destroyed
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetValue(1)
+	c:RegisterEffect(e1)
+	--cannot set/activate
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_SSET)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetTargetRange(1,0)
+	e2:SetTarget(c81010041.setlimit)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e3:SetRange(LOCATION_FZONE)
+	e3:SetTargetRange(1,0)
+	e3:SetValue(c81010041.actlimit)
+	c:RegisterEffect(e3)
+	--atkup
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD)
+	e4:SetRange(LOCATION_FZONE)
+	e4:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e4:SetCode(EFFECT_UPDATE_ATTACK)
+	e4:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_EFFECT))
+	e4:SetValue(-2000)
+	c:RegisterEffect(e4)
+	local e5=e4:Clone()
+	e5:SetCode(EFFECT_UPDATE_DEFENSE)
+	c:RegisterEffect(e5)
+	--draw
+	local e6=Effect.CreateEffect(c)
+	e6:SetCategory(CATEGORY_DRAW)
+	e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e6:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
+	e6:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e6:SetRange(LOCATION_FZONE)
+	e6:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
+	e6:SetCondition(c81010041.condition)
+	e6:SetTarget(c81010041.target)
+	e6:SetOperation(c81010041.operation)
+	c:RegisterEffect(e6)
+	local e7=e6:Clone()
+	e7:SetCode(EVENT_SUMMON_SUCCESS)
+	c:RegisterEffect(e7)
+	--negate
+	local e8=Effect.CreateEffect(c)
+	e8:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+	e8:SetType(EFFECT_TYPE_QUICK_O)
+	e8:SetCode(EVENT_CHAINING)
+	e8:SetRange(LOCATION_FZONE)
+	e8:SetCountLimit(1)
+	e8:SetCondition(c81010041.negcon)
+	e8:SetCost(c81010041.negcost)
+	e8:SetTarget(c81010041.negtg)
+	e8:SetOperation(c81010041.negop)
+	c:RegisterEffect(e8)
+	--splimit
+	local ea=Effect.CreateEffect(c)
+	ea:SetType(EFFECT_TYPE_FIELD)
+	ea:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	ea:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	ea:SetRange(LOCATION_FZONE)
+	ea:SetTargetRange(1,0)
+	ea:SetTarget(c81010041.splimit)
+	c:RegisterEffect(ea)
+	local eb=ea:Clone()
+	eb:SetCode(EFFECT_CANNOT_FLIP_SUMMON)
+	c:RegisterEffect(eb)
+	local ec=ea:Clone()
+	ec:SetCode(EFFECT_CANNOT_SUMMON)
+	c:RegisterEffect(ec)
+	local ed=ea:Clone()
+	ed:SetCode(EFFECT_CANNOT_MSET)
+	c:RegisterEffect(ed)
+end
+function c81010041.desfilter(c)
+	return c:IsType(TYPE_EFFECT) and c:IsAbleToRemove()
+end
+function c81010041.setlimit(e,c,tp)
+	return c:IsType(TYPE_FIELD)
+end
+function c81010041.actlimit(e,re,tp)
+	return re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
+end
+function c81010041.regtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	local g=Duel.GetMatchingGroup(c81010041.desfilter,tp,LOCATION_MZONE,0,nil)
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
+	local c=e:GetHandler()
+	--to grave
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
+	e1:SetCountLimit(1)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetCondition(c81010041.gycon)
+	e1:SetOperation(c81010041.gyop)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	c:SetTurnCounter(0)
+	c:RegisterEffect(e1)
+end
+function c81010041.gycon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
+function c81010041.gyop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ct=c:GetTurnCounter()
+	ct=ct+1
+	c:SetTurnCounter(ct)
+	if ct==4 then
+		Duel.SendtoGrave(c,REASON_RULE)
+	end
+end
+function c81010041.bgmop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(81010041,0))
+	if not e:GetHandler():IsRelateToEffect(e) then return end
+	local g=Duel.GetMatchingGroup(c81010041.desfilter,tp,LOCATION_MZONE,0,nil)
+	if g:GetCount()>0 then
+		Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
+	end
+end 
+function c81010041.splimit(e,c,sump,sumtype,sumpos,targetp)
+	return c:IsType(TYPE_EFFECT)
+end
+function c81010041.cfilter(c)
+	return c:IsFaceup() and c:IsType(TYPE_NORMAL) and not c:IsType(TYPE_TOKEN)
+end
+function c81010041.condition(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c81010041.cfilter,1,nil)
+end
+function c81010041.target(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 c81010041.operation(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 c81010041.negcon(e,tp,eg,ep,ev,re,r,rp)
+	return re:GetHandler()~=e:GetHandler()
+		and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
+end
+function c81010041.negcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsType,1,nil,TYPE_NORMAL) end
+	local g=Duel.SelectReleaseGroup(tp,Card.IsType,1,1,nil,TYPE_NORMAL)
+	Duel.Release(g,REASON_COST)
+end
+function c81010041.negtg(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)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+	end
+end
+function c81010041.negop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Destroy(eg,REASON_EFFECT)
+	end
+end

expansions/script/c81010047.lua

+--Crystal World
+c81010047.card_code_list={81010004}
+function c81010047.initial_effect(c)
+	--Activate
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_ACTIVATE)
+	e0:SetCode(EVENT_FREE_CHAIN)
+	e0:SetTarget(c81010047.regtg)
+	e0:SetOperation(c81010047.bgmop)
+	c:RegisterEffect(e0)
+	--cannot be destroyed
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetValue(1)
+	c:RegisterEffect(e1)
+	--cannot set/activate
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_SSET)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetTargetRange(1,0)
+	e2:SetTarget(c81010047.setlimit)
+	c:RegisterEffect(e2)
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_FIELD)
+	e3:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
+	e3:SetRange(LOCATION_FZONE)
+	e3:SetTargetRange(1,0)
+	e3:SetValue(c81010047.actlimit)
+	c:RegisterEffect(e3)
+	--spsummon
+	local e4=Effect.CreateEffect(c)
+	e4:SetDescription(aux.Stringid(81010047,1))
+	e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e4:SetCode(EVENT_DESTROYED)
+	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e4:SetRange(LOCATION_FZONE)
+	e4:SetCountLimit(1,81010047)
+	e4:SetCondition(c81010047.spcon)
+	e4:SetCost(c81010047.cost)
+	e4:SetTarget(c81010047.sptg)
+	e4:SetOperation(c81010047.spop)
+	c:RegisterEffect(e4)
+	--special summon
+	local e5=Effect.CreateEffect(c)
+	e5:SetDescription(aux.Stringid(81010047,2))
+	e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e5:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e5:SetCode(EVENT_BATTLE_DESTROYED)
+	e5:SetRange(LOCATION_FZONE)
+	e5:SetCountLimit(1,81010947+EFFECT_COUNT_CODE_SINGLE)
+	e5:SetCondition(c81010047.ppcon1)
+	e5:SetCost(c81010047.cost)
+	e5:SetTarget(c81010047.pptg)
+	e5:SetOperation(c81010047.ppop)
+	c:RegisterEffect(e5)
+	local e6=e5:Clone()
+	e6:SetCode(EVENT_DESTROYED)
+	e6:SetCondition(c81010047.ppcon2)
+	c:RegisterEffect(e6)
+	Duel.AddCustomActivityCounter(81010047,ACTIVITY_SPSUMMON,c81010047.counterfilter)
+end
+function c81010047.counterfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND)
+end
+function c81010047.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(81010047,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c81010047.splimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function c81010047.splimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return not c:IsAttribute(ATTRIBUTE_WIND)
+end
+function c81010047.setlimit(e,c,tp)
+	return c:IsType(TYPE_FIELD)
+end
+function c81010047.actlimit(e,re,tp)
+	return re:IsActiveType(TYPE_FIELD) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
+end
+function c81010047.regtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		return true
+	end
+	local c=e:GetHandler()
+	--to grave
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
+	e1:SetCountLimit(1)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetCondition(c81010047.gycon)
+	e1:SetOperation(c81010047.gyop)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+	c:SetTurnCounter(0)
+	c:RegisterEffect(e1)
+end
+function c81010047.gycon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
+function c81010047.gyop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local ct=c:GetTurnCounter()
+	ct=ct+1
+	c:SetTurnCounter(ct)
+	if ct==5 then
+		Duel.SendtoGrave(c,REASON_RULE)
+	end
+end
+function c81010047.bgmop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(81010047,0))
+end 
+function c81010047.cfilter(c,tp)
+	return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:GetPreviousControler()==tp
+		and c:IsPreviousLocation(LOCATION_MZONE) 
+		and c:GetPreviousAttributeOnField()==ATTRIBUTE_WIND 
+		and c:IsPreviousPosition(POS_FACEUP)
+end
+function c81010047.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c81010047.cfilter,1,nil,tp)
+end
+function c81010047.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,81010005,0,0x4011,800,800,3,RACE_ROCK,ATTRIBUTE_WIND,POS_FACEUP,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,tp,0)
+end
+function c81010047.spop(e,tp,eg,ep,ev,re,r,rp)
+	if e:GetHandler():IsRelateToEffect(e) and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0
+		and Duel.IsPlayerCanSpecialSummonMonster(tp,81010005,0,0x4011,800,800,3,RACE_ROCK,ATTRIBUTE_WIND,POS_FACEUP,tp) then
+		local token=Duel.CreateToken(tp,81010005)
+		Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
+	end
+end
+function c81010047.ppcon1(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	local bc=tc:GetBattleTarget()
+	return tc:GetPreviousControler()~=tp
+		and bc:IsControler(tp) and bc:GetOriginalAttribute()==ATTRIBUTE_WIND
+end
+function c81010047.dfilter(c)
+	return c:IsReason(REASON_EFFECT) and c:IsPreviousLocation(LOCATION_ONFIELD)
+end
+function c81010047.ppcon2(e,tp,eg,ep,ev,re,r,rp)
+	if not re then return false end
+	local rc=re:GetHandler()
+	return rc:IsControler(tp) and rc:GetOriginalAttribute()==ATTRIBUTE_WIND
+		and eg:IsExists(c81010047.dfilter,1,nil)
+end
+function c81010047.ppfilter(c,e,tp)
+	return c:IsAttribute(ATTRIBUTE_WIND) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function c81010047.pptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(c81010047.ppfilter,tp,LOCATION_HAND+LOCATION_REMOVED,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_REMOVED)
+end
+function c81010047.ppop(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,c81010047.ppfilter,tp,LOCATION_HAND+LOCATION_REMOVED,0,1,1,nil,e,tp)
+	if g:GetCount()>0 then
+		local tc=g:GetFirst()
+		Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
+		local e0=Effect.CreateEffect(e:GetHandler())
+		e0:SetType(EFFECT_TYPE_SINGLE)
+		e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e0:SetCode(EFFECT_CANNOT_TRIGGER)
+		e0:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e0)
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CANNOT_ATTACK)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e1)
+	end
+	Duel.SpecialSummonComplete()
+end

expansions/script/c81010056.lua

+--似乎被吓个半死
+function c81010056.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DESTROY)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetTarget(c81010056.target)
+	e1:SetOperation(c81010056.activate)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	local e3=e1:Clone()
+	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e3)
+end
+function c81010056.filter(c,tp)
+	return c:GetSummonPlayer()==tp
+end
+function c81010056.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return eg:IsExists(c81010056.filter,1,nil,1-tp) and Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_MZONE,0,1,nil) end
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_MZONE,0,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
+end
+function c81010056.activate(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_MZONE,0,nil)
+	Duel.Destroy(g,REASON_EFFECT)
+end

expansions/script/c81011027.lua

@@ -21,7 +21,7 @@ function c81011027.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function c81011027.spfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGraveAsCost()
+	return (bit.band(c:GetOriginalType(),TYPE_SPELL)~=0 or bit.band(c:GetOriginalType(),TYPE_TRAP)~=0) and c:IsAbleToGraveAsCost()
 end
 function c81011027.spcon(e,c)
 	if c==nil then return true end
@@ -34,7 +34,7 @@ function c81011027.spop(e,tp,eg,ep,ev,re,r,rp,c)
 	Duel.SendtoGrave(g,REASON_COST)
 end
 function c81011027.vfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGraveAsCost()
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGraveAsCost()
 end
 function c81011027.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c81011027.vfilter,tp,LOCATION_ONFIELD,0,1,nil) end
@@ -57,17 +57,5 @@ function c81011027.setop(e,tp,eg,ep,ev,re,r,rp)
 	if tc then
 		Duel.SSet(tp,tc)
 		Duel.ConfirmCards(1-tp,g)
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_FIELD)
-		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-		e1:SetCode(EFFECT_CANNOT_ACTIVATE)
-		e1:SetTargetRange(1,0)
-		e1:SetValue(c81011027.aclimit)
-		e1:SetLabel(tc:GetCode())
-		e1:SetReset(RESET_PHASE+PHASE_END)
-		Duel.RegisterEffect(e1,tp)
 	end
 end
-function c81011027.aclimit(e,re,tp)
-	return re:GetHandler():IsCode(e:GetLabel())
-end

expansions/script/c81011033.lua

+--黑崎智秋的学生时代
+function c81011033.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,81011033+EFFECT_COUNT_CODE_OATH)
+	e1:SetCondition(c81011033.condition)
+	e1:SetCost(c81011033.cost)
+	e1:SetTarget(c81011033.target)
+	e1:SetOperation(c81011033.activate)
+	c:RegisterEffect(e1)
+end
+function c81011033.ntfil(c)
+	return not c:IsType(TYPE_SPELL)
+end
+function c81011033.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp and Duel.GetCurrentPhase()==PHASE_MAIN1 and Duel.GetMatchingGroupCount(c81011033.ntfil,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,nil)==0 
+end
+function c81011033.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_NORMALSUMMON)==0 and Duel.GetActivityCount(tp,ACTIVITY_SPSUMMON)==0
+	and Duel.GetActivityCount(tp,ACTIVITY_FLIPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_SUMMON)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	e1:SetTargetRange(1,0)
+	Duel.RegisterEffect(e1,tp)
+	local e2=e1:Clone()
+	e2:SetCode(EFFECT_CANNOT_MSET)
+	Duel.RegisterEffect(e2,tp)
+	local e3=e1:Clone()
+	e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	Duel.RegisterEffect(e3,tp)
+	local e4=e1:Clone()
+	e4:SetCode(EFFECT_CANNOT_FLIP_SUMMON)
+	Duel.RegisterEffect(e4,tp)
+end
+function c81011033.filter(c)
+	return c:IsType(TYPE_SPELL) and c:IsAbleToHand()
+end
+function c81011033.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81011033.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c81011033.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c81011033.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+	if not e:IsHasType(EFFECT_TYPE_ACTIVATE) then return end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e1:SetTargetRange(1,0)
+	e1:SetValue(c81011033.aclimit)
+	Duel.RegisterEffect(e1,tp)
+end
+function c81011033.aclimit(e,re,tp)
+	return not re:IsActiveType(TYPE_SPELL)
+end

expansions/script/c81011039.lua

+--云上·黑崎智秋
+function c81011039.initial_effect(c)
+	c:SetSPSummonOnce(81011039)
+	--link summon
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,nil,2,2,c81011039.lcheck)
+	--atk
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetValue(c81011039.atkval)
+	c:RegisterEffect(e1)
+	--counter
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_COUNTER)
+	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e2:SetCode(EVENT_LEAVE_FIELD)
+	e2:SetCountLimit(1,81011039)
+	e2:SetCondition(c81011039.ccon)
+	e2:SetOperation(c81011039.cop)
+	c:RegisterEffect(e2)
+end
+function c81011039.lcheck(g,lc)
+	return g:IsExists(c81011039.mzfilter,1,nil)
+end
+function c81011039.mzfilter(c)
+	return c:GetCounter(0x1da0)>0 and c:IsLinkType(TYPE_MONSTER)
+end
+function c81011039.atkval(e,c)
+	return Duel.GetCounter(0,1,1,0x1da0)*200
+end
+function c81011039.ccon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousPosition(POS_FACEUP)
+end
+function c81011039.cop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local g=Duel.GetMatchingGroup(Card.IsCanAddCounter,tp,0,LOCATION_ONFIELD,nil,0x1da0,1)
+	local tc=g:GetFirst()
+	while tc do
+		tc:AddCounter(0x1da0,1)
+		tc=g:GetNext()
+	end
+end

expansions/script/c81011040.lua

+--清晨阳光·椎名咪玉
+function c81011040.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddLinkProcedure(c,c81011040.mfilter,2,2)
+	--equip change
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,81011040)
+	e1:SetTarget(c81011040.eqtg)
+	e1:SetOperation(c81011040.eqop)
+	c:RegisterEffect(e1)
+	--search
+	local e2=Effect.CreateEffect(c)
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,81011940)
+	e2:SetCost(aux.bfgcost)
+	e2:SetTarget(c81011040.thtg)
+	e2:SetOperation(c81011040.thop)
+	c:RegisterEffect(e2)
+end
+function c81011040.mfilter(c)
+	return not c:IsType(TYPE_LINK) and c:IsLinkRace(RACE_WARRIOR)
+end
+function c81011040.eqfilter1(c)
+	return c:GetEquipTarget()
+		and Duel.IsExistingTarget(c81011040.eqfilter2,0,LOCATION_MZONE,LOCATION_MZONE,1,c:GetEquipTarget(),c)
+end
+function c81011040.eqfilter2(c,ec)
+	return c:IsFaceup() and ec:CheckEquipTarget(c)
+end
+function c81011040.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return false end
+	if chk==0 then return Duel.IsExistingTarget(c81011040.eqfilter1,tp,LOCATION_SZONE,LOCATION_SZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g1=Duel.SelectTarget(tp,c81011040.eqfilter1,tp,LOCATION_SZONE,LOCATION_SZONE,1,1,nil)
+	local tc=g1:GetFirst()
+	e:SetLabelObject(tc)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
+	local g2=Duel.SelectTarget(tp,c81011040.eqfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,tc:GetEquipTarget(),tc)
+end
+function c81011040.eqop(e,tp,eg,ep,ev,re,r,rp)
+	local ec=e:GetLabelObject()
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	local tc=g:GetFirst()
+	if tc==ec then tc=g:GetNext() end
+	if ec:IsFaceup() and ec:IsRelateToEffect(e) and ec:CheckEquipTarget(tc) and tc:IsFaceup() and tc:IsRelateToEffect(e) then
+		Duel.Equip(tp,ec,tc)
+	end
+end
+function c81011040.thfilter(c)
+	return c:IsType(TYPE_EQUIP) and c:IsAbleToHand()
+end
+function c81011040.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81011040.thfilter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c81011040.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c81011040.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
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(c81011040.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+	local e2=Effect.CreateEffect(e:GetHandler())
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetTarget(c81011040.atktg)
+	e2:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e2,tp)
+end
+function c81011040.splimit(e,c)
+	return not c:IsRace(RACE_WARRIOR)
+end
+function c81011040.atktg(e,c)
+	return c:GetEquipCount()==0
+end

expansions/script/c81012068.lua

+--自在周末·理子
+function c81012068.initial_effect(c)
+	--synchro summon
+	aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_PYRO),1)
+	c:EnableReviveLimit()
+	--disable attack
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e1:SetCountLimit(1,81012068)
+	e1:SetCondition(c81012068.atkcon)
+	e1:SetCost(c81012068.atkcost)
+	e1:SetOperation(c81012068.atkop)
+	c:RegisterEffect(e1)
+	--immune
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_IMMUNE_EFFECT)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetCondition(c81012068.immcon)
+	e2:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_PYRO))
+	e2:SetValue(c81012068.efilter)
+	c:RegisterEffect(e2)
+end
+function c81012068.atkcon(e,tp,eg,ep,ev,re,r,rp)
+	local tc=eg:GetFirst()
+	return tc:IsControler(1-tp)
+end
+function c81012068.costfilter(c)
+	return bit.band(c:GetType(),0x81)==0x81 and c:IsFaceup() and c:IsAbleToDeckAsCost()
+end
+function c81012068.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81012068.costfilter,tp,LOCATION_EXTRA,0,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectMatchingCard(tp,c81012068.costfilter,tp,LOCATION_EXTRA,0,1,1,nil)
+	Duel.SendtoDeck(g,nil,2,REASON_COST)
+end
+function c81012068.atkop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.NegateAttack()
+end
+function c81012068.cfilter(c)
+	return c:IsFaceup() and c:IsRace(RACE_PYRO) and c:IsType(TYPE_PENDULUM) and c:IsType(TYPE_RITUAL) and c:IsLevelAbove(8)
+end
+function c81012068.immcon(e)
+	return Duel.IsExistingMatchingCard(c81012068.cfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
+end
+function c81012068.efilter(e,te)
+	return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
+end

expansions/script/c81015051.lua

+--北上丽花的思虑
+require("expansions/script/c81000000")
+function c81015051.initial_effect(c)
+	--act in hand
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_SINGLE)
+	e0:SetCode(EFFECT_TRAP_ACT_IN_HAND)
+	e0:SetCondition(Tenka.ReikaCon)
+	c:RegisterEffect(e0)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e1:SetCountLimit(1,81015051+EFFECT_COUNT_CODE_OATH)
+	e1:SetCondition(c81015051.condition)
+	e1:SetOperation(c81015051.activate)
+	c:RegisterEffect(e1)
+	--destroy replace
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EFFECT_DESTROY_REPLACE)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetTarget(c81015051.reptg)
+	e2:SetValue(c81015051.repval)
+	e2:SetOperation(c81015051.repop)
+	c:RegisterEffect(e2)
+end
+function c81015051.condition(e,tp,eg,ep,ev,re,r,rp)
+	local a=Duel.GetAttacker()
+	local at=Duel.GetAttackTarget()
+	return at and ((a:IsControler(tp) and a:IsSetCard(0x81a))
+		or (at:IsControler(tp) and at:IsFaceup() and at:IsSetCard(0x81a)))
+end
+function c81015051.activate(e,tp,eg,ep,ev,re,r,rp)
+	local a=Duel.GetAttacker()
+	local at=Duel.GetAttackTarget()
+	if a:IsControler(1-tp) then a,at=at,a end
+	if not a:IsRelateToBattle() or a:IsFacedown() or not at:IsRelateToBattle() or at:IsFacedown() then return end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE)
+	e1:SetValue(at:GetAttack())
+	a:RegisterEffect(e1)
+end
+function c81015051.repfilter(c,tp)
+	return c:IsFaceup() and c:IsSetCard(0x81a)
+		and c:IsOnField() and c:IsControler(tp) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
+end
+function c81015051.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToRemove() and Tenka.ReikaCon(e) and eg:IsExists(c81015051.repfilter,1,nil,tp) end
+	return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
+end
+function c81015051.repval(e,c)
+	return c81015051.repfilter(c,e:GetHandlerPlayer())
+end
+function c81015051.repop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
+end

expansions/script/c81018046.lua

+--最上静香的回忆诗
+function c81018046.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,81018046)
+	e1:SetTarget(c81018046.target)
+	e1:SetOperation(c81018046.activate)
+	c:RegisterEffect(e1)
+	--fusion summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_FREE_CHAIN)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCountLimit(1,81018946)
+	e3:SetCost(aux.bfgcost)
+	e3:SetTarget(c81018046.sptg)
+	e3:SetOperation(c81018046.spop)
+	c:RegisterEffect(e3)
+end
+function c81018046.filter(c)
+	return c:IsSetCard(0x81b) and c:IsAbleToHand()
+end
+function c81018046.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81018046.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function c81018046.activate(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c81018046.filter,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 c81018046.spfilter1(c,e)
+	return c:IsSetCard(0x81b) and not c:IsImmuneToEffect(e)
+end
+function c81018046.spfilter2(c,e,tp,m,f,chkf)
+	return c:IsType(TYPE_FUSION) and (not f or f(c))
+		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
+end
+function c81018046.spfilter3(c)
+	return c:IsCanBeFusionMaterial() and c:IsSetCard(0x81b)
+end
+function c81018046.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then
+		local chkf=tp
+		local mg1=Duel.GetFusionMaterial(tp):Filter(Card.IsSetCard,nil,0x81b)
+		local res=Duel.IsExistingMatchingCard(c81018046.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
+		if not res then
+			local ce=Duel.GetChainMaterial(tp)
+			if ce~=nil then
+				local fgroup=ce:GetTarget()
+				local mg2=fgroup(ce,e,tp):Filter(c81018046.spfilter3,nil)
+				local mf=ce:GetValue()
+				res=Duel.IsExistingMatchingCard(c81018046.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
+			end
+		end
+		return res
+	end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c81018046.spop(e,tp,eg,ep,ev,re,r,rp)
+	local chkf=tp
+	local mg1=Duel.GetFusionMaterial(tp):Filter(c81018046.spfilter1,nil,e)
+	local sg1=Duel.GetMatchingGroup(c81018046.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
+	local mg2=nil
+	local sg2=nil
+	local ce=Duel.GetChainMaterial(tp)
+	if ce~=nil then
+		local fgroup=ce:GetTarget()
+		mg2=fgroup(ce,e,tp):Filter(c81018046.spfilter3,nil)
+		local mf=ce:GetValue()
+		sg2=Duel.GetMatchingGroup(c81018046.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
+	end
+	if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
+		local sg=sg1:Clone()
+		if sg2 then sg:Merge(sg2) end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local tg=sg:Select(tp,1,1,nil)
+		local tc=tg:GetFirst()
+		if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
+			local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
+			tc:SetMaterial(mat1)
+			Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
+			Duel.BreakEffect()
+			Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
+		else
+			local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
+			local fop=ce:GetOperation()
+			fop(ce,e,tp,tc,mat2)
+		end
+		tc:CompleteProcedure()
+		local e1=Effect.CreateEffect(e:GetHandler())
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_BASE_ATTACK)
+		e1:SetValue(0)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
+		tc:RegisterEffect(e1,true)
+	end
+end

expansions/script/c81018047.lua

+--雨季·屋檐之下
+function c81018047.initial_effect(c)
+	--Activate
+	local e0=Effect.CreateEffect(c)
+	e0:SetType(EFFECT_TYPE_ACTIVATE)
+	e0:SetCode(EVENT_FREE_CHAIN)
+	c:RegisterEffect(e0)
+	--atk up
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_UPDATE_ATTACK)
+	e1:SetRange(LOCATION_SZONE)
+	e1:SetTargetRange(LOCATION_MZONE,0)
+	e1:SetValue(-800)
+	c:RegisterEffect(e1)
+	--indestructable
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
+	e2:SetRange(LOCATION_SZONE)
+	e2:SetTargetRange(LOCATION_MZONE,0)
+	e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x81b))
+	e2:SetValue(1)
+	c:RegisterEffect(e2)
+	--Negate
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+	e3:SetType(EFFECT_TYPE_QUICK_O)
+	e3:SetCode(EVENT_CHAINING)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetCountLimit(1,81018047)
+	e3:SetCondition(c81018047.conditiona)
+	e3:SetCost(c81018047.cost)
+	e3:SetTarget(c81018047.target)
+	e3:SetOperation(c81018047.operation)
+	c:RegisterEffect(e3)
+	local e4=e3:Clone()
+	e4:SetCondition(c81018047.conditionb)
+	c:RegisterEffect(e4)
+	--to hand
+	local e5=Effect.CreateEffect(c)
+	e5:SetCategory(CATEGORY_TOHAND)
+	e5:SetType(EFFECT_TYPE_IGNITION)
+	e5:SetRange(LOCATION_GRAVE)
+	e5:SetCountLimit(1,81018947)
+	e5:SetCondition(aux.exccon)
+	e5:SetCost(c81018047.thcost)
+	e5:SetTarget(c81018047.thtg)
+	e5:SetOperation(c81018047.thop)
+	c:RegisterEffect(e5)
+end
+function c81018047.conditiona(e,tp,eg,ep,ev,re,r,rp)
+	if not Duel.IsChainNegatable(ev) then return false end
+	if re:IsHasCategory(CATEGORY_NEGATE)
+		and Duel.GetChainInfo(ev-1,CHAININFO_TRIGGERING_EFFECT):IsHasType(EFFECT_TYPE_ACTIVATE) then return false end
+	local ex,tg,tc=Duel.GetOperationInfo(ev,CATEGORY_DESTROY)
+	return ex and tg~=nil and tc+tg:FilterCount(Card.IsOnField,nil)-tg:GetCount()>0
+end
+function c81018047.conditionb(e,tp,eg,ep,ev,re,r,rp)
+	if not Duel.IsChainNegatable(ev) then return false end
+	if re:IsHasCategory(CATEGORY_NEGATE)
+		and Duel.GetChainInfo(ev-1,CHAININFO_TRIGGERING_EFFECT):IsHasType(EFFECT_TYPE_ACTIVATE) then return false end
+	local ex,tg,tc=Duel.GetOperationInfo(ev,CATEGORY_REMOVE)
+	return ex and tg~=nil and tc+tg:FilterCount(Card.IsOnField,nil)-tg:GetCount()>0
+end
+function c81018047.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1810,3,REASON_COST) end
+	Duel.RemoveCounter(tp,1,1,0x1810,3,REASON_COST)
+end
+function c81018047.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)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+	end
+end
+function c81018047.operation(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Destroy(eg,REASON_EFFECT)
+	end
+end
+function c81018047.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToDeckAsCost() end
+	Duel.SendtoDeck(e:GetHandler(),nil,2,REASON_COST)
+end
+function c81018047.thfilter(c)
+	return c:IsSetCard(0x81b) and c:IsFaceup() and c:IsAbleToHand()
+end
+function c81018047.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c81018047.thfilter,tp,LOCATION_REMOVED,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
+end
+function c81018047.thop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,c81018047.thfilter,tp,LOCATION_REMOVED,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.SendtoHand(g,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-tp,g)
+	end
+end

expansions/script/c81019002.lua

@@ -10,7 +10,7 @@ function c81019002.initial_effect(c)
 	c:RegisterEffect(e1)
 end
 function c81019002.filter(c)
-	return c:IsCode(81000000,81011000) and c:IsAbleToHand()
+	return c:IsCode(81000000,81011000,26807000) and c:IsAbleToHand()
 end
 function c81019002.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(c81019002.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end

expansions/script/c82206000.lua

+local m=82206000
+local cm=_G["c"..m]
+cm.name="幻晶兽 炽晶"
+--配 置
+cm.set=0x296	--字 段
+cm.count=3	  --翻 开 卡 片 数 量
+function cm.initial_effect(c)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCountLimit(1,m)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+end
+--To Hand
+function cm.filter(c)
+	return c:IsSetCard(cm.set) and c:IsAbleToHand()
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=cm.count end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,0,LOCATION_DECK)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
+	Duel.ConfirmDecktop(p,cm.count)
+	local g=Duel.GetDecktopGroup(p,cm.count)
+	if g:IsExists(cm.filter,1,nil) and Duel.SelectYesNo(p,aux.Stringid(m,1)) then
+		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_ATOHAND)
+		local sg=g:FilterSelect(p,cm.filter,1,1,nil)
+		Duel.SendtoHand(sg,nil,REASON_EFFECT)
+		Duel.ConfirmCards(1-p,sg)
+		Duel.ShuffleHand(p)
+	end
+	Duel.ShuffleDeck(p)
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82206001.lua

+local m=82206001
+local cm=_G["c"..m]
+cm.name="幻晶兽 幽晶"
+--配 置
+cm.set=0x296	--字 段
+function cm.initial_effect(c)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,m)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+end
+--Special Summon
+function cm.filter1(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER)
+		and Duel.IsExistingTarget(cm.filter2,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode())
+end
+function cm.filter2(c,e,tp,code)
+	return c:IsCode(code) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and cm.filter1(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingTarget(cm.filter1,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
+	local g=Duel.SelectTarget(tp,cm.filter1,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		local sc=Duel.GetFirstMatchingCard(cm.filter2,tp,LOCATION_DECK,0,nil,e,tp,tc:GetCode())
+		if not sc then return end
+		Duel.SpecialSummon(sc,0,tp,tp,false,false,POS_FACEUP)
+		Duel.ShuffleDeck(tp)
+		Duel.BreakEffect()
+		if Duel.SendtoDeck(tc,nil,0,REASON_EFFECT)~=0 then
+			Duel.ConfirmDecktop(tp,1)
+		end
+	end
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82206002.lua

+local m=82206002
+local cm=_G["c"..m]
+cm.name="幻晶兽 凝晶"
+--配 置
+cm.set=0x296	--字 段
+function cm.initial_effect(c)
+	--To Hand
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1,m)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+end
+--To Hand
+function cm.filter1(c,tp)
+	return c:IsSetCard(cm.set) and Duel.IsExistingTarget(cm.filter2,tp,LOCATION_DECK,0,1,nil,c:GetCode())
+end
+function cm.filter2(c,code)
+	return c:IsCode(code) and c:IsAbleToHand()
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and cm.filter1(chkc,tp) end
+	if chk==0 then return Duel.IsExistingTarget(cm.filter1,tp,LOCATION_GRAVE,0,1,nil,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
+	local g=Duel.SelectTarget(tp,cm.filter1,tp,LOCATION_GRAVE,0,1,1,nil,tp)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		local sc=Duel.GetFirstMatchingCard(cm.filter2,tp,LOCATION_DECK,0,nil,tc:GetCode())
+		if not sc then return end
+		Duel.SendtoHand(sc,nil,REASON_EFFECT)
+		Duel.ShuffleDeck(tp)
+		Duel.BreakEffect()
+		if Duel.SendtoDeck(tc,nil,0,REASON_EFFECT)~=0 then
+			Duel.ConfirmDecktop(tp,1)
+		end
+	end
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82206003.lua

+local m=82206003
+local cm=_G["c"..m]
+cm.name="幻晶兽 绀晶"
+--配 置
+cm.set=0x296	--字 段
+cm.count=3	--翻 开 卡 片 数 量
+function cm.initial_effect(c)
+	--Special Summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCountLimit(1,m)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	local e2=e1:Clone()
+	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e2)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+end
+--Special Summon
+function cm.filter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=cm.count end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
+	Duel.ConfirmDecktop(p,cm.count)
+	local g=Duel.GetDecktopGroup(p,cm.count)
+	if g:IsExists(cm.filter,1,nil,e,p) and Duel.SelectYesNo(p,aux.Stringid(m,1)) then
+		Duel.Hint(HINT_SELECTMSG,p,HINTMSG_ATOHAND)
+		local sg=g:FilterSelect(p,cm.filter,1,1,nil,e,tp)
+		Duel.SpecialSummon(sg,0,p,p,false,false,POS_FACEUP)
+	end
+	Duel.ShuffleDeck(p)
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82206005.lua

+local m=82206005
+local cm=_G["c"..m]
+cm.name="幻晶兽 凛晶"
+--配 置
+cm.set=0x296	--字 段
+function cm.initial_effect(c)
+	c:EnableReviveLimit()
+	--Link Summon
+	aux.AddLinkProcedure(c,cm.mfilter,1,1)
+	--Search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
+	e1:SetCountLimit(1,m)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	--Destroy Replace
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e2:SetCode(EFFECT_DESTROY_REPLACE)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetTarget(cm.reptg)
+	e2:SetValue(cm.repval)
+	e2:SetOperation(cm.repop)
+	c:RegisterEffect(e2)
+	--Cost
+	Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
+end
+--Link Summon
+function cm.mfilter(c)
+	return not c:IsCode(m) and c:IsLinkRace(RACE_BEASTWARRIOR) and c:IsLinkAttribute(ATTRIBUTE_WIND)
+end
+--Cost
+function cm.counterfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND)
+end
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp)
+	return not c:IsAttribute(ATTRIBUTE_WIND)
+end
+--Search
+function cm.filter(c)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_LINK)
+end
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(cm.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
+	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
+	if g:GetCount()>0 then
+		Duel.ShuffleDeck(tp)
+		Duel.MoveSequence(g:GetFirst(),0)
+		Duel.ConfirmDecktop(tp,1)
+	end
+end
+--Destroy Replace
+function cm.repfilter(c,tp)
+	return c:IsFaceup() and c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER)
+		and c:IsOnField() and c:IsControler(tp) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
+end
+function cm.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(cm.repfilter,1,nil,tp) end
+	return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
+end
+function cm.repval(e,c)
+	return cm.repfilter(c,e:GetHandlerPlayer())
+end
+function cm.repop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
+end
\ No newline at end of file

expansions/script/c82206006.lua

+local m=82206006
+local cm=_G["c"..m]
+cm.name="幻晶兽 岚晶"
+--配 置
+cm.set=0x296	--字 段
+cm.count=3	--对 象 数
+function cm.initial_effect(c)
+	c:EnableReviveLimit()
+	--Link Summon
+	aux.AddLinkProcedure(c,cm.mfilter,2,2)
+	--Draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DRAW+CATEGORY_TODECK)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,m)
+	e1:SetTarget(cm.drtg)
+	e1:SetOperation(cm.drop)
+	c:RegisterEffect(e1)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+end
+--Link Summon
+function cm.mfilter(c)
+	return c:IsLinkAttribute(ATTRIBUTE_WIND)
+end
+--Draw
+function cm.tdfilter(c)
+	return c:IsSetCard(cm.set) and c:IsAbleToDeck()
+end
+function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.tdfilter(chkc) end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
+		and Duel.IsExistingTarget(cm.tdfilter,tp,LOCATION_GRAVE,0,cm.count,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,cm.tdfilter,tp,LOCATION_GRAVE,0,cm.count,cm.count,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+end
+function cm.drop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.Draw(tp,1,REASON_EFFECT)==0 then return end
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
+	if g:GetCount()<1 then return end
+	Duel.BreakEffect()
+	Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
+	local og=Duel.GetOperatedGroup()
+	local ct=og:FilterCount(Card.IsLocation,nil,LOCATION_DECK)
+	if ct>0 then
+		Duel.SortDecktop(tp,tp,ct)
+	end
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82206007.lua

+local m=82206007
+local cm=_G["c"..m]
+cm.name="幻晶兽 恋晶"
+--配 置
+cm.set=0x296	--字 段
+cm.count=3  --翻 开 卡 片 数 量
+function cm.initial_effect(c)
+	c:EnableReviveLimit()
+	--Synchro Summon
+	aux.AddSynchroProcedure(c,cm.tfilter,aux.NonTuner(nil),1)
+	--Draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCountLimit(1,m)
+	e1:SetCondition(cm.condition)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+	--Cost
+	Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
+end
+--Synchro Summon
+function cm.tfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND)
+end
+--Cost
+function cm.counterfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND)
+end
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp)
+	return not c:IsAttribute(ATTRIBUTE_WIND)
+end
+--Search
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
+end
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(cm.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp) and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=cm.count end
+	Duel.SetTargetPlayer(tp)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
+	Duel.ConfirmDecktop(p,cm.count)
+	local g=Duel.GetDecktopGroup(p,cm.count)
+	local ct=g:FilterCount(Card.IsSetCard,nil,cm.set)
+	Duel.ShuffleDeck(p)
+	if ct>0 then
+		Duel.Draw(p,ct,REASON_EFFECT)
+	end
+end
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82206008.lua

+local m=82206008
+local cm=_G["c"..m]
+cm.name="幻晶兽 虚晶"
+--配 置
+cm.set=0x296	--字 段
+function cm.initial_effect(c)
+	c:EnableReviveLimit()
+	--Xyz Summon
+	aux.AddXyzProcedure(c,cm.mfilter,3,2)
+	--Search
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1,m)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+	--Special Summon
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_TO_GRAVE)
+	e3:SetProperty(EFFECT_FLAG_DELAY)
+	e3:SetCondition(cm.spcon)
+	e3:SetTarget(cm.sptg)
+	e3:SetOperation(cm.spop)
+	c:RegisterEffect(e3)
+	--Cost
+	Duel.AddCustomActivityCounter(m,ACTIVITY_SPSUMMON,cm.counterfilter)
+end
+--Xyz Summon
+function cm.mfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND)
+end
+--Cost
+function cm.counterfilter(c)
+	return c:IsAttribute(ATTRIBUTE_WIND)
+end
+function cm.splimit(e,c,sump,sumtype,sumpos,targetp)
+	return not c:IsAttribute(ATTRIBUTE_WIND)
+end
+--Search
+function cm.filter(c)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
+end
+function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetCustomActivityCount(m,tp,ACTIVITY_SPSUMMON)==0 
+		and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
+	e1:SetTargetRange(1,0)
+	e1:SetTarget(cm.splimit)
+	e1:SetReset(RESET_PHASE+PHASE_END)
+	Duel.RegisterEffect(e1,tp)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local g=Duel.SelectMatchingCard(tp,cm.filter,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
+--Special Summon
+function cm.spfilter(c,e,tp)
+	return c:IsSetCard(cm.set) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+end
+function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)
+end
+function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
+end
+function cm.spop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=Duel.SelectMatchingCard(tp,cm.spfilter,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
+end
\ No newline at end of file

expansions/script/c82207000.lua

+local m=82207000
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--cannot special summon  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetType(EFFECT_TYPE_SINGLE)  
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)  
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)  
+	c:RegisterEffect(e1) 
+	--summon with no tribute  
+	local e2=Effect.CreateEffect(c)  
+	e2:SetDescription(aux.Stringid(m,0))  
+	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)  
+	e2:SetType(EFFECT_TYPE_SINGLE)  
+	e2:SetCode(EFFECT_SUMMON_PROC)  
+	e2:SetCondition(cm.ntcon)  
+	c:RegisterEffect(e2) 
+	--effect gain  
+	local e3=Effect.CreateEffect(c)  
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)  
+	e3:SetCode(EVENT_BE_MATERIAL)  
+	e3:SetCondition(cm.efcon)  
+	e3:SetOperation(cm.efop)  
+	c:RegisterEffect(e3)  
+end  
+function cm.ntcon(e,c,minc)  
+	if c==nil then return true end  
+	return minc==0 and c:GetLevel()>4 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0  
+end  
+function cm.efcon(e,tp,eg,ep,ev,re,r,rp)  
+	return r==REASON_XYZ  
+end  
+function cm.efop(e,tp,eg,ep,ev,re,r,rp)  
+	local c=e:GetHandler()  
+	local rc=c:GetReasonCard()  
+	local e1=Effect.CreateEffect(rc)  
+	e1:SetDescription(aux.Stringid(m,1))  
+	e1:SetCategory(CATEGORY_TOHAND)  
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)	
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)  
+	e1:SetCondition(cm.thcon)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.thtg)  
+	e1:SetOperation(cm.thop)  
+	e1:SetReset(RESET_EVENT+0x1fe0000)  
+	rc:RegisterEffect(e1,true)  
+	if not rc:IsType(TYPE_EFFECT) then  
+		local e2=Effect.CreateEffect(c)  
+		e2:SetType(EFFECT_TYPE_SINGLE)  
+		e2:SetCode(EFFECT_ADD_TYPE)  
+		e2:SetValue(TYPE_EFFECT)  
+		e2:SetReset(RESET_EVENT+0x1fe0000)  
+		rc:RegisterEffect(e2,true)  
+	end  
+end  
+function cm.thcon(e,tp,eg,ep,ev,re,r,rp)  
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)  
+end  
+function cm.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 cm.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_GRAVE) 
+end  
+function cm.thfilter(c)  
+	return c:IsCode(82207000) and c:IsAbleToHand()  
+end  
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)  
+	local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_GRAVE,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/c82207001.lua

+local m=82207001
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--xyz summon  
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_EARTH),11,2,cm.ovfilter,aux.Stringid(m,0),2,cm.xyzop)  
+	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_EFFECT)  
+	e3:SetValue(1)  
+	c:RegisterEffect(e3) 
+	--pos  
+	local e4=Effect.CreateEffect(c)  
+	e4:SetType(EFFECT_TYPE_FIELD)  
+	e4:SetCode(EFFECT_SET_POSITION)  
+	e4:SetRange(LOCATION_MZONE)  
+	e4:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)  
+	e4:SetCondition(cm.poscon)  
+	e4:SetTarget(cm.postg)  
+	e4:SetValue(POS_FACEUP_DEFENSE)  
+	c:RegisterEffect(e4)  
+end
+function cm.cfilter(c)  
+	return c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToRemoveAsCost()  
+end  
+function cm.ovfilter(c)  
+	return c:IsFaceup() and c:IsCode(82207000)  
+end  
+function cm.xyzop(e,tp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) and Duel.GetFlagEffect(tp,82207001)==0 end  
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+	Duel.RegisterFlagEffect(tp,82207001,RESET_PHASE+PHASE_END,0,1)  
+end  
+function cm.poscon(e)  
+	return e:GetHandler():IsDefensePos()  
+end  
+function cm.postg(e,c)  
+	return c:IsFaceup()  
+end  
\ No newline at end of file

expansions/script/c82207002.lua

+local m=82207002
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--xyz summon  
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_WATER),11,2,cm.ovfilter,aux.Stringid(m,0),2,cm.xyzop)  
+	c:EnableReviveLimit() 
+	--todeck  
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(m,1))
+	e3:SetCategory(CATEGORY_TODECK)  
+	e3:SetType(EFFECT_TYPE_IGNITION)  
+	e3:SetRange(LOCATION_MZONE)  
+	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)  
+	e3:SetCountLimit(1)  
+	e3:SetTarget(cm.tdtg)  
+	e3:SetOperation(cm.tdop)  
+	c:RegisterEffect(e3) 
+end
+function cm.cfilter(c)  
+	return c:IsAttribute(ATTRIBUTE_WATER) and c:IsAbleToRemoveAsCost()  
+end  
+function cm.ovfilter(c)  
+	return c:IsFaceup() and c:IsCode(82207000)  
+end  
+function cm.xyzop(e,tp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) and Duel.GetFlagEffect(tp,82207002)==0 end  
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+	Duel.RegisterFlagEffect(tp,82207002,RESET_PHASE+PHASE_END,0,1)  
+end  
+function cm.tdfilter(c)  
+	return c:IsFacedown() and c:IsAbleToDeck()  
+end  
+function cm.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)  
+	if chkc then return chkc:IsOnField() and cm.tdfilter(chkc) end  
+	if chk==0 then return Duel.IsExistingTarget(cm.tdfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)  
+	local g=Duel.SelectTarget(tp,cm.tdfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)  
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)  
+	Duel.SetChainLimit(cm.chlimit)  
+end  
+function cm.chlimit(e,ep,tp)  
+	return tp==ep 
+end  
+function cm.tdop(e,tp,eg,ep,ev,re,r,rp)  
+	local tc=Duel.GetFirstTarget()  
+	if tc:IsRelateToEffect(e) then  
+		Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)  
+	end  
+end  
\ No newline at end of file

expansions/script/c82207003.lua

+local m=82207003
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--xyz summon  
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_WIND),11,2,cm.ovfilter,aux.Stringid(m,0),2,cm.xyzop)  
+	c:EnableReviveLimit() 
+	--atk up  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetDescription(aux.Stringid(m,1))  
+	e1:SetCategory(CATEGORY_ATKCHANGE)  
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)  
+	e1:SetProperty(EFFECT_FLAG_DELAY)  
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)  
+	e1:SetCondition(cm.atkcon)  
+	e1:SetTarget(cm.atktg)  
+	e1:SetOperation(cm.atkop)  
+	c:RegisterEffect(e1)
+end
+function cm.cfilter(c)  
+	return c:IsAttribute(ATTRIBUTE_WIND) and c:IsAbleToRemoveAsCost()  
+end  
+function cm.ovfilter(c)  
+	return c:IsFaceup() and c:IsCode(82207000)  
+end  
+function cm.xyzop(e,tp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) and Duel.GetFlagEffect(tp,82207003)==0 end  
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+	Duel.RegisterFlagEffect(tp,82207003,RESET_PHASE+PHASE_END,0,1)  
+end  
+function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)  
+	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)  
+end  
+function cm.atkfilter(c)  
+	return c:IsFaceup()  
+end  
+function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.atkfilter,tp,0,LOCATION_MZONE,1,nil) end  
+end  
+function cm.atkop(e,tp,eg,ep,ev,re,r,rp)  
+	local c=e:GetHandler()  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)  
+	local g=Duel.SelectMatchingCard(tp,cm.atkfilter,tp,0,LOCATION_MZONE,1,1,nil)  
+	local tc=g:GetFirst()  
+	if tc and c:IsRelateToEffect(e) and c:IsFaceup() then  
+		local atk=tc:GetAttack()  
+		local e1=Effect.CreateEffect(c)  
+		e1:SetType(EFFECT_TYPE_SINGLE)  
+		e1:SetCode(EFFECT_UPDATE_ATTACK)  
+		e1:SetValue(atk)  
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)  
+		c:RegisterEffect(e1) 
+		local e2=Effect.CreateEffect(c)  
+		e2:SetType(EFFECT_TYPE_SINGLE)  
+		e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)  
+		e2:SetCode(EFFECT_EXTRA_ATTACK)  
+		e2:SetValue(1)  
+		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)  
+		c:RegisterEffect(e2)   
+	end  
+end  
\ No newline at end of file

expansions/script/c82207004.lua

+local m=82207004
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--xyz summon  
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_FIRE),11,2,cm.ovfilter,aux.Stringid(m,0),2,cm.xyzop)  
+	c:EnableReviveLimit()
+	--negate  
+	local e3=Effect.CreateEffect(c) 
+	e3:SetDescription(aux.Stringid(m,1))
+	e3:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)  
+	e3:SetType(EFFECT_TYPE_QUICK_O)  
+	e3:SetCode(EVENT_CHAINING)  
+	e3:SetCountLimit(1,82207004)  
+	e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)  
+	e3:SetRange(LOCATION_MZONE)  
+	e3:SetCondition(cm.discon)  
+	e3:SetCost(cm.discost)  
+	e3:SetTarget(cm.distg)  
+	e3:SetOperation(cm.disop)  
+	c:RegisterEffect(e3)   
+end
+function cm.cfilter(c)  
+	return c:IsAttribute(ATTRIBUTE_FIRE) and c:IsAbleToRemoveAsCost()  
+end  
+function cm.ovfilter(c)  
+	return c:IsFaceup() and c:IsCode(82207000)  
+end  
+function cm.xyzop(e,tp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) and Duel.GetFlagEffect(tp,82207004)==0 end  
+	local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
+	Duel.Remove(g,POS_FACEUP,REASON_COST)
+	Duel.RegisterFlagEffect(tp,82207004,RESET_PHASE+PHASE_END,0,1)  
+end  
+function cm.discon(e,tp,eg,ep,ev,re,r,rp)
+	local loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)  
+	if bit.band(loc,LOCATION_ONFIELD)==0 then return false end
+	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
+end  
+function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end  
+	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)  
+end  
+function cm.distg(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)  
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then  
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)  
+	end  
+end  
+function cm.disop(e,tp,eg,ep,ev,re,r,rp)  
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then  
+		Duel.Destroy(eg,REASON_EFFECT)  
+	end  
+end  
\ No newline at end of file

expansions/script/c82207005.lua

+local m=82207005
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--Activate  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)  
+	e1:SetType(EFFECT_TYPE_ACTIVATE) 
+	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
+	e1:SetCode(EVENT_FREE_CHAIN)  
+	e1:SetOperation(cm.activate)  
+	c:RegisterEffect(e1) 
+	--atk&def  
+	local e2=Effect.CreateEffect(c)  
+	e2:SetType(EFFECT_TYPE_FIELD)  
+	e2:SetCode(EFFECT_UPDATE_ATTACK)  
+	e2:SetRange(LOCATION_FZONE)  
+	e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)  
+	e2:SetTarget(aux.TargetBoolFunction(cm.filter))  
+	e2:SetValue(500)  
+	c:RegisterEffect(e2)  
+	local e3=e2:Clone()  
+	e3:SetCode(EFFECT_UPDATE_DEFENSE)  
+	c:RegisterEffect(e3)  
+end
+ 
+function cm.thfilter(c)  
+	return c:IsCode(82207000) and c:IsAbleToHand()  
+end  
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)  
+	if not e:GetHandler():IsRelateToEffect(e) then return end  
+	local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK,0,nil)  
+	if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then  
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)  
+		local sg=g:Select(tp,1,1,nil)  
+		Duel.SendtoHand(sg,nil,REASON_EFFECT)  
+		Duel.ConfirmCards(1-tp,sg)  
+	end  
+end  
+function cm.filter(c)  
+	return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:GetOverlayCount()==0  
+end

expansions/script/c82207006.lua

+local m=82207006
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--Activate  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_REMOVE)  
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
+	e1:SetCode(EVENT_FREE_CHAIN)  
+	e1:SetCondition(cm.condition)  
+	e1:SetTarget(cm.target)  
+	e1:SetOperation(cm.activate)  
+	c:RegisterEffect(e1)  
+end  
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)  
+	return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)  
+end  
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)  
+	local ct=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)-Duel.GetFieldGroupCount(tp,0,LOCATION_DECK) 
+	local g=Duel.GetDecktopGroup(tp,ct)
+	local sg=g:GetFirst()
+	if not sg:IsAbleToRemove() then return false end
+	for i=1,ct-1 do
+		sg=g:GetNext()
+		if not sg:IsAbleToRemove() then return false end
+	end   
+	if chk==0 then return ct>0 end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,ct,tp,LOCATION_DECK)  
+end  
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)  
+	local ct=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)-Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)
+	local g=nil
+	if ct>0 then  
+		g=Duel.GetDecktopGroup(tp,ct)
+		Duel.Remove(g,POS_FACEUP,REASON_EFFECT)  
+	end  
+end  
\ No newline at end of file

expansions/script/c82207007.lua

+local m=82207007
+local cm=_G["c"..m]
+function cm.initial_effect(c)  
+	--Activate  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)  
+	e1:SetType(EFFECT_TYPE_ACTIVATE)  
+	e1:SetCode(EVENT_FREE_CHAIN)  
+	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)  
+	e1:SetTarget(cm.target)  
+	e1:SetOperation(cm.activate)  
+	c:RegisterEffect(e1)  
+end	
+function cm.filter(c,e,tp)  
+	return c:IsType(TYPE_RITUAL) 
+end  
+function cm.rcheck(tp,g,c)  
+	return g:FilterCount(Card.IsLocation,nil,LOCATION_DECK)<=1  
+end  
+function cm.rgcheck(g)  
+	return g:FilterCount(Card.IsLocation,nil,LOCATION_DECK)<=1  
+end  
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then  
+		local mg=Duel.GetRitualMaterial(tp)   
+		aux.RCheckAdditional=cm.rcheck  
+		aux.RGCheckAdditional=cm.rgcheck  
+		local res=Duel.IsExistingMatchingCard(aux.RitualUltimateFilter,tp,LOCATION_DECK,0,1,nil,cm.filter,e,tp,mg,nil,Card.GetLevel,"Equal")  
+		aux.RCheckAdditional=nil  
+		aux.RGCheckAdditional=nil  
+		return res  
+	end  
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)  
+end  
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)  
+	local m=Duel.GetRitualMaterial(tp)  
+	local dg=nil  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)  
+	aux.RCheckAdditional=cm.rcheck  
+	aux.RGCheckAdditional=cm.rgcheck  
+	local tg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(aux.RitualUltimateFilter),tp,LOCATION_DECK,0,1,1,nil,cm.filter,e,tp,m,nil,Card.GetLevel,"Equal")  
+	local tc=tg:GetFirst()  
+	if tc then  
+		local mg=m:Filter(Card.IsCanBeRitualMaterial,tc,tc)   
+		if tc.mat_filter then  
+			mg=mg:Filter(tc.mat_filter,tc,tp)  
+		else  
+			mg:RemoveCard(tc)  
+		end  
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)  
+		aux.GCheckAdditional=aux.RitualCheckAdditional(tc,tc:GetLevel(),"Equal")  
+		local mat=mg:SelectSubGroup(tp,aux.RitualCheck,false,1,tc:GetLevel(),tp,tc,tc:GetLevel(),"Equal")  
+		aux.GCheckAdditional=nil  
+		if not mat or mat:GetCount()==0 then  
+			aux.RCheckAdditional=nil  
+			aux.RGCheckAdditional=nil  
+			return  
+		end  
+		tc:SetMaterial(mat)   
+		Duel.ReleaseRitualMaterial(mat)  
+		Duel.BreakEffect()  
+		Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)  
+		tc:CompleteProcedure()  
+		Duel.BreakEffect()
+		local lv=tc:GetOriginalLevel()
+		Duel.Damage(tp,lv*1000,REASON_EFFECT)
+		local e3=Effect.CreateEffect(e:GetHandler())
+		e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+		e3:SetRange(LOCATION_MZONE) 
+		e3:SetCountLimit(1)  
+		e3:SetCode(EVENT_PHASE+PHASE_STANDBY)  
+		e3:SetCondition(cm.damcon)  
+		e3:SetOperation(cm.damop)  
+		tc:RegisterEffect(e3)   
+	end  
+	aux.RCheckAdditional=nil  
+	aux.RGCheckAdditional=nil  
+end  
+function cm.damcon(e,tp)  
+	return Duel.GetTurnPlayer()==tp 
+end  
+function cm.damop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.SelectOption(tp,aux.Stringid(m,0))
+	Duel.Damage(tp,1000,REASON_EFFECT)  
+end  
\ No newline at end of file

expansions/script/c82207008.lua

+local m=82207008
+local cm=_G["c"..m]
+cm.name="拟龙"
+function cm.initial_effect(c)
+	--Search  
+	local e3=Effect.CreateEffect(c)  
+	e3:SetDescription(aux.Stringid(m,0))  
+	e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)  
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)  
+	e3:SetProperty(EFFECT_FLAG_DELAY)  
+	e3:SetCode(EVENT_DESTROYED) 
+	e3:SetCountLimit(1,m)
+	e3:SetTarget(cm.thtg)  
+	e3:SetOperation(cm.thop)  
+	c:RegisterEffect(e3)  
+	local e2=e3:Clone()
+	e2:SetCode(EVENT_REMOVE) 
+	c:RegisterEffect(e2) 
+end
+function cm.thfilter(c)  
+	return c:IsRace(RACE_DINOSAUR) and c:IsAbleToHand()  
+end  
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end  
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)  
+end  
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)  
+	local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)  
+	if g:GetCount()>0 then  
+		Duel.SendtoHand(g,nil,REASON_EFFECT)  
+		Duel.ConfirmCards(1-tp,g)  
+	end  
+end
\ No newline at end of file

expansions/script/c82224001.lua

+function c82224001.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(c82224001.target)  
+	e1:SetOperation(c82224001.activate)  
+	c:RegisterEffect(e1)  
+	--equip limit  
+	local e2=Effect.CreateEffect(c)  
+	e2:SetType(EFFECT_TYPE_SINGLE)  
+	e2:SetCode(EFFECT_EQUIP_LIMIT)  
+	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)  
+	e2:SetValue(1)  
+	c:RegisterEffect(e2)
+	--destroy 
+	local e3=Effect.CreateEffect(c)  
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)  
+	e3:SetCode(EVENT_BATTLE_START)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetCondition(c82224001.descon)  
+	e3:SetOperation(c82224001.desop)	
+	c:RegisterEffect(e3)   
+	--to grave  
+	local e4=Effect.CreateEffect(c)  
+	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)  
+	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)  
+	e4:SetCode(EVENT_TO_GRAVE)   
+	e4:SetOperation(c82224001.regop)  
+	c:RegisterEffect(e4)  
+end 
+function c82224001.target(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_EQUIP)  
+	Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)  
+	Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)  
+end  
+function c82224001.activate(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 c82224001.descon(e,tp,eg,ep,ev,re,r,rp)
+	local ec=e:GetHandler():GetEquipTarget()  
+	local tc=ec:GetBattleTarget()  
+	return tc and tc:IsRelateToBattle()  
+end  
+function c82224001.desop(e,tp,eg,ep,ev,re,r,rp)
+	local ec=e:GetHandler():GetEquipTarget() 
+	local tc=ec:GetBattleTarget()
+	Duel.Hint(HINT_MESSAGE,tp,aux.Stringid(82224001,0))
+	Duel.Destroy(tc,REASON_EFFECT)
+	Duel.Hint(HINT_MESSAGE,1-tp,aux.Stringid(82224001,0))
+end  
+function c82224001.regop(e,tp,eg,ep,ev,re,r,rp)  
+	local c=e:GetHandler()  
+	local e1=Effect.CreateEffect(c) 
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)  
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)  
+	e1:SetCode(EVENT_PHASE+PHASE_END)  
+	e1:SetRange(LOCATION_GRAVE)  
+	e1:SetCountLimit(1,82224001)
+	e1:SetCondition(c82224001.thcon)  
+	e1:SetTarget(c82224001.thtg)  
+	e1:SetOperation(c82224001.thop)  
+	e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)  
+	c:RegisterEffect(e1)  
+end  
+function c82224001.thcon(e,tp,eg,ep,ev,re,r,rp)  
+	return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD)  
+end 
+function c82224001.filter(c)  
+	return c:IsType(TYPE_EQUIP) and c:IsAbleToHand()  
+end  
+function c82224001.thtg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(c82224001.filter,tp,LOCATION_DECK,0,1,nil) end  
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)  
+end  
+
+function c82224001.thop(e,tp,eg,ep,ev,re,r,rp)  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)  
+	local g=Duel.SelectMatchingCard(tp,c82224001.filter,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/c82224003.lua

+function c82224003.initial_effect(c)  
+	--Activate  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_TODECK)  
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetHintTiming(TIMINGS_CHECK_MONSTER)  
+	e1:SetCode(EVENT_FREE_CHAIN)  
+	e1:SetTarget(c82224003.target)  
+	e1:SetOperation(c82224003.activate)  
+	c:RegisterEffect(e1)  
+end  
+function c82224003.filter(c)  
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()  
+end 
+function c82224003.filter2(c)  
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToHand()  
+end 
+function c82224003.target(e,tp,eg,ep,ev,re,r,rp,chk)  
+	local c=e:GetHandler()  
+	if chk==0 then return Duel.IsExistingMatchingCard(c82224003.filter,tp,0,LOCATION_MZONE,1,c) end  
+	local sg=Duel.GetMatchingGroup(c82224003.filter,tp,0,LOCATION_MZONE,c)  
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,sg,sg:GetCount(),0,0)  
+end
+function c82224003.filter3(c)  
+	return c:IsLocation(LOCATION_DECK) or c:IsLocation(LOCATION_EXTRA) or c:IsLocation(LOCATION_HAND)
+end  
+function c82224003.activate(e,tp,eg,ep,ev,re,r,rp)  
+	local sg=Duel.GetMatchingGroup(c82224003.filter,tp,0,LOCATION_MZONE,e:GetHandler())  
+	Duel.SendtoDeck(sg,nil,2,REASON_EFFECT)  
+	local tc=Duel.GetOperatedGroup()
+	if tc:FilterCount(c82224003.filter3,nil)>0 then
+		local sel=1
+		Duel.Hint(HINT_SELECTMSG,1-tp,aux.Stringid(82224003,0)) 
+		sel=Duel.SelectOption(1-tp,1213,1214)
+		if sel==0 then
+			Duel.ShuffleDeck(1-tp)
+			Duel.BreakEffect()
+			Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_ATOHAND)  
+			local g=Duel.SelectMatchingCard(1-tp,c82224003.filter2,1-tp,LOCATION_DECK,0,1,tc:FilterCount(c82224003.filter3,nil),nil)
+			if g:GetCount()>0 then
+				Duel.SendtoHand(g,nil,REASON_EFFECT)  
+				Duel.ConfirmCards(1-tp,g)  
+			end
+		end
+	end  
+end  
\ No newline at end of file

expansions/script/c82224006.lua

+function c82224006.initial_effect(c)  
+	--xyz summon  
+	aux.AddXyzProcedure(c,nil,9,2)  
+	c:EnableReviveLimit()  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetType(EFFECT_TYPE_FIELD)  
+	e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)  
+	e1:SetRange(LOCATION_MZONE)  
+	e1:SetTargetRange(LOCATION_MZONE,0)  
+	e1:SetTarget(c82224006.indtg)  
+	e1:SetValue(aux.indoval)  
+	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,0)  
+	e2:SetTarget(c82224006.indtg)  
+	e2:SetValue(aux.tgoval)  
+	c:RegisterEffect(e2) 
+end  
+function c82224006.indtg(e,c)  
+	return c:IsType(TYPE_MONSTER)
+end  
\ No newline at end of file

expansions/script/c82224017.lua

+function c82224017.initial_effect(c)  
+	--atk  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetType(EFFECT_TYPE_SINGLE)  
+	e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)  
+	e1:SetCode(EFFECT_UPDATE_ATTACK)  
+	e1:SetRange(LOCATION_MZONE)  
+	e1:SetValue(c82224017.atkval)  
+	c:RegisterEffect(e1) 
+	local e2=Effect.CreateEffect(c)  
+	e2:SetType(EFFECT_TYPE_FIELD)  
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EFFECT_CANNOT_ACTIVATE)  
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)  
+	e2:SetTargetRange(1,1)  
+	e2:SetValue(c82224017.actlimit) 
+	c:RegisterEffect(e2)  
+end
+function c82224017.atkval(e,c)  
+	local ct=Duel.GetFieldGroupCount(c:GetControler(),LOCATION_ONFIELD,LOCATION_ONFIELD)*100
+	return ct-100
+end  
+function c82224017.actlimit(e,re,tp) 
+	local p=re:GetHandlerPlayer()
+	local code=re:GetHandler():GetCode()
+	return re:IsActiveType(TYPE_SPELL) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and not Duel.IsExistingMatchingCard(Card.IsCode,p,LOCATION_GRAVE,0,1,nil,code)
+end  
\ No newline at end of file

expansions/script/c82224019.lua

+function c82224019.initial_effect(c)  
+	--Activate  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_DESTROY)  
+	e1:SetType(EFFECT_TYPE_ACTIVATE)  
+	e1:SetCode(EVENT_FREE_CHAIN) 
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)  
+	e1:SetTarget(c82224019.target)  
+	e1:SetOperation(c82224019.activate)  
+	c:RegisterEffect(e1)  
+end  
+function c82224019.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)  
+	if chkc then return chkc:IsOnField() and chkc~=e:GetHandler() end  
+	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)  
+	local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())  
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)  
+end  
+function c82224019.activate(e,tp,eg,ep,ev,re,r,rp)  
+	local tc=Duel.GetFirstTarget()  
+	if tc:IsRelateToEffect(e) then  
+		Duel.Destroy(tc,REASON_EFFECT)  
+	end  
+end  
\ No newline at end of file

expansions/script/c82224020.lua

+function c82224020.initial_effect(c)  
+	--Activate  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_TOGRAVE)  
+	e1:SetType(EFFECT_TYPE_ACTIVATE)  
+	e1:SetCode(EVENT_FREE_CHAIN) 
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetTarget(c82224020.target)   
+	e1:SetTarget(c82224020.target) 
+	e1:SetHintTiming(TIMINGS_CHECK_MONSTER)
+	e1:SetOperation(c82224020.activate)  
+	c:RegisterEffect(e1)  
+end  
+function c82224020.condition(e,tp,eg,ep,ev,re,r,rp)  
+	return not Duel.IsExistingMatchingCard(c82224020.filter,tp,LOCATION_MZONE,0,1,nil)  
+end  
+function c82224020.filter(c)
+	return c:IsSummonType(SUMMON_TYPE_SPECIAL)
+end
+function c82224020.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)  
+	if chkc then return chkc:IsOnField() and chkc~=e:GetHandler() end  
+	if chk==0 then return Duel.IsExistingTarget(c82224020.filter,tp,0,LOCATION_MZONE,2,nil) end  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)  
+	local g=Duel.SelectTarget(tp,c82224020.filter,tp,0,LOCATION_MZONE,2,2,nil)  
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,2,0,0)  
+end  
+function c82224020.activate(e,tp,eg,ep,ev,re,r,rp)  
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)  
+	Duel.SendtoGrave(g,REASON_EFFECT)  
+end  
\ No newline at end of file

expansions/script/c82224444.lua

+function c82224444.initial_effect(c)	
+	local e1=Effect.CreateEffect(c)  
+	e1:SetCategory(CATEGORY_DESTROY)  
+	e1:SetType(EFFECT_TYPE_QUICK_O)  
+	e1:SetCode(EVENT_FREE_CHAIN)  
+	e1:SetHintTiming(TIMINGS_CHECK_MONSTER)  
+	e1:SetRange(LOCATION_HAND)  
+	e1:SetCountLimit(1,82224444)  
+	e1:SetCost(c82224444.cost) 
+	e1:SetTarget(c82224444.target)
+	e1:SetOperation(c82224444.operation)  
+	c:RegisterEffect(e1)  
+end  
+function c82224444.cost(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return e:GetHandler():IsDiscardable(REASON_COST) end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(82224444,0))  
+	Duel.SelectOption(tp,1213)  
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)  
+end  
+function c82224444.filter(c)  
+	return c:IsLevel(4) and c:IsFaceup()  
+end  
+function c82224444.target(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(c82224444.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end  
+	local sg=Duel.GetMatchingGroup(c82224444.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)  
+	Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)  
+end  
+function c82224444.operation(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(82224444,2)) 
+	Duel.SelectOption(tp,aux.Stringid(82224444,1),aux.Stringid(82224444,1),aux.Stringid(82224444,1),aux.Stringid(82224444,1))  
+	local sg=Duel.SelectMatchingCard(tp,c82224444.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
+	Duel.Destroy(sg,REASON_EFFECT)  
+	local e2=Effect.CreateEffect(e:GetHandler())  
+	e2:SetType(EFFECT_TYPE_FIELD)  
+	e2:SetCode(EFFECT_CANNOT_SUMMON)   
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)  
+	e2:SetTargetRange(1,1)  
+	e2:SetTarget(c82224444.lim2)  
+	e2:SetReset(RESET_PHASE+PHASE_END)  
+	Duel.RegisterEffect(e2,tp)  
+	local e3=Effect.CreateEffect(e:GetHandler())  
+	e3:SetType(EFFECT_TYPE_FIELD)  
+	e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) 
+	e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)  
+	e3:SetTargetRange(1,1)  
+	e3:SetTarget(c82224444.lim2)  
+	e3:SetReset(RESET_PHASE+PHASE_END)  
+	Duel.RegisterEffect(e3,tp)  
+end  
+function c82224444.lim2(e,c)  
+	return c:IsLevel(4) and (c:IsLocation(LOCATION_HAND) or c:IsLocation(LOCATION_GRAVE))
+end  

expansions/script/c82228497.lua

+function c82228497.initial_effect(c)  
+	--xyz summon  
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x291),8,2)  
+	c:EnableReviveLimit()
+	--summon proc  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetDescription(aux.Stringid(82228497,1))  
+	e1:SetType(EFFECT_TYPE_FIELD)  
+	e1:SetCode(EFFECT_SUMMON_PROC)  
+	e1:SetTargetRange(LOCATION_HAND,0)  
+	e1:SetRange(LOCATION_MZONE)  
+	e1:SetCondition(c82228497.otcon)  
+	e1:SetTarget(c82228497.ottg)  
+	e1:SetOperation(c82228497.otop)  
+	e1:SetValue(SUMMON_TYPE_ADVANCE)  
+	c:RegisterEffect(e1)  
+	local e4=e1:Clone()  
+	e4:SetCode(EFFECT_SET_PROC)  
+	c:RegisterEffect(e4)  
+	--summon  
+	local e2=Effect.CreateEffect(c)  
+	e2:SetDescription(aux.Stringid(82228497,0))  
+	e2:SetCategory(CATEGORY_SUMMON)  
+	e2:SetType(EFFECT_TYPE_QUICK_O)  
+	e2:SetRange(LOCATION_MZONE)  
+	e2:SetCountLimit(1)
+	e2:SetCost(c82228497.cost)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetTarget(c82228497.sumtg)  
+	e2:SetOperation(c82228497.sumop)  
+	c:RegisterEffect(e2)   
+end  
+function c82228497.rfilter(c)  
+	return c:IsAbleToDeckOrExtraAsCost() 
+end  
+function c82228497.otcon(e,c,minc)  
+	if c==nil then return true end  
+	local tp=c:GetControler()  
+	return minc<=2 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0  
+		and Duel.IsExistingMatchingCard(c82228497.rfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,2,nil)
+end  
+function c82228497.ottg(e,c)  
+	local mi,ma=c:GetTributeRequirement()  
+	return mi<=2 and ma>=2 and c:IsSetCard(0x291)  
+end  
+function c82228497.otop(e,tp,eg,ep,ev,re,r,rp,c)  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)  
+	local g=Duel.SelectMatchingCard(tp,c82228497.rfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,2,2,nil)  
+	Duel.SendtoDeck(g,nil,2,REASON_COST) 
+end  
+function c82228497.sumfilter(c)  
+	return c:IsSetCard(0x291) and c:IsSummonable(true,nil)  
+end  
+function c82228497.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 c82228497.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return Duel.IsExistingMatchingCard(c82228497.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end  
+	Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)  
+end  
+function c82228497.sumop(e,tp,eg,ep,ev,re,r,rp)  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)  
+	local g=Duel.SelectMatchingCard(tp,c82228497.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  

expansions/script/c82228498.lua

+function c82228498.initial_effect(c)  
+	--summon with no tribute  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetDescription(aux.Stringid(82228498,0))  
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)  
+	e1:SetType(EFFECT_TYPE_SINGLE)  
+	e1:SetCode(EFFECT_SUMMON_PROC)  
+	e1:SetCondition(c82228498.ntcon)  
+	e1:SetOperation(c82228498.ntop)  
+	c:RegisterEffect(e1)
+	--search  
+	local e2=Effect.CreateEffect(c)  
+	e2:SetDescription(aux.Stringid(82228498,2))  
+	e2:SetCountLimit(1,82228498)	  
+	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)  
+	e2:SetType(EFFECT_TYPE_IGNITION)  
+	e2:SetRange(LOCATION_HAND)  
+	e2:SetCost(c82228498.cost)  
+	e2:SetTarget(c82228498.target)  
+	e2:SetOperation(c82228498.operation)  
+	c:RegisterEffect(e2) 
+end
+function c82228498.ntcon(e,c,minc)  
+	if c==nil then return true end  
+	return minc==0 and c:GetLevel()>4 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0  
+end  
+function c82228498.ntop(e,tp,eg,ep,ev,re,r,rp,c)  
+	--to grave  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetDescription(aux.Stringid(82228498,1))  
+	e1:SetCategory(CATEGORY_TOGRAVE)  
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)  
+	e1:SetRange(LOCATION_MZONE)  
+	e1:SetCountLimit(1)  
+	e1:SetCode(EVENT_PHASE+PHASE_END)  
+	e1:SetTarget(c82228498.tgtg)  
+	e1:SetOperation(c82228498.tgop)  
+	e1:SetReset(RESET_EVENT+0xc6e0000)  
+	c:RegisterEffect(e1)  
+end  
+function c82228498.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return true end  
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)  
+end  
+function c82228498.tgop(e,tp,eg,ep,ev,re,r,rp)  
+	local c=e:GetHandler()  
+	if c:IsRelateToEffect(e) and c:IsFaceup() then  
+		Duel.SendtoGrave(c,REASON_EFFECT)  
+	end  
+end  
+function c82228498.filter(c)  
+	return c:IsSetCard(0x291) and not c:IsCode(82228498) and c:IsAbleToHand()
+end  
+function c82228498.cost(e,tp,eg,ep,ev,re,r,rp,chk)  
+	local c=e:GetHandler()  
+	if chk==0 then return c:IsAbleToGraveAsCost() and c:IsDiscardable() end  
+	Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)  
+end  
+function c82228498.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)  
+	if chk==0 then return Duel.IsExistingMatchingCard(c82228498.filter,tp,LOCATION_DECK,0,1,nil) end  
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)  
+end  
+function c82228498.operation(e,tp,eg,ep,ev,re,r,rp,chk)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
+	local tg=Duel.SelectMatchingCard(tp,c82228498.filter,tp,LOCATION_DECK,0,1,1,nil)  
+	if tg:GetCount()>0 then  
+		Duel.SendtoHand(tg,nil,REASON_EFFECT)  
+		Duel.ConfirmCards(1-tp,tg)  
+	end  
+end  
\ No newline at end of file

expansions/script/c82228499.lua

+function c82228499.initial_effect(c)  
+	--summon with no tribute  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetDescription(aux.Stringid(82228499,0))  
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)  
+	e1:SetType(EFFECT_TYPE_SINGLE)  
+	e1:SetCode(EFFECT_SUMMON_PROC)  
+	e1:SetCondition(c82228499.ntcon)  
+	e1:SetOperation(c82228499.ntop)  
+	c:RegisterEffect(e1)
+	--search  
+	local e2=Effect.CreateEffect(c)  
+	e2:SetDescription(aux.Stringid(82228499,2))  
+	e2:SetCountLimit(1,82228499)	 
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)  
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)  
+	e2:SetType(EFFECT_TYPE_IGNITION)  
+	e2:SetRange(LOCATION_GRAVE)  
+	e2:SetCost(aux.bfgcost)  
+	e2:SetTarget(c82228499.target)  
+	e2:SetOperation(c82228499.operation)  
+	c:RegisterEffect(e2)  
+end  
+function c82228499.ntcon(e,c,minc)  
+	if c==nil then return true end  
+	return minc==0 and c:GetLevel()>4 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0  
+end  
+function c82228499.ntop(e,tp,eg,ep,ev,re,r,rp,c)  
+	--to grave  
+	local e1=Effect.CreateEffect(c)  
+	e1:SetDescription(aux.Stringid(82228499,1))  
+	e1:SetCategory(CATEGORY_TOGRAVE)  
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)  
+	e1:SetRange(LOCATION_MZONE)  
+	e1:SetCountLimit(1)  
+	e1:SetCode(EVENT_PHASE+PHASE_END)  
+	e1:SetTarget(c82228499.tgtg)  
+	e1:SetOperation(c82228499.tgop)  
+	e1:SetReset(RESET_EVENT+0xc6e0000)  
+	c:RegisterEffect(e1)  
+end  
+function c82228499.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)  
+	if chk==0 then return true end  
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)  
+end  
+function c82228499.tgop(e,tp,eg,ep,ev,re,r,rp)  
+	local c=e:GetHandler()  
+	if c:IsRelateToEffect(e) and c:IsFaceup() then  
+		Duel.SendtoGrave(c,REASON_EFFECT)  
+	end  
+end  
+function c82228499.filter(c,e,tp)  
+	return c:IsSetCard(0x291) and not c:IsCode(82228499) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)  
+end  
+function c82228499.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)  
+	if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c82228499.filter(chkc,e,tp) end  
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0  
+		and Duel.IsExistingTarget(c82228499.filter,tp,LOCATION_GRAVE,0,1,e:GetHandler(),e,tp) end  
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)  
+	local g=Duel.SelectTarget(tp,c82228499.filter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler(),e,tp)  
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)  
+end  
+function c82228499.operation(e,tp,eg,ep,ev,re,r,rp)  
+	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end  
+	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/c98600008.lua

+local m=98600008
+local cm=_G["c"..m]
+function cm.initial_effect(c)
+	aux.AddLinkProcedure(c,nil,5,5,cm.lcheck)
+	c:EnableReviveLimit()
+	if not cm.gchk then
+		cm.gchk=true
+		local ex=Effect.GlobalEffect()
+		ex:SetType(EFFECT_TYPE_FIELD)
+		ex:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
+		ex:SetTargetRange(LOCATION_HAND,LOCATION_HAND)
+		ex:SetValue(function(e,c,mg)
+			return c:GetOriginalCode()==m
+		end)
+		ex:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_IMMUNE)
+		Duel.RegisterEffect(ex,0)
+	end
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e1:SetOperation(function()
+		Duel.Hint(HINT_MUSIC_OGG,0,m*16+3)
+	end)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetDescription(m*16)
+	e1:SetProperty(0x14000)
+	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
+		if chk==0 then return e:GetHandler():IsType(TYPE_LINK) end
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_EXTRA)
+	end)
+	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+		local c=e:GetHandler()
+		if not c:IsRelateToEffect(e) then return end
+		local mg=Duel.GetMatchingGroup(function(c)
+			return c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false)
+		end,tp,LOCATION_EXTRA,0,nil)
+		local z=c:GetLinkedZone(tp)&0xff
+		local ft=Duel.GetLocationCountFromEx(tp,tp,c:GetLinkedGroup())
+		if ft<=0 or ft>#mg then return end
+		local spg=Group.CreateGroup()
+		for i=0,6 do
+			if #mg<=0 then break end
+			if (z&(0x1<<i))>0 then
+				local tc=Duel.GetFieldCard(tp,LOCATION_MZONE,i)
+				if not tc and i>4 then
+					tc=Duel.GetFieldCard(1-tp,LOCATION_MZONE,11-i)
+				end
+				if tc then
+					local ag=mg:Filter(function(c)
+						return tc:IsCanBeXyzMaterial(c)
+					end,nil)
+					if #ag>0 and Duel.GetLocationCountFromEx(tp,tp,tc,c,0x1<<i)>0 then
+						Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+						local sc=ag:Select(tp,1,1,nil):GetFirst()
+						if sc then
+							local mmg=tc:GetOverlayGroup()
+							if #mmg~=0 then
+								Duel.Overlay(sc,mmg)
+							end
+							sc:SetMaterial(Group.FromCards(tc))
+							Duel.Overlay(sc,Group.FromCards(tc))
+							Duel.SpecialSummonStep(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP,0x1<<i)
+							spg:AddCard(sc)
+							mg:RemoveCard(sc)
+						end
+					end
+				elseif Duel.GetLocationCountFromEx(tp,tp,nil,c,0x1<<i)>0 then
+					Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+					local sc=mg:Select(tp,1,1,nil):GetFirst()
+					if sc then
+						sc:SetMaterial(nil)
+						Duel.SpecialSummonStep(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP,0x1<<i)
+						spg:AddCard(sc)
+						mg:RemoveCard(sc)
+					end
+				end
+			end
+		end
+		if #spg>0 then
+			for sc in aux.Next(spg) do
+				for code,value in pairs({
+					[EFFECT_DISABLE]=1,
+					[EFFECT_DISABLE_EFFECT]=1,
+					--[EFFECT_UNRELEASABLE_SUM]=1,
+					--[EFFECT_UNRELEASABLE_NONSUM]=1,
+					[EFFECT_CANNOT_BE_FUSION_MATERIAL]=1,
+					[EFFECT_CANNOT_BE_SYNCHRO_MATERIAL]=1,
+					[EFFECT_CANNOT_BE_XYZ_MATERIAL]=1,
+					[EFFECT_CANNOT_BE_LINK_MATERIAL]=1,
+				}) do
+					local e1=Effect.CreateEffect(c)
+					e1:SetType(EFFECT_TYPE_SINGLE)
+					e1:SetCode(code)
+					e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+					e1:SetReset(0x1fe1000)
+					e1:SetValue(1)
+					sc:RegisterEffect(e1,true)
+				end
+			end
+			Duel.SpecialSummonComplete()
+		end
+	end)
+	c:RegisterEffect(e1)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_TOHAND)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetCondition(cm.SanaeCondition(1))
+	e1:SetCost(cm.thcost)
+	e1:SetTarget(cm.thtg)
+	e1:SetOperation(cm.thop)
+	c:RegisterEffect(e1)
+	--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:SetCondition(cm.SanaeCondition(2))
+	e2:SetValue(aux.tgoval)
+	c:RegisterEffect(e2)
+	--indes
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+	e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCondition(cm.SanaeCondition(2))
+	e3:SetValue(aux.indoval)
+	c:RegisterEffect(e3)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,2))
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
+	e1:SetCondition(aux.AND(cm.SanaeCondition(3),function(e,tp)
+		return Duel.GetTurnPlayer()==tp
+	end))
+	e1:SetCost(function(e,tp,eg,ep,ev,re,r,rp,chk)
+		e:SetLabel(1)
+		local g=e:GetHandler():GetLinkedGroup()
+		if chk==0 then return #g>0 and not g:IsExists(aux.NOT(Card.IsReleasable),1,nil) end
+		Duel.Release(g,REASON_COST)
+	end)
+	local function f(c,e,tp,g,z)
+		return Duel.GetLocationCountFromEx(tp,tp,g,c,z)>0 and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
+	end
+	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
+		local l=e:GetLabel()
+		local c=e:GetHandler()
+		e:SetLabel(0)
+		if chk==0 then
+			local z=c:GetLinkedZone(tp)&0xff
+			if z<=0 then return false end
+			local g=Duel.GetMatchingGroup(f,tp,LOCATION_EXTRA,0,nil,e,tp,(l==1 and c:GetLinkedGroup() or nil),z)
+			return g:GetClassCount(Card.GetCode)>=5
+		end
+		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+	end)
+	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
+		local c=e:GetHandler()
+		local z=c:GetLinkedZone(tp)&0xff
+		if z<=0 or not c:IsRelateToEffect(e) then return end
+		local g=Duel.GetMatchingGroup(f,tp,LOCATION_EXTRA,0,nil,e,tp,nil,z)
+		if g:GetClassCount(Card.GetCode)<5 then return end
+		aux.GCheckAdditional=function(g)
+			return g:GetClassCount(Card.GetCode)==#g
+		end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local sg=g:SelectSubGroup(tp,aux.TRUE,false,5,5)
+		aux.GCheckAdditional=nil
+		Duel.ConfirmCards(1-tp,sg)
+		Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
+		local spg=sg:Select(1-tp,1,1,nil)
+		Duel.SpecialSummon(spg,0,tp,tp,true,false,POS_FACEUP,z)
+	end)
+	c:RegisterEffect(e1)
+end
+function cm.SanaeCondition(ct)
+	return function(e)
+		return e:GetHandler():GetLinkedGroupCount()>=ct
+	end
+end
+function cm.lcheck(g,lc)
+	return g:GetClassCount(Card.GetLinkCode)==g:GetCount()
+end
+function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.CheckRemoveOverlayCard(tp,1,1,1,REASON_COST) end
+	local sg=Duel.SelectMatchingCard(tp,Card.CheckRemoveOverlayCard,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,tp,1,REASON_COST)
+	sg:GetFirst():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsOnField() and chkc:IsAbleToHand() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
+	local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
+end
+function cm.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

expansions/script/c9910106.lua

+Zcd = {}
+
+function Zcd.AddXyzProcedure(c,f,lv,ct,alterf,desc,maxct,op)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(1165)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(EFFECT_SPSUMMON_PROC)
+	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	e1:SetRange(LOCATION_EXTRA)
+	if not maxct then maxct=ct end
+	e1:SetCondition(Zcd.XyzCondition(f,lv,ct,maxct,alterf,desc,op))
+	e1:SetTarget(Zcd.XyzTarget(f,lv,ct,maxct,alterf,desc,op))
+	e1:SetOperation(Zcd.XyzOperation(f,lv,ct,maxct,alterf,desc,op))
+	e1:SetValue(SUMMON_TYPE_XYZ)
+	c:RegisterEffect(e1)
+end
+function Zcd.XyzCondition(f,lv,minc,maxc,alterf,desc,op)
+	return  function(e,c,og,min,max)
+				if c==nil then return true end
+				if c:IsType(TYPE_PENDULUM) and c:IsFaceup() then return false end
+				local tp=c:GetControler()
+				local ft=Duel.GetLocationCountFromEx(tp)
+				local ct=-ft
+				local mg=nil
+				if og then
+					mg=og
+				else
+					mg=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
+				end
+				if (not min or min<=1) and mg:IsExists(Zcd.XyzAlterFilter,minc,nil,alterf,c,e,tp,op,lv) then
+					local ssg=mg:Filter(Zcd.XyzAlterFilter,nil,alterf,c,e,tp,op,lv)
+					if ssg:IsExists(Zcd.MFilter1,1,nil) and ssg:IsExists(Zcd.MFilter2,1,nil,c,tp) then return true end
+				end
+				local minc=minc
+				local maxc=maxc
+				if min then
+					if min>minc then minc=min end
+					if max<maxc then maxc=max end
+					if minc>maxc then return false end
+				end
+				return ct<minc and Duel.CheckXyzMaterial(c,f,lv,minc,maxc,og)
+			end
+end
+function Zcd.XyzTarget(f,lv,minc,maxc,alterf,desc,op)
+	return  function(e,tp,eg,ep,ev,re,r,rp,chk,c,og,min,max)
+				if og and not min then
+					return true
+				end
+				local ft=Duel.GetLocationCountFromEx(tp)
+				local ct=-ft
+				local minc=minc
+				local maxc=maxc
+				if min then
+					if min>minc then minc=min end
+					if max<maxc then maxc=max end
+				end
+				local mg=nil
+				if og then
+					mg=og
+				else
+					mg=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,0)
+				end
+				local b1=ct<minc and Duel.CheckXyzMaterial(c,f,lv,minc,maxc,og)
+				local b2=nil
+				local ssg=nil
+				if (not min or min<=1) and mg:IsExists(Zcd.XyzAlterFilter,minc,nil,alterf,c,e,tp,op,lv) then
+					ssg=mg:Filter(Zcd.XyzAlterFilter,nil,alterf,c,e,tp,op,lv)
+					b2=ssg:IsExists(Zcd.MFilter1,1,nil) and ssg:IsExists(Zcd.MFilter2,1,nil,c,tp)
+				end
+				local g=Group.CreateGroup()
+				if b2 and (not b1 or Duel.SelectYesNo(tp,desc)) then
+					e:SetLabel(1)
+					Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
+					tsg=ssg:FilterSelect(tp,Zcd.MFilter1,1,1,nil)
+					local tc1=tsg:GetFirst()
+					g:AddCard(tc1)
+					ssg:RemoveCard(tc1)
+					local flagct=1
+					if not Zcd.MFilter2(tc1,c,tp) then
+						tsg=ssg:FilterSelect(tp,Zcd.MFilter2,1,1,nil,c,tp)
+						local tc2=tsg:GetFirst()
+						g:AddCard(tc2)
+						ssg:RemoveCard(tc2)
+						flagct=2
+					end
+					local g2=ssg:FilterSelect(tp,Zcd.XyzAlterFilter,minc-flagct,maxc-flagct,nil,alterf,c,e,tp,op,lv)
+					g:Merge(g2)
+					if op then op(e,tp,1,g:GetFirst()) end
+				else
+					e:SetLabel(0)
+					g=Duel.SelectXyzMaterial(tp,c,f,lv,minc,maxc,og)
+				end
+				if g then
+					g:KeepAlive()
+					e:SetLabelObject(g)
+					return true
+				else return false end
+			end
+end
+function Zcd.XyzOperation(f,lv,minc,maxc,alterf,desc,op)
+	return  function(e,tp,eg,ep,ev,re,r,rp,c,og,min,max)
+				if og and not min then
+					local sg=Group.CreateGroup()
+					local tc=og:GetFirst()
+					while tc do
+						local sg1=tc:GetOverlayGroup()
+						sg:Merge(sg1)
+						tc=og:GetNext()
+					end
+					Duel.SendtoGrave(sg,REASON_RULE)
+					c:SetMaterial(og)
+					Duel.Overlay(c,og)
+				else
+					local mg=e:GetLabelObject()
+					local sg=Group.CreateGroup()
+					local tc=mg:GetFirst()
+					while tc do
+						local sg1=tc:GetOverlayGroup()
+						sg:Merge(sg1)
+						tc=mg:GetNext()
+					end
+					Duel.SendtoGrave(sg,REASON_RULE)
+					c:SetMaterial(mg)
+					Duel.Overlay(c,mg)
+					mg:DeleteGroup()
+				end
+			end
+end
+function Zcd.XyzAlterFilter(c,alterf,xyzc,e,tp,op,lv)
+	return alterf(c)
+		and c:IsCanBeXyzMaterial(xyzc)
+		and Auxiliary.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) and (not op or op(e,tp,0,c))
+		and c:IsXyzLevel(xyzc,lv)
+end
+function Zcd.MFilter1(c)
+	return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x952)
+end
+function Zcd.MFilter2(c,xyzc,tp)
+	return Duel.GetLocationCountFromEx(tp,tp,c,xyzc)>0
+end

expansions/strings.conf

@@ -69,10 +69,6 @@
 #豚马 1033851949 82 0x220-0x22f
 !setname 0x3220 架空
 
-#云 ?????????? 99 0xba0-0xbaf
-!setname 0xba1 竹林组
-!setname 0xba2 不死组
-
 #SCL 2798419987 101 0x330-0x33f
 
 #嘿子 2686488312 109 0x230-0x23f(-0x23c)
@@ -95,7 +91,7 @@
 !setname 0x215e 御龙骑
 !setname 0xa15e 御龙骑士
 
-#xig 112 0x620-0x62f
+#xig 1602540885 112 0x620-0x62f
 !setname 0x621 因幡帝
 !setname 0x62e 清兰
 !setname 0x62f 美树沙耶加
@@ -569,6 +565,7 @@ named_with_Zero 泽洛
 !setname 0x292 灵翼
 !setname 0x1292 天殇灵翼
 !setname 0x293 布加拉提
+!setname 0x296 幻晶兽
 
 #Slient Knight 888 0xff0-0xfff
 !setname 0xffc 龙将

update/filelist.txt

-ygopro.exe	2a96a75a9af4560b29f47184d3a2bacb
-deck/2019.11.17_new_card1.ydk	33bc8d381f717fa28f9b8cce64495307
-deck/2019.11.17_new_card2.ydk	2d118ff018f33e3e1264e07ca41336a8
-deck/2019.11.17_new_card3.ydk	8a36070e7f99a1e95839d0c3d4ee118a
-deck/2019.11.17_new_card4.ydk	b31b85e419f09f49a4b7a8180ccbcbb6
-deck/2019.11.17_new_card5.ydk	20321d23451309382e59eea833769723
-deck/2019.11.17_new_card6.ydk	4b58c0bc3a6a20b133bc9dd635d320a4
-expansions/222DIY.cdb	8f135622709fe8be54f9684e2dc3975f
-expansions/lflist.conf	d248dc5464407e571ccaea36906ebd38
-expansions/strings.conf	187dd3cfb73a05bca2ad87a719f825ee
+ygopro.exe	690c6c8ddd7ace10eb3a9bfec233a607
+deck/2019.12.2_new_card1.ydk	13fdc3c84e1dcfb8ca6c86898b19a155
+deck/2019.12.2_new_card2.ydk	775878da2c08d8fef436084defae2f4d
+deck/2019.12.2_new_card3.ydk	2b97b2fdf3e62390b714e39c3a7e4692
+deck/2019.12.2_new_card4.ydk	7cfde9cb101d2cdfb60473a4ef23a232
+deck/2019.12.2_new_card5.ydk	bab8d8bd204c68f221cf11ba506aaf3e
+deck/2019.12.2_new_card6.ydk	52fd0d18349d95e4ec417e308a1addc2
+expansions/222DIY.cdb	88229f836092be66e444ec632c14cd3a
+expansions/lflist.conf	0185e7831f3c8c8469f9a9e1c6fbe9ee
+expansions/strings.conf	09fc945e1d29be540af2fd68a532c9ad
 expansions/pics/08209710.jpg	ed0e60085631bfa641ffeebd6abbd910
 expansions/pics/1000360.jpg	d1aa6f44fcd413402141a6bf4b886c2a
 expansions/pics/1000361.jpg	9af65865cad673d2ec0c09abac741873
@@ -493,15 +493,15 @@ expansions/pics/11200031.jpg	2f8cf53736b0a92f961d5a5d5132aac8
 expansions/pics/11200032.jpg	b54d2b54b3dca716b5fd206ae0cd7e15
 expansions/pics/11200033.jpg	f9d3f1a9dcf2edd6c5aeabc845d6989c
 expansions/pics/11200034.jpg	5a458e8715b23edc92d004d8f62a6879
-expansions/pics/11200039.jpg	c98e48a692c0f35406089eb07a7fefde
+expansions/pics/11200039.jpg	d48937cedf923dc3f38f95dae50689f2
 expansions/pics/1120004.jpg	9243c3f0a35385ca156e35c99ea4cd04
 expansions/pics/11200040.jpg	8ca72e5e7366c39c61d420237010c42a
 expansions/pics/11200041.jpg	69a9748a4b843cbce6c3a38f377d74bf
 expansions/pics/11200043.jpg	b462a9b47ced93eb623bbfa0bc452546
-expansions/pics/11200044.jpg	d14f7d3a2ff86a36390b7136dfc8effc
+expansions/pics/11200044.jpg	62dd08cf812734bedcdef62561e1a31a
 expansions/pics/11200046.jpg	e9b72b7aaf6a1333afdd2a2929fceef8
 expansions/pics/11200047.jpg	a18f413ca7e95b5a4c868044c332f2bf
-expansions/pics/11200048.jpg	b608896d37d5737eae13d15b611cc7ce
+expansions/pics/11200048.jpg	0463e280945fe29c9e76e74914e587b2
 expansions/pics/11200049.jpg	41e5f3022b00d28c2fbe57c66d5691cd
 expansions/pics/1120005.jpg	58874c7c6042072307827332e73f7589
 expansions/pics/11200064.jpg	e4d3a18b20a73c5ef54ccf228bbb8070
@@ -523,21 +523,21 @@ expansions/pics/11200084.jpg	118d066394d379a86f4e20560c42fa36
 expansions/pics/11200085.jpg	e7cfd355e6233ec214dd654f754b6866
 expansions/pics/11200086.jpg	4ab0e2d0d47181756920dafa78fc8f0d
 expansions/pics/11200087.jpg	31695fafe0b7f060f311e4e85da5a9a8
-expansions/pics/11200088.jpg	936d1ce21868b86107aea848741d255c
+expansions/pics/11200088.jpg	09e04bfcf253bc379a0e36257e26fa36
 expansions/pics/11200100.jpg	03bace2271bdb6ca45c1a732ecd61578
 expansions/pics/11200103.jpg	d9188f3a24742a48f44b7b135f60109a
 expansions/pics/11200104.jpg	3ac0fde53a21f4828b62a7c9f638354b
-expansions/pics/11200105.jpg	8e5525431cf06553b8c720caeca90e46
+expansions/pics/11200105.jpg	85096e7296c2c03d49bd80736a2c1f7a
 expansions/pics/11200106.jpg	138e1d2bb10197d138c126bf25efa06a
 expansions/pics/11200107.jpg	0675e709eba8c404cdb112a31df593bc
 expansions/pics/11200109.jpg	54be3de388ec7ddf18ae61ff0a719600
 expansions/pics/11200110.jpg	697deb408e931884f05829c970c0b964
 expansions/pics/11200111.jpg	c3f9e5f8f468b75b517b01c6b0c6c3a6
-expansions/pics/11200112.jpg	b5a79c735091e7336a3d116a2e4fe1aa
+expansions/pics/11200112.jpg	21f8f3a40d1c968ea2cf291b4509f654
 expansions/pics/11200207.jpg	155b45b0a1096a47c7d7e04c2ae4c3fa
 expansions/pics/11200208.jpg	cbbd99b557b5296882c7ad7b2313b2cb
 expansions/pics/11200209.jpg	070d98b43f0f63e2af7d742918b58dfe
-expansions/pics/11200210.jpg	58472627d248377412ce63a1f4c9befe
+expansions/pics/11200210.jpg	e49e0a440fc487a8451a69e46d94274c
 expansions/pics/1120101.jpg	d771702c640fbd0c066362ba18cc0a59
 expansions/pics/1130001.jpg	3d1131cf39aa96d72c1a9ae1dcd15a5c
 expansions/pics/1130002.jpg	5c8b579f167704c0dd6776a1d0d65ce5
@@ -688,6 +688,7 @@ expansions/pics/1191001.jpg	ac08418d0c20e36351cf337ea19754bc
 expansions/pics/1191003.jpg	02779e529143f0efe04f84c9a141aca6
 expansions/pics/1192018.jpg	e13e8d99b6ccf49d34816609e03a365f
 expansions/pics/1195011.jpg	cd5839bb06f63a1dbdaa434fa91c0aa6
+expansions/pics/1197001.jpg	d5be09b4beb2b82503eaada23e9b6867
 expansions/pics/12001000.jpg	d1e7e25b7f8f2ec3a54b175087c992ea
 expansions/pics/12001001.jpg	269cf04b1b596a03b7cb8815b5e26334
 expansions/pics/12001002.jpg	47f0da6d9cd8b91e23157e4bbe7c726f
@@ -1755,7 +1756,8 @@ expansions/pics/17050928.jpg	29d21f5be98866a7ede699d5888860b5
 expansions/pics/17050929.jpg	a28f61334fef40b3e3da64e191a9d9fb
 expansions/pics/17050930.jpg	3b8bcda46186b12dfa85de323c48e0ff
 expansions/pics/17050931.jpg	faf36fe16807f34a08fbee1af637e10f
-expansions/pics/17050932.jpg	36debb67ce9ee08f349e4eb92cc8ba75
+expansions/pics/17050932.jpg	d3d7216701f667a890edaa0e231e81ff
+expansions/pics/17050933.jpg	628fac24e17a069bd6d280e0c98d2839
 expansions/pics/17050935.jpg	d7fe58e361e2c5ce3675024afa148e76
 expansions/pics/17050936.jpg	500038eb47ff1d0c44af487129772992
 expansions/pics/17050937.jpg	bb67a6a2f15f259d4da6a6ceb9ab0fc6
@@ -1833,7 +1835,7 @@ expansions/pics/17060871.jpg	08e7676a37774ff68e4d44419d6bcae0
 expansions/pics/17060872.jpg	b33bba58371b2f725eed2da2a0702384
 expansions/pics/17060876.jpg	e186e935647e3d07f8025fa5b9d6dbb1
 expansions/pics/17060877.jpg	48fe93cbdcd1e9b9e7f4a1adebea4434
-expansions/pics/17060882.jpg	8a37c5b4c7561ce47ff7046658b7ed26
+expansions/pics/17060882.jpg	0b5d89e035dd1410ba90a802dffece68
 expansions/pics/17060883.jpg	e0760b923af3a5d1bc267706538cd556
 expansions/pics/17060884.jpg	0c9368236b93c90845b81d39a53373b8
 expansions/pics/17060890.jpg	44359780b176e13ea51c669d595c180a
@@ -1964,6 +1966,8 @@ expansions/pics/17091001.jpg	6e012aef19108faa32f617ac1a97cd02
 expansions/pics/17091002.jpg	ff6b1ea83237171b6a016761f28513d9
 expansions/pics/17091003.jpg	25c8e6f8479d565ce6a8d5730cf23ab5
 expansions/pics/17091004.jpg	03162a17eb607dd3e7d7ede7ee0a4ae2
+expansions/pics/17091005.jpg	195f991c14773528ea65898ac196559b
+expansions/pics/17091006.jpg	d3ad118a18b56622da91c3121691d4d0
 expansions/pics/17092201.jpg	a4c3aac7709d0f789091034c0cfa16ae
 expansions/pics/18001001.jpg	9aaf9108dbf9c62927703f4f8b489012
 expansions/pics/18001002.jpg	182ee19494424cfd0150a4a731f6d5a2
@@ -2524,7 +2528,7 @@ expansions/pics/26805004.jpg	a9345f9650b031d6aa534b1227a17222
 expansions/pics/26805005.jpg	06bb1d7b4079a5aa992c2af7faab326b
 expansions/pics/26805006.jpg	2fd971dd2f0a0cdb9712b70231e998d6
 expansions/pics/26805007.jpg	5705919ba046744bc73967a4d2d3f320
-expansions/pics/26805008.jpg	7d441d47517530a625c925fce6006b74
+expansions/pics/26805008.jpg	c1c6c74baa5c70ded8be4c27930da5c5
 expansions/pics/26805009.jpg	07c2dc6380fd776c494aacdf3df47c4d
 expansions/pics/26805010.jpg	a26f4b61feea5d8b7ba591826eb33f1f
 expansions/pics/26805011.jpg	3678e633ca5c2c5b5c94f433a5a21636
@@ -2537,11 +2541,11 @@ expansions/pics/26806003.jpg	e9e6bec321cab60a50eb5f266e936f31
 expansions/pics/26806004.jpg	21fbfce4bc9f8fcca46f3a5e7883a496
 expansions/pics/26806005.jpg	854d0019a93f68b8e62154f7a98ea97d
 expansions/pics/26806006.jpg	7620b4f81d8d957037aca2098497cbd9
-expansions/pics/26806007.jpg	eb6ea3c3c2efbc9f6c74e11bf1e50573
+expansions/pics/26806007.jpg	c03b638ca654d11973089b6c5a7ec5a4
 expansions/pics/26806008.jpg	55c8daf987fa506db215db3996ef9298
 expansions/pics/26806009.jpg	bc0a47e45d0d6a9e0526cf30475d20e7
-expansions/pics/26806010.jpg	d9cd9e7c8ed3bf291b9353ed1d442545
-expansions/pics/26806011.jpg	76faa0c4fd3f51e5662f1be5688a6a76
+expansions/pics/26806010.jpg	3490852952f76cfbc040714aab11f97e
+expansions/pics/26806011.jpg	3069548b3ff889b619d29bae1a513034
 expansions/pics/26806012.jpg	6c42f386035d176f6d9f758327917331
 expansions/pics/26806013.jpg	7b55ceafe7d87cadd3d946195a824441
 expansions/pics/26806014.jpg	d37542c21d75554bc5622be38adabc22
@@ -2550,7 +2554,7 @@ expansions/pics/26806016.jpg	d89d70bde16fbe54ff5d29a19d1ae642
 expansions/pics/26806017.jpg	3188dd52a794b1fdb6e07036f34e38a4
 expansions/pics/26806018.jpg	fa16ee2e1451998f178bfc5ce420b2d6
 expansions/pics/26806019.jpg	681f1893a24342af377796e8be90bcd7
-expansions/pics/26806020.jpg	ed47b44092671fc5b53b8586e3610816
+expansions/pics/26806020.jpg	5a553b37670acedbc0a11921cfe5fabd
 expansions/pics/26806021.jpg	beac2d7d760175d21b0855f13762f435
 expansions/pics/26806022.jpg	d0345d97dbd272de5b2361da7eed23c8
 expansions/pics/26806023.jpg	21a108df21a2625daac4dc0d1d12d6b6
@@ -2588,6 +2592,8 @@ expansions/pics/26806054.jpg	431d8faf9f19a3421aa79f7554589863
 expansions/pics/26806055.jpg	0eee9c7297d1f15ad440c66fcaae2676
 expansions/pics/26806056.jpg	6a9178ba7b9d53267cf3afe6b88af2a3
 expansions/pics/26806057.jpg	50e2afa672602dd6d261affff1fafbce
+expansions/pics/26806058.jpg	01ec248fbf33781f0a25d1899fae0b69
+expansions/pics/26806059.jpg	b707b35781be3cbe22ee1bfbe79a053b
 expansions/pics/26806069.jpg	024d18ab0a5213301c8419419c2db01e
 expansions/pics/26807000.jpg	8d79f16dfcb0adfd6416ef01e08feab7
 expansions/pics/26807001.jpg	41ea9f7e4ad55bd499e9173e6870a4d3
@@ -2619,7 +2625,7 @@ expansions/pics/26807026.jpg	a7626147c796ef0debabc83153faf58f
 expansions/pics/26807027.jpg	69d99ecbac7f32b22649561817646bba
 expansions/pics/26807028.jpg	af3447f82c637fcb1954e56dcff1183c
 expansions/pics/26807029.jpg	fd6f3b701202e693b5953b17a76c99a7
-expansions/pics/26807030.jpg	844304c27321cbbffded770bc1b5e965
+expansions/pics/26807030.jpg	c238c984146874e474499e5a7049f773
 expansions/pics/26807031.jpg	3170a5b422ba28237b5cb48a09e6488c
 expansions/pics/26807032.jpg	e11cc461b854094d3dcdbddbd8f02860
 expansions/pics/26807033.jpg	3f99ea841d3e16c334ba881064f39e8c
@@ -2648,7 +2654,7 @@ expansions/pics/26807055.jpg	88d237a0fc7cf30503c2dc6a9981b803
 expansions/pics/26807056.jpg	cfb5c14deba80c567198d7a013bd6a27
 expansions/pics/26807057.jpg	8f1899614140e8ec825a84f656934a30
 expansions/pics/26807058.jpg	f6a064f60d032535f2a8a10fd5a6371a
-expansions/pics/26807059.jpg	af560a2f1afc2e57f8633b6099e3b2f1
+expansions/pics/26807059.jpg	b476a6790e85b9b1edd83c53445ddbb6
 expansions/pics/26807060.jpg	fd63fd9de106c06137f898510a740188
 expansions/pics/26807061.jpg	dbe55abf219d774d1f044c6ec82fb287
 expansions/pics/26807062.jpg	d428ce7d62f7cf50a8868b6e01553157
@@ -2666,7 +2672,7 @@ expansions/pics/26809002.jpg	f509ba6a544334619c576014f4af7333
 expansions/pics/26809003.jpg	f8870fad4c7031f057c5f976caf01884
 expansions/pics/26809004.jpg	6fd320e9e3992e16640bad5075625aee
 expansions/pics/26809005.jpg	0843998141d94a0d954feccbe1d74d44
-expansions/pics/26809006.jpg	e2ad4ed1a7b711230fe32727eb6bf8da
+expansions/pics/26809006.jpg	9e524b2b5c32a900cc44619947360d52
 expansions/pics/26809007.jpg	6ec09a12e1e739adb0561535fbd272c1
 expansions/pics/26809008.jpg	30966016ef2d0f9a0f47a54ea4c1443d
 expansions/pics/26809009.jpg	f82c30df0bb93d57a69a58117b631868
@@ -2690,6 +2696,8 @@ expansions/pics/26809027.jpg	58ad1e97b049f173417af54fd150470e
 expansions/pics/26809028.jpg	81c8f33d56daacb4a3c92f3cb5f07df9
 expansions/pics/26809029.jpg	898ef13b1bfdbd768c53848fdff3eac8
 expansions/pics/26809030.jpg	056aa0a044a24129b4778968d5a82bda
+expansions/pics/26809031.jpg	a7d6b01c15551f91b6dbd53584b8354b
+expansions/pics/26809032.jpg	15725c717b2d602b5908d988849af6e5
 expansions/pics/26810000.jpg	5962379e527dd4d5094e23f41f16232a
 expansions/pics/26810001.jpg	d5bf52be704bed547ab3d3d8091338db
 expansions/pics/26810002.jpg	5c58c206627a5f3a43af3daa6c1e2b38
@@ -2712,6 +2720,8 @@ expansions/pics/26810018.jpg	8d20f1f61022a0c41056dba32ce8341f
 expansions/pics/26810019.jpg	86465471af700021530f065eeecc01bc
 expansions/pics/26810020.jpg	a8a0192373516b03ece2c98dbf8d7bff
 expansions/pics/26810999.jpg	1030c8132f95446eeb8b74deafc54ca0
+expansions/pics/30000200.jpg	fe21b3d105fdc9b8bc4f3d83c7dd9117
+expansions/pics/30000205.jpg	9a73c3737bcffe15fb0ab566bd82ec3d
 expansions/pics/30556001.jpg	aa4595aae365cd57298f8a3f9d3ab95b
 expansions/pics/30556002.jpg	725a697256b5b5d2b7254742d77fa132
 expansions/pics/30556003.jpg	fffd045797ce66c27697d31e9949815c
@@ -6217,6 +6227,8 @@ expansions/pics/75646529.jpg	6243cd48b3b8784cea6a9a247ad80994
 expansions/pics/75646530.jpg	9365386db55c46c4623bcf6c2217fa95
 expansions/pics/75646531.jpg	407108d43655277746d901c938f5295e
 expansions/pics/75646534.jpg	40fa5d33add38459ef04944e712aac06
+expansions/pics/75646535.jpg	8035cd437b0d46dbdfdb534219c976e2
+expansions/pics/75646536.jpg	ae9d74f60ed637a4e58b278c9bb9c702
 expansions/pics/75646600.jpg	d7b7fe24fee08f40a86751a19aab9d15
 expansions/pics/75646601.jpg	bd374c27bdbcc650fc05ee5fcd57aef2
 expansions/pics/75646602.jpg	34b489a08e77a0414a221810630dff91
@@ -6444,6 +6456,7 @@ expansions/pics/79131379.jpg	ce745c5df3ae7ce16a20b2cfca68dc7b
 expansions/pics/81000000.jpg	85a37ebd936f2d979a416521fa804854
 expansions/pics/81000001.jpg	a7afc75c0e950979c088bc32dc96c7a7
 expansions/pics/81000002.jpg	04ab560c72b40e90e71c0b5a50d99d66
+expansions/pics/81000003.jpg	f4af982047b4c6401ed5397b1bb33e11
 expansions/pics/81000004.jpg	d163b2ec7e7866c257106f91c744726d
 expansions/pics/81000005.jpg	70ca7c41860fa00ba77ea3cf6fe2c2b2
 expansions/pics/81000006.jpg	d426ad02f3cf700e3d78fd0a37458b21
@@ -6453,6 +6466,13 @@ expansions/pics/81000009.jpg	a20138b1ba1900074ef3d4efdb834388
 expansions/pics/81000027.jpg	94ddbb3ea6b7c7e60629bbb385d065fb
 expansions/pics/81000028.jpg	0821778815d140221c898195df4f6e5b
 expansions/pics/81000053.jpg	8abd47b39444014b3f65e0d2abd1cd80
+expansions/pics/81003001.jpg	b9bc0c62b2f1fbfb511d81ad41e9cda6
+expansions/pics/81003002.jpg	40547a07291de01363f5e53d4bf6b7f3
+expansions/pics/81003003.jpg	e1b3996d763b37b13384e17325b29ffb
+expansions/pics/81003004.jpg	55dc9e0d3dc393964066636f0f90edca
+expansions/pics/81005001.jpg	165fc6e305cc5716e5bc8b289c6a0a8c
+expansions/pics/81005002.jpg	bee23454965557d1dc1c1c892869d076
+expansions/pics/81005003.jpg	7b26f484188e07bc93b39ec973514a03
 expansions/pics/81005004.jpg	9082814dad772c341d7188828e89e46c
 expansions/pics/81005005.jpg	70c05cf80f38b61e947c25c945e672c5
 expansions/pics/81006001.jpg	6da8939ff2e51963389d085137e8da87
@@ -6490,6 +6510,7 @@ expansions/pics/81006032.jpg	afb904c41dd949562c8028f1b6a1dcb4
 expansions/pics/81006033.jpg	1f7f1555cc897fc49b6e0e0d4a1fdb8a
 expansions/pics/81006034.jpg	81d15960cac0e91d8dc06b973a0522e1
 expansions/pics/81006035.jpg	08a371e20b957ae4091292a85c54b6f9
+expansions/pics/81006036.jpg	fc102190b16b8642bfc14b4f8f80290c
 expansions/pics/81006100.jpg	1faf7f218b044086a085b8d7a8f3c80c
 expansions/pics/81007001.jpg	3a39e7a61608cdb5b2dc60d30d45e80f
 expansions/pics/81007002.jpg	a33a6a58ded4ea8c024f4354270f142f
@@ -6579,6 +6600,7 @@ expansions/pics/81009038.jpg	85a7ddc13dc3fa3fe0a1ae0dab9a4d03
 expansions/pics/81010000.jpg	8a1c51194f4647f59f54f6b91c388013
 expansions/pics/81010001.jpg	24f725c80215a3ca15bf32f093f415da
 expansions/pics/81010002.jpg	82f42fea5505531ac5365251a7222e6e
+expansions/pics/81010003.jpg	7b057437ee0215b56e40c5c38f7fc07b
 expansions/pics/81010004.jpg	ac7081d63b1251a1061ceadb180a86a1
 expansions/pics/81010005.jpg	68a341ad463df2d690095199a45e85ea
 expansions/pics/81010007.jpg	d96b3cd2861f349bd7153833ee68a3ac
@@ -6613,9 +6635,11 @@ expansions/pics/81010037.jpg	3feaf95907276763ba2f903193e7f23c
 expansions/pics/81010038.jpg	d6ca1a84b4d9baf8670467c1f0b39ebf
 expansions/pics/81010039.jpg	22328e5693ea20c9480bc733631645b6
 expansions/pics/81010040.jpg	ca41fd4474b800ba12ee8b57c8a1e8c0
+expansions/pics/81010041.jpg	c956e9edc01043b28816501ee59fcf49
 expansions/pics/81010042.jpg	1a28bebc5d2d7fc96e07eb4bdbc19869
 expansions/pics/81010045.jpg	b25c3ab00261815f98534657ed5aaa00
 expansions/pics/81010046.jpg	0e6d6691fbea2904561fdbf6a07a1e4b
+expansions/pics/81010047.jpg	0be9ca111399725ca2054d82bc4a8aeb
 expansions/pics/81010048.jpg	0b4ce43c3b862647822b0053b515a279
 expansions/pics/81010049.jpg	33d6ab3edece5bac8999bf4abfa84b85
 expansions/pics/81010050.jpg	5837d26179c3394a72e92704f31c37f1
@@ -6624,6 +6648,7 @@ expansions/pics/81010052.jpg	6c643ae80c851bdd5241c72ca7dd86c8
 expansions/pics/81010053.jpg	ef3632e8fa1fcbb734346e2d89076734
 expansions/pics/81010054.jpg	c8b470b0fc12cf0e50d08c4e9caad158
 expansions/pics/81010055.jpg	4c59f0e9e6924453f479ed73a2c903a2
+expansions/pics/81010056.jpg	e4aee5313d00085ff8b551a571d38442
 expansions/pics/81010057.jpg	36fa976928e8da9b13c561b11b72a967
 expansions/pics/81010058.jpg	e45c90ab7ea81c15fe7a118fbd628640
 expansions/pics/81010059.jpg	4c01b61e458749062a006fd68d2feb21
@@ -6654,17 +6679,20 @@ expansions/pics/81011023.jpg	eb78adac6bdde142d17469e054aaa3ec
 expansions/pics/81011024.jpg	5f64551463d90bc887a687dac8d01503
 expansions/pics/81011025.jpg	cd09a5f7ebbdd42dbeacdbf819569b2f
 expansions/pics/81011026.jpg	5c3b3ee70763b108153122eab155056b
-expansions/pics/81011027.jpg	79258c897b9fdb2aedbb7c02629ecee2
+expansions/pics/81011027.jpg	8e90c8a4f2bbac27a2abb830c02ad455
 expansions/pics/81011028.jpg	0640021e9f7aa8f94abeb02e3612b579
 expansions/pics/81011029.jpg	5c3c0f03dc150ef0ab8f71f1514a81af
 expansions/pics/81011030.jpg	0359abda6027920461046ded1bae3e9a
 expansions/pics/81011031.jpg	ea70abf3165ba9781a3b2adb31aab7ed
 expansions/pics/81011032.jpg	c218e7958d45d426102837fa6ed5b554
+expansions/pics/81011033.jpg	a499715918674c2383243df59e4284b1
 expansions/pics/81011034.jpg	26b73e95e1cba0d0a4d692f15c765b7c
 expansions/pics/81011035.jpg	7a98f58752c35c3d0a768160ef6864e0
 expansions/pics/81011036.jpg	638485299d35709f1562255a1c081206
 expansions/pics/81011037.jpg	0cdef813b2fffb6b7be835626ffd27ef
 expansions/pics/81011038.jpg	9beb9222875537bd7cbd09139ef4dc5a
+expansions/pics/81011039.jpg	5747310fd4659a0ddfba34a3f95294ab
+expansions/pics/81011040.jpg	faecefb65cada479103594a5a8212f4d
 expansions/pics/81011100.jpg	3a156aa9afa37d68b8ed3aa574c1edb6
 expansions/pics/81011101.jpg	fb7f78ab37f608a808461e7820e554df
 expansions/pics/81011102.jpg	c4f17eaf296910f48556a05f743c9382
@@ -6766,6 +6794,7 @@ expansions/pics/81012060.jpg	2c3969959f4b4e93f085ef7b03d34d94
 expansions/pics/81012061.jpg	b0971653d30689b1f0b9afdd72c7624d
 expansions/pics/81012062.jpg	703eda7e1ab0c43f5b322bbf080194c9
 expansions/pics/81012063.jpg	f608ff62b6f6fcf5f548fb002b4bef3b
+expansions/pics/81012068.jpg	9707ab4015d6112d37cf545e21e8834b
 expansions/pics/81012999.jpg	56b37867b1e6f4fa1560ffee82975574
 expansions/pics/81013001.jpg	5634657cb4fcf8515c6dc1281dbeb089
 expansions/pics/81013002.jpg	e5b5261dcc8ce00419687545b30b3dd9
@@ -6875,6 +6904,7 @@ expansions/pics/81015047.jpg	de10e3ca6bf44fff9b378b9a028bc455
 expansions/pics/81015048.jpg	96a892005269069ab0ab1c272fdb324a
 expansions/pics/81015049.jpg	4b05b509c03d8cb4b1533dbdfc40ace7
 expansions/pics/81015050.jpg	18c55fb2686d797f68c7af9e8cf9f570
+expansions/pics/81015051.jpg	09c5e5086118940dfc2f5776e414d849
 expansions/pics/81015999.jpg	b8576e45d6a2ef76a3bf4b3c8bf97ed5
 expansions/pics/81016000.jpg	1d0e261fb0cac694a01e20f1b3e09173
 expansions/pics/81016001.jpg	7cdd8c98fdce3c733a43cd3e99854677
@@ -6963,9 +6993,11 @@ expansions/pics/81018042.jpg	42ae3ff1b816a7a8035a39f5730c8e1d
 expansions/pics/81018043.jpg	a3c54db3080fee2a0d839e373d4068f7
 expansions/pics/81018044.jpg	623c44c200f5b7a8cad27eac1668acdc
 expansions/pics/81018045.jpg	b75937d79e353a057bff8e18f25a05ed
+expansions/pics/81018046.jpg	39a0685e363a887664259d8896a25c08
+expansions/pics/81018047.jpg	6c24bb0e71cb72995175d32bfe3a4704
 expansions/pics/81018999.jpg	dd54c5011f5d48cfe0a4f86d52f48dbc
 expansions/pics/81019001.jpg	adb8fc3aa46c9741570b1a58e52a8364
-expansions/pics/81019002.jpg	7d2a41665b550499ac6d2242c1f58a9a
+expansions/pics/81019002.jpg	5c9cf435f9ea3860ebc623d12ab05b32
 expansions/pics/81019003.jpg	464361fabf3ba953177e1f4c06ab6379
 expansions/pics/81019004.jpg	a917e28c4c2d8f231bf626b31dec9644
 expansions/pics/81019005.jpg	88b1d2e7b7a1bd61a7096700f319bea8
@@ -7132,6 +7164,23 @@ expansions/pics/8209733.jpg	8c43fc2670824d2d66c102210975f67a
 expansions/pics/8209734.jpg	c3a2ba5249ff17dd293ace9b7efcdbf6
 expansions/pics/8209735.jpg	a6acefa6cf11c8437a51b17e10fb7e58
 expansions/pics/8209736.jpg	25868da629cec2358b7e20efa66a1d45
+expansions/pics/82206000.jpg	1cc68d51447bdef821f4ee179a3e5084
+expansions/pics/82206001.jpg	e4d04fddfe9a57422d8d9a9a83236f08
+expansions/pics/82206002.jpg	fbea8d489806e5b9995f529bd9966cff
+expansions/pics/82206003.jpg	5fa7899252c1122938ca159d7e234a85
+expansions/pics/82206005.jpg	cdadad970f5935f6ee8141a0f05aeea4
+expansions/pics/82206006.jpg	9bd21706fd41f75898d1c7d59b8ed85e
+expansions/pics/82206007.jpg	7d677f91e59d48fe255ce982e2a43c13
+expansions/pics/82206008.jpg	e1ed91df2f62f82223e79befe95d40f6
+expansions/pics/82207000.jpg	548ef4877d4fbbe14a76aef7834ca8d6
+expansions/pics/82207001.jpg	1626486c59fda824031a10494214fe5c
+expansions/pics/82207002.jpg	f3d4918fa9d153c9cefadc29e75d24ce
+expansions/pics/82207003.jpg	9b3d078376863f3639c1f4f155977976
+expansions/pics/82207004.jpg	e3f377faeb40e5e5e90fe12a513e46ef
+expansions/pics/82207005.jpg	b8c1d90ebae9bcc5a66fc27327160db1
+expansions/pics/82207006.jpg	273b38ab421107fe29e5ac0be47ca211
+expansions/pics/82207007.jpg	85d49d7e1012d3875889e07aae23ba0b
+expansions/pics/82207008.jpg	3a22166823f292db93c625c7d61fa175
 expansions/pics/82221000.jpg	fd0376ea380b3c00767cf4337c15f521
 expansions/pics/82221001.jpg	5c5c523975f4c42bf6bed85243028c10
 expansions/pics/82221002.jpg	eb066fcfa590b4f9e1c67c386b79ce71
@@ -7167,6 +7216,16 @@ expansions/pics/82221117.jpg	30f8e93591bfd74ae0c0855ca820e322
 expansions/pics/82221118.jpg	2de60dab1affdc4838a3b1fb1e48ae6c
 expansions/pics/82221119.jpg	c9483e8aea0d186e0d3c5ce3e0d7be4d
 expansions/pics/82221120.jpg	7b675a50e68eb51afa3585efd6b970b4
+expansions/pics/82224001.jpg	b55b6632596fd77133d16a66fe370563
+expansions/pics/82224003.jpg	ae5a8b2d4092cf7e90a71171c67b7b67
+expansions/pics/82224006.jpg	0e28cc850067491b3c999ecaa83cc72d
+expansions/pics/82224017.jpg	f17001f48838325990843363dd28c9b5
+expansions/pics/82224019.jpg	f36de0e526496d993be37a05708bf4f5
+expansions/pics/82224020.jpg	2fd73b55ed528a2425ef140088a0fad9
+expansions/pics/82224444.jpg	3e7b7e29856edac72d7a9ec9df0b3467
+expansions/pics/82228497.jpg	17c8c7135a1bcaea0a3be55f45020bd0
+expansions/pics/82228498.jpg	1bd78fb7a54e4ffe9e415f37b826b187
+expansions/pics/82228499.jpg	53031b879b524bb373a03de0957696fc
 expansions/pics/82228500.jpg	c42ab7722e26bfbfa5689fb98ae1e757
 expansions/pics/82228501.jpg	1d5b3523be1d3072aedac5a23eae2c0e
 expansions/pics/82228502.jpg	0721c883745988898cd17a69a60511fa
@@ -7300,6 +7359,7 @@ expansions/pics/98600004.jpg	8273bc46bf0a5085296aef73cc5b8853
 expansions/pics/98600005.jpg	ec05a9b6d91a4cf38de7d9624388c6de
 expansions/pics/98600006.jpg	79fe2565197aa5ccb05ad18d9cc81a8f
 expansions/pics/98600007.jpg	0c011f5e4bd1e09d55179e9013d0f383
+expansions/pics/98600008.png	273baebdcff82d9190b05d4b746373ab
 expansions/pics/99600001.jpg	5e3de96159451f52ed3bba54c3b116f8
 expansions/pics/99600002.jpg	9707d61060af1674135f3cf0c4e91ec3
 expansions/pics/99600003.jpg	3d62041b8b2402ca3522dbbae2b25a69
@@ -7502,11 +7562,14 @@ expansions/pics/field/76121042.jpg	755b5f8e1454b7fb3709cb411d5c0777
 expansions/pics/field/76121051.jpg	a6c32a5217718d07149046d250c644ea
 expansions/pics/field/79131350.jpg	9ca6671fbc4b3903b655164e0202f56c
 expansions/pics/field/81006004.png	deef12fa9333b0aa9555fb983d92bd65
+expansions/pics/field/81010003.png	eb05dc8bbc5a294081153b074abe8d8e
 expansions/pics/field/81010004.png	6e795b1caf08c9d8f07a7eb63663bf15
 expansions/pics/field/81010011.png	362cf857f8bae3efa2e9c8e795318e95
 expansions/pics/field/81010016.png	3510e75872024cf67aa726c035106743
 expansions/pics/field/81010030.png	29bc70de0d86614d2e787be3903e2651
+expansions/pics/field/81010041.png	f35ff42b6a6b27280d90d58f1c0245ca
 expansions/pics/field/81010042.png	b2789f9088bde9f4158afaff5c2c81f3
+expansions/pics/field/81010047.png	dd300e03d8baabcf08f400001b5032a3
 expansions/pics/field/81010058.png	3aa80d2777626281f2769fe525b914af
 expansions/pics/field/81012034.png	9e3840ad11ed2c2ee98fb1c2bc185b0c
 expansions/pics/field/81015013.png	a4c847871fafb920264d1ab449d5810d
@@ -7517,12 +7580,16 @@ expansions/pics/field/81021003.png	697b40fdea49a45806b48d3a2dc81c33
 expansions/pics/field/81040035.png	bc55c220cc015f50f180b291eb531db1
 expansions/pics/field/81040042.png	573d4b5bbb5582966a3a01b256b8bb5d
 expansions/pics/field/81041000.png	49efb7c03b5c8d53f234a944879e81eb
+expansions/pics/field/82206024.jpg	b9ae1aad3a7d57a6e15a63a7ccf88768
+expansions/pics/field/82207005.jpg	1ade56a45a5846878139292343b8715b
 expansions/pics/field/82221111.jpg	9b7c7d62bab3110a81bb9c59878c5cab
 expansions/pics/field/88800004.jpg	d1fd6739c97de90108c079c8989e6507
 expansions/pics/field/9334210.jpg	f7132f07fc22b80cfcd822f33d2bee44
 expansions/pics/field/960002.jpg	165099e467ed8cdf04fc726faeedbcc5
 expansions/pics/field/98300000.jpg	eb866f6af8da779bd72f81fa83145c22
 expansions/pics/field/98300010.jpg	356879f8e24f5d9631ee3f6d9ab8adc8
+expansions/pics/field/9910113.jpg	ac389aa929e37659572c2f17bfef18e4
+expansions/pics/field/9910251.jpg	4e4a4d1986abb14daf5a60b3aace3312
 expansions/pics/field/9950015.jpg	5718d8e582bd15c26196965719fe5129
 expansions/pics/field/99800445.jpg	ce4effee078c7c8afda0b7b910c44627
 expansions/pics/field/9980121.jpg	0cd90339c6692acabe8734650b8e6c4f
@@ -8006,15 +8073,15 @@ expansions/script/c11200031.lua	780e19e01749bd4b6869e19fe1cb6848
 expansions/script/c11200032.lua	d8e3748c091ced25e77d94547e71961e
 expansions/script/c11200033.lua	35842df92e19f99cef31e53d05faadab
 expansions/script/c11200034.lua	f0ef550bd18412fa7d97c48ffd3f9c09
-expansions/script/c11200039.lua	851cbd219c832c8b66b931175b137d9b
+expansions/script/c11200039.lua	46e8b47f04c164f11dfca272616ae1c7
 expansions/script/c1120004.lua	68e89766a3c8bcd7231f36270706cb89
 expansions/script/c11200040.lua	ab612cf745f4b22dde7183ed88ab0901
 expansions/script/c11200041.lua	d65cf2887109de412205680242064582
 expansions/script/c11200043.lua	0dcde156ef590ad31e5c229da7c5bfb2
-expansions/script/c11200044.lua	c4af476694b821fe9c68df8e6948d5d6
+expansions/script/c11200044.lua	5dc4241e9a1ebec0c7944a7e129fe7fc
 expansions/script/c11200046.lua	74f8ae5a8f4138e9a92bf8397219d9b0
 expansions/script/c11200047.lua	1f76f349b0e9ad623e419561b2eede16
-expansions/script/c11200048.lua	39a8fb59603fca4e27c72a6ef02b02d5
+expansions/script/c11200048.lua	7337fd9471b0cda20a577b3e28aa1bd6
 expansions/script/c11200049.lua	5e118b85b040a00cece50e724603f4bf
 expansions/script/c1120005.lua	c69089beb10b54ae48750b3b22a54e56
 expansions/script/c11200064.lua	e6206b7e218ffb47dd2ac3d4ca936769
@@ -8035,20 +8102,20 @@ expansions/script/c11200084.lua	78cf9627f7bce2be4d3069c55bb9d592
 expansions/script/c11200085.lua	6aca117b46abb30d245b05abcb78939a
 expansions/script/c11200086.lua	c9e0def6848b23ba5cafc44db26477b3
 expansions/script/c11200087.lua	e506df80a3e294ca6f1e799bd9c446f4
-expansions/script/c11200088.lua	e3a4bffe75399f4c34b83edd9f279492
+expansions/script/c11200088.lua	576cce31012fb0201ab79673f22d3cab
 expansions/script/c11200100.lua	1482f9fc3aea71dce19cb2f9f23f5011
 expansions/script/c11200103.lua	78840fa1b159fe749499c8d78ad73291
 expansions/script/c11200104.lua	83645fde555421dac55b35ca9b602b5b
-expansions/script/c11200105.lua	5a6e8e225b3183b393c4146ca30c1e71
+expansions/script/c11200105.lua	8663422a5dfd1ca712a301205f8bb9e9
 expansions/script/c11200106.lua	b02b2cbff8124530754e08280482eabf
 expansions/script/c11200107.lua	58a1c5c6b61ea0891f49d62724a56e3a
 expansions/script/c11200109.lua	682b5d574c963b3e07111711fe662088
 expansions/script/c11200111.lua	9c6aeed3b9c9364f672ec02fa655eb5d
-expansions/script/c11200112.lua	e91c9af655d692ab9fbd4b67540630b8
+expansions/script/c11200112.lua	abc1f06aaf8097946f1523365149ff3f
 expansions/script/c11200207.lua	21cc98db350b1d090da62d9efe8b4d31
 expansions/script/c11200208.lua	61243335bfa64733a4ed302e0c86eb7e
 expansions/script/c11200209.lua	24c40a6bf8f3cfecf90cbc7e8bfb3baa
-expansions/script/c11200210.lua	d80b6c9a825369e164fcd6ad4b3767d0
+expansions/script/c11200210.lua	b75a550b4b55fbc64027251365ffdcb1
 expansions/script/c1120101.lua	b397987da3b8ef95289d2678af4a1e24
 expansions/script/c1130001.lua	b2a17581bd3519e061ce30c05be83bf2
 expansions/script/c1130002.lua	bb10eb46a9c02d6864b3fd6a068b9d33
@@ -8190,6 +8257,7 @@ expansions/script/c1191001.lua	4cd7967cf3ac054a0fef6d757cf7f5c4
 expansions/script/c1191003.lua	34a858334efe24b7e9fcfe781b1785a3
 expansions/script/c1192018.lua	36cba675449ba6d067830374fcb4ecdc
 expansions/script/c1195011.lua	a89b721c88ad33c8fd06c14c44bf0970
+expansions/script/c1197001.lua	d4fc730a4480f01bdadf5e3d11505f38
 expansions/script/c12000037.lua	03648ca82ea166d1521f5ee03cf46591
 expansions/script/c12000054.lua	9c2e162feac6c67ab07a257525a17ebc
 expansions/script/c1200015.lua	5a6a9a450b6c925ab5abea4d4c3a276f
@@ -8640,7 +8708,7 @@ expansions/script/c14000391.lua	a562faa0c154a676cb123e35cb5031bc
 expansions/script/c14000392.lua	693d40d9267f4ef62f8135665133653d
 expansions/script/c14000393.lua	dc105fa32fd9328663ded611e14488a0
 expansions/script/c14000394.lua	bcb30711db8e4109ab1f48e1b92823ae
-expansions/script/c14000395.lua	665d81aa6ccca04f78f15eb75c94bff8
+expansions/script/c14000395.lua	44434f12f9c75f2deaf7fcabfd4d7cf2
 expansions/script/c14000396.lua	3702952ef1f766c3e0b43defd0b86433
 expansions/script/c14000397.lua	54dca3fa5a2ef33e9e00666a9f4a85ce
 expansions/script/c14000451.lua	cd95321500f0b37a5ce6ccc410090736
@@ -9166,7 +9234,7 @@ expansions/script/c17030008.lua	f7a8800ceb9dede97bd741a8797e3b47
 expansions/script/c17030009.lua	b761ac27f2c7ce431d5b8f6c735dae9c
 expansions/script/c17030010.lua	2b6d2cef65be0caa2901ab1535643a15
 expansions/script/c17030011.lua	528cc6e85d1d462486d4b0d98dbd943f
-expansions/script/c17030012.lua	e88be2f098819f988091d793870e686a
+expansions/script/c17030012.lua	ee73cdc6df2eeec4bb7c0ec4b20dc1d7
 expansions/script/c17030014.lua	e513e044f05533dc33ec7b0dbda5c2ab
 expansions/script/c17030015.lua	cfa838cf206648737faeb1c72f031763
 expansions/script/c17030016.lua	1d06e0c1b10a74c1f3d75e282f4606c2
@@ -9184,30 +9252,30 @@ expansions/script/c17030027.lua	536d051f15f433844a981fd33fccfadc
 expansions/script/c17030028.lua	5aadd3dd5bf118d8d63efbfbf214ea85
 expansions/script/c17030029.lua	d0904f89ed45f5e153649d040c59bf62
 expansions/script/c17030030.lua	d65440ca14fa3f5885d24526ff929ca2
-expansions/script/c17030031.lua	0cbcdf0f64acf3648e36b5fa3c1bd2f2
-expansions/script/c17030033.lua	287fbc6860d9d6266f5127e77adbcbad
-expansions/script/c17030034.lua	2e9fd0112c80ddea8e1b270848590d93
-expansions/script/c17030035.lua	47ceeba6f98e6aca800b720e41048749
-expansions/script/c17030036.lua	122817c2b1e4fdd16a90cf9060e4723d
-expansions/script/c17030037.lua	f3e54056fcbc9c4e8a83cf59d2cdbe70
-expansions/script/c17030038.lua	876830cac182f67c95c0057fe23c8577
-expansions/script/c17030039.lua	2d6c890162ac2a306314c5f70c7fb2d7
-expansions/script/c17030040.lua	537aa02522d5966f02732f086c95813d
-expansions/script/c17030041.lua	f473fe9842a23e3727de97d05aaf275d
+expansions/script/c17030031.lua	5b03a50ad240108ef7dbb8ce32bff0d8
+expansions/script/c17030033.lua	c8466a77ebfb95aaf159af369c656919
+expansions/script/c17030034.lua	f62d3185e8adcb8960e09c20e4ea9f2d
+expansions/script/c17030035.lua	c6e9d518a04aa0bcc4f0b382d523fe18
+expansions/script/c17030036.lua	08b05161b353e4bef270ffa2b471f5ba
+expansions/script/c17030037.lua	ed9d5fed655a48c82c68a937a4d7617d
+expansions/script/c17030038.lua	53f9d35ee60f65dab9ddcd23b7224373
+expansions/script/c17030039.lua	0661479a543008946c912e291ccd15c6
+expansions/script/c17030040.lua	35e854a465b840688a5cc36800234a60
+expansions/script/c17030041.lua	b608dcbec9da9faf7c4c509147e36346
 expansions/script/c17030042.lua	d9fb2c4234e0bcd3eb861383367e8522
 expansions/script/c17030043.lua	5827be9276f295d63db14bb029256d0d
-expansions/script/c17030044.lua	37f94426215b12c38ae2459f19ed0f77
-expansions/script/c17030045.lua	2d2b1a1455e703409503d9a9fdaebadf
-expansions/script/c17030046.lua	633cfa4c3505fca24c4b0fde5f27d0f4
-expansions/script/c17030047.lua	d9dc9901824caea33113439d0c156007
-expansions/script/c17030048.lua	3b1f6c1054db9cc504a50070997001c9
-expansions/script/c17030049.lua	31ac33cdd290b043780fd8f5439ed962
+expansions/script/c17030044.lua	3a17476bb1f334a148e29f1caab18e98
+expansions/script/c17030045.lua	b00b1d8cad05e54a2ccb937bc720875a
+expansions/script/c17030046.lua	bc9f61115fda2ff8fa57787e065169c4
+expansions/script/c17030047.lua	9db5c79b2741411be57cd67f582ab814
+expansions/script/c17030048.lua	37d13195a558f8a22ed495c7ec2c06c5
+expansions/script/c17030049.lua	e7d7dc67e9ab29567c51d77eb868a63c
 expansions/script/c17030050.lua	d18708bb0fa48d90e7acf24470b26c44
 expansions/script/c17030051.lua	38f4dc84d83851329406deb934f33629
 expansions/script/c17030052.lua	efe93983024140c6c0f9a6843e8a4ff7
-expansions/script/c17030053.lua	a23e7ac6ec855d275e5c94f26392dedc
-expansions/script/c17030054.lua	06872d71154ea12b44faaa3a694cabb8
-expansions/script/c17030056.lua	0735c848e816f47c75b5901f82c14376
+expansions/script/c17030053.lua	87f9d07149461291d798ea40990b4f5b
+expansions/script/c17030054.lua	f79b535b93d58342070c29c4420079ce
+expansions/script/c17030056.lua	bf0c9c256dd968c7f6f06cf7628caf03
 expansions/script/c17030057.lua	8a2bfbfc08daf253086e36cb5a8902aa
 expansions/script/c17030058.lua	b068ff6eb393b804b568117776df7c54
 expansions/script/c17030059.lua	81ff1e7794e11650d7717aeb38ba645f
@@ -9245,7 +9313,7 @@ expansions/script/c17050928.lua	1630753809265b0d54f957f0d8dc1797
 expansions/script/c17050929.lua	48d7826571ee2a06376a2c2371d24bc6
 expansions/script/c17050930.lua	2439c9811288829e3856a08aee453b7e
 expansions/script/c17050931.lua	47e5d24593665bc8b204aa9e9fce70e5
-expansions/script/c17050932.lua	166b130e96e47c96dc9148411cd377be
+expansions/script/c17050932.lua	24c734660f03c5558023feaeea6e2b32
 expansions/script/c17050935.lua	e423a83698555ce05ebbee032c7a7925
 expansions/script/c17050936.lua	7c591acba6a7fd806db39b357b6be844
 expansions/script/c17050937.lua	07bb44656b98e48ba73525f607f6f2f2
@@ -9316,15 +9384,15 @@ expansions/script/c17060864.lua	0e88481c062105605a50bfc531970f80
 expansions/script/c17060865.lua	ba27c65969c237b15ac762387ca99d73
 expansions/script/c17060866.lua	3ac68ecd32872dc9026f495ccd0d74d9
 expansions/script/c17060868.lua	f2dbbff148ac46fbcc8d626b2de0ef0b
-expansions/script/c17060870.lua	e6f0368aa77061a34a524528bf93d590
+expansions/script/c17060870.lua	2e7d83b25573fb2cea68de2a28dd6dfb
 expansions/script/c17060871.lua	9980d5b2877b95d56791c2bf3a38fdf3
 expansions/script/c17060872.lua	315272e3d2b58780e1cd8d3623422a20
 expansions/script/c17060876.lua	4868a4172dc64db7824ce8581800a47c
 expansions/script/c17060877.lua	d449c5a7841b0bee2225298d8d33b314
-expansions/script/c17060882.lua	1ac4d3a6e4a8a8076cb5702630aec92b
-expansions/script/c17060883.lua	4f65ed3e400f37e4861e4cfc0a62e0c7
-expansions/script/c17060884.lua	d98980d1b8ab6eb0b6449128dafe2439
-expansions/script/c17060890.lua	76abf907e508134f2b12e43325979f9f
+expansions/script/c17060882.lua	a20d78fb4e11aa596055f57a35419cd1
+expansions/script/c17060883.lua	b779516b7557fe69c7c54a020c73a7d1
+expansions/script/c17060884.lua	f8cce283c159e6a75a1eb9c00be992f7
+expansions/script/c17060890.lua	5d27ce50a06b638fd654d5a85f2a35c1
 expansions/script/c17060891.lua	6542dfd034ef136fa363cd0702186d8a
 expansions/script/c17060892.lua	397ba1e8f9dfa997b1f9ad170f1a6a70
 expansions/script/c17060893.lua	befdc1ee7f3214662257b8587b3b2acc
@@ -9344,7 +9412,7 @@ expansions/script/c17060906.lua	45aa0bee2147fbd6e4b6869cfa47c243
 expansions/script/c17060907.lua	ab9372893aac350c5ea0035bd6a952c1
 expansions/script/c17060908.lua	b9654d0923ba4c0120833d0b7a2f51f9
 expansions/script/c17060909.lua	053ee3a471233194f603c4e42667dd3a
-expansions/script/c17060910.lua	298768b951d167f4ed593a6eeb7d4188
+expansions/script/c17060910.lua	31bc466bf32d7df8f0fc48f8c45bf164
 expansions/script/c17060911.lua	18532e035a53dd17535ff0b37450a6c4
 expansions/script/c17060912.lua	9b66b3d9503d01fea7f83a53ada3fb71
 expansions/script/c17060913.lua	de900b67571a9d1b795f300bb2cf0cb7
@@ -9395,9 +9463,9 @@ expansions/script/c17061153.lua	3af5a6f10914c6ae145c5f67ebb50c01
 expansions/script/c17061155.lua	62036e1c0dd3b509ff8c7f5721e195f6
 expansions/script/c17061156.lua	6eb152bac39a07e19371e4374d43064a
 expansions/script/c17061157.lua	e05d490d8d175b70a2d2b9356011f45e
-expansions/script/c17061158.lua	c0f33973bc49376fb273e53372011c74
-expansions/script/c17061159.lua	bc2dc4328875a59dc9471a430e9e7b1b
-expansions/script/c17061160.lua	816b61bba9985c3c5beeec52766dfe72
+expansions/script/c17061158.lua	6b30e6df60da142bcfd082821369a227
+expansions/script/c17061159.lua	1af0067d55a8ac29321fd2232d9f0deb
+expansions/script/c17061160.lua	b9ef10401e67e15cf557b343a7317222
 expansions/script/c17061161.lua	c73955243d725bb19517b5fa2081af79
 expansions/script/c17061162.lua	a43d15e4f8078b5dae3ce72943c29ce3
 expansions/script/c17061163.lua	2f036b52818d7405393dc68c86039435
@@ -9441,8 +9509,10 @@ expansions/script/c17090022.lua	61599cb67f7dac6d5cd8ccd781be925b
 expansions/script/c17090023.lua	8b93da851c21e55ec70aa230247761fd
 expansions/script/c17091001.lua	0b9756820a02e1db0dd7ed0e8684a75b
 expansions/script/c17091002.lua	05876b9a6211fdb17f807e4170c9dc75
-expansions/script/c17091003.lua	152c4696f8d9f8615941397095af7bb5
+expansions/script/c17091003.lua	6cdf90e889e7987af33dd9966490284b
 expansions/script/c17091004.lua	9b01bf9da088656c780f4e7d7312e822
+expansions/script/c17091005.lua	c5eed4ab14a1c4640b8899253d847226
+expansions/script/c17091006.lua	6dd7b3d08646ddb9922b74e4f1dae9e7
 expansions/script/c17092201.lua	f51835717e908f068d030d9c55254c0f
 expansions/script/c17111010.lua	dd7b8220137f66c6947dec17e07c0bd1
 expansions/script/c18001001.lua	66339f086183dc9d87d089da49f94a0e
@@ -9984,7 +10054,7 @@ expansions/script/c26805004.lua	23213ec5bee45a923771e444eb6f1a38
 expansions/script/c26805005.lua	8f66a3c5a07b129eff2ff849bd2936cb
 expansions/script/c26805006.lua	9341a91a294f31fc0b2bbda9646e5ebf
 expansions/script/c26805007.lua	f4629c4369e57bd44de82de554e9d80d
-expansions/script/c26805008.lua	ebdb97fed6f6e4db9cc15b3b49889784
+expansions/script/c26805008.lua	bbd75e6ad4e0e4da50a2f4e63b70e8e1
 expansions/script/c26805009.lua	34e5a6b99e64f26418311568aacf0715
 expansions/script/c26805010.lua	5794c6c73a4c0264701ec130aee84957
 expansions/script/c26805011.lua	d03a77314bee7b3aebe1a4f61764adb5
@@ -9997,11 +10067,11 @@ expansions/script/c26806003.lua	177490184b635feceeb90f59003b39f3
 expansions/script/c26806004.lua	ee023ef24f51f9820f1df1727331248b
 expansions/script/c26806005.lua	f76076b6076df351b703209ed6170f40
 expansions/script/c26806006.lua	88a48237207e78be1ad61fbf7883f336
-expansions/script/c26806007.lua	13c2f8223783c457cca5d798dd6d3256
+expansions/script/c26806007.lua	4c0138fe439aa7bd8ab208152f42040d
 expansions/script/c26806008.lua	2c23821e65b7de62d936d933b13f4528
 expansions/script/c26806009.lua	75e79fba54cf5e2ac89d2493e8eb9e9d
-expansions/script/c26806010.lua	417c2ee724bc3b7d1a60bf7028c238e3
-expansions/script/c26806011.lua	19901e71370cb189b551b76ca6b05cf4
+expansions/script/c26806010.lua	6559650cb78a404abd19727c621467dd
+expansions/script/c26806011.lua	4b7653e3461c039a049df3756cab0522
 expansions/script/c26806012.lua	8a7f5d2894d2393cba136c6ef66a3ea7
 expansions/script/c26806013.lua	a86d1dd26764b492b8012cd8b52d47dd
 expansions/script/c26806014.lua	82866be30b7712f00a336a01aa968085
@@ -10010,7 +10080,7 @@ expansions/script/c26806016.lua	a4e3babebea60e5378b3c185c95f2273
 expansions/script/c26806017.lua	801b36faae5be759c0b4976681f9e86a
 expansions/script/c26806018.lua	502242d92f16234b61d1ab27ee02587a
 expansions/script/c26806019.lua	2a360d13c47d287c82b8e901d448a335
-expansions/script/c26806020.lua	d8ca54abee813acca056e7d6d354160b
+expansions/script/c26806020.lua	054e0148eab49e4c4c8ce50b2b6aa26a
 expansions/script/c26806021.lua	ea3850cbe89a9f36bf418ec805b90d3c
 expansions/script/c26806022.lua	3c1d029157f75101a2970ed4d5360ecd
 expansions/script/c26806023.lua	240e083ea3fce661493cfcbca471eecd
@@ -10048,6 +10118,8 @@ expansions/script/c26806054.lua	4f7f801e01653863c7da67d1cdb1f0f1
 expansions/script/c26806055.lua	e19547a13c3caa48a68f66855324f16b
 expansions/script/c26806056.lua	60776d97c3a2afe9ce1ee73154ab308b
 expansions/script/c26806057.lua	5dd7e4dfd910960a283e40442931e68f
+expansions/script/c26806058.lua	d57ba1ccbe8a0637a5021b03bce6e281
+expansions/script/c26806059.lua	808ce20401f4cf5056ff7bd478730644
 expansions/script/c26807001.lua	e62807a9b0d05d1c50bd9a976bc3c215
 expansions/script/c26807002.lua	2f0a1ed63eb97e6eceb2a07a9c05ed85
 expansions/script/c26807003.lua	7e316dc2df6be42c8ac0c904743ec693
@@ -10077,7 +10149,7 @@ expansions/script/c26807026.lua	1ad61c378fcf7dded22834608f59d5b6
 expansions/script/c26807027.lua	32ea346f671539e6cb5541247e16fd15
 expansions/script/c26807028.lua	c545ca5ee6573a1a145022ef77ee36c3
 expansions/script/c26807029.lua	a0f82a799e7bb70fd33dcb04e9b8e836
-expansions/script/c26807030.lua	ac9dff5cbfa2d86bf086e8d9890ae0a6
+expansions/script/c26807030.lua	eea98f835f5d3500ac5c889e93384773
 expansions/script/c26807031.lua	ed13073278b5962c9c330e15ddd8b39d
 expansions/script/c26807032.lua	862de6d2362afff3dc3c2e49fb758ff8
 expansions/script/c26807033.lua	816dda70c53a02e968d3a4d9dde08ef3
@@ -10104,7 +10176,7 @@ expansions/script/c26807055.lua	c82c10b1af1e323c245a86e0996e42e2
 expansions/script/c26807056.lua	54bdfb3d5cec8883e656a4755edf8406
 expansions/script/c26807057.lua	fc0b46b1dc46031e0703b00bb46d5b7d
 expansions/script/c26807058.lua	4d22e577d6d253a4f02fa1ecc48b6582
-expansions/script/c26807059.lua	ded6b2d3b8c228ac0a9357e087f5da13
+expansions/script/c26807059.lua	32cd89dfb883f3f662295647847f07e9
 expansions/script/c26807060.lua	218fffe018c51a01cbb507b5ac2591c2
 expansions/script/c26807061.lua	2362b18c4df5aeabe0ba97771b3dea14
 expansions/script/c26807062.lua	31b22357287199c1db58b15f0f91507f
@@ -10122,7 +10194,7 @@ expansions/script/c26809002.lua	4cf1e3dae7aabaff4907b2597425ac3d
 expansions/script/c26809003.lua	c70bad123a8cfbbdf233719720a6bb8d
 expansions/script/c26809004.lua	d186c1fd2a61675f837c0cbe5ee23e09
 expansions/script/c26809005.lua	86d4dac989de8947642c6172f41a4d63
-expansions/script/c26809006.lua	a3003367e7fb2bc6951daea1876a399a
+expansions/script/c26809006.lua	4e41f1534f05a0db66a546113ccca1c5
 expansions/script/c26809007.lua	a5466e957a8da2c689cef3c532bc69ae
 expansions/script/c26809008.lua	776645922fb0ba01f56d2a2ebd5ba773
 expansions/script/c26809009.lua	a0927dbbfdc13746e8eeb29dd9b9ab3b
@@ -10145,6 +10217,8 @@ expansions/script/c26809027.lua	9984bb925049064bdb6225730cf436b9
 expansions/script/c26809028.lua	fd12254d4ff473be0362b896000cc18b
 expansions/script/c26809029.lua	758e55b97bea366a3d4f241192c336d0
 expansions/script/c26809030.lua	e73286e12647b3a699297e0067eb3226
+expansions/script/c26809031.lua	9afa73418deacc44e5e6389e88c51b98
+expansions/script/c26809032.lua	2d021c07b78dc1366cf5acbd049900f3
 expansions/script/c26810000.lua	1a7a615b2f6306368e90382cf21e5a0c
 expansions/script/c26810001.lua	1824e883b4bce30a1b1508c191f42d06
 expansions/script/c26810002.lua	76203cca49a448c9c895f94902b4d6cb
@@ -10166,6 +10240,8 @@ expansions/script/c26810017.lua	1d1286885e97082284e3d3225eaf3c2f
 expansions/script/c26810018.lua	efee70be6eab174a007b8dd1cdfbdac4
 expansions/script/c26810019.lua	41f7b02886c254305c7a6a7256a16995
 expansions/script/c26810020.lua	ca00e6585e95e92af8df870d7be37727
+expansions/script/c30000200.lua	8a9404abf91cf299506ce74958d0cb12
+expansions/script/c30000205.lua	07f1cc7d0fe1c354db29d4ebdb245ee2
 expansions/script/c30556001.lua	87e347be871cbbdf79461d22e1de60b9
 expansions/script/c30556002.lua	ed741a5a307410d824922ec9b6ca4480
 expansions/script/c30556003.lua	965da8aeabc49587f3c81046f57e4545
@@ -10290,11 +10366,11 @@ expansions/script/c33330205.lua	8ec628bca33cc8ac57eeb760cd8a1404
 expansions/script/c33330206.lua	a16955e6a3b6b6091c6f176cf58f9582
 expansions/script/c33330207.lua	a97df5a9b82eb91e59b37c355d0e5a9b
 expansions/script/c33330208.lua	d86e0e8545029cdc6f5a6a1bff78ac58
-expansions/script/c33330210.lua	a76f25d453e53e4e20afe8b141c525bd
+expansions/script/c33330210.lua	cd2ca586b9cc59414d60157f1eb97924
 expansions/script/c33330211.lua	8c875473d9d42e908b77f89d0728c72c
 expansions/script/c33330212.lua	c5ae1f3410e589f660a2ac9a28eb6b9e
 expansions/script/c33330216.lua	70defff6fb8e1f9ac2813f9e5de58047
-expansions/script/c33330217.lua	bcddd410ce6d84d3280e8606759f7a60
+expansions/script/c33330217.lua	b6cb0f4c8ac902ccb64e9528db861116
 expansions/script/c33330221.lua	2a3a86b1c60495cda1c34e0f71bbbdd9
 expansions/script/c33330222.lua	94072f9975b9936e29ded3e13df879fe
 expansions/script/c33330231.lua	66b2a4206b9e487be23d79c56d4436e1
@@ -10479,9 +10555,9 @@ expansions/script/c33400355.lua	33fb43a71359b9f140c0ca7e6b288a75
 expansions/script/c33400360.lua	1277ea49288207c4e887c3053944c686
 expansions/script/c33400361.lua	5267facbe4ed23f006f3ee242f46a00a
 expansions/script/c33400362.lua	41283dc65edd192dfafd3771ce8d906c
-expansions/script/c33400401.lua	15deccf6a9ad627e14da4012e44d5f51
+expansions/script/c33400401.lua	82fe35e28f16d61fc5dd7de4d8f5f769
 expansions/script/c33400402.lua	ee577ecd92a49181506ee66422bc1f6e
-expansions/script/c33400403.lua	68489e0d3bb34af31ce79b68c5c22bb0
+expansions/script/c33400403.lua	fd84f351b2f4c515845b2f4be277bc2e
 expansions/script/c33400404.lua	c5714a1e8a2ad1e2ebce313230622600
 expansions/script/c33400405.lua	d211655f7242ca0347cab7399533aa46
 expansions/script/c33400406.lua	c62cabd33c54d9e46f5d447a8ed5b322
@@ -10523,7 +10599,7 @@ expansions/script/c33400470.lua	6d802f596daa93d573bbc15b9e7319bf
 expansions/script/c33400471.lua	6ba374a6edcf7a2f90622e38b18a9d0c
 expansions/script/c33400472.lua	9645aa893848ed1c048b53ce67212dc4
 expansions/script/c33400473.lua	e3afa535f3e7902cece0384d5dd9daca
-expansions/script/c33400474.lua	be43983d9a32e0928a6bc63e217ff020
+expansions/script/c33400474.lua	eb4f837a186127fdeab7f487dd4bd7ba
 expansions/script/c33401200.lua	4c8722aa6baa0ebedbc9ddb45a909691
 expansions/script/c33401201.lua	e2c537ec3520c8ede5976b430e09d301
 expansions/script/c33401202.lua	f993018c70b8c4b93eff41aa7c8df550
@@ -10829,7 +10905,7 @@ expansions/script/c33700419.lua	103ff0b76d4a17a1c5ca0ae06464e5e4
 expansions/script/c33700421.lua	418c473673f803bee6bf6363692a23ef
 expansions/script/c33700422.lua	eb9a3c901085b66aa2fd01cac16e793c
 expansions/script/c33700423.lua	60c381a0e4f82389744180e6db8c9e85
-expansions/script/c33700424.lua	33107bfa52adb6cdf86295e90cc0792d
+expansions/script/c33700424.lua	6287e2c4502a1afeaeaf155d67d7baa9
 expansions/script/c33700425.lua	6cf8e6543b6b789c0bd9116be61ffe5b
 expansions/script/c33700426.lua	46611cd7741aa414daa8e7a371383aa9
 expansions/script/c33700427.lua	48240095461fd2079678c2f5f61646a7
@@ -11044,7 +11120,7 @@ expansions/script/c37564007.lua	d26994764124cf1ea4c8aebfeea00cc4
 expansions/script/c37564008.lua	e82fa8d76963d05fa13de897367ad86d
 expansions/script/c37564009.lua	0d01baad5e1f78accbc09196641a2354
 expansions/script/c37564010.lua	bd0a666f36712dd820b992f1d6fc4182
-expansions/script/c37564011.lua	578232f0bbd66f487fd1ddd0f6394096
+expansions/script/c37564011.lua	5b6e106a92d22516f0e279eed7aacc4d
 expansions/script/c37564012.lua	d88d0c2290801847b396f0b300d45548
 expansions/script/c37564013.lua	77fc000b4e97be5629f09987ba91abdd
 expansions/script/c37564014.lua	ab7b3163a0242ca13411f9de0d410081
@@ -11061,7 +11137,7 @@ expansions/script/c37564024.lua	6e5871be5098b6c486bade1a4eb90dd4
 expansions/script/c37564025.lua	a61db7d40c26e69dd55ddc78b5d312db
 expansions/script/c37564026.lua	b208e3ab3310382e7974ff05d2da7b4f
 expansions/script/c37564027.lua	1ed21e01bcda704e20dc27a8d0f8c100
-expansions/script/c37564028.lua	0447f6802c0e1bff4583b4342ecafe61
+expansions/script/c37564028.lua	afa793912a0060cffcfaba8442bf86b0
 expansions/script/c37564029.lua	1c7688292a469faeee4420ffcdd8d7ed
 expansions/script/c37564030.lua	b92b638d78899465293d9ad7848bf7b2
 expansions/script/c37564031.lua	1d83e3f4edcd68606c950bc7bfcfb6d7
@@ -11070,7 +11146,7 @@ expansions/script/c37564033.lua	40e8016abd7278330e810b533f9d5126
 expansions/script/c37564034.lua	9b921e7782c80c248fda42169a463471
 expansions/script/c37564035.lua	c0111c457144fe6bd02140f219bbf8f0
 expansions/script/c37564036.lua	8fb5a29cad900fd0b8510a6757173626
-expansions/script/c37564037.lua	89c37df0dc128f8f6f3f44cd52874c41
+expansions/script/c37564037.lua	7bcf23423988d890d9e9dda956ca1832
 expansions/script/c37564038.lua	012ad82c7db3765a502f521753e49b2d
 expansions/script/c37564039.lua	b28086435a78fbdb0b8e5a8904422f8b
 expansions/script/c37564040.lua	982c097f96964cc4282792d0dbba29b6
@@ -11155,7 +11231,7 @@ expansions/script/c37564312.lua	3d00e6d626acb5f0ec6d6119f28ca388
 expansions/script/c37564313.lua	902dc474378b1cd7f34548fe21effede
 expansions/script/c37564314.lua	dcac842599175d84a27e9f708a5f3f97
 expansions/script/c37564315.lua	0cd0c3f1e502ee9d3639d8edef0a38f8
-expansions/script/c37564316.lua	1b557c9d55d7c5bd9468ecf86ec2afa2
+expansions/script/c37564316.lua	c145eac4e44331ebd527e79632fe24bb
 expansions/script/c37564317.lua	21b3c179bd130ceb893db83bd0532a0d
 expansions/script/c37564318.lua	e6c006c56168f0c95ced4ffe0b304743
 expansions/script/c37564319.lua	813c8bdc9c5d1a7d7d579089282e0941
@@ -11191,7 +11267,7 @@ expansions/script/c37564349.lua	02d6af83e455c3dcefed41c6379481e2
 expansions/script/c37564350.lua	21a991cc37cde1ba1f6422a0fef7b3cd
 expansions/script/c37564351.lua	543bf0a66d9b64da6e6b864f4eb18b87
 expansions/script/c37564353.lua	867833e05bc87b0191cff189b4fe804b
-expansions/script/c37564400.lua	e9566c87ee47246ea7670b630057e0bc
+expansions/script/c37564400.lua	cbb66ea4285a7409ca168df726ef980d
 expansions/script/c37564401.lua	98ce9ed6ee1ce1c4a9db8f8c4187ef69
 expansions/script/c37564402.lua	9521e8d125c5450333b40ee52bc6adf8
 expansions/script/c37564403.lua	21538a60686dc82a55d961236b6d3d6d
@@ -11206,7 +11282,7 @@ expansions/script/c37564411.lua	6d9883093c2c7e6440024043a7bd9b59
 expansions/script/c37564412.lua	6626d7f1629c0f70da2d3e17517c5a9b
 expansions/script/c37564413.lua	1d739c0621469c9d012e16b4455f7e1a
 expansions/script/c37564414.lua	529d0a93683137565378585b93af5573
-expansions/script/c37564415.lua	00172ed4251b02e5055dac9deb459b25
+expansions/script/c37564415.lua	2327daab40a5c00f0b1eedace9d388a6
 expansions/script/c37564416.lua	10c9d8ed6058a213ebdef426838699cc
 expansions/script/c37564417.lua	1509ec3aed591b0ce897bffabacd574e
 expansions/script/c37564418.lua	130acac7050120d8ba1b3dcef762be10
@@ -11233,7 +11309,7 @@ expansions/script/c37564456.lua	9e46722f257a544cf7f7d3f33510141a
 expansions/script/c37564457.lua	66e25c8d4bfb0d02956912baf8494416
 expansions/script/c37564458.lua	e8e117de9d6f6c4b73eb1a5b92b0946c
 expansions/script/c37564459.lua	8762b30647d3ae97cf9b96d106d737f0
-expansions/script/c37564501.lua	635c8a8e61eb9d3539eba23b5d5f8404
+expansions/script/c37564501.lua	a609cd7181b06629d3a6895eaf25f8e4
 expansions/script/c37564502.lua	e848b57b8f75e106f5f8e28413b4aa02
 expansions/script/c37564503.lua	e01fa83c7f65ec7f9b2c24be0e4c81e1
 expansions/script/c37564504.lua	f8f7875bc7557b0ed4297e6fd6b6c6c9
@@ -11248,7 +11324,7 @@ expansions/script/c37564512.lua	60765aef6cc3a2bded174f263ffacd75
 expansions/script/c37564513.lua	52a0540548810a3a607516e358cd6faf
 expansions/script/c37564514.lua	6c848d17c93782729cbb9b070a203c91
 expansions/script/c37564515.lua	3dee765838ba50ac061783e6b7344af4
-expansions/script/c37564516.lua	f2078219c5788a30c04c4145db6f0e39
+expansions/script/c37564516.lua	fef3e0e09adc551018da6fcd14946767
 expansions/script/c37564517.lua	0330671a58e34b978693769649f92595
 expansions/script/c37564518.lua	50f25b3a119c23c1a45bb2393169f253
 expansions/script/c37564519.lua	53d59af9e0bfaa7850dc58815f83afdb
@@ -11262,7 +11338,7 @@ expansions/script/c37564526.lua	8fec2adfd72447758731fca7c7fa3e7f
 expansions/script/c37564527.lua	9e4948bfb24536cca6267e3322bf4365
 expansions/script/c37564528.lua	5bd9501581783735927e8a9fc6ab0ad7
 expansions/script/c37564529.lua	bb3a02dec90a1cf9a632b4421ca7a4de
-expansions/script/c37564530.lua	110272891779f95393aeb97e4ad40d8f
+expansions/script/c37564530.lua	944550db8a3ce2899e696778fb8f3f22
 expansions/script/c37564531.lua	1a6def61aa3a319a6a60d581b4385fcc
 expansions/script/c37564532.lua	bdcc790913435721dfcd2fd32a325da0
 expansions/script/c37564533.lua	7add868fc8a9eb613582819ce24d6579
@@ -12834,7 +12910,7 @@ expansions/script/c65030079.lua	149ab572b14a1d7dba7d96bca582af9b
 expansions/script/c65030080.lua	083faffb7b8d6a6dd622b6ad893717dd
 expansions/script/c65030081.lua	e688fefa51eefcd230be4b6d49bdb9ed
 expansions/script/c65030082.lua	e6d3ef245bdc8830728a23de77acb2cf
-expansions/script/c65030083.lua	0d48271baf8b3d70371c5aa1cf1d534b
+expansions/script/c65030083.lua	edc9c3dac490163d14869e0c76e89bbf
 expansions/script/c65030084.lua	504046740075f1b74374f68df25dbf0d
 expansions/script/c65030085.lua	7c4b164c9945dbc04820283dd2ee1623
 expansions/script/c65030086.lua	b57553ebd00b4cfafd51bda0f8cbfd65
@@ -12892,14 +12968,14 @@ expansions/script/c65040043.lua	dea9ec2a46133d8939d764c5f3edf425
 expansions/script/c65040044.lua	6ec13ea9b84250865befe08ad5f8592e
 expansions/script/c65040045.lua	38f1efe87223894f5b7efec626717d9d
 expansions/script/c65040046.lua	fd65bd2c1d107def948a34ba4abaadd1
-expansions/script/c65050001.lua	c750932f50aa26356e3af57c6b924e74
+expansions/script/c65050001.lua	2f3c2e8a27c66632eaed47d42241111a
 expansions/script/c65050002.lua	e6af2fb2b2d61211b41d527ad2c3a9c0
 expansions/script/c65050003.lua	e02d36b5824880ebde78b58369b321e1
 expansions/script/c65050004.lua	f2c5674b05325850cf87fdc116104966
 expansions/script/c65050005.lua	7e2ddb5207a840f004eacb93b0a1910e
-expansions/script/c65050006.lua	97d8f95a2e5781727d95b0d2a8b8d9d2
+expansions/script/c65050006.lua	857adb6e029ca7031e5a0ba1accf747c
 expansions/script/c65050007.lua	ea0c0b366f9539330209600e0d36cd47
-expansions/script/c65050008.lua	c1af42cd84d361246c2eb31f9a779832
+expansions/script/c65050008.lua	f95af33c1568b7c981c329cfe7804650
 expansions/script/c65050009.lua	33dcca538d77769853227bf9ec23c734
 expansions/script/c65050010.lua	32c35346d164a29e774ca3cfbe764af8
 expansions/script/c65050011.lua	f8b01286a3f6de85aa249a4717856e1a
@@ -13571,6 +13647,8 @@ expansions/script/c75646521.lua	49282163de445024fb9f81f3276d2f06
 expansions/script/c75646522.lua	e26cbc74b5e722beff15a0f4fc14953e
 expansions/script/c75646528.lua	459d3c1fdd482db70104571853927ccb
 expansions/script/c75646534.lua	c586afe53546a54d0d03e8082a6dbf3d
+expansions/script/c75646535.lua	c074bb359b6f3a0a4f3b284c6b8c6be1
+expansions/script/c75646536.lua	daa9e5b74ea210c621604c9144b08e95
 expansions/script/c75646600.lua	a992c0dfa1ab2cc544a285d559cb1c70
 expansions/script/c75646601.lua	3bb2d0b1229a2cd5f803573d1cf24dc3
 expansions/script/c75646602.lua	3c7fb666d4628a624af0fdc6ac209218
@@ -13755,12 +13833,12 @@ expansions/script/c77709005.lua	5b4f91b5e1bec32bc386e66b0a3ffe15
 expansions/script/c77709006.lua	57c8f20b28540ad765ffb58a621a8fd4
 expansions/script/c77709007.lua	4fa04b9b7ca1e6d945d5b328fca4e089
 expansions/script/c77709008.lua	3d0cfb52572aa7394df5dca0109fea69
-expansions/script/c77709009.lua	e69e7a2b00022c0a4ed033d9ef4a9782
+expansions/script/c77709009.lua	aa65c54b031f8d29a98a0da81813e215
 expansions/script/c77765000.lua	f0babe9aa54a9d9505f21b3980ef2d29
 expansions/script/c77765001.lua	73446b5f6f6ecabd68c1f5712abc6bd4
 expansions/script/c77765002.lua	715c2f31b805ddc288f8609ff062c9b9
 expansions/script/c77765003.lua	18c9ec95a97942eab3bcdf65782f7d10
-expansions/script/c77765004.lua	787d47e98fb20c5e90d46837cc194ca2
+expansions/script/c77765004.lua	8932de79fde83f635869afb78c93c571
 expansions/script/c77765005.lua	4267c59bb055bee79a7c4d1b864b5042
 expansions/script/c77765006.lua	51550daeeecbbfd1c275e5588b647664
 expansions/script/c77765007.lua	a1a194496b5b594ea0f382784754a945
@@ -13795,12 +13873,19 @@ expansions/script/c80000054.lua	24d65b923a51d00405c9ea39c5de493c
 expansions/script/c81000000.lua	c5a87e79992e498ebdc0cef578102074
 expansions/script/c81000001.lua	fadb307a9b03b31242c0238a55f86a02
 expansions/script/c81000002.lua	2c901ef3c01bd0561690bb200cb93253
+expansions/script/c81000003.lua	e5fa2a0e108599a8736d024f3630590e
 expansions/script/c81000004.lua	7d0243c52c4b92fc02270925aad32c8c
 expansions/script/c81000005.lua	bb5491a8a116fdf8329ebe87bee94fdd
 expansions/script/c81000006.lua	552c6bb615e0fadc5c2e15f8b69fc0d6
 expansions/script/c81000007.lua	f4a75d9ed4a8e147f1ec53202bd2964a
 expansions/script/c81000008.lua	866dfcef5342c7bf88001f78d8a8d299
 expansions/script/c81000009.lua	4390090430c750752d6ffbdd0320433e
+expansions/script/c81003001.lua	477b05531a407c05ac5af2027f7ad2f8
+expansions/script/c81003002.lua	c30b6a45ad586a19126cf34166c6a43e
+expansions/script/c81003003.lua	dc8e85a043f416a5fdb59bce46f516fa
+expansions/script/c81003004.lua	2e0dbbace79b25f9bc0c6673ac5f4e8d
+expansions/script/c81005001.lua	fa1cef4e289d0f56364baa9ecc8b32e8
+expansions/script/c81005003.lua	eef771deba9d06ac4b475900026bad4f
 expansions/script/c81005004.lua	683a0b120d8691797fd32de0888b5373
 expansions/script/c81005005.lua	45b75584bf874c9058398335c10d4e51
 expansions/script/c81006001.lua	09844b87c6376abadb0babb7d0ce3c14
@@ -13838,6 +13923,7 @@ expansions/script/c81006032.lua	eb8eb429764cca39d54cfec8ef141bfb
 expansions/script/c81006033.lua	64ef763a02cc05970ba625279e2d7338
 expansions/script/c81006034.lua	5bdc63c8592af3cf0ff52709b80ddbe2
 expansions/script/c81006035.lua	0101bc968fca6c99c3f0fd7a734fbe89
+expansions/script/c81006036.lua	0134da5d1bd4799ac336bfeb4710d2d7
 expansions/script/c81006100.lua	f20b757e7082ba7c03f6e08d966b649c
 expansions/script/c81007001.lua	6f04fc4fa4a4f1883f9d8c3cd3d7e088
 expansions/script/c81007002.lua	4fb9d37d28649c8ef700868b863a25bb
@@ -13924,6 +14010,7 @@ expansions/script/c81009038.lua	2c6e12cf3d628686e22b0100d55677aa
 expansions/script/c81010000.lua	9f94fcc0be6a379dbb14f9e5a61fb928
 expansions/script/c81010001.lua	c8331555c119025dc3d8dac7d38d44fe
 expansions/script/c81010002.lua	96fdd2955c99f6a1a811bc30433b5eb5
+expansions/script/c81010003.lua	176a5f71e1b24696cae4bf914fbd9abd
 expansions/script/c81010004.lua	8aa5280aa61c3f6eabd46d9b0a6a0bda
 expansions/script/c81010007.lua	76b3b892cc5bc0ca819a704688db961e
 expansions/script/c81010008.lua	e7aa2ba62a95d7b8b6e9c70857a92dad
@@ -13956,9 +14043,11 @@ expansions/script/c81010036.lua	ab36314ade968ca3f3bd33a135555e43
 expansions/script/c81010037.lua	ec52fba76bdb1a93175dccd451ae835f
 expansions/script/c81010038.lua	74c102f2efaf5eb96f75df9d93e1672a
 expansions/script/c81010039.lua	1ea951db184cf385297b709b6a2f85f9
+expansions/script/c81010041.lua	8bcb8b259ce5ff62d595ba9a030a667e
 expansions/script/c81010042.lua	4150db7bddcba70cc3e5e47eb552d355
 expansions/script/c81010045.lua	ee8c613305e030f16917ef121d19cd6e
 expansions/script/c81010046.lua	5a0ae7bfa604b3c30d140faa40ce668c
+expansions/script/c81010047.lua	fe489e0eca7dc5833cfec495c004ccc2
 expansions/script/c81010048.lua	c59901e9bcf5e9f48fe01ab1ccb02180
 expansions/script/c81010049.lua	0138b91bd48780150e17be5a1dad547a
 expansions/script/c81010050.lua	41b3e07a8ebccd76550f1257fa96cafa
@@ -13967,6 +14056,7 @@ expansions/script/c81010052.lua	02b39035e7219efe4b5ae456a8f66390
 expansions/script/c81010053.lua	91051d9537dc5e367a65e6ab7e74f3a9
 expansions/script/c81010054.lua	8cced57ae64a5e202dcb30da2a5c8b10
 expansions/script/c81010055.lua	958135fd57d825d9b3982fb8b8fb995b
+expansions/script/c81010056.lua	c04de5be6f5b2ecb59124850b027ab87
 expansions/script/c81010057.lua	aee3844698f1f94b190ed6acba2cb049
 expansions/script/c81010058.lua	f9815cf5234c853a8cc5b276b8966d61
 expansions/script/c81010059.lua	2b69ef627bed789ba93cd818d3a23ab3
@@ -13994,17 +14084,20 @@ expansions/script/c81011023.lua	59e4424bc51c8dae10280aeaf95106cc
 expansions/script/c81011024.lua	a9a2e1e7332be74fb3ffcaec208f169a
 expansions/script/c81011025.lua	768845b2b371f18613b10e294f955fa4
 expansions/script/c81011026.lua	c942d5d60622dfeb6e5cda15a8bff098
-expansions/script/c81011027.lua	52ce7daa15c6fbd3b31b1efc24bf38a8
+expansions/script/c81011027.lua	de2918f373d9fea8b1de3bb98ae400ae
 expansions/script/c81011028.lua	ef81cf4bfdaca23b1fe690cd4a897d05
 expansions/script/c81011029.lua	d4b6226a81938ab7f8b7d8869d064bc0
 expansions/script/c81011030.lua	344653127eb7a4685fa0aa1dbed743bd
 expansions/script/c81011031.lua	c9d39fd6b3d13d6bb777a78576973628
 expansions/script/c81011032.lua	a243995dc495414beafbfdceeaae7839
+expansions/script/c81011033.lua	6605e94217921def3e1b5f9c121d6102
 expansions/script/c81011034.lua	39a32b7fac0d4950eec356e86fc2bb72
 expansions/script/c81011035.lua	3abfde216dc47bc2527dd315e5f2c621
 expansions/script/c81011036.lua	e40116238c66da5f3a5a934a78228213
 expansions/script/c81011037.lua	bc2067cc7cdf6649c46565eeefe4846b
 expansions/script/c81011038.lua	4341b2a3ecc4024fbbd1497bcdd107c2
+expansions/script/c81011039.lua	3276cecb851a69cf704e857c8d4a7811
+expansions/script/c81011040.lua	7d12bc515d8b167266c8e6d4ef49c2ec
 expansions/script/c81011100.lua	ab3abeb31a2b52e794c85573a40d84ba
 expansions/script/c81011101.lua	73e9390a6311e10619f5ac046257dea8
 expansions/script/c81011102.lua	f5e61457e461f305eab116eb13417ceb
@@ -14101,10 +14194,11 @@ expansions/script/c81012056.lua	f23be6109b93577eb3813b890cde02e7
 expansions/script/c81012057.lua	11dc421da8696233c57b9e58b6829993
 expansions/script/c81012058.lua	c211a25878ba8f9c801ccb8db4b4c31a
 expansions/script/c81012059.lua	7f4873eeaa7162fea702b92090a6d8d5
-expansions/script/c81012060.lua	8118b5782bd29e7886069191061f84db
+expansions/script/c81012060.lua	2bf3daccf0dc8cd95dcf116a5b7a32b5
 expansions/script/c81012061.lua	cf8bc2c6697d1e6aeece49fb02aee58b
-expansions/script/c81012062.lua	b1c29b8bcd3c8146a1cdf2faed2d5721
+expansions/script/c81012062.lua	137196bc7cc5cc775db703a6c0f04c68
 expansions/script/c81012063.lua	db651b5dd867f11cca00994a60361b61
+expansions/script/c81012068.lua	20a8bdfae65ab58b56d878a4b856fbf9
 expansions/script/c81013001.lua	83c6c0fb62a1f36c587ad6cb21d1f3f8
 expansions/script/c81013002.lua	5cd6748c79702ffa010eafea45ad538c
 expansions/script/c81013003.lua	969eb286c940ea3666ad60a97ec95b02
@@ -14148,7 +14242,7 @@ expansions/script/c81014022.lua	53011e94c77549159c843d375230d3b3
 expansions/script/c81014023.lua	3c76d0eb6d0b547f86853ddb699cf198
 expansions/script/c81014024.lua	9fe7f6487bea8cc10b03a592bcafa46f
 expansions/script/c81014025.lua	94f24c8b4b40da25328857cb675f0b85
-expansions/script/c81014026.lua	b264d02a0f59aaa7c2ff2a844ff08775
+expansions/script/c81014026.lua	ec34de03856ea655294f3a6e3c02c31f
 expansions/script/c81014027.lua	2f2ee16b2a05aa99a53e041953747829
 expansions/script/c81014028.lua	81d5b492c3b97fa2a1719ecc841b28aa
 expansions/script/c81014029.lua	14a5baccf20cde776f83296564bcc9db
@@ -14164,7 +14258,7 @@ expansions/script/c81015001.lua	195275612f8d50fae3a92e14761309b4
 expansions/script/c81015002.lua	758c96c1fa227f81d70e439fcc6332b7
 expansions/script/c81015003.lua	e339d54d4a923a72b403847121b5fe88
 expansions/script/c81015004.lua	24cefff9525d5d605e0d1cf9ba2326f0
-expansions/script/c81015005.lua	f5d8cdefeda4e15b533afdd3b188af94
+expansions/script/c81015005.lua	9f9dd967228ae7c3776961c891edf8c7
 expansions/script/c81015006.lua	24d875ae853e68b92148132cdf0bd38f
 expansions/script/c81015007.lua	98a6ebd9c1de2c40e499f36919ad43ba
 expansions/script/c81015008.lua	317539a5575dbb5428ef9e3eb687ea3b
@@ -14210,6 +14304,7 @@ expansions/script/c81015047.lua	6c26c25bc75fb52a24cc3542a7c22f41
 expansions/script/c81015048.lua	ab9d0ff602dedbff4d9bd6d984e2a753
 expansions/script/c81015049.lua	3bacbdf3dbbc2b5cb5d7f81723990e42
 expansions/script/c81015050.lua	2027422eca909ac2546a7b4437bd1d40
+expansions/script/c81015051.lua	7756c381a774f66b7589a575a956f09f
 expansions/script/c81016000.lua	c67d48dad19966d86bfaac7d9760ebc3
 expansions/script/c81016001.lua	f63cbf0b6b21397f4fc1e23d81877e8b
 expansions/script/c81016002.lua	935d1c6d0b819156dbdde9e14016ac26
@@ -14296,8 +14391,10 @@ expansions/script/c81018042.lua	f1145080bf817f9580af7ff8226b56c1
 expansions/script/c81018043.lua	112a4dea7619f84d74b7307ae2335632
 expansions/script/c81018044.lua	949f1e4030214749a70f5204ed7411dc
 expansions/script/c81018045.lua	2e001edb670ef4bc9080173ce3b12eec
+expansions/script/c81018046.lua	5c7203414b7bdcf29247eb1774fd7a53
+expansions/script/c81018047.lua	6c10673208baa184fb36070a0722c1f6
 expansions/script/c81019001.lua	95c4be85b1f6e816f864370d0d62a7d7
-expansions/script/c81019002.lua	42fd6591c564011fb13a878878ed1eff
+expansions/script/c81019002.lua	df4c523cc437c5a644de1a21de914b69
 expansions/script/c81019003.lua	79f63c631efa5e033d93d450775aa09a
 expansions/script/c81019004.lua	4279027dfcb762fae74748842435bcaa
 expansions/script/c81019005.lua	ea707f1271fced83bd29e2ba3cdb1bdc
@@ -14398,7 +14495,7 @@ expansions/script/c81040044.lua	12fe47495ce6b409a8a58b2e22e882ac
 expansions/script/c81040045.lua	a57c644170bce81f19bb3df443b459aa
 expansions/script/c81040046.lua	28d2e9ae5bb569e1a6f5e13c70879b2c
 expansions/script/c81040047.lua	b118a71552c992259594f29286ec73d3
-expansions/script/c81041000.lua	50fcfeaccc45eb77b2e41a1ce38a3bce
+expansions/script/c81041000.lua	6ef8f585a18eb9d6c4ae473f83fed631
 expansions/script/c81041001.lua	67c7cc11225bb08002897dd9e8d8cc07
 expansions/script/c81041002.lua	d93f22f64336aa6f940365b093a9356c
 expansions/script/c81041003.lua	fd906a0370d2fd492f3ec2996390d5ba
@@ -14424,7 +14521,7 @@ expansions/script/c81041022.lua	694b7cbe47fb67ab500845eb8436fa24
 expansions/script/c81041023.lua	8a09a28e3b2a80c0ce1eb5cc4b2f1ebe
 expansions/script/c81041024.lua	2f09a7fe850f7043aa076e52842309bf
 expansions/script/c81041025.lua	584ad857f87d140028715a12e108fb7d
-expansions/script/c81041026.lua	ea91d2277e1e3e8ed187832c95bee661
+expansions/script/c81041026.lua	c716a52ac3d74b1ca44302949991a57d
 expansions/script/c81041027.lua	670a115ff5f423ceb03e9914d87023db
 expansions/script/c8209701.lua	8349eac7770b3bdab418a4ec4e62fb60
 expansions/script/c8209702.lua	b01b192aa3185486b59d3449c4275116
@@ -14462,6 +14559,23 @@ expansions/script/c8209733.lua	ad1ece50bb2610a2c0241b2d73d94cd4
 expansions/script/c8209734.lua	871b7ed26783695753ccf6274364cd4b
 expansions/script/c8209735.lua	6a7144502777c1846d67b32f5e6c9605
 expansions/script/c8209736.lua	aca2735ded42189baecd69dc19ea9347
+expansions/script/c82206000.lua	6834d697cb00cfe238aab9dd8b425268
+expansions/script/c82206001.lua	ed00375c738fbd1687582f525440b635
+expansions/script/c82206002.lua	42a6277cd569c2d4c472e9fd7802eac7
+expansions/script/c82206003.lua	61849389d272dbe7455960bb235998df
+expansions/script/c82206005.lua	4ba57dbdd3e5d4b3a24ec413d2939bc7
+expansions/script/c82206006.lua	afcb95ff0692094c016b57217069e82e
+expansions/script/c82206007.lua	b243042eb34f85123ceeba20ece46704
+expansions/script/c82206008.lua	07b03e637f2eca580004638c5f3e25c8
+expansions/script/c82207000.lua	5e173c57b77c1d22672bcd6ca9b6211a
+expansions/script/c82207001.lua	9d9fc17e6c991120d1b73d37e951d6b4
+expansions/script/c82207002.lua	09240a9f0415bdb33b5eeadcc82faf26
+expansions/script/c82207003.lua	e717caa94bfe1d1ddef7e440936dcc87
+expansions/script/c82207004.lua	2fd46aa6ab596f997e9208dd9ce1af69
+expansions/script/c82207005.lua	4b67ff14cad292030ac25aef1b20da4b
+expansions/script/c82207006.lua	09fcfbb14963b7717aa2cfd64566b5b4
+expansions/script/c82207007.lua	f43e5be1c0e26a527d5cb1f45c56a02a
+expansions/script/c82207008.lua	53d9fb3437afd720c38342866d0ff902
 expansions/script/c82221000.lua	e3b09f95b0385cfd498c9d18da16ebf3
 expansions/script/c82221001.lua	66a0e028e24790373b36e68e192d51f7
 expansions/script/c82221002.lua	c4f678798d97441d627dbb98bb7dd5fa
@@ -14476,6 +14590,16 @@ expansions/script/c82221010.lua	492302b31ad92b7539b5d2e0c631f9ca
 expansions/script/c82221011.lua	267c80ecbe89454ef2b1f833afa6e31c
 expansions/script/c82221012.lua	13d43b36469dfc754fa1005f7c541dcb
 expansions/script/c82221013.lua	e707b831b614c25a8721c59c9d7025c7
+expansions/script/c82224001.lua	d7d62b180537e0d28cd9818598f9ae4a
+expansions/script/c82224003.lua	047f8e459c4a918bbca360ffd21510b1
+expansions/script/c82224006.lua	15df75dcd9e2d004748d31566179892b
+expansions/script/c82224017.lua	e95e6ad7f748122883fa8bce3f75f8f3
+expansions/script/c82224019.lua	bd4ad3e7385af39c5ed26a2563e9e08f
+expansions/script/c82224020.lua	e43c2e316aac4b544e01525002d3eae1
+expansions/script/c82224444.lua	9d0f0d5367daab802b5dd137263ae496
+expansions/script/c82228497.lua	4fed374b5d3445f73e4cef7c2bcdebb5
+expansions/script/c82228498.lua	a384568490588ce50ea5c1b8cf0cfda9
+expansions/script/c82228499.lua	fdceec29a1917bb2431cae6bd0ffdbe9
 expansions/script/c82228501.lua	6ba7dc1f936d1b3e163743dd3c8713ac
 expansions/script/c82228505.lua	b9fe683955aa3c0e969b21a1e32d57fa
 expansions/script/c82228506.lua	000612e93cb74daaca49ca57c5db9594
@@ -14596,6 +14720,8 @@ expansions/script/c98600004.lua	82bb005c154e609345ac3fac2f2ef0be
 expansions/script/c98600005.lua	81fd8a3c81ab52ad8ddf4bead770fa27
 expansions/script/c98600006.lua	74a8becc832dcbbbec8b62b050caa188
 expansions/script/c98600007.lua	b4af1ac846649b2e7d3e7e8424c1dd22
+expansions/script/c98600008.lua	d0dc76d48c7fad5a1d3a07118a578234
+expansions/script/c9910106.lua	5944ef9004c91f9609a448288acea108
 expansions/script/c99600001.lua	acefbbaa9cadc3d9caa936a37d12436e
 expansions/script/c99600002.lua	daffae093cef81b3beab15af15114577
 expansions/script/c99600003.lua	367f8bba1d5ea3c1341fad44b0946239
@@ -14684,6 +14810,7 @@ sound/BGM/custom/BudCrannMor.mp3	7ea22651d385024cc1b0fcfd9c8470e4
 sound/BGM/custom/CLICK.mp3	15eb752986698a681070b14ecd8e00ce
 sound/BGM/custom/COUNT DOWN.mp3	29595e776c1339a142d4a7c424366eab
 sound/BGM/custom/CTC.mp3	c2912f3f123eff92f94647de5e296c56
+sound/BGM/custom/Calamity Fortune.ogg	0628055c884b37437e588524526d687e
 sound/BGM/custom/Chocolate Adventure.mp3	355fe568ddd2cdeb7dee1a35bc6ba2e8
 sound/BGM/custom/Crimson Glory.mp3	53f8988baba7130f29007d33b8ef2bf2
 sound/BGM/custom/DON'T CUT.mp3	a4b2a116009cdbf32d5dccc8bf4cb4b9
@@ -15103,6 +15230,10 @@ sound/custom/vo_112831010_1.wav	e92a0ee3bb4432563e50cfcb4c06786d
 sound/custom/vo_112831010_2.wav	7d54d06d9651205c024ef40281ad73e7
 sound/custom/vo_112831010_3.wav	51b503dfc6e0d84599736315ee7dd130
 sound/custom/vo_112831010_4.wav	892060e6e4fb55680c705d98cbe287be
+sound/custom/vo_113241020_1.wav	4e23735937c2f17504424a222a455ab0
+sound/custom/vo_113241020_2.wav	84477de1ecf414aed1999c6941654733
+sound/custom/vo_113241020_3.wav	855166040551decc4c6a5f77afb9e1e0
+sound/custom/vo_113241020_4.wav	d49bd09763bf6ffbd83052aa51ee9aae
 sound/custom/vo_113541020_1.wav	ff14d6307f75f31c5049ae327008abcf
 sound/custom/vo_113541020_2.wav	29c1032f2c4c8f87a633cf5244c80486
 sound/custom/vo_113541020_3.wav	73ff0cf54dc3f1638fba6ec279a12e47
@@ -15179,10 +15310,10 @@ sound/custom/yata_effe01.wav	edf949c75a32c7b91f6029a6e6640ea6
 sound/custom/yata_summon.wav	17b569892284748d19f441e6972d6cce
 sound/custom/出场.wav	3f039c09531dfb96d3e637bfc1ed49ed
 update/delete.txt	bcae307f6039207f11b4daa83f17c0ec
-update/filelist.txt	221d0d51d1fe3c4c56157e28f63c221f
+update/filelist.txt	cecc879896025e8ecb095233c8d026fb
 update/rename.txt	c4625b442bf8f5c2e7ce4deb512d4671
 update/update-push.bat	686b01a51bba916202d61d951cd7fe3e
 update/update-push.sh	d018a223f65feef3467b22e252468f53
 update/update-server.sh	6f1cdc3e06ec58b37b14b5d9d167263c
 update/update-without-sound.bat	1c2cfda2a0501642c8bceae026a73d5b
-update/version.txt	11a2459dfc6e7b3b5fcf90cad4439d57
+update/version.txt	01c6b66e1e4b3f89564bbff69d04cc7f

update/version.txt

-2019/11/18 18:59:22
\ No newline at end of file
+2019/12/3 19:06:11
\ No newline at end of file