emergency

.gitlab-ci.yml

@@ -5,7 +5,7 @@ stages:
 variables:
   GIT_DEPTH: "1"
   LAST_UPDATE_DATE: "2021.9.7"
-  CURRENT_UPDATE_DATE: "2021.9.21"
+  CURRENT_UPDATE_DATE: "2021.9.22"
 
 redtext:
   stage: prepare

expansions/lflist.conf

@@ -133,6 +133,7 @@
 10222035 1 --GGO 抛弃自卑 莲
 10222045 1 --GGO 疯狂的杀戮 林鵙鹟
 #104
+10400014 0 --绝界剑·剑理阴阳
 10401154 1 --梦之海
 10401167 0 --毒草
 10401170 0 --复杂世界
@@ -478,6 +479,7 @@
 16150017 0 --圣王命之大王具
 16150019 1 --大王咒使
 16150020 0 --大王具 智慧的抱拥
+16150029 0 --洋馆的怪人
 16150049 0 --天命教令 天命统合
 16160004 1 --憎恶的狂战士 兰斯洛特
 16161010 0 --卡多克·泽姆露普斯

expansions/script/c12043052.lua

@@ -72,11 +72,10 @@ function cm.sumfilter(c)
 	return c:IsSummonable(true,nil) and c:IsRace(RACE_SEASERPENT)
 end
 function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local ct=Duel.GetMatchingGroupCount(cm.dfilter,tp,LOCATION_MZONE,0,nil)
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,ct) end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
 	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(ct)
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,ct)
+	Duel.SetTargetParam(1)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
 end
 function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)

expansions/script/c12043061.lua

@@ -13,6 +13,7 @@ function cm.initial_effect(c)
 	e22:SetCategory(CATEGORY_SUMMON)
 	e22:SetType(EFFECT_TYPE_IGNITION)
 	e22:SetRange(LOCATION_HAND)
+	e22:SetCountLimit(1,m)
 	e22:SetCost(cm.cost1)
 	e22:SetTarget(cm.sumtg)
 	e22:SetOperation(cm.sumop)

expansions/script/c13959997.lua

 --2pick utilities
-c13959996={}
-Duel.LoadScript("c13959996.lua")
 
 local cc=13959997
 local this=_G["c"..cc]
@@ -179,8 +177,12 @@ function this.initSet(s)
 	s.add=this.add
 	s.del=this.del
 end
-function this.loadCardList(useBanList,ignoreBlackList)
-	local cl=c13959996
+function this.loadCardList(useBanList,ignoreBlackList,clCode)
+	if not _G["c"..clCode] then
+		_G["c"..clCode]={}
+		Duel.LoadScript("c"..clCode..".lua")
+	end
+	local cl=_G["c"..clCode]
 	local mainList=this.toList(this.loadSet(cl.Main))
 	local extraList=this.toList(this.loadSet(cl.Extra))
 	local ml={}

expansions/script/c13959998.lua

@@ -11,6 +11,7 @@ this.extracount=20
 this.useBanList=true
 this.skillEnabled=false
 this.CardList={}
+this.clCode=13959996
 
 function this.initial_effect(c)
 	if not this.gc then
@@ -173,6 +174,9 @@ function this.op(e,tp)
 				this.extracount=Duel.AnnounceLevel(0,1,10)*10
 			end
 			this.useBanList=Duel.SelectYesNo(0,aux.Stringid(13959997,2))
+			if Duel.SelectYesNo(0,aux.Stringid(13959997,6)) then
+				this.clCode=({13959996,13959994})[Duel.SelectOption(0,aux.Stringid(13959997,7),aux.Stringid(13959997,8))+1]
+			end
 		end
 		this.option=Duel.SelectOption(0,aux.Stringid(cc,0),aux.Stringid(cc,1),aux.Stringid(cc,6),aux.Stringid(cc,7),aux.Stringid(cc,11),aux.Stringid(cc,10),aux.Stringid(13959997,4),aux.Stringid(13959997,5))
 		local n=0
@@ -244,7 +248,7 @@ end
 
 function this.ccGen(from,count)
 	if not this.CardList.Main then
-		local ml,el,mat,eat=c13959997.loadCardList(this.useBanList)
+		local ml,el,mat,eat=c13959997.loadCardList(this.useBanList,false,this.clCode)
 		this.CardList.Main=ml
 		this.CardList.Extra=el
 		this.CardList.MainAliasTable=mat
@@ -711,7 +715,7 @@ end
 
 function this.picrandom(g)
 	if not this.CardList.Main then
-		local ml,el,mat,eat=c13959997.loadCardList(this.useBanList)
+		local ml,el,mat,eat=c13959997.loadCardList(this.useBanList,false,this.clCode)
 		this.CardList.Main=ml
 		this.CardList.Extra=el
 		this.CardList.MainAliasTable=mat

expansions/script/c16107117.lua

@@ -4,7 +4,6 @@ local m,cm=rk.set(16107117,"GODONOVALORD")
 local nova=0x1cc ----nova counter
 function cm.initial_effect(c)
 	c:EnableCounterPermit(nova)
-	aux.EnableChangeCode(c,16104212,LOCATION_MZONE)
 	--special summon
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)

expansions/script/c16107118.lua

@@ -56,7 +56,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3_1)
 end
 function cm.mfilter(c,xyzc)
-	return c:IsCode(16104212)
+	return c:IsCode(16107117)
 end
 function cm.splimit(e,se,sp,st)
 	if st&SUMMON_TYPE_XYZ ~=0 then

expansions/script/c33500921.lua

---教团的白骑士 依琳贝珥
-if not pcall(function() require("expansions/script/c16104200") end) then require("script/c16104200") end
-local m,cm=rscf.DefineCard(33500921,"CHURCH_KNIGHT")
-function cm.initial_effect(c)
-	c:SetUniqueOnField(1,1,m)
-	local e1=rsch.SummonEffect(c,m,cm.op)
-	local e2=rsch.GainEffect(c,m)
-	local e3=rsef.QO(c,nil,{m,0},1,"sp",nil,LOCATION_MZONE,rsch.gaincon(m),nil,cm.sptg,cm.spop)
-	--cannot be battle target
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_SINGLE)
-	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e4:SetRange(LOCATION_MZONE)
-	e4:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
-	e4:SetCondition(cm.tgcon)
-	e4:SetValue(aux.imval1)
-	c:RegisterEffect(e4)
-	--cannot be target
-	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_SINGLE)
-	e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-	e5:SetRange(LOCATION_MZONE)
-	e5:SetValue(aux.tgoval)
-	e5:SetCondition(cm.tgcon)
-	c:RegisterEffect(e5)
-end
---e1
-function cm.spfilter0(c)
-	return c:IsSummonType(SUMMON_TYPE_ADVANCE)
-end
-function cm.op(e,tp)
-	local c=e:GetHandler()
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetOperation(cm.gain)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
-end
-function cm.gain(e,tp,eg,ep,ev,re,r,rp)
-	--Debug.Message(eg:GetCount())
-	local tg=eg:Filter(cm.spfilter0,nil)
-	local tc=tg:GetFirst()
-	while tc do
-	local code=tc:GetOriginalCodeRule()
-	if rsch.IsSet2(tc) and tc:GetOriginalLevel()>=6 then
-	   tc:RegisterFlagEffect(code,rsreset.est,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(16104200,1))
-	end
-	tc=tg:GetNext()
-	end
-end
---e2
-function cm.spfilter(c,e,tp)
-	return rsch.IsSet1(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) 
-end
-function cm.spfilter2(c,e,tp)
-	return rsch.IsSet2(c) and c:IsSummonable(true,nil)
-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_GRAVE,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
-end
-function cm.spop(e,tp,eg,ep,ev,re,r,rp)
-	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_GRAVE,0,1,1,nil,e,tp)
-	if #g>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)>0 
-		and Duel.IsExistingMatchingCard(cm.spfilter2,tp,LOCATION_HAND,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
-		local tc=Duel.SelectMatchingCard(tp,cm.spfilter2,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
-		if tc then
-			Duel.Summon(tp,tc,true,nil)
-		end
-	end
-end
---e5
-function cm.cfilter(c)
-	return c:IsFaceup() and rsch.IsSet2(c)
-end
-function cm.tgcon(e)
-	return Duel.IsExistingMatchingCard(cm.cfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler()) and rsch.gaincon(m)
-end

expansions/script/c45746000.lua

---幻影旅团·0 库洛洛
-local m=45746000
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x5880),4,3,cm.ovfilter,aux.Stringid(m,0),3,cm.xyzop)
-	c:EnableReviveLimit()
---e1
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,1))
-	e1:SetCategory(CATEGORY_DISABLE)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCost(function(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+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
-	end)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and cm.tf1(chkc) end
-		if chk==0 then return Duel.IsExistingTarget(cm.tf1,tp,0,LOCATION_MZONE,1,nil) end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
-		local g=Duel.SelectTarget(tp,cm.tf1,tp,LOCATION_GRAVE,0,1,1,nil)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local tc=Duel.GetFirstTarget()
-		if tc and c:IsRelateToEffect(e) and c:IsFaceup() and tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsType(TYPE_TOKEN) then
-			Duel.NegateRelatedChain(tc,RESET_TURN_SET)
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_DISABLE)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			tc:RegisterEffect(e1)
-			local e2=Effect.CreateEffect(c)
-			e2:SetType(EFFECT_TYPE_SINGLE)
-			e2:SetCode(EFFECT_DISABLE_EFFECT)
-			e2:SetValue(RESET_TURN_SET)
-			e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			tc:RegisterEffect(e2)
-			local code=tc:GetOriginalCodeRule()
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-			e1:SetCode(EFFECT_CHANGE_CODE)
-			e1:SetValue(code)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			c:RegisterEffect(e1)
-			if not tc:IsType(TYPE_TRAPMONSTER) then
-				local cid=c:CopyEffect(code,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,1)
-				local e3=Effect.CreateEffect(c)
-				e3:SetDescription(aux.Stringid(m,2))
-				e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-				e3:SetCode(EVENT_PHASE+PHASE_END)
-				e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-				e3:SetCountLimit(1)
-				e3:SetRange(LOCATION_MZONE)
-				e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-				e3:SetLabelObject(e1)
-				e3:SetLabel(cid)
-				e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-					local c=e:GetHandler()
-					local cid=e:GetLabel()
-					if cid~=0 then
-						c:ResetEffect(cid,RESET_COPY)
-						c:ResetEffect(RESET_DISABLE,RESET_EVENT)
-					end
-					local e1=e:GetLabelObject()
-					e1:Reset()
-					Duel.HintSelection(Group.FromCards(c))
-					Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-				end)
-				c:RegisterEffect(e3)
-			end
-			local atk=tc:GetAttack()
-			local e2=Effect.CreateEffect(c)
-			e2:SetType(EFFECT_TYPE_SINGLE)
-			e2:SetCode(EFFECT_UPDATE_ATTACK)
-			e2:SetValue(atk)
-			e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			c:RegisterEffect(e2)
-		end
-	end)
-	c:RegisterEffect(e1)
---e2
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e2:SetDescription(aux.Stringid(m,3))
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetCountLimit(1,m)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCost(function(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)
-	e2:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.tf2,tp,LOCATION_DECK,0,1,nil) end
-		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,cm.tf2,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 then
-			Duel.SendtoHand(g,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,g)
-			Duel.ShuffleDeck(tp)
-		end
-	end)
-	c:RegisterEffect(e2)
-end
-function cm.ovfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x5880) and not c:IsCode(m) and c:IsType(TYPE_XYZ)
-end
-function cm.xyzop(e,tp,chk)
-	if chk==0 then return Duel.GetFlagEffect(tp,m)==0 end
-	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
-end
---e1
-function cm.tf1(c)
-	return c:IsType(TYPE_EFFECT) and c:IsAbleToRemove() and c:IsFaceup() and aux.NegateMonsterFilter
-end
---e2
-function cm.tf2(c)
-	return c:IsLevelBelow(4) and c:IsRace(RACE_PSYCHO) and c:IsAbleToHand() and c:IsAttribute(ATTRIBUTE_DARK)
-end
\ No newline at end of file

expansions/script/c45746001.lua

---幻影旅团·1 信长
-local m=45746001
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_REMOVE)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCountLimit(1,m)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e1:SetTarget(function(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)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		if c:IsRelateToEffect(e) then
-			Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP_ATTACK)
-		end
-	end)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_XMATERIAL)
-	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
-	e2:SetValue(1)
-	e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return e:GetHandler():GetOriginalRace()==RACE_PSYCHO
-	end)
-	c:RegisterEffect(e2)
-	local e3=e2:Clone()
-	e3:SetCode(EFFECT_IMMUNE_EFFECT)
-	e3:SetValue(function(e,re)
-		local tp=e:GetHandler():GetControler()
-		return re:IsActiveType(TYPE_MONSTER) and re:GetHandler():IsControler(1-tp)
-	end)
-	c:RegisterEffect(e3)
-end

expansions/script/c45746002.lua

---幻影旅团·2 飞坦
-local m=45746002
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetCountLimit(1,m)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.t1,tp,LOCATION_DECK,0,1,nil) end
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-		local g=Duel.SelectMatchingCard(tp,cm.t1,tp,LOCATION_DECK,0,1,1,nil)
-		local tc=g:GetFirst()
-		if tc and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
-			Duel.SSet(tp,tc)
-			Duel.ConfirmCards(1-tp,tc)
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e2=e1:Clone()
-	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	c:RegisterEffect(e2)
-
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_REMOVE)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_REMOVE)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCountLimit(1,m+100)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSetCard,tp,LOCATION_GRAVE,0,1,nil,0x5880) end
-		local g=Duel.GetMatchingGroup(Card.IsSetCard,tp,LOCATION_GRAVE,0,nil,0x5880)
-		Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local g=Duel.GetMatchingGroup(Card.IsSetCard,tp,LOCATION_GRAVE,0,nil,0x5880)
-		if g:GetCount()>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-			local sg=g:Select(tp,1,2,nil)
-			Duel.HintSelection(sg)
-			Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
-		end
-	end)
-	c:RegisterEffect(e3)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_BE_MATERIAL)
-	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		return r==REASON_XYZ and c:GetReasonCard():GetOriginalRace()==RACE_PSYCHO
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local rc=c:GetReasonCard()
-		local e1=Effect.CreateEffect(c)
-		e1:SetDescription(aux.Stringid(m,1))
-		e1:SetCategory(CATEGORY_DESTROY)
-		e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_DELAY)
-		e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-		e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-			if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
-		end)
-		e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-			local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-			if g:GetCount()>0 then
-				Duel.Destroy(g,REASON_EFFECT)
-			end
-		end)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		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+RESETS_STANDARD)
-			rc:RegisterEffect(e2,true)
-		end
-	end)
-	c:RegisterEffect(e2)
-end
-function cm.t1(c)
-	return c:IsSetCard(0x5880) and c:IsSSetable() and c:IsType(TYPE_SPELL)
-end

expansions/script/c45746003.lua

---幻影旅团·3 玛奇
-local m=45746003
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x5880),4,2)
-	c:EnableReviveLimit()
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,3))
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-	return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
-end)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		local b1=Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
-		local b2=Duel.IsExistingMatchingCard(function(c)return c:IsFaceup() and c:IsSetCard(0x5880) and c:IsCanOverlay()end,tp,LOCATION_REMOVED,0,1,nil)
-		if chk==0 then return b1 or b2 end
-		local off=1
-		local ops,opval={},{}
-		if b1 then
-			ops[off]=aux.Stringid(m,0)
-			opval[off]=0
-			off=off+1
-		end
-		if b2 then
-			ops[off]=aux.Stringid(m,1)
-			opval[off]=1
-			off=off+1
-		end
-		local op=Duel.SelectOption(tp,table.unpack(ops))+1
-		local sel=opval[op]
-		e:SetLabel(sel)
-		if sel==0 then
-			e:SetCategory(CATEGORY_REMOVE)
-			Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,0,LOCATION_ONFIELD)
-		else
-			e:SetCategory(0)
-		end
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local sel=e:GetLabel()
-		if sel==0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-			local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
-			if g:GetCount()>0 then
-				Duel.HintSelection(g)
-				Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
-			end
-		else
-			if not c:IsRelateToEffect(e) then return end
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
-			local g=Duel.SelectMatchingCard(tp,function(c)return c:IsFaceup() and c:IsSetCard(0x5880) and c:IsCanOverlay()end,tp,LOCATION_REMOVED,0,1,1,nil)
-			if g:GetCount()>0 then
-				Duel.Overlay(c,g)
-			end
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,4))
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,m)
-	e2:SetCost(function(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)
-	e2:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.tf3,tp,LOCATION_DECK,0,1,nil,e:GetHandler()) end
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
-		local c=e:GetHandler()
-		local g=Duel.SelectMatchingCard(tp,cm.tf3,tp,LOCATION_DECK,0,1,1,nil,c)
-		local tc=g:GetFirst()
-		if c:IsType(TYPE_XYZ) and tc:IsCanOverlay() then
-			Duel.Overlay(c,Group.FromCards(tc))
-		end
-	end)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_BE_MATERIAL)
-	e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)return r==REASON_XYZ end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler() 
-		e:SetProperty(EFFECT_FLAG_EVENT_PLAYER+EFFECT_FLAG_IGNORE_IMMUNE)
-		local rc=c:GetReasonCard()
-		local reset_flag=RESET_EVENT+RESETS_STANDARD
-		local cid=rc:CopyEffect(m,reset_flag,1)
-		--Debug.Message(e:GetOwnerPlayer()==rc:GetControler())
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(reset_flag)
-		e1:SetCode(EFFECT_ADD_CODE)
-		e1:SetValue(m)
-		rc:RegisterEffect(e1,true)
-		rc:RegisterFlagEffect(0,reset_flag,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
-		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+RESETS_STANDARD)
-			rc:RegisterEffect(e2,true)
-		end
-		e:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	end)
-	c:RegisterEffect(e3)
-end
---e3
-function cm.tf3(c,mc)
-	return c:IsSetCard(0x5880) and mc:IsType(TYPE_XYZ) and c:IsCanOverlay()
-end
\ No newline at end of file

expansions/script/c45746004.lua

---幻影旅团·4 西索
-local m=45746004
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_REMOVE)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCode(EVENT_FLIP)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-		local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-		Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-		if g:GetCount()>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-			local sg=g:Select(tp,1,1,nil)
-			Duel.HintSelection(sg)
-			Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_REMOVE)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCountLimit(1,m)
-	e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e2:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(cm.t2,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,e,tp)end
-		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_HAND)
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local g=Duel.GetMatchingGroup(cm.t2,tp,LOCATION_DECK+LOCATION_HAND,0,nil,e,tp)
-		if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-			if g:GetCount()>0 then
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-				local g=Duel.SelectMatchingCard(tp,cm.t2,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,e,tp)
-				Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-			end
-		end
-	end)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(m,0))
-	e3:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_QUICK_O)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetCountLimit(1)
-	e3:SetCode(EVENT_FREE_CHAIN)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return e:GetHandler():GetOriginalRace()==RACE_PSYCHO
-	end)
-	e3:SetCost(function(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)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		if chkc then return chkc:IsLocation(LOCATION_MZONE) and c:IsControler(1-tp) end
-		if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_MZONE,1,nil) end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
-		local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_MZONE,1,1,nil)
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local tc=Duel.GetFirstTarget()
-		if tc:IsRelateToEffect(e) and tc:IsFaceup() then
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_CHANGE_ATTRIBUTE)
-			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-			e1:SetValue(ATTRIBUTE_DARK)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			tc:RegisterEffect(e1)
-			local e2=e1:Clone()
-			e2:SetCode(EFFECT_CHANGE_RACE)
-			e2:SetValue(RACE_PSYCHO)
-			tc:RegisterEffect(e2)
-			local e3=Effect.CreateEffect(c)
-			e3:SetType(EFFECT_TYPE_SINGLE)
-			e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-			e3:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e3:SetCode(EFFECT_CHANGE_CODE)
-			e3:SetValue(m)
-			tc:RegisterEffect(e3)
-		end
-	end)
-	c:RegisterEffect(e3)
-end
-function cm.t2(c,e,tp)
-	return c:IsSetCard(0x5880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
\ No newline at end of file

expansions/script/c45746005.lua

---幻影旅团·5 芬克斯
-local m=45746005
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetCountLimit(1,m)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return eg:IsExists(function(c)return c:IsSetCard(0x5880) and not c:IsCode(m) and c:IsSummonPlayer(tp)end,1,nil)
-	end)
-	e1:SetTarget(function(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)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		if c:IsRelateToEffect(e) then
-			Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e2=e1:Clone()
-	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_REMOVE)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCountLimit(1,m+100)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_DECK,0,1,nil,m) end
-		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_DECK,0,1,1,nil,m)
-		if g:GetCount()>0 then
-			Duel.SendtoHand(g,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,g)
-		end
-	end)
-	c:RegisterEffect(e3)
-	local e4=Effect.CreateEffect(c)
-	e4:SetDescription(aux.Stringid(m,0))
-	e4:SetCategory(CATEGORY_ATKCHANGE)
-	e4:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-	e4:SetCode(EVENT_PHASE+PHASE_STANDBY)
-	e4:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return Duel.GetTurnPlayer()==tp and e:GetHandler():GetOriginalRace()==RACE_PSYCHO
-	end)
-	e4:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		if c:IsFaceup() then
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_UPDATE_ATTACK)
-			e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-			e1:SetValue(1000)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			c:RegisterEffect(e1)
-		end
-	end)
-	c:RegisterEffect(e4)
-end

expansions/script/c45746006.lua

---幻影旅团·6 侠客
-local m=45746006
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_PSYCHO),4,2)
-	c:EnableReviveLimit()
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_DISABLE+CATEGORY_CONTROL)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1,m)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return Duel.GetTurnPlayer()==1-tp
-	end)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetCost(function(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)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:GetControler()~=tp and cm.t1(chkc) end
-		if chk==0 then return Duel.IsExistingTarget(cm.t1,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)
-		Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local tc=Duel.GetFirstTarget()
-		if tc:IsRelateToEffect(e) and Duel.GetControl(tc,tp,PHASE_END,1)~=0 and not tc:IsDisabled() and not tc:IsImmuneToEffect(e) then
-			Duel.NegateRelatedChain(tc,RESET_TURN_SET)
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_DISABLE)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			tc:RegisterEffect(e1)
-			local e2=Effect.CreateEffect(c)
-			e2:SetType(EFFECT_TYPE_SINGLE)
-			e2:SetCode(EFFECT_DISABLE_EFFECT)
-			e2:SetValue(RESET_TURN_SET)
-			e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-			tc:RegisterEffect(e2)
-		end
-	end)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,1))
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1,m)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
-	e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		if c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end
-		if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return end
-		local loc,tg=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TARGET_CARDS)
-		if not tg or not tg:IsContains(c) then return false end
-		return Duel.IsChainDisablable(ev) and loc~=LOCATION_DECK
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		if c:IsRelateToEffect(e) and c:IsFaceup() then
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_IMMUNE_EFFECT)
-			e1:SetValue(function(e,te)
-				return te:GetOwner()~=e:GetOwner()
-			end)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			c:RegisterEffect(e1)
-		end
-		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		e2:SetCode(EVENT_PHASE+PHASE_END)
-		e2:SetCountLimit(1)
-		e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-			return e:GetHandler():IsLocation(LOCATION_MZONE)
-		end)
-		e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-			local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)
-			Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		end)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		Duel.RegisterEffect(e2,tp)
-	end)
-	c:RegisterEffect(e2)
-
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_BE_MATERIAL)
-	e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)return r==REASON_XYZ end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler() 
-		e:SetProperty(EFFECT_FLAG_EVENT_PLAYER+EFFECT_FLAG_IGNORE_IMMUNE)
-		local rc=c:GetReasonCard()
-		local reset_flag=RESET_EVENT+RESETS_STANDARD
-		local cid=rc:CopyEffect(m,reset_flag,1)
-		--Debug.Message(e:GetOwnerPlayer()==rc:GetControler())
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(reset_flag)
-		e1:SetCode(EFFECT_ADD_CODE)
-		e1:SetValue(m)
-		rc:RegisterEffect(e1,true)
-		rc:RegisterFlagEffect(0,reset_flag,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
-		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+RESETS_STANDARD)
-			rc:RegisterEffect(e2,true)
-		end
-		e:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	end)
-	c:RegisterEffect(e3)
-end
-function cm.t1(c)
-	return c:IsControlerCanBeChanged() and c:IsFaceup()
-end
\ No newline at end of file

expansions/script/c45746007.lua

---幻影旅团·7 富兰克林
-local m=45746007
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	aux.AddCodeList(c,45746031)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,m)
-	e1:SetCost(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		local c=e:GetHandler()
-		if chk==0 then return c:IsDiscardable() end
-		Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
-	end)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		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)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		local tg=Duel.GetFirstMatchingCard(cm.filter,tp,LOCATION_DECK,0,nil)
-		if tg then
-			Duel.SendtoHand(tg,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,tg)
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_REMOVE)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCountLimit(1,m)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,1,nil) end
-		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		local tg=Duel.GetFirstMatchingCard(cm.filter,tp,LOCATION_GRAVE,0,nil)
-		if tg then
-			Duel.SendtoHand(tg,nil,REASON_EFFECT)
-			Duel.ConfirmCards(1-tp,tg)
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_XMATERIAL)
-	e4:SetCode(EFFECT_ATTACK_ALL)
-	e4:SetValue(1)
-	e4:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return e:GetHandler():GetOriginalRace()==RACE_PSYCHO
-	end)
-	c:RegisterEffect(e4)
-end
-function cm.filter(c)
-	return c:IsCode(45746031) and c:IsAbleToHand()
-end
\ No newline at end of file

expansions/script/c45746008.lua

---幻影旅团·8 小滴
-local m=45746008
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_SPSUMMON_PROC)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCondition(function(e,c)
-		if c==nil then return true end
-		local tp=c:GetControler()
-		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-		return ft>-1 and Duel.IsExistingMatchingCard(cm.f1,tp,LOCATION_MZONE,0,1,nil,ft)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp,c)
-		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-		local g=Duel.SelectMatchingCard(tp,cm.f1,tp,LOCATION_MZONE,0,1,1,nil,ft)
-		Duel.Remove(g,POS_FACEUP,REASON_COST)
-	end)
-	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_BE_MATERIAL)
-	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		return r==REASON_XYZ and c:GetReasonCard():GetOriginalRace()==RACE_PSYCHO 
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local rc=c:GetReasonCard()
-		local e1=Effect.CreateEffect(c)
-		e1:SetDescription(aux.Stringid(m,0))
-		e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_DELAY)
-		e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-		e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-			if chk==0 then return e:GetHandler():IsType(TYPE_XYZ)and Duel.IsExistingMatchingCard(Card.IsType,tp,0,LOCATION_MZONE+LOCATION_GRAVE,1,nil,TYPE_MONSTER) end
-		end)
-		e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-			local c=e:GetHandler()
-			local tc=Duel.GetFirstTarget()
-			if c:IsRelateToEffect(e) then
-				local tc=Duel.SelectMatchingCard(tp,Card.IsType,tp,0,LOCATION_MZONE+LOCATION_GRAVE,1,1,nil,TYPE_MONSTER):GetFirst()
-				local og=tc:GetOverlayGroup()
-				if not tc:IsImmuneToEffect(e) and og:GetCount()>0 then
-					Duel.SendtoGrave(og,REASON_RULE)
-				end
-				Duel.Overlay(c,Group.FromCards(tc))
-			end
-		end)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		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+RESETS_STANDARD)
-			rc:RegisterEffect(e2,true)
-		end
-	end)
-	c:RegisterEffect(e2)
-	local e4=Effect.CreateEffect(c)
-	e4:SetCategory(CATEGORY_SUMMON)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetCode(EVENT_REMOVE)
-	e4:SetProperty(EFFECT_FLAG_DELAY)
-	e4:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e4:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.sf,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
-		Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,tp,LOCATION_GRAVE)
-	end)
-	e4:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
-		local g=Duel.SelectMatchingCard(tp,cm.sf,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
-		local tc=g:GetFirst()
-		if tc then
-			Duel.Summon(tp,tc,true,nil)
-		end
-	end)
-	c:RegisterEffect(e4)
-end
-function cm.f1(c,ft)
-	return c:IsFaceup() and c:IsSetCard(0x5880) and c:IsAbleToRemoveAsCost() and not c:IsCode(m) and (ft>0 or c:GetSequence()<5)
-end
-function cm.sf(c)
-	return c:IsSetCard(0x5880) and c:IsSummonable(true,nil)
-end
\ No newline at end of file

expansions/script/c45746009.lua

---幻影旅团·9 派克诺妲
-local m=45746009
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.tf1,tp,LOCATION_DECK,0,1,nil) end
-		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-		e:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,cm.tf1,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)
-	c:RegisterEffect(e1)
-	local e2=e1:Clone()
-	e2:SetCategory(CATEGORY_REMOVE)
-	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetCountLimit(1,m)
-	e2:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.tf2,tp,LOCATION_DECK,0,1,nil) end
-		Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-		local g=Duel.SelectMatchingCard(tp,cm.tf2,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 then
-			Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
-		end
-	end)
-	c:RegisterEffect(e2)
-	local e3=e1:Clone()
-	e3:SetCategory(CATEGORY_CONTROL)
-	e3:SetCode(EVENT_REMOVE)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.f3,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		Duel.EnableGlobalFlag(GLOBALFLAG_BRAINWASHING_CHECK)
-		local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,LOCATION_MZONE)
-		local tg=Group.CreateGroup()
-		local tc=g:GetFirst()
-		while tc do
-			if not tc:IsImmuneToEffect(e) and tc:GetFlagEffect(m)==0 then
-				tc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
-				tg:AddCard(tc)
-			end
-			tc=g:GetNext()
-		end
-		tg:KeepAlive()
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_FIELD)
-		e1:SetCode(EFFECT_REMOVE_BRAINWASHING)
-		e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
-		e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-		e1:SetTarget(aux.TargetEqualFunction(Card.GetFlagEffect,1,m))
-		e1:SetLabelObject(tg)
-		Duel.RegisterEffect(e1,tp)
-		--force adjust
-		local e2=Effect.CreateEffect(e:GetHandler())
-		e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		e2:SetCode(EVENT_CHAIN_SOLVED)
-		e2:SetProperty(EFFECT_FLAG_DELAY)
-		e2:SetLabelObject(e1)
-		Duel.RegisterEffect(e2,tp)
-		--reset
-		local e3=Effect.CreateEffect(e:GetHandler())
-		e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		e3:SetCode(EVENT_CHAIN_SOLVED)
-		e3:SetLabelObject(e2)
-		e3:SetLabel(Duel.GetChainInfo(0,CHAININFO_CHAIN_ID))
-		e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-			if Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID)==e:GetLabel() then
-				local e2=e:GetLabelObject()
-				local e1=e2:GetLabelObject()
-				local tg=e1:GetLabelObject()
-				for tc in aux.Next(tg) do
-					tc:ResetFlagEffect(m)
-				end
-				tg:DeleteGroup()
-				e1:Reset()
-				e2:Reset()
-				e:Reset()
-			end
-		end)
-		Duel.RegisterEffect(e3,tp)
-	end)
-	c:RegisterEffect(e3)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_BE_MATERIAL)
-	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e2:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		return r==REASON_XYZ and c:GetReasonCard():GetOriginalRace()==RACE_PSYCHO 
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local rc=c:GetReasonCard()
-		local e1=Effect.CreateEffect(c)
-		e1:SetDescription(aux.Stringid(m,0))
-		e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_DELAY)
-		e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-		e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-			if chk==0 then return e:GetHandler():IsType(TYPE_XYZ) and Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_ONFIELD+LOCATION_HAND,1,nil) end
-		end)
-		e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-			local g=Duel.GetFieldGroup(tp,0,LOCATION_ONFIELD+LOCATION_HAND):Filter(Card.IsFacedown,nil)
-			if #g>0 then
-				Duel.ConfirmCards(tp,g)
-			end
-		end)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		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+RESETS_STANDARD)
-			rc:RegisterEffect(e2,true)
-		end
-	end)
-	c:RegisterEffect(e2)
-end
---e1
-function cm.tf1(c)
-	return c:IsSetCard(0x5880) and c:IsAbleToHand()
-end
---e2
-function cm.tf2(c)
-	return c:IsSetCard(0x5880) and c:IsAbleToRemove()
-end
---e3
-function cm.f3(c)
-	return c:GetControler()~=c:GetOwner()
-end
\ No newline at end of file

expansions/script/c45746010.lua

---幻影旅团·10 剥落列夫
-local m=45746010
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_SUMMON_SUCCESS)
-	e2:SetCountLimit(1,m)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(cm.t1,tp,LOCATION_HAND,0,1,nil,e,tp) end
-		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
-	end)
-	e2:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local tc=Duel.GetFirstTarget()
-		local g=Duel.GetMatchingGroup(cm.t1,tp,LOCATION_HAND,0,nil,e,tp)
-		if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-			if g:GetCount()>0 then
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-				local g=Duel.SelectMatchingCard(tp,cm.t1,tp,LOCATION_HAND,0,1,1,nil,e,tp)
-				Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-			end
-		end
-	end)
-	c:RegisterEffect(e2)
-	local e3=e2:Clone()
-	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	c:RegisterEffect(e3)
-	local e4=Effect.CreateEffect(c)
-	e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetCode(EVENT_REMOVE)
-	e4:SetProperty(EFFECT_FLAG_DELAY)
-	e4:SetCountLimit(1,m+100)
-	e4:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e4:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(cm.t1,tp,LOCATION_GRAVE,0,1,nil,e,tp)end
-		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
-	end)
-	e4:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local g=Duel.GetMatchingGroup(cm.t1,tp,LOCATION_GRAVE,0,nil,e,tp)
-		if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-			if g:GetCount()>0 then
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-				local g=Duel.SelectMatchingCard(tp,cm.t1,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
-				Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-			end
-		end
-	end)
-	c:RegisterEffect(e4)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_XMATERIAL)
-	e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
-	e3:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL)
-	e3:SetValue(1)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return e:GetHandler():GetOriginalRace()==RACE_PSYCHO
-	end)
-	c:RegisterEffect(e3)
-end
-function cm.t1(c,e,tp)
-	return c:IsSetCard(0x5880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
\ No newline at end of file

expansions/script/c45746011.lua

---幻影旅团·11 窝金
-local m=45746011
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	c:EnableReviveLimit()
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_SPSUMMON_PROC)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCondition(function(e,c)
-		if c==nil then return true end
-		local tp=c:GetControler()
-		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-		return Duel.IsExistingMatchingCard(cm.f1,tp,LOCATION_REMOVED,0,1,nil,ft)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp,c)
-		local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-		local g=Duel.SelectMatchingCard(tp,cm.f1,tp,LOCATION_REMOVED,0,1,1,nil,ft)
-		Duel.SendtoGrave(g,REASON_COST)
-	end)
-	c:RegisterEffect(e1)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOGRAVE)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_REMOVE)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return e:GetHandler():IsAbleToGrave() end
-		Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		if c:IsRelateToEffect(e) then
-			Duel.SendtoGrave(c,REASON_EFFECT)
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_DESTROY)
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetCost(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return e:GetHandler():GetFlagEffect(m)==0 end
-	end)
-	e3:SetCost(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then
-			if Duel.IsExistingMatchingCard(cm.cf2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) then
-				return Duel.IsExistingMatchingCard(cm.cof3,tp,LOCATION_REMOVED,0,1,nil)and e:GetHandler():GetFlagEffect(m)<=1
-			else
-				return Duel.IsExistingMatchingCard(cm.cof3,tp,LOCATION_REMOVED,0,1,nil)and e:GetHandler():GetFlagEffect(m)==0
-			end
-		end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-		local g=Duel.SelectMatchingCard(tp,cm.cof3,tp,LOCATION_REMOVED,0,1,1,nil)
-		Duel.SendtoGrave(g,REASON_COST)
-		e:GetHandler():RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
-	end)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		if chkc then return chkc:IsOnField() end
-		if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-		local g=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
-		Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local tc=Duel.GetFirstTarget()
-		if tc:IsRelateToEffect(e) then
-			Duel.Destroy(tc,REASON_EFFECT)
-		end
-	end)
-	c:RegisterEffect(e3)
-end
-function cm.f1(c,ft)
-	return c:IsFaceup() and c:IsSetCard(0x5880) and c:IsAbleToGraveAsCost() and ft>0
-end
-function cm.cof3(c)
-	return c:IsAbleToGraveAsCost() and c:IsSetCard(0x5880) and c:IsType(TYPE_MONSTER)
-end
-function cm.cf2(c)
-	return c:IsFaceup() and c:IsCode(45746031)
-end
\ No newline at end of file

expansions/script/c45746012.lua

---幻影旅团·12 库哔
-local m=45746012
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(cm.t2,tp,LOCATION_REMOVED,0,1,nil,e,tp)end
-		Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_REMOVED)
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local g=Duel.GetMatchingGroup(cm.t2,tp,LOCATION_REMOVED,0,nil,e,tp)
-		if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-			if g:GetCount()>0 then
-				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-				local g=Duel.SelectMatchingCard(tp,cm.t2,tp,LOCATION_REMOVED,0,1,1,nil,e,tp)
-				Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-			end
-		end
-	end)
-	c:RegisterEffect(e1)
-	local e4=Effect.CreateEffect(c)
-	e4:SetCategory(CATEGORY_DRAW)
-	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e4:SetCode(EVENT_REMOVE)
-	e4:SetCountLimit(1,m)
-	e4:SetProperty(EFFECT_FLAG_DELAY)
-	e4:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		return e:GetHandler():IsFaceup()
-	end)
-	e4:SetTarget(function(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)
-	e4:SetOperation(function(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)
-	c:RegisterEffect(e4)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(m,0))
-	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e3:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_IGNITION)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetCountLimit(1)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return e:GetHandler():GetOriginalRace()==RACE_PSYCHO
-	end)
-	e3:SetCost(function(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)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-		if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and cm.g1(chkc,e,tp) end
-		if chk==0 then return Duel.IsExistingTarget(cm.g1,tp,0,LOCATION_GRAVE,1,nil,e,tp) end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
-		local g=Duel.SelectTarget(tp,cm.g1,tp,0,LOCATION_GRAVE,1,1,nil,e,tp)
-		if g:GetFirst():IsType(TYPE_MONSTER) then
-			Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
-		else
-			Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
-		end
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local tc=Duel.GetFirstTarget()
-		if not tc:IsRelateToEffect(e) then return end
-		if tc:IsType(TYPE_MONSTER) then
-			Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-		elseif (tc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) then
-			Duel.SSet(tp,tc)
-		end
-	end)
-	c:RegisterEffect(e3)
-end
-function cm.t2(c,e,tp)
-	return c:IsSetCard(0x5880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsFaceup()
-end
-function cm.g1(c,e,tp)
-	if c:IsType(TYPE_MONSTER) then
-		return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-	else
-		local ct=Duel.GetLocationCount(tp,LOCATION_SZONE)
-		if e:IsHasType(EFFECT_TYPE_ACTIVATE) and not e:GetHandler():IsLocation(LOCATION_SZONE) then ct=ct-1 end
-		return c:IsSSetable(true) and (c:IsType(TYPE_FIELD) or ct>0)
-	end
-end
\ No newline at end of file

expansions/script/c45746013.lua

---H×H 杰
-function c45746013.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(45746013,0))
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetCountLimit(1,45746013)
-	e1:SetTarget(c45746013.sptg)
-	e1:SetOperation(c45746013.spop)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(45746013,1))
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_BE_MATERIAL)
-	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e2:SetCondition(c45746013.effcon)
-	e2:SetOperation(c45746013.effop)
-	c:RegisterEffect(e2)
-
-end
---e1
-function c45746013.spfilter(c,e,tp)
-	return c:IsSetCard(0x880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP) and not c:IsCode(45746013)
-end
-function c45746013.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c45746013.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
-end
-function c45746013.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local g=Duel.SelectMatchingCard(tp,c45746013.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
-end
-	local e5=Effect.CreateEffect(e:GetHandler())
-	e5:SetType(EFFECT_TYPE_FIELD)
-	e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-	e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e5:SetTargetRange(1,0)
-	e5:SetTarget(c45746013.splimit)
-	e5:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e5,tp)
-end
-function c45746013.splimit(e,c)
-	return not c:IsRace(RACE_PSYCHO)
-end
-
-
---e2
-function c45746013.effcon(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_SYNCHRO+REASON_XYZ+REASON_LINK)~=0 and e:GetHandler():GetReasonCard():IsSetCard(0x880)
-end
-function c45746013.effop(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(45746013,2))
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetHintTiming(TIMING_DAMAGE_STEP)
-	e1:SetCategory(CATEGORY_ATKCHANGE)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
-	e1:SetCountLimit(1)
-	e1:SetOperation(c45746013.atkop)
-	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-	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+RESETS_STANDARD)
-		rc:RegisterEffect(e2,true)
-	end
-	rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(45746013,1))
-end
-function c45746013.atkop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and c:IsFaceup() then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_SET_ATTACK_FINAL)
-		e1:SetValue(c:GetBaseAttack()*2)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		c:RegisterEffect(e1)
-	end
-end
\ No newline at end of file

expansions/script/c45746014.lua

---H×H 奇犽
-function c45746014.initial_effect(c)
-
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(45746014,0))
-	e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
-	e1:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e1:SetCountLimit(1,45746014)
-	e1:SetTarget(c45746014.settg)
-	e1:SetOperation(c45746014.setop)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(45746014,1))
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_BE_MATERIAL)
-	e2:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e2:SetCondition(c45746014.effcon)
-	e2:SetOperation(c45746014.effop)
-	c:RegisterEffect(e2)
-
-end
-function c45746014.setfilter(c)
-	return c:IsSetCard(0x880) and (c:IsType(TYPE_TRAP) or c:IsType(TYPE_SPELL)) and c:IsSSetable()
-end
-function c45746014.settg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746014.setfilter,tp,LOCATION_DECK,0,1,nil) end
-end
-function c45746014.setop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-	local g=Duel.SelectMatchingCard(tp,c45746014.setfilter,tp,LOCATION_DECK,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.SSet(tp,tc)
-		Duel.ConfirmCards(1-tp,tc)
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
-		e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
-		tc:RegisterEffect(e2)
-	end
-end
---e2
-function c45746014.effcon(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_SYNCHRO+REASON_XYZ+REASON_LINK)~=0 and e:GetHandler():GetReasonCard():IsSetCard(0x880)
-end
-function c45746014.effop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local rc=c:GetReasonCard()
-	local e3=Effect.CreateEffect(rc)
-		  e3:SetCode(EVENT_FREE_CHAIN)
-		  e3:SetType(EFFECT_TYPE_QUICK_O)
-		  e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-		  e3:SetRange(LOCATION_MZONE)
-		  e3:SetCountLimit(1)
-		  e3:SetTarget(c45746014.batg)
-		  e3:SetOperation(c45746014.baop)
-		  c:RegisterEffect(e3) 
-		  e3:SetReset(RESET_EVENT+RESETS_STANDARD)
-		  rc:RegisterEffect(e3,true)
-	if not rc:IsType(TYPE_EFFECT) then  
-  local e4=Effect.CreateEffect(c)
-		e4:SetType(EFFECT_TYPE_SINGLE)
-		e4:SetCode(EFFECT_ADD_TYPE)
-		e4:SetValue(TYPE_EFFECT)
-		e4:SetReset(RESET_EVENT+RESETS_STANDARD)
-		rc:RegisterEffect(e4,true)
-	end
-	rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(45746014,1))
-end
-function c45746014.batg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	local c=e:GetHandler()
-	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) end
-	if chk==0 then return c:IsAttackable()
-		and Duel.IsExistingTarget(nil,tp,0,LOCATION_MZONE,1,nil)  end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO)
-	local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_MZONE,1,1,nil)
-end
-function c45746014.baop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsAttackable() and c:IsControler(tp) and c:IsFaceup() and c:IsRelateToEffect(e) then
-		local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-		local tc=g:GetFirst()
-		if tc:IsControler(1-tp) and tc:IsRelateToEffect(e) then
-			Duel.CalculateDamage(c,tc)
-		end
-	end
-end

expansions/script/c45746015.lua

---H×H 酷拉皮卡
-function c45746015.initial_effect(c)
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_PSYCHO),2,2)
-
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(45746015,0))
-	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,45746015)
-	e1:SetTarget(c45746015.shtg)
-	e1:SetOperation(c45746015.shop)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(45746015,1))
-	e2:SetCategory(CATEGORY_DESTROY)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetCountLimit(1)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCost(c45746015.cost)
-	e2:SetTarget(c45746015.chtg)
-	e2:SetOperation(c45746015.chop)
-	c:RegisterEffect(e2)
-
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(45746015,2))
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_BE_MATERIAL)
-	e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e3:SetCondition(c45746015.effcon)
-	e3:SetOperation(c45746015.effop)
-	c:RegisterEffect(e3)
-
-end
---e1
-function c45746015.filter(c)
-	return c:IsSetCard(0x880) and c:IsAbleToHand()
-end
-function c45746015.shtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746015.filter,tp,LOCATION_DECK,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-end
-function c45746015.shop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c45746015.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
---e2
-function c45746015.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.CheckLPCost(tp,1000) end
-	Duel.PayLPCost(tp,1000)
-end
-function c45746015.filter1(c)
-	return c:IsFaceup() and c:IsSetCard(0x5880) and c:IsDestructable()
-end
-function c45746015.chtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746015.filter1,rp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
-end
-function c45746015.chop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectMatchingCard(tp,c45746015.filter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
-	if g:GetCount()>0 then
-		Duel.Destroy(g,REASON_EFFECT)
-	end
-end
---e3
-function c45746015.effcon(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_SYNCHRO+REASON_XYZ+REASON_LINK)~=0 and e:GetHandler():GetReasonCard():IsSetCard(0x880)
-end
-function c45746015.effop(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(45746015,2))
-	e1:SetCategory(CATEGORY_DISABLE)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
-	e1:SetCost(c45746015.descost)
-	e1:SetTarget(c45746015.destg)
-	e1:SetOperation(c45746015.desop)
-	c:RegisterEffect(e1)
-	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-	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+RESETS_STANDARD)
-		rc:RegisterEffect(e2,true)
-	end
-	rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(45746015,2))
-end
-function c45746015.descost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
-end
-function c45746015.destg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and aux.disfilter1(chkc) end
-	if chk==0 then return Duel.IsExistingMatchingCard(aux.disfilter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
-	local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
-end
-function c45746015.desop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local g=Duel.GetMatchingGroup(aux.disfilter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
-	if g:GetCount()>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(45746015,3))
-
-		local tc=g:Select(tp,1,1,nil)
-		local sg=tc:GetFirst()
-		Duel.HintSelection(tc)
-		if ((sg:IsFaceup() and not sg:IsDisabled()) or sg:IsType(TYPE_TRAPMONSTER))  then
-			Duel.NegateRelatedChain(sg,RESET_TURN_SET)
-			local e4=Effect.CreateEffect(c)
-			e4:SetType(EFFECT_TYPE_SINGLE)
-			e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-			e4:SetCode(EFFECT_DISABLE)
-			e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			sg:RegisterEffect(e4)
-			local e5=Effect.CreateEffect(c)
-			e5:SetType(EFFECT_TYPE_SINGLE)
-			e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-			e5:SetCode(EFFECT_DISABLE_EFFECT)
-			e5:SetValue(RESET_TURN_SET)
-			e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-			sg:RegisterEffect(e5)
-			if sg:IsType(TYPE_TRAPMONSTER) then
-				local e6=Effect.CreateEffect(c)
-				e6:SetType(EFFECT_TYPE_SINGLE)
-				e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-				e6:SetCode(EFFECT_DISABLE_TRAPMONSTER)
-				e6:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-				sg:RegisterEffect(e6)
-			end
-		end
-	end
-end
\ No newline at end of file

expansions/script/c45746016.lua

---H×H 雷欧力
-function c45746016.initial_effect(c)
-	--fusion material
-	c:EnableReviveLimit()
-	aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x880),2,true)
-	aux.AddContactFusionProcedure(c,Card.IsAbleToRemoveAsCost,LOCATION_ONFIELD+LOCATION_GRAVE,0,Duel.Remove,POS_FACEUP,REASON_COST)
-	--spsummon condition
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(c45746016.splimit)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(45746016,0))
-	e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e2:SetCountLimit(1,45746016)
-	e2:SetTarget(c45746016.thtg)
-	e2:SetOperation(c45746016.thop)
-	c:RegisterEffect(e2)
-
-	local e3=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(45746016,1))
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_BE_MATERIAL)
-	e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
-	e3:SetCondition(c45746016.effcon)
-	e3:SetOperation(c45746016.effop)
-	c:RegisterEffect(e3)
-
-end
-function c45746016.splimit(e,se,sp,st)
-	return e:GetHandler():GetLocation()~=LOCATION_EXTRA
-end
---e2
-function c45746016.thfilter(c)
-	return c:IsCode(45746032) and c:IsAbleToHand()
-end
-function c45746016.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746016.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
-end
-function c45746016.thop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c45746016.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
---e3
-function c45746016.effcon(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(r,REASON_SYNCHRO+REASON_XYZ+REASON_LINK)~=0 and e:GetHandler():GetReasonCard():IsSetCard(0x880)
-end
-function c45746016.effop(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(45746016,0))
-	e1:SetCategory(CATEGORY_DESTROY)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetTarget(c45746016.destg)
-	e1:SetOperation(c45746016.desop)
-	c:RegisterEffect(e1)
-	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-	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+RESETS_STANDARD)
-		rc:RegisterEffect(e2,true)
-	end
-	rc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(45746016,1))
-end
-function c45746016.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsOnField() end
-	if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-	local g=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
-end
-function c45746016.desop(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/c45746031.lua

---幻影旅团·流星街
-local m=45746031
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		if not e:GetHandler():IsRelateToEffect(e) then return end
-		local g=Duel.GetMatchingGroup(function(c)return c:IsSetCard(0x5880) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)end,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)
-	c:RegisterEffect(e1)
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_REMOVE)
-	e3:SetType(EFFECT_TYPE_QUICK_O)
-	e3:SetCode(EVENT_FREE_CHAIN)
-	e3:SetRange(LOCATION_FZONE)
-	e3:SetCountLimit(1,m)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
-	end)
-	e3:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsExistingMatchingCard(cm.t3,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil,e,tp) end
-		Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,0)
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		if not e:GetHandler():IsRelateToEffect(e) then return end
-		local g=Duel.SelectMatchingCard(tp,cm.t3,tp,LOCATION_DECK,0,1,1,nil)
-		if g:GetCount()>0 then
-			Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
-		end
-	end)
-	c:RegisterEffect(e3)
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE)
-	e2:SetRange(LOCATION_FZONE)
-	e2:SetCode(EFFECT_TO_GRAVE_REDIRECT)
-	e2:SetTargetRange(0xff,0xff)
-	e2:SetTarget(function(e,c)
-		return c:IsSetCard(0x5880)
-	end)
-	e2:SetValue(LOCATION_REMOVED)
-	c:RegisterEffect(e2)
-end
-function cm.t3(c)
-	return c:IsSetCard(0x5880) and c:IsAbleToRemove() and c:IsType(TYPE_MONSTER)
-end
\ No newline at end of file

expansions/script/c45746032.lua

---HxH 友客鑫市
-local m=45746032
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		if not e:GetHandler():IsRelateToEffect(e) then return end
-		local g=Duel.GetMatchingGroup(function(c)return c:IsCode(45746013) and c:IsAbleToHand() end,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)
-	c:RegisterEffect(e1)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_IGNITION)
-	e1:SetRange(LOCATION_FZONE)
-	e1:SetCountLimit(1)
-	e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return Duel.GetFlagEffect(tp,m)==0
-	end)
-	e1:SetCost(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.CheckLPCost(tp,500) end
-		Duel.PayLPCost(tp,500)
-	end)
-	e1:SetTarget(function(e,tp,eg,ep,ev,re,r,rp,chk)
-		if chk==0 then return Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp) end
-	end)
-	e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetDescription(aux.Stringid(m,1))
-		e1:SetType(EFFECT_TYPE_FIELD)
-		e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
-		e1:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
-		e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x880))
-		e1:SetReset(RESET_PHASE+PHASE_END)
-		Duel.RegisterEffect(e1,tp)
-		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_FIELD)
-		e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-		e1:SetTargetRange(1,0)
-		e1:SetTarget(function(e,c)
-			return not c:IsRace(RACE_PSYCHO)
-		end)
-		e1:SetReset(RESET_PHASE+PHASE_END)
-		Duel.RegisterEffect(e1,tp)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_CANNOT_SUMMON)
-		Duel.RegisterEffect(e2,tp)
-	end)
-	c:RegisterEffect(e1)
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e3:SetProperty(EFFECT_FLAG_DELAY)
-	e3:SetCode(EVENT_TO_GRAVE)
-	e3:SetCondition(function(e,tp,eg,ep,ev,re,r,rp)
-		return e:GetHandler():IsPreviousLocation(LOCATION_FZONE)
-	end)
-	e3:SetOperation(function(e,tp,eg,ep,ev,re,r,rp)
-		local c=e:GetHandler()
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		e1:SetCode(EVENT_SUMMON_SUCCESS)
-		e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp,chk)
-			return eg:IsExists(function(c)return c:IsSetCard(0x5880) and not c:IsCode(m) and c:IsSummonPlayer(tp)end,1,nil)
-		end)
-		e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp,chk)
-			Duel.Recover(tp,500,REASON_EFFECT)
-		end)
-		e1:SetReset(RESET_PHASE+PHASE_END)
-		Duel.RegisterEffect(e1,tp)
-		local e2=e1:Clone()
-		e2:SetCode(EVENT_SPSUMMON_SUCCESS)
-		Duel.RegisterEffect(e2,tp)
-	end)
-	c:RegisterEffect(e3)
-end

expansions/script/c45746033.lua

---幻影旅团·镇魂协奏曲 前奏曲
-local m=45746033
-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: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)
-	return c:IsSetCard(0x5880) and c:IsAbleToHand()
-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,2,nil) and Duel.GetMatchingGroupCount(nil,tp,LOCATION_DECK,0,nil)%2==0) or (Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) and Duel.GetMatchingGroupCount(nil,tp,LOCATION_DECK,0,nil)%2~=0)  end
-	if Duel.GetMatchingGroupCount(nil,tp,LOCATION_DECK,0,nil)%2==0 then 
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
-	else  
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
-	end
-end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
-	if not ((Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,2,nil) and Duel.GetMatchingGroupCount(nil,tp,LOCATION_DECK,0,nil)%2==0) or (Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) and Duel.GetMatchingGroupCount(nil,tp,LOCATION_DECK,0,nil)%2~=0)) then return end
-	local g
-	if Duel.GetMatchingGroupCount(nil,tp,LOCATION_DECK,0,nil)%2==0 then 
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	 g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,2,2,nil)
-	else  
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	 g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
-	end
-	if g:GetCount()>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
-	end
-end
-

expansions/script/c45746034.lua

---幻影旅团·镇魂协奏曲 第一乐章
-function c45746034.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,45746034+EFFECT_COUNT_CODE_OATH)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(45746034,0))
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetCountLimit(1)
-	e2:SetRange(LOCATION_SZONE)
-	e2:SetTarget(c45746034.target)
-	e2:SetOperation(c45746034.operation)
-	c:RegisterEffect(e2)
-
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD)
-	e3:SetCode(EFFECT_UPDATE_ATTACK)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetTargetRange(LOCATION_MZONE,0)
-	e3:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x5880))
-	e3:SetValue(c45746034.atkval)
-	c:RegisterEffect(e3)
-
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e4:SetCode(EVENT_CHAIN_SOLVING)
-	e4:SetRange(LOCATION_SZONE)
-	e4:SetCondition(c45746034.discon)
-	e4:SetOperation(c45746034.disop)
-	c:RegisterEffect(e4)
-
-	local e6=Effect.CreateEffect(c)
-	e6:SetDescription(aux.Stringid(45746034,1))
-	e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e6:SetProperty(EFFECT_FLAG_DELAY)
-	e6:SetRange(LOCATION_SZONE)
-	e6:SetCode(EVENT_REMOVE)
-	e6:SetCountLimit(1,45746034)
-	e6:SetTarget(c45746034.sptg)
-	e6:SetOperation(c45746034.spop)
-	c:RegisterEffect(e6)
-
-end
---e2
-function c45746034.filter(c,e,tp)
-	return c:IsSetCard(0x5880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
-end
-function c45746034.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c45746034.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
-end
-function c45746034.operation(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,c45746034.filter,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
---e3
-function c45746034.atkvalfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x5880)
-end
-function c45746034.atkval(e,c)
-	local tp=e:GetHandler():GetControler()
-	local g=Duel.GetMatchingGroup(c45746034.atkvalfilter,tp,LOCATION_REMOVED,0,nil)
-	return g:GetClassCount(Card.GetCode)*200
-end
---e4
-function c45746034.cfilter(c,seq2)
-	local seq1=aux.MZoneSequence(c:GetSequence())
-	return c:IsFaceup() and c:IsSetCard(0x58805555555) and seq1==4-seq2
-end
-function c45746034.discon(e,tp,eg,ep,ev,re,r,rp)
-	local loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE)
-	seq=aux.MZoneSequence(seq)
-	return rp==1-tp and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_MZONE
-		and Duel.IsExistingMatchingCard(c45746034.cfilter,tp,LOCATION_MZONE,0,1,nil,seq)
-end
-function c45746034.disop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_CARD,0,45746034)
-	Duel.NegateEffect(ev)
-end
---e5
-function c45746034.spfilter1(c,e,tp)
-	return c:IsCode(45746035) and not c:IsType(TYPE_FIELD+TYPE_MONSTER) and not c:IsForbidden() and c:CheckUniqueOnField(tp)
-end
-function c45746034.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
-		if e:IsHasType(EFFECT_TYPE_ACTIVATE) and not e:GetHandler():IsLocation(LOCATION_SZONE) then ft=ft-1 end
-		return ft>0 and Duel.IsExistingMatchingCard(c45746034.spfilter1,tp,LOCATION_DECK,0,1,nil,tp)
-	end
-end
-function c45746034.spop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
-	local tc=Duel.SelectMatchingCard(tp,c45746034.spfilter1,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
-	if tc then
-		Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-	end
-end
\ No newline at end of file

expansions/script/c45746035.lua

---幻影旅团·镇魂协奏曲 第二乐章
-function c45746035.initial_effect(c)
-	--Activate
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetHintTiming(0,TIMING_END_PHASE)
-	c:RegisterEffect(e1)
-	--special summon
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(45746035,0))
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetHintTiming(0,TIMING_END_PHASE)
-	e2:SetRange(LOCATION_SZONE)
-	e2:SetCountLimit(1,45746035)
-	e2:SetTarget(c45746035.sptg)
-	e2:SetOperation(c45746035.spop)
-	c:RegisterEffect(e2)
-
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e3:SetCode(EVENT_CHAIN_SOLVING)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetCondition(c45746035.discon)
-	e3:SetOperation(c45746035.disop)
-	c:RegisterEffect(e3)
-
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_FIELD)
-	e4:SetCode(EFFECT_UPDATE_ATTACK)
-	e4:SetRange(LOCATION_SZONE)
-	e4:SetTargetRange(LOCATION_MZONE,0)
-	e4:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x5880))
-	e4:SetValue(c45746035.atkval)
-	c:RegisterEffect(e4)
-
-	local e5=Effect.CreateEffect(c)
-	e5:SetDescription(aux.Stringid(45746035,1))
-	e5:SetCategory(CATEGORY_TOHAND)
-	e5:SetType(EFFECT_TYPE_QUICK_O+EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e5:SetRange(LOCATION_SZONE)
-	e5:SetCountLimit(1,45746035)
-	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e5:SetProperty(EFFECT_FLAG_DELAY)
-	e5:SetCondition(c45746035.spcon1)
-	e5:SetTarget(c45746035.thtg)
-	e5:SetOperation(c45746035.thop)
-	c:RegisterEffect(e5)
-
-end
---e2
-function c45746035.spfilter(c,e,tp)
-	return c:IsSetCard(0x5880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c45746035.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(c45746035.spfilter,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_REMOVED)
-end
-function c45746035.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,c45746035.spfilter,tp,LOCATION_REMOVED,0,1,1,e:GetHandler(),e,tp)
-	if g:GetCount()>0 then
-		Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-	end
-end
---e3
-function c45746035.cfilter(c,seq2)
-	local seq1=aux.MZoneSequence(c:GetSequence())
-	return c:IsFaceup() and c:IsSetCard(0x588088888) and seq1==4-seq2
-end
-function c45746035.discon(e,tp,eg,ep,ev,re,r,rp)
-	local loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE)
-	return rp==1-tp and re:IsActiveType(TYPE_SPELL) and loc&LOCATION_SZONE==LOCATION_SZONE and seq<=4
-		and Duel.IsExistingMatchingCard(c45746035.cfilter,tp,LOCATION_MZONE,0,1,nil,seq)
-end
-function c45746035.disop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_CARD,0,45746035)
-	Duel.NegateEffect(ev)
-end
---e4
-function c45746035.atkvalfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x5880)
-end
-function c45746035.atkval(e,c)
-	local tp=e:GetHandler():GetControler()
-	local g=Duel.GetMatchingGroup(c45746035.atkvalfilter,tp,LOCATION_REMOVED,0,nil)
-	return g:GetClassCount(Card.GetCode)*200
-end
---e5
-function c45746035.cfilter1(c)
-	return c:IsFaceup() and c:IsType(TYPE_XYZ)
-end
-function c45746035.spcon1(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(c45746035.cfilter1,1,nil)
-end
-function c45746035.thfilter(c)
-	return c:IsAbleToHand() and c:IsSetCard(0x5880) and c:IsFaceup()
-end
-function c45746035.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746035.thfilter,tp,LOCATION_REMOVED,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
-end
-function c45746035.thop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c45746035.thfilter,tp,LOCATION_REMOVED,0,1,1,nil)
-	if #g>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-	end
-end
\ No newline at end of file

expansions/script/c45746036.lua

---幻影旅团·镇魂协奏曲 终章
-function c45746036.initial_effect(c)
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetCode(EFFECT_TRAP_ACT_IN_HAND)
-	e1:SetCondition(c45746036.handcon)
-	c:RegisterEffect(e1)
-	--disable
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_DISABLE)
-	e2:SetType(EFFECT_TYPE_ACTIVATE)
-	e2:SetCode(EVENT_CHAINING)
-	e2:SetCountLimit(1,45746036+EFFECT_COUNT_CODE_OATH)
-	e2:SetCondition(c45746036.discon)
-	e2:SetTarget(c45746036.distg)
-	e2:SetOperation(c45746036.disop)
-	c:RegisterEffect(e2)
-
-
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(45746036,0))
-	e3:SetType(EFFECT_TYPE_QUICK_O)
-	e3:SetRange(LOCATION_REMOVED)
-	e3:SetCode(EVENT_FREE_CHAIN)
-	e3:SetType(EFFECT_TYPE_ACTIVATE)
-	e3:SetCountLimit(1,45746036+EFFECT_COUNT_CODE_DUEL)
-	e3:SetCondition(c45746036.eqcon)
-	e3:SetCost(c45746036.cost)
-	e3:SetTarget(c45746036.settg)
-	e3:SetOperation(c45746036.setop)
-	c:RegisterEffect(e3)
-
-end
---e1e2
-function c45746036.filter(c)
-	return c:IsFaceup() and c:IsCode(45746000)
-end
-function c45746036.handcon(e)
-	return Duel.IsExistingMatchingCard(c45746036.filter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
-end
-function c45746036.cfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0xaf93) and c:IsType(TYPE_MONSTER)
-end
-function c45746036.discon(e,tp,eg,ep,ev,re,r,rp)
-	if not Duel.IsChainDisablable(ev) then return false end
-	local te,p=Duel.GetChainInfo(ev-1,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
-	return ((te and p==tp and rp==1-tp) or ( rp==1-tp and tp==Duel.GetTurnPlayer()))
-			and Duel.IsExistingMatchingCard(c45746036.cfilter,tp,LOCATION_MZONE,0,1,nil)
-end
-function c45746036.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 c45746036.filter2(c)
-	return c:IsFaceup() and c:IsType(TYPE_XYZ)
-end
-function c45746036.disop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local rc=re:GetHandler()
-	if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) then
-		if not Duel.IsExistingMatchingCard(c45746036.filter2,tp,LOCATION_MZONE,0,1,nil) then
-		Duel.Destroy(eg,REASON_EFFECT) end
-		if Duel.IsExistingMatchingCard(c45746036.filter2,tp,LOCATION_MZONE,0,1,nil) and
-		   Duel.SelectYesNo(tp,aux.Stringid(45746036,0)) then
-		   local xyzg=Duel.GetMatchingGroup(c45746036.filter2,tp,LOCATION_MZONE,0,nil,g) 
-		   if xyzg:GetCount()>0 then
-			  Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
-			  local xyz=xyzg:Select(tp,1,1,nil):GetFirst()
-			  rc:CancelToGrave()
-			  c:CancelToGrave()
-			  Duel.Overlay(xyz,c)
-			  Duel.Overlay(xyz,Group.FromCards(rc))
-			  else
-			  Duel.Destroy(eg,REASON_EFFECT)
-			end
-		end
-	end
-end
---e3
-function c45746036.eqcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()~=tp
-end
-function c45746036.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() and e:GetHandler():IsFaceup() end
-	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_RETURN)
-end
-function c45746036.setfilter(c)
-	return c:IsSetCard(0x5880) and c:IsType(TYPE_TRAP) and c:IsSSetable()
-end
-function c45746036.settg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746036.setfilter,tp,LOCATION_DECK,0,1,nil) end
-end
-function c45746036.setop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
-	local g=Duel.SelectMatchingCard(tp,c45746036.setfilter,tp,LOCATION_DECK,0,1,1,nil)
-	local tc=g:GetFirst()
-	if tc then
-		Duel.SSet(tp,tc)
-		Duel.ConfirmCards(1-tp,tc)
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
-		e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tc:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
-		tc:RegisterEffect(e2)
-	end
-end
\ No newline at end of file

expansions/script/c45746037.lua

---幻影旅团 拍卖会
-function c45746037.initial_effect(c)
-	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:SetCountLimit(1,45746037+EFFECT_COUNT_CODE_OATH)
-	e1:SetTarget(c45746037.target)
-	e1:SetOperation(c45746037.activate)
-	c:RegisterEffect(e1)
-
-	local e2=Effect.CreateEffect(c)
-	e2:SetCategory(CATEGORY_TOHAND)
-	e2:SetDescription(aux.Stringid(45746037,1))
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetRange(LOCATION_REMOVED)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetCountLimit(1,45746137)
-	e2:SetProperty(EFFECT_FLAG_DELAY)
-	e2:SetCost(c45746037.cost)
-	e2:SetTarget(c45746037.thtg)
-	e2:SetOperation(c45746037.thop)
-	c:RegisterEffect(e2)
-
-end
-function c45746037.spfilter1(c,e,tp)
-	return c:IsSetCard(0x5880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCanBeEffectTarget(e)
-end
-function c45746037.fselect1(g,tp)
-	return Duel.IsExistingMatchingCard(c45746037.synfilter,tp,LOCATION_EXTRA,0,1,nil,g) and aux.dncheck(g)
-end
-function c45746037.synfilter(c,g)
-	return c:IsSetCard(0x5880) and c:IsSynchroSummonable(nil,g,g:GetCount()-1,g:GetCount()-1)
-end
-function c45746037.fselect2(g,tp)
-	return Duel.IsExistingMatchingCard(c45746037.xyzfilter,tp,LOCATION_EXTRA,0,1,nil,g) and aux.dncheck(g)
-end
-function c45746037.xyzfilter(c,g)
-	return c:IsSetCard(0x5880) and c:IsXyzSummonable(g,g:GetCount(),g:GetCount())
-end
-function c45746037.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return false end
-	local ft=math.min((Duel.GetLocationCount(tp,LOCATION_MZONE)),3)
-	local g=Duel.GetMatchingGroup(c45746037.spfilter1,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil,e,tp)
-	local b1=g:CheckSubGroup(c45746037.fselect1,1,ft,tp)
-	local b2=g:CheckSubGroup(c45746037.fselect2,1,ft,tp)
-	if chk==0 then return ft>0 and Duel.IsPlayerCanSpecialSummonCount(tp,2)
-		and not Duel.IsPlayerAffectedByEffect(tp,59822133) and (b1 or b2) end
-	local op=0
-	if b1 and b2 then
-		op=Duel.SelectOption(tp,aux.Stringid(45746037,0),aux.Stringid(45746037,1))
-	elseif b1 then
-		op=Duel.SelectOption(tp,aux.Stringid(45746037,0))
-	else
-		op=Duel.SelectOption(tp,aux.Stringid(45746037,1))+1
-	end
-	e:SetLabel(op)
-	local sg=nil
-	if op==0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		sg=g:SelectSubGroup(tp,c45746037.fselect1,false,1,ft,tp)
-	else
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		sg=g:SelectSubGroup(tp,c45746037.fselect2,false,1,ft,tp)
-	end
-	Duel.SetTargetCard(sg)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,sg:GetCount(),0,0)
-end
-function c45746037.spfilter2(c,e,tp)
-	return c:IsRelateToEffect(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function c45746037.activate(e,tp,eg,ep,ev,re,r,rp)
-	local op=e:GetLabel()
-	if Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c45746037.spfilter2,nil,e,tp)
-	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 og=Duel.GetOperatedGroup()
-	Duel.RaiseEvent(e:GetHandler(),EVENT_ADJUST,nil,0,PLAYER_NONE,PLAYER_NONE,0)
-	if og:FilterCount(Card.IsLocation,nil,LOCATION_MZONE)<g:GetCount() then return end
-	if op==0 then
-		local tg=Duel.GetMatchingGroup(c45746037.synfilter,tp,LOCATION_EXTRA,0,nil,og)
-		if og:GetCount()==g:GetCount() and tg:GetCount()>0 then
-			local tc=og:GetFirst()
-			while tc do
-				local e3=Effect.CreateEffect(e:GetHandler())
-				e3:SetType(EFFECT_TYPE_SINGLE)
-				e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_IGNORE_IMMUNE)
-				e3:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
-				e3:SetReset(RESET_EVENT+RESETS_STANDARD)
-				e3:SetValue(LOCATION_DECKBOT)
-				tc:RegisterEffect(e3)
-				tc=og:GetNext()
-			end
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-			local rg=tg:Select(tp,1,1,nil)
-			Duel.SynchroSummon(tp,rg:GetFirst(),nil,og,og:GetCount()-1,og:GetCount()-1)
-		end
-	else
-		local tg=Duel.GetMatchingGroup(c45746037.xyzfilter,tp,LOCATION_EXTRA,0,nil,og)
-		if og:GetCount()==g:GetCount() and tg:GetCount()>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-			local rg=tg:Select(tp,1,1,nil)
-			Duel.XyzSummon(tp,rg:GetFirst(),og,og:GetCount(),og:GetCount())
-		end
-	end
-end
---e2
-function c45746037.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() and e:GetHandler():IsFaceup() end
-	Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_RETURN)
-end
-function c45746037.thfilter(c)
-	return c:IsAbleToHand() and c:IsSetCard(0x5880) and c:IsFaceup()
-end
-function c45746037.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45746037.thfilter,tp,LOCATION_REMOVED,0,1,nil) end
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
-end
-function c45746037.thop(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-	local g=Duel.SelectMatchingCard(tp,c45746037.thfilter,tp,LOCATION_REMOVED,0,1,1,nil)
-	if #g>0 then
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-	end
-end

expansions/script/c45746038.lua

---H×H 绝对时间
-local m = 45746038
-local cm= _G["c"..m]
-function c45746038.initial_effect(c)
-	--Activate(summon)
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_DISABLE+CATEGORY_DESTROY)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_SUMMON_SUCCESS)
-	e1:SetCountLimit(1,m)
-	e1:SetTarget(cm.target2)
-	e1:SetOperation(cm.activate2)
-	c:RegisterEffect(e1)
-	local e3=e1:Clone()
-	e3:SetCode(EVENT_SPSUMMON_SUCCESS)
-	c:RegisterEffect(e3)
-	--Activate(effect)
-end
-function cm.condition2(e,tp,eg,ep,ev,re,r,rp)
-	return re:IsActiveType(TYPE_SPELL+TYPE_TRAP)
-end
-function cm.filter(c,e,tp)
-	return c:IsSetCard(0x880) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
-end
-function cm.target2(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
-	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
-end
-function cm.activate2(e,tp,eg,ep,ev,re,r,rp)
-	local tn=eg:GetFirst()
-	while tn do
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_DISABLE)
-		e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tn:RegisterEffect(e1)
-		local e2=Effect.CreateEffect(e:GetHandler())
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_DISABLE_EFFECT)
-		e2:SetReset(RESET_EVENT+RESETS_STANDARD)
-		tn:RegisterEffect(e2)
-		tn=eg:GetNext()
-	end
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local g=Duel.SelectMatchingCard(tp,cm.filter,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
\ No newline at end of file

expansions/script/c67200050.lua

---创刻-仙崎秀哉
-function c67200050.initial_effect(c)
-	--spsummon
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_HAND)
-	e1:SetCountLimit(1,67200050)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_BATTLE_START+TIMING_END_PHASE)
-	e1:SetCondition(c67200050.spcon)
-	e1:SetTarget(c67200050.sptg)
-	e1:SetOperation(c67200050.spop)
-	c:RegisterEffect(e1)
-	--blood counter
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(67200050,1))
-	e2:SetCategory(CATEGORY_COUNTER)
-	e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
-	e2:SetCode(EVENT_TO_GRAVE)
-	e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
-	e2:SetOperation(c67200050.cop)
-	c:RegisterEffect(e2)	
-end
---
-function c67200050.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()~=tp
-end
-function c67200050.filter1(c,e)
-	return c:IsLocation(LOCATION_HAND) and not c:IsImmuneToEffect(e)
-end
-function c67200050.filter2(c,e,tp,m,f,gc,chkf)
-	return c:IsType(TYPE_FUSION) and c:IsSetCard(0x673) and (not f or f(c))
-		and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,gc,chkf)
-		and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
-end
-function c67200050.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then
-		local chkf=tp
-		local mg1=Duel.GetFusionMaterial(tp):Filter(Card.IsLocation,nil,LOCATION_HAND)
-		local res=Duel.IsExistingMatchingCard(c67200050.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,chkf)
-		if not res then
-			local ce=Duel.GetChainMaterial(tp)
-			if ce~=nil then
-				local fgroup=ce:GetTarget()
-				local mg2=fgroup(ce,e,tp)
-				local mf=ce:GetValue()
-				res=Duel.IsExistingMatchingCard(c67200050.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,c,chkf)
-			end
-		end
-		return res
-	end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function c67200050.spop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local chkf=tp
-	if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) then return end
-	local mg1=Duel.GetFusionMaterial(tp):Filter(c67200050.filter1,nil,e)
-	local sg1=Duel.GetMatchingGroup(c67200050.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,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)
-		local mf=ce:GetValue()
-		sg2=Duel.GetMatchingGroup(c67200050.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,c,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,c,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,c,chkf)
-			local fop=ce:GetOperation()
-			fop(ce,e,tp,tc,mat2)
-		end
-		tc:CompleteProcedure()
-	end
-end
---blood counter
-function c67200050.cfilter(c)
-	return c:IsFaceup() and c:IsType(TYPE_MONSTER) and c:IsCanAddCounter(0x1673,1)
-end
-function c67200050.cop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local g=Duel.GetMatchingGroup(c67200050.cfilter,tp,0,LOCATION_MZONE,nil)
-	local tc=g:GetFirst()
-	while tc do
-		tc:AddCounter(0x1673,1)
-		if tc:IsAttackAbove(300) then
-			local e1=Effect.CreateEffect(c)
-			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_UPDATE_ATTACK)
-			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
-			e1:SetCondition(c67200050.lvcon)
-			e1:SetValue(-300)
-			tc:RegisterEffect(e1)
-		end
-		tc=g:GetNext()
-	end
-end
-function c67200050.lvcon(e)
-	return e:GetHandler():GetCounter(0x1673)>0
-end