wd 1005

expansions/lflist.conf

@@ -41,6 +41,22 @@
 130002004 0
 130002005 0
 #WILD, I say WILD, WAHAHA
+17337030 0
+17337940 0
+17337950 0
+17337970 0
+17337980 0
+17337990 0
+17338100 0
+17338130 0
+17338140 0
+17338150 0
+17338160 0
+17338170 0
+17338180 0
+17338190 0
+17338300 0
+17338320 0
 21196500 0
 21196505 0
 21196510 0

expansions/script/c17337400.lua

 --菜月昴
 local s,id=GetID()
 function s.initial_effect(c)
-	-- ①：破坏自己，墓地EMT怪兽特招
+	aux.AddCodeList(c,17337630)
+	--
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(1101)
 	e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)

expansions/script/c17337440.lua

@@ -29,7 +29,6 @@ function s.initial_effect(c)
 	e3:SetType(EFFECT_TYPE_QUICK_O)
 	e3:SetCode(EVENT_CHAINING)
 	e3:SetRange(LOCATION_MZONE)
-	e3:SetCountLimit(1,id+2)
 	e3:SetCondition(s.negcon)
 	e3:SetTarget(s.negtg)
 	e3:SetOperation(s.negop)

expansions/script/c17337450.lua

@@ -11,6 +11,8 @@ function s.initial_effect(c)
 	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
 	e1:SetValue(s.splimit)
 	c:RegisterEffect(e1)
+	--change name
+	aux.EnableChangeCode(c,17337560,LOCATION_MZONE+LOCATION_GRAVE)
 	--lock zones
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,0))

expansions/script/c17337470.lua

 --艾米莉亚
 local s,id=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337510,17337500)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_SPSUMMON_PROC)
@@ -19,13 +20,17 @@ function s.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function s.spfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x5f50,0x9f50) and c:IsType(TYPE_MONSTER)
+	return c:IsFaceup() and c:IsSetCard(0x5f50) and c:IsType(TYPE_MONSTER)
+end
+function s.spfilter2(c)
+	return c:IsFaceup() and c:IsCode(17337500)
 end
 function s.spcon1(e,c)
 	if c==nil then return true end
 	local tp=c:GetControler()
 	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and
-		Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil)
+		(Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil) or 
+		Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil))
 end
 function s.protop(e,tp,eg,ep,ev,re,r,rp)
 	local e1=Effect.CreateEffect(e:GetHandler())

expansions/script/c17337480.lua

 --加菲尔
 local s,id=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337550,17337670)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_SPSUMMON_PROC)

expansions/script/c17337490.lua

@@ -13,6 +13,8 @@ function s.initial_effect(c)
 	e1:SetCondition(s.accon)
 	e1:SetValue(s.aclimit)
 	c:RegisterEffect(e1)
+	--change name
+	aux.EnableChangeCode(c,17337480,LOCATION_MZONE+LOCATION_GRAVE)
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,0))
 	e2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE+CATEGORY_DESTROY)

expansions/script/c17337500.lua

@@ -32,7 +32,7 @@ function s.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function s.spfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x6f50) and c:IsType(TYPE_MONSTER)
+	return c:IsFaceup() and c:IsCode(17337470) and c:IsType(TYPE_MONSTER)
 end
 function s.spcon(e,c)
 	if c==nil then return true end

expansions/script/c17337510.lua

@@ -25,8 +25,8 @@ function s.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function s.descon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.IsExistingMatchingCard(function(c) return c:IsFaceup() and c:IsSetCard(0x6f50) end,tp,LOCATION_MZONE,0,1,nil)
-	   and Duel.IsExistingMatchingCard(function(c) return c:IsFaceup() and c:IsSetCard(0x9f50) end,tp,LOCATION_MZONE,0,1,nil)
+	return Duel.IsExistingMatchingCard(function(c) return c:IsFaceup() and c:IsCode(17337470) end,tp,LOCATION_MZONE,0,1,nil)
+	   and Duel.IsExistingMatchingCard(function(c) return c:IsFaceup() and c:IsCode(17337500) end,tp,LOCATION_MZONE,0,1,nil)
 end
 function s.destg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
@@ -45,7 +45,7 @@ function s.negcon(e,tp,eg,ep,ev,re,r,rp)
 		and Duel.IsExistingMatchingCard(s.negfilter,tp,LOCATION_MZONE,0,1,nil)
 end
 function s.negfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x9f50,0x6f50)
+	return c:IsFaceup() and c:IsCode(17337470,17337500)
 end
 function s.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return true end

expansions/script/c17337520.lua

@@ -12,6 +12,8 @@ function s.initial_effect(c)
 	e0:SetCondition(s.xyzcon)
 	e0:SetValue(1)
 	c:RegisterEffect(e0)
+	--change name
+	aux.EnableChangeCode(c,17337470,LOCATION_MZONE+LOCATION_GRAVE)
 	--
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(1191)
@@ -39,7 +41,7 @@ function s.xyzcon(e)
 	return c:IsStatus(STATUS_SPSUMMON_TURN) and c:IsSummonType(SUMMON_TYPE_XYZ)
 end
 function s.ovfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x6f50)
+	return c:IsFaceup() and c:IsCode(17337470)
 end
 function s.cfilter(c)
 	return c:IsSetCard(0x3f50) and c:IsDiscardable()

expansions/script/c17337530.lua

 --雷姆
 local s,id=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337570)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_SPSUMMON_PROC)
@@ -21,13 +22,17 @@ function s.initial_effect(c)
 	c:RegisterEffect(e2)
 end
 function s.spfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x5f50,0x5f51) and c:IsType(TYPE_MONSTER)
+	return c:IsFaceup() and c:IsSetCard(0x5f50) and c:IsType(TYPE_MONSTER)
+end
+function s.spfilter2(c)
+	return c:IsFaceup() and c:IsCode(17337570)
 end
 function s.spcon(e,c)
 	if c==nil then return true end
 	local tp=c:GetControler()
-	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil)
+	return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and
+		(Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil) or 
+		Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil))
 end
 function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	local c=e:GetHandler()

expansions/script/c17337570.lua

 --拉姆
 local s,id=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337540)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_SPSUMMON_PROC)
@@ -25,7 +26,7 @@ function s.initial_effect(c)
 	c:RegisterEffect(e3)
 end
 function s.spfilter(c)
-	return c:IsFaceup() and c:IsSetCard(0x3f51) and c:IsType(TYPE_MONSTER)
+	return c:IsFaceup() and c:IsCode(17337530) and c:IsType(TYPE_MONSTER)
 end
 function s.spfilter2(c)
 	return c:IsFaceup() and c:IsCode(17337540)
@@ -60,7 +61,7 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
 		local tc=g1:GetFirst()
 		Duel.SendtoHand(tc,nil,REASON_EFFECT)
 		Duel.ConfirmCards(1-tp,tc)
-		if tc:IsLocation(LOCATION_HAND) and (tc:IsSetCard(0x3f51) or tc:IsCode(17337540)) then
+		if tc:IsLocation(LOCATION_HAND) and (tc:IsCode(17337530) or tc:IsCode(17337540)) then
 			local g2=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_GRAVE,0,nil)
 			if #g2>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
 				Duel.BreakEffect()

expansions/script/c17337590.lua

@@ -15,6 +15,8 @@ function s.initial_effect(c)
 	e1:SetOperation(s.spop)
 	e1:SetCountLimit(1,id)
 	c:RegisterEffect(e1)
+	--change name
+	aux.EnableChangeCode(c,17337530,LOCATION_MZONE+LOCATION_GRAVE)
 	--
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c17337600.lua

 --拉姆·鬼化
 local s,id=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337530)
 	-- 超量召唤
 	c:EnableReviveLimit()
 	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x3f50),5,2,nil,nil,99)
@@ -14,6 +15,8 @@ function s.initial_effect(c)
 	e1:SetTarget(s.settg)
 	e1:SetOperation(s.setop)
 	c:RegisterEffect(e1)
+	--change name
+	aux.EnableChangeCode(c,17337570,LOCATION_MZONE+LOCATION_GRAVE)
 	--
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,2))

expansions/script/c17337610.lua

@@ -36,7 +36,7 @@ function s.initial_effect(c)
 end
 function s.indcon(e)
 	local tp=e:GetHandlerPlayer()
-	return Duel.IsExistingMatchingCard(function(c) return c:IsSetCard(0x9f51) and c:IsFaceup() end,tp,LOCATION_MZONE,0,1,nil)
+	return Duel.IsExistingMatchingCard(function(c) return c:IsCode(17337560) and c:IsFaceup() end,tp,LOCATION_MZONE,0,1,nil)
 	and Duel.IsExistingMatchingCard(function(c) return c:IsSetCard(0x5f50) and c:IsFaceup() end,tp,LOCATION_MZONE,0,1,nil)
 end
 function s.indct(e,re,r,rp)

expansions/script/c17337620.lua

@@ -36,7 +36,7 @@ function s.initial_effect(c)
 end
 function s.actcon(e)
 	local tp=e:GetHandlerPlayer()
-	return Duel.IsExistingMatchingCard(function(c) return c:IsSetCard(0x9f51) and c:IsFaceup() end,tp,LOCATION_MZONE,0,1,nil)
+	return Duel.IsExistingMatchingCard(function(c) return c:IsCode(17337560) and c:IsFaceup() end,tp,LOCATION_MZONE,0,1,nil)
 	and Duel.IsExistingMatchingCard(function(c) return c:IsSetCard(0x5f50) and c:IsFaceup() end,tp,LOCATION_MZONE,0,1,nil)
 end
 function s.actlimit(e,re,tp)

expansions/script/c17337660.lua

@@ -38,10 +38,10 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
 	local g=Duel.SelectTarget(tp,s.tgfilter,tp,LOCATION_MZONE,0,1,1,nil,tp)
 	local tc=g:GetFirst()
-	if tc:IsType(TYPE_SYNCHRO) and tc:IsSetCard(0x3f51) then
+	if tc:IsType(TYPE_SYNCHRO) and tc:IsCode(17337530) then
 		Duel.RegisterFlagEffect(tp,id,RESET_PHASE+PHASE_END,0,1)
 		Duel.Hint(HINT_OPSELECTED,1-tp,1113)
-	elseif tc:IsType(TYPE_XYZ) and tc:IsSetCard(0x5f51) then 
+	elseif tc:IsType(TYPE_XYZ) and tc:IsCode(17337570) then 
 		Duel.RegisterFlagEffect(tp,id+1,RESET_PHASE+PHASE_END,0,1)
 		Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,1))
 	end
@@ -49,7 +49,7 @@ end
 function s.activate(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if not tc:IsRelateToEffect(e) or not tc:IsFaceup() then return end
-	if tc:IsType(TYPE_SYNCHRO) and tc:IsSetCard(0x3f51) then
+	if tc:IsType(TYPE_SYNCHRO) and tc:IsCode(17337530) then
 		local atk=tc:GetBaseAttack()
 		local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
 		local dg=Group.CreateGroup()
@@ -67,7 +67,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
 			Duel.BreakEffect()
 			Duel.Destroy(dg,REASON_EFFECT)
 		end
-	elseif tc:IsType(TYPE_XYZ) and tc:IsSetCard(0x5f51) then
+	elseif tc:IsType(TYPE_XYZ) and tc:IsCode(17337570) then
 		local tg=Group.CreateGroup()
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
 		local g1=Duel.SelectMatchingCard(tp,s.ovfilter,tp,0,LOCATION_ONFIELD,1,1,nil)
@@ -92,10 +92,10 @@ function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
 end
 function s.spfilter(c,e,tp)
-	return c:IsSetCard(0x5f51) and c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+	return c:IsCode(17337570) and c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function s.attachfilter(c)
-	return c:IsSetCard(0x3f51) and c:IsType(TYPE_MONSTER) and c:IsCanOverlay()
+	return c:IsCode(17337530) and c:IsType(TYPE_MONSTER) and c:IsCanOverlay()
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end

expansions/script/c17337670.lua

 --芙兰黛莉卡
 local s,id=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337540)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_SPSUMMON_PROC)
@@ -30,7 +31,7 @@ function s.initial_effect(c)
 	c:RegisterEffect(e3)
 end
 function s.spfilter(c)
-	return c:IsSetCard(0x6f51) and c:IsFaceup()
+	return c:IsFaceup() and c:IsCode(17337480)
 end
 function s.spfilter2(c)
 	return c:IsCode(17337540) and c:IsFaceup()

expansions/script/c17337680.lua

@@ -2,12 +2,13 @@
 local s,id=GetID()
 function s.initial_effect(c)
 	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_SPSUMMON_PROC)
-	e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	e1:SetDescription(1118)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND)
 	e1:SetCountLimit(1,id+2)
-	e1:SetCondition(s.spcon)
+	e1:SetCost(s.spcost)
+	e1:SetTarget(s.sptg)
 	e1:SetOperation(s.spop)
 	c:RegisterEffect(e1)
 	--
@@ -34,20 +35,26 @@ function s.initial_effect(c)
 	e4:SetOperation(s.sumop)
 	c:RegisterEffect(e4)
 end
-function s.spcfilter(c)
+function s.cfilter(c)
 	return c:IsSetCard(0x3f50) and not c:IsPublic()
 end
-function s.spcon(e,c)
-	if c==nil then return true end
-	return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
-		and Duel.IsExistingMatchingCard(s.spcfilter,c:GetControler(),LOCATION_HAND,0,1,nil)
-end
-function s.spop(e,tp,eg,ep,ev,re,r,rp,c)
+function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_HAND,0,1,nil) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
-	local g=Duel.SelectMatchingCard(tp,s.spcfilter,tp,LOCATION_HAND,0,1,1,nil)
-	if #g>0 then
-		Duel.ConfirmCards(1-tp,g)
-		Duel.ShuffleHand(tp)
+	local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_HAND,0,1,1,nil)
+	Duel.ConfirmCards(1-tp,g)
+	Duel.ShuffleHand(tp)
+end
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
+end
+function s.spop(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
 function s.setfilter(c)
@@ -66,9 +73,17 @@ end
 function s.sumcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsReleasable() end
 	Duel.Release(e:GetHandler(),REASON_COST)
+	e:SetLabel(1)
 end
 function s.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp) end
+	if chk==0 then 
+		if e:GetLabel()==1 then
+			return Duel.IsPlayerCanSummon(tp) and Duel.IsPlayerCanAdditionalSummon(tp)
+		else
+			return true
+		end
+	end
+	e:SetLabel(0)
 end
 function s.sumop(e,tp,eg,ep,ev,re,r,rp)
 	local e1=Effect.CreateEffect(e:GetHandler())

expansions/script/c17337690.lua

@@ -12,6 +12,8 @@ function s.initial_effect(c)
 	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
 	e0:SetValue(s.splimit)
 	c:RegisterEffect(e0)
+	
+	-- ①效果：确认并除外对方手卡
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
 	e1:SetCategory(CATEGORY_REMOVE)
@@ -22,33 +24,60 @@ function s.initial_effect(c)
 	e1:SetTarget(s.rmtg1)
 	e1:SetOperation(s.rmop1)
 	c:RegisterEffect(e1)
+	
+	-- ②效果：解放自身，对方选择除外手卡或受限制
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,1))
 	e2:SetCategory(CATEGORY_REMOVE)
 	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
+	e2:SetRange(LOCATION_MZONE)  -- 只能在场上发动
 	e2:SetCountLimit(1,id+1)
-	e2:SetCost(aux.bfgcost)
+	e2:SetCost(s.releasecost)  -- 改为解放cost
+	e2:SetTarget(s.handlocktg)
 	e2:SetOperation(s.handlockop)
 	c:RegisterEffect(e2)
+	
+	-- ③效果：结束阶段特殊召唤
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(id,2))
+	e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e3:SetCode(EVENT_PHASE+PHASE_END)
+	e3:SetRange(LOCATION_GRAVE)
+	e3:SetCountLimit(1,id+2)
+	e3:SetCondition(s.spcon)
+	e3:SetTarget(s.sptg)
+	e3:SetOperation(s.spop)
+	c:RegisterEffect(e3)
 end
+
+-- 辅助函数
 function s.matfilter(c)
 	return c:IsFusionType(TYPE_MONSTER) and c:IsFusionSetCard(0x3f50)
 end
+
 function s.splimit(e,se,sp,st)
 	return not e:GetHandler():IsLocation(LOCATION_EXTRA)
 end
+
 function s.emtfilter(c)
 	return c:IsSetCard(0x3f50) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
 end
+
+-- ①效果：cost处理
 function s.rmcost1(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(s.emtfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil) end
 	local g=Duel.SelectMatchingCard(tp,s.emtfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil)
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
 end
+
+-- ①效果：目标确认
 function s.rmtg1(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetFieldGroupCount(1-tp,LOCATION_HAND,0)>0 end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,1-tp,LOCATION_HAND)
 end
+
+-- ①效果：操作执行
 function s.rmop1(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetFieldGroup(1-tp,LOCATION_HAND,0)
 	if #g==0 then return end
@@ -61,6 +90,21 @@ function s.rmop1(e,tp,eg,ep,ev,re,r,rp)
 	end
 	Duel.ShuffleHand(1-tp)
 end
+
+-- ②效果：解放自身作为cost
+function s.releasecost(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
+	if chk==0 then return c:IsReleasable() end
+	Duel.Release(c,REASON_COST)
+end
+
+-- ②效果：目标确认
+function s.handlocktg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,1-tp,LOCATION_HAND)
+end
+
+-- ②效果：操作执行
 function s.handlockop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,1-tp,LOCATION_HAND,0,nil)
 	local check=false
@@ -75,25 +119,51 @@ function s.handlockop(e,tp,eg,ep,ev,re,r,rp)
 	else 
 		check=true
 	end
+	
+	-- 注册特殊召唤标志
+	local c=e:GetHandler()
+	if c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_RELEASE) then
+		c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,2)
+	end
+	
+	-- 处理限制效果
 	if check or #g<=0 then
-		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetDescription(aux.Stringid(id,2))
+		local e1=Effect.CreateEffect(c)
+		e1:SetDescription(aux.Stringid(id,4))  -- 使用新的字符串ID
 		e1:SetType(EFFECT_TYPE_FIELD)
 		e1:SetCode(EFFECT_CANNOT_SUMMON)
 		e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
 		e1:SetTargetRange(0,1)
 		e1:SetTarget(s.handlimit)
-		if Duel.GetTurnPlayer()==tp then
-			e1:SetReset(RESET_PHASE+PHASE_END+RESET_SELF_TURN,2)
-		else
-			e1:SetReset(RESET_PHASE+PHASE_END+RESET_SELF_TURN,1)
-		end
+		e1:SetReset(RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
 		Duel.RegisterEffect(e1,tp)
 		local e2=e1:Clone()
 		e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
 		Duel.RegisterEffect(e2,tp)
 	end
 end
+
 function s.handlimit(e,c)
 	return c:IsLocation(LOCATION_HAND)
+end
+
+-- ③效果：特殊召唤条件
+function s.spcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:GetFlagEffect(id)>0 and Duel.GetTurnPlayer()==tp
+end
+
+-- ③效果：特殊召唤目标
+function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
+		and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
+end
+
+-- ③效果：特殊召唤操作
+function s.spop(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
\ No newline at end of file

expansions/script/c17337710.lua

@@ -3,7 +3,7 @@ local s,id=GetID()
 function s.initial_effect(c)
 	--fusion
 	c:EnableReviveLimit()
-	aux.AddFusionProcCodeFun(c,17337500,aux.FilterBoolFunction(Card.IsFusionSetCard,0x6f50),2,true,true)
+	aux.AddFusionProcCodeFun(c,17337500,aux.FilterBoolFunction(Card.IsFusionCode,17337470),2,true,true)
 	aux.AddContactFusionProcedure(c,Card.IsAbleToRemoveAsCost,LOCATION_ONFIELD+LOCATION_GRAVE,0,Duel.Remove,POS_FACEUP,REASON_COST)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
@@ -12,6 +12,8 @@ function s.initial_effect(c)
 	e0:SetCode(EFFECT_SPSUMMON_CONDITION)
 	e0:SetValue(s.splimit)
 	c:RegisterEffect(e0)
+	--change name
+	aux.EnableChangeCode(c,17337500,LOCATION_MZONE+LOCATION_GRAVE)
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(1113)
 	e1:SetCategory(CATEGORY_ATKCHANGE)
@@ -68,7 +70,7 @@ function s.spcon(e,tp,eg,ep,ev,re,r,rp)
 	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousControler(tp) and c:GetReasonPlayer()==1-tp
 end
 function s.spfilter(c)
-	return c:IsSetCard(0x9f50) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
+	return c:IsCode(17337500) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end

expansions/script/c17337720.lua

 --·琉兹·
 local s,id,o=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337480,17337670)
 	--
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(1108)

expansions/script/c17337730.lua

@@ -63,7 +63,7 @@ function s.e1op(e,tp,eg,ep,ev,re,r,rp)
 	local flag_catch=false
 	local temp=Duel.IsPlayerCanSummon
 	function Duel.IsPlayerCanSummon(tep,stp,stc)
-		if stc:IsAbleToExtraAsCost() then
+		if stc and stc:IsAbleToExtraAsCost() then
 			return false
 		else
 			return temp(tep,stp,stc)

expansions/script/c17337740.lua

@@ -80,10 +80,12 @@ function s.op(e,tp,eg,ep,ev,re,r,rp)
 	local count=e:GetLabel()
 	local d=math.floor(count/3000)
 	for i=1,d do
+		local g2=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_HAND,0,nil)
 		if b1 then Duel.Draw(tp,1,REASON_EFFECT) end
-		if b2 then 
-			local sg=g:RandomSelect(tp,1)
+		if #g2>0 then 
+			local sg=g2:RandomSelect(tp,1)
 			Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
+			g2:Sub(sg)
 		end
 	end	
 end

expansions/script/c17337900.lua

 --·欧德·拉格纳·
 local s,id,o=GetID()
 function s.initial_effect(c)
+	aux.AddCodeList(c,17337760)	
 	--search
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(1190)

expansions/script/c17337920.lua

@@ -163,8 +163,7 @@ function s.sprcon(e,c)
 	local ct2=Duel.GetFlagEffect(tp,17337900)
 	if ct2>0 then 
 		if ct2>3 then ct2=3 end
-		local ct3=0
-		ct3=ct-ct2*3
+		local ct3=ct-ct2*3
 	end
 	local mg1=Duel.GetMatchingGroup(s.spcfilter,tp,0,LOCATION_ONFIELD,nil)
 	local mg2=Duel.GetMatchingGroup(s.spcfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,c)
@@ -176,7 +175,7 @@ function s.sprcon(e,c)
 	if d>9 then d=9 end
 	if d > #mg1 then d = #mg1 end
 	if d + #mg2 < ct then return false end
-	return mg2:CheckSubGroup(s.fselect0,ct,ct,tp,d)
+	return mg2:CheckSubGroup(s.fselect0,ct3,ct3,tp,d)
 end
 function s.sprtg(e,tp,eg,ep,ev,re,r,rp,chk,c)
 	local ct0=10