byd

expansions/script/c50223100.lua

@@ -12,10 +12,11 @@ function c50223100.initial_effect(c)
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_FIELD)
 	e2:SetCode(EFFECT_SPSUMMON_PROC)
-	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
 	e2:SetRange(LOCATION_HAND)
-	e2:SetCondition(c50223100.spcon)
-	e2:SetOperation(c50223100.spop)
+	e2:SetCondition(c50223100.scon)
+	e2:SetTarget(c50223100.stg)
+	e2:SetOperation(c50223100.sop)
 	c:RegisterEffect(e2)
 	--loselp
 	local e3=Effect.CreateEffect(c)
@@ -37,13 +38,27 @@ function c50223100.initial_effect(c)
 	e7:SetOperation(c50223100.tdop)
 	c:RegisterEffect(e7)
 end
-function c50223100.spcon(e,c)
+function c50223100.spfilter(c,tp)
+	return c:IsCode(50218102)
+		and Duel.GetMZoneCount(tp,c)>0 and (c:IsControler(tp) or c:IsFaceup())
+end
+function c50223100.scon(e,c)
 	if c==nil then return true end
-	return Duel.CheckReleaseGroup(REASON_COST,c:GetControler(),Card.IsCode,1,nil,50218102)
+	local tp=c:GetControler()
+	return Duel.CheckReleaseGroupEx(tp,c50223100.spfilter,1,REASON_SPSUMMON,false,nil,tp)
+end
+function c50223100.stg(e,tp,eg,ep,ev,re,r,rp,chk,c)
+	local g=Duel.GetReleaseGroup(tp,false,REASON_SPSUMMON):Filter(c50223100.spfilter,nil,tp)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
+	local tc=g:SelectUnselect(nil,tp,false,true,1,1)
+	if tc then
+		e:SetLabelObject(tc)
+		return true
+	else return false end
 end
-function c50223100.spop(e,tp,eg,ep,ev,re,r,rp,c)
-	local g=Duel.SelectReleaseGroup(REASON_COST,tp,Card.IsCode,1,1,nil,50218102)
-	Duel.Release(g,REASON_COST)
+function c50223100.sop(e,tp,eg,ep,ev,re,r,rp,c)
+	local g=e:GetLabelObject()
+	Duel.Release(g,REASON_SPSUMMON)
 end
 function c50223100.lpcon(e,tp,eg,ep,ev,re,r,rp)
 	return not eg:IsContains(e:GetHandler())

expansions/script/c53752003.lua

@@ -27,11 +27,14 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 end
 function cm.tffilter(c,tp)
-	return c:GetType()&0x20002==0x20002 and c:IsCode(53752015,53752016,53752017) and c:GetActivateEffect():IsActivatable(tp)
+	return c:GetType()&0x20002==0x20002 and c:GetActivateEffect():IsActivatable(tp)
 end
 function cm.actg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.tffilter,tp,LOCATION_DECK,0,1,nil,tp) end
 end
+function cm.tdfilter(c)
+	return c:IsType(TYPE_SPELL+TYPE_TRAP) and (c:IsFacedown() or not c:IsCode(22702055)) and c:IsAbleToDeck()
+end
 function cm.acop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
 	local sc=Duel.SelectMatchingCard(tp,cm.tffilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
@@ -42,6 +45,11 @@ function cm.acop(e,tp,eg,ep,ev,re,r,rp)
 	local cost=te:GetCost()
 	if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
 	Duel.RaiseEvent(sc,73734821,te,0,tp,tp,Duel.GetCurrentChain())
+	local dg=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_ONFIELD,0,nil)
+	if #dg>0 then
+		Duel.BreakEffect()
+		Duel.SendtoDeck(dg,nil,2,REASON_EFFECT)
+	end
 end
 function cm.cfilter(c,tp)
 	return c:IsType(TYPE_MONSTER) and c:IsPreviousLocation(LOCATION_DECK+LOCATION_HAND) and c:IsControler(1-tp)

expansions/script/c53752007.lua

 local m=53752007
 local cm=_G["c"..m]
 cm.name="仇恨之安妮"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)

expansions/script/c53752008.lua

 local m=53752008
 local cm=_G["c"..m]
 cm.name="荣誉之瓦萨"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)

expansions/script/c53752009.lua

 local m=53752009
 local cm=_G["c"..m]
 cm.name="压迫之斯考皮恩"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)

expansions/script/c53752010.lua

 local m=53752010
 local cm=_G["c"..m]
 cm.name="守护之罗斯"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)

expansions/script/c53752011.lua

 local m=53752011
 local cm=_G["c"..m]
 cm.name="庄重之戈登堡"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)

expansions/script/c53752012.lua

 local m=53752012
 local cm=_G["c"..m]
 cm.name="宏伟之泰坦"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetCategory(CATEGORY_DECKDES+CATEGORY_ATKCHANGE)

expansions/script/c53752013.lua

 local m=53752013
 local cm=_G["c"..m]
 cm.name="破灭之阿尔坎"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetCategory(CATEGORY_DECKDES)

expansions/script/c53752014.lua

 local m=53752014
 local cm=_G["c"..m]
 cm.name="无名天际领航者"
-cm.NecroceanSyn=true
---cm.GuyWildCard=true
 if not require and dofile then function require(str) return dofile(str..".lua") end end
-if not pcall(function() require("expansions/script/c53702500") end) then require("script/c53702500") end
+if not pcall(function() require("expansions/script/c53752002") end) then require("script/c53752002") end
 function cm.initial_effect(c)
-	SNNM.NecroceanSynchro(c)
+	Necrocean.AddSynchroMixProcedure(c)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetType(EFFECT_TYPE_QUICK_O)

expansions/script/c53752016.lua

@@ -2,6 +2,8 @@ local m=53752016
 local cm=_G["c"..m]
 cm.name="为离开的再生"
 function cm.initial_effect(c)
+	aux.AddCodeList(c,22702055)
+	aux.EnableChangeCode(c,22702055,LOCATION_SZONE+LOCATION_GRAVE)
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_ACTIVATE)
 	e0:SetCode(EVENT_FREE_CHAIN)
@@ -48,7 +50,9 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 			local c=e:GetHandler()
 			local e1=Effect.CreateEffect(c)
 			e1:SetType(EFFECT_TYPE_SINGLE)
-			e1:SetCode(EFFECT_SYNCHRO_MATERIAL)
+			e1:SetCode(EFFECT_EXTRA_SYNCHRO_MATERIAL)
+			e1:SetOwnerPlayer(tp)
+			e1:SetValue(cm.matval)
 			e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 			tc:RegisterEffect(e1)
 			local e2=Effect.CreateEffect(c)
@@ -74,6 +78,9 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 		end
 	end
 end
+function cm.matval(e,c)
+	return c:IsControler(e:GetOwnerPlayer())
+end
 function cm.descon(e,tp,eg,ep,ev,re,r,rp)
 	local tc=e:GetLabelObject()
 	if tc:GetFlagEffectLabel(m)==e:GetLabel() then

expansions/script/c53752019.lua

+local m=53752019
+local cm=_G["c"..m]
+cm.name="莉莉·林德"
+function cm.initial_effect(c)
+	if not cm.global_check then
+		cm.global_check=true
+		local ge1=Effect.CreateEffect(c)
+		ge1:SetType(EFFECT_TYPE_FIELD)
+		ge1:SetCode(EFFECT_ACTIVATE_COST)
+		ge1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		ge1:SetTargetRange(1,1)
+		ge1:SetTarget(cm.costtg)
+		ge1:SetOperation(cm.costop)
+		Duel.RegisterEffect(ge1,0)
+		local ge3=Effect.CreateEffect(c)
+		ge3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge3:SetCode(EVENT_BE_MATERIAL)
+		ge3:SetCondition(cm.matcon)
+		ge3:SetOperation(cm.matop)
+		Duel.RegisterEffect(ge3,0)
+	end
+end
+function cm.costtg(e,te,tp)
+	local rc=te:GetHandler()
+	return rc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and rc:GetFlagEffect(m)>0
+end
+function cm.costop(e,tp,eg,ep,ev,re,r,rp)
+	local ge1=Effect.CreateEffect(e:GetHandler())
+	ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	ge1:SetCode(EVENT_CHAIN_SOLVING)
+	ge1:SetLabel(Duel.GetCurrentChain()+1)
+	ge1:SetOperation(cm.disop)
+	ge1:SetReset(RESET_CHAIN)
+	Duel.RegisterEffect(ge1,tp)
+end
+function cm.disop(e,tp,eg,ep,ev,re,r,rp)
+	if ev~=e:GetLabel() then return end
+	local dg=Duel.GetMatchingGroup(function(c)return (c:IsFaceup() or not c:IsLocation(LOCATION_ONFIELD)) and c:IsOriginalCodeRule(53752019) and c:IsAbleToGrave()end,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_ONFIELD,0,nil)
+	if Duel.GetFlagEffect(0,m)>0 then
+		local g=Group.CreateGroup()
+		Duel.ChangeTargetCard(ev,g)
+		Duel.ChangeChainOperation(ev,aux.NULL)
+	elseif #dg>0 and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
+		Duel.Hint(HINT_CARD,0,m)
+		local g=Group.CreateGroup()
+		Duel.ChangeTargetCard(ev,g)
+		Duel.ChangeChainOperation(ev,aux.NULL)
+		local sg=dg:Select(tp,1,1,nil)
+		Duel.SendtoGrave(sg,REASON_EFFECT)
+		Duel.RegisterFlagEffect(0,m,RESET_CHAIN,0,1)
+	end
+end
+function cm.cfilter(c,r)
+	return (c:IsLocation(LOCATION_GRAVE) or c:IsLocation(LOCATION_REMOVED) and c:IsFaceup()) and r==REASON_SYNCHRO
+end
+function cm.matcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(cm.cfilter,1,nil,r)
+end
+function cm.matop(e,tp,eg,ep,ev,re,r,rp)
+	local g=eg:Filter(cm.cfilter,nil,r)
+	g:ForEach(Card.RegisterFlagEffect,m,RESET_EVENT+RESETS_STANDARD,0,0)
+end