fix

expansions/lflist.conf

@@ -2229,7 +2229,7 @@
 33701522 0 #什么是竞技性较弱……？
 40010146 0
 53752007 0
-11451745 1
+11451783 1
 #240114
 130006040 0
 130006045 0

expansions/script/c11451745.lua

---烬羽的残迹·珍妮丽丝
-local cm,m=GetID()
-function cm.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddLinkProcedure(c,cm.matfilter,2,2)
-	--effect
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCondition(cm.condition)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.matfilter(c)
-	return c:IsLinkRace(RACE_FAIRY)
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	for i=1,Duel.GetCurrentChain() do
-		local tgp=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_PLAYER)
-		if tgp~=tp then return true end
-	end
-	return false
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	for i=1,Duel.GetCurrentChain() do
-		local tgp,te,cid=Duel.GetChainInfo(i,CHAININFO_TRIGGERING_PLAYER,CHAININFO_TRIGGERING_EFFECT,CHAININFO_CHAIN_ID)
-		if tgp~=tp then
-			local op=te:GetOperation()
-			te:SetOperation(cm.repop(op,cid))
-			local e1=Effect.CreateEffect(e:GetHandler())
-			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-			e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-			e1:SetCode(EVENT_CHAIN_SOLVED)
-			e1:SetCountLimit(1)
-			e1:SetLabel(i)
-			e1:SetCondition(function(e,tp,eg,ep,ev,re,r,rp) return ev==e:GetLabel() end)
-			e1:SetOperation(function(e,tp,eg,ep,ev,re,r,rp) re:SetOperation(op) end)
-			e1:SetReset(RESET_CHAIN)
-			Duel.RegisterEffect(e1,tp)
-			local e2=e1:Clone()
-			e2:SetCode(EVENT_CHAIN_NEGATED)
-			Duel.RegisterEffect(e2,tp)
-			--[[local e1=Effect.CreateEffect(e:GetHandler())
-			e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-			e1:SetCode(EVENT_CHAIN_SOLVING)
-			e1:SetOperation(cm.ngop)
-			e1:SetReset(RESET_CHAIN)
-			e1:SetLabel(i)
-			Duel.RegisterEffect(e1,tp)--]]
-		end
-	end
-end
-function cm.ngop(e,tp,eg,ep,ev,re,r,rp)
-	if ev==e:GetLabel() and Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)<Duel.GetFieldGroupCount(tp,0,LOCATION_HAND) then 
-		Duel.ChangeChainOperation(0,cm.repop(re:GetOperation()))
-	end
-end
-function cm.repop(_op,cid)
-	return function(e,tp,eg,ep,ev,re,r,rp)
-				e:SetOperation(_op)
-				local cid2=Duel.GetChainInfo(0,CHAININFO_CHAIN_ID)
-				if cid==cid2 and Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)>Duel.GetFieldGroupCount(tp,0,LOCATION_HAND) then return end
-				_op(e,tp,eg,ep,ev,re,r,rp)
-			end
-end
\ No newline at end of file

expansions/script/c11451746.lua

---烬羽的祈梦·琼诺贝兹
-local m=11451746
-local cm=_G["c"..m]
-function cm.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_DARK),4,2)
-	--effect
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e1:SetCode(EVENT_TO_HAND)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCondition(cm.condition)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.cfilter(c,tp)
-	return c:IsControler(tp)
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(cm.cfilter,1,nil,1-tp)
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return c:IsType(TYPE_XYZ) and c:GetOverlayCount()<2 end
-	Duel.SetTargetCard(eg)
-end
-function cm.filter(c,e,tp)
-	return c:IsRelateToEffect(e) and cm.cfilter(c,tp)
-end
-function cm.rmfilter(c,g)
-	return c:IsAbleToRemove() and g:IsExists(Card.IsCode,1,nil,c:GetCode())
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local dg=eg:Filter(cm.filter,nil,e,1-tp)
-	if #dg>0 and c:IsRelateToEffect(e) and c:IsType(TYPE_XYZ) and c:GetOverlayCount()<2 then
-		local ct=math.min(2-c:GetOverlayCount(),#dg)
-		local tg=dg:Select(1-tp,ct,ct,nil)
-		Duel.Overlay(c,tg)
-		Duel.ShuffleHand(1-tp)
-	end
-end
\ No newline at end of file

expansions/script/c11451747.lua

---烬羽的逐焰·瑾维尼拉
-local cm,m=GetID()
-function cm.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1,1)
-	--effect
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_TOHAND)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
-	e1:SetCountLimit(1)
-	e1:SetCondition(cm.condition)
-	e1:SetTarget(cm.target)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
-end
-function cm.filter(c,e)
-	return c:IsAbleToHand() and c:IsCanBeEffectTarget(e)
-end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return false end
-	local g1=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_ONFIELD,nil,e)
-	local g2=Duel.GetMatchingGroup(cm.filter,tp,0,LOCATION_GRAVE,nil,e)
-	if chk==0 then return #g1>0 and #g2>0 end
-	local mac=1
-	if #g1>=2 and #g2>=2 then mac=2 end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
-	local g1=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_ONFIELD,1,mac,nil)
-	local g2=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_GRAVE,#g1,#g1,nil)
-	g1:Merge(g2)
-	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g1,#g1,0,0)
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-	local tg=g:Filter(Card.IsRelateToEffect,nil,e)
-	if #tg>0 then
-		Duel.SendtoHand(tg,nil,REASON_EFFECT)
-	end
-end
\ No newline at end of file

expansions/script/c11451748.lua

---烬羽的悲响·珞克莉尔
-local cm,m=GetID()
-function cm.initial_effect(c)
-	--link summon
-	c:EnableReviveLimit()
-	aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsRace,RACE_FAIRY),aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_DARK),true)
-	--effect
-	local e1=Effect.CreateEffect(c)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCondition(cm.condition)
-	e1:SetCost(cm.cost)
-	e1:SetOperation(cm.operation)
-	c:RegisterEffect(e1)
-end
-function cm.condition(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
-end
-function cm.kfilter(c)
-	return c:IsFaceup() and c:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA)
-end
-function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	local c=e:GetHandler()
-	if chk==0 then return Duel.CheckReleaseGroup(tp,nil,1,c) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
-	local g=Duel.SelectReleaseGroup(tp,nil,1,2,c)
-	Duel.Release(g,REASON_COST)
-	g=g:Filter(cm.kfilter,nil)
-	g:ForEach(Card.RegisterFlagEffect,m,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,0))
-	g:KeepAlive()
-	e:SetLabelObject(g)
-end
-function cm.operation(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local g=e:GetLabelObject()
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e1:SetCode(EVENT_CHAIN_SOLVED)
-	e1:SetLabelObject(g)
-	e1:SetCondition(cm.retcon)
-	e1:SetOperation(cm.retop)
-	e1:SetReset(RESET_CHAIN)
-	Duel.RegisterEffect(e1,tp)
-	local e2=e1:Clone()
-	e2:SetCode(EVENT_CHAIN_NEGATED)
-	Duel.RegisterEffect(e2,tp)
-end
-function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCurrentChain()==1
-end
-function cm.retop(e,tp,eg,ep,ev,re,r,rp)
-	local g=e:GetLabelObject()
-	if not g or aux.GetValueType(g)~="Group" then return end
-	local tg=g:Filter(aux.NecroValleyFilter(cm.spfilter),nil,e,tp)
-	local tg1=tg:Filter(Card.IsLocation,nil,LOCATION_GRAVE+LOCATION_REMOVED)
-	local tg2=tg:Filter(Card.IsLocation,nil,LOCATION_EXTRA)
-	local ft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
-	local ft2=Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_PENDULUM)
-	local ft=Duel.GetUsableMZoneCount(tp)
-	g:DeleteGroup()
-	if ft<=0 or #tg==0 then return end
-	local ect=c29724053 and Duel.IsPlayerAffectedByEffect(tp,29724053) and c29724053[tp]
-	if ect and ect<ft2 then ft2=ect end
-	if Duel.IsPlayerAffectedByEffect(tp,59822133) then
-		if ft1>0 then ft1=1 end
-		if ft2>0 then ft2=1 end
-		ft=1
-	end
-	if ft1<#tg1 then
-		if ft1>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-			tg1=tg1:Select(tp,ft1,ft1,nil)
-		else
-			tg1:Clear()
-		end
-	end
-	if ft2<#tg2 then
-		if ft2>0 then
-			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-			tg2=tg2:Select(tp,ft2,ft2,nil)
-		else
-			tg2:Clear()
-		end
-	end
-	tg=tg1+tg2
-	if ft<#tg then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		tg=tg:Select(tp,ft,ft,nil)
-	end
-	Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
-end
-function cm.spfilter(c,e,tp)
-	return c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:GetFlagEffect(m)>0
-end
\ No newline at end of file

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/c60002432.lua

@@ -124,11 +124,11 @@ end
 function cm.filter(c)
 	return c:IsLevel(9) and c:IsRace(RACE_FAIRY) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
 	if g:GetCount()>0 then

expansions/script/c60002433.lua

@@ -22,7 +22,7 @@ function cm.initial_effect(c)
 	c:RegisterEffect(e3)
 	--special summon
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(57835716,0))
+	e1:SetDescription(aux.Stringid(m,0))
 	e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_GRAVE)
@@ -124,11 +124,11 @@ end
 function cm.filter(c)
 	return c:IsLevel(9) and c:IsRace(RACE_FIEND) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
 end
-function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil) end
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
 end
-function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK,0,1,1,nil)
 	if g:GetCount()>0 then

expansions/script/c98920093.lua

@@ -42,13 +42,13 @@ function c98920093.hspcon(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.CheckReleaseGroup(tp,c98920093.hspfilter,1,nil,ft,tp)
+	return ft>-1 and Duel.CheckReleaseGroupEx(tp,c98920093.hspfilter,1,REASON_SPSUMMON,false,nil,tp)
 end
 function c98920093.hspop(e,tp,eg,ep,ev,re,r,rp,c)
 	local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
 	local g=Duel.SelectReleaseGroup(tp,c98920093.hspfilter,1,1,nil,ft,tp)
 	Duel.Release(g,REASON_COST)
-	c:RegisterFlagEffect(0,RESET_EVENT+0x4fc0000,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(98920093,2))
+	c:RegisterFlagEffect(0,RESET_EVENT+0x4fc98920093,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(98920093,2))
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
 	e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)

expansions/script/c98920530.lua

@@ -22,7 +22,7 @@ function c98920530.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	e:SetLabelObject(g:GetFirst())
 end
 function c98920530.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
+	if chk==0 then return e:IsCostChecked() end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
 end
 function c98920530.activate(e,tp,eg,ep,ev,re,r,rp)

expansions/script/c98920542.lua

@@ -23,6 +23,7 @@ function c98920542.initial_effect(c)
 	e4:SetOperation(c98920542.tnop)
 	c:RegisterEffect(e4)
 end
+c98920542.treat_itself_tuner=true
 function c98920542.spfilter(c,e,tp)
 	return c:IsRace(RACE_FISH) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
 end