fix

expansions/lflist.conf

@@ -638,47 +638,6 @@
 130006022 0
 130006023 0
 130006024 0
-#Arknight Iflist
-79029326 0 --星熊·飙系列收藏-狩标浪人  额外装备 进墓任意融合
-79029239 1 --企鹅物流·术士干员-莫斯提马·荒时之锁 虽然我不下但是我觉得3还是离谱，干员大削后极有可能进构筑
-79029275 0 --格拉尼·瑟谣浮收藏-西部警长 我觉得不需要解释
-79029912 0 --东国·特种干员-水月 随便玩坏的卡，比r4强在干员本家检索（干员目前难叠r4）
-79029315 1 --萨尔贡·重装干员-森蚺 以前可以做2压制，限一观察
-79029061 1 --龙门·重装干员-星熊 
-79029125 0 --罗德岛·近卫干员-煌
-79029475 0 --萨尔贡·术士干员-卡涅利安 上为限制otk
-79029351 1 --维多利亚·先锋干员-苇草·生灵火花 什么叫全自动啊
-79029465 2 --异格干员-浊心斯卡蒂 单纯超模
-79029453 1 --萨尔贡·术士干员-异客 神の待遇
-79029236 0 --罗德岛·术士干员-天火·天坠之火 一刀4k，带你体验ftk快感
-79029085 0 --深海猎人·近卫干员-幽灵鲨 这就扣掉你的召唤按钮
-79029902 0 --黑钢国际·近卫干员-芙兰卡·B.P.R.S
-79029044 1 --黑钢国际·近卫干员-芙兰卡
-79029051 1 --企鹅物流·狙击干员-能天使 出仨陪你玩
-79029907 1 --米诺斯·近卫干员-帕拉斯 主力炮弹加上赚卡点 限一观察
-79029043 1 --黑钢国际·重装干员-雷蛇
-79029914 0 --雷蛇·瑟谣浮收藏-阴天快乐 炮弹加纪念卡
-79029441 1 --黑钢国际·重装干员-雷蛇·脉冲电弧
-79029153 0 --雷姆必拓·近卫干员-暴行 人形炮台，ftk核心
-79029066 0 --企鹅物流·重装干员-拜松
-79029133 0 --维多利亚·狙击干员-梅 摆烂
-79029109 2 --罗德岛·医疗干员-嘉维尔
-79029129 1 --罗德岛·医疗干员-苏苏洛
-79029045 2 --黑钢国际·狙击干员-杰西卡
-79029046 2 --黑钢国际·先锋干员-香草
-79029466 0 --风笛·啸风收藏-皇后一号（原本限一）
-79029359 0 --罗德岛·近卫干员-阿米娅
-79029032 1 --雷姆必拓·特种干员-暗锁
-79029057 1 --企鹅物流·行动-分头行动
-79029319 1 --个人行动-至高之术
-79029339 0 --个人行动-黄昏 配合屑人诗怀雅可能会是炮台流全新的希望
-79029223 0 --雷姆必拓·据点-重工基地
-79029918 1 --黑钢国际·行动-辑惶
-79029240 0 --黑钢国际·行动-代号·硝烟
-79029440 0 --黑钢国际·行动-代号·集结
-79029362 0 --黑钢国际·行动-任务接收
-79029436 0 --黑钢国际·行动-代号·探秘
-79029042 1 --黑钢国际·行动-目标护送
 #Semi-Wild 1003
 31409200 0
 31409201 0
@@ -789,6 +748,15 @@
 30002065 0
 30010000 0
 30012000 0
+#220227
+10105505 0
+60000087 0
+10105510 0
+10105511 0
+60001081 0
+75122916 0
+33720052 1
+33720061 1
 #220213
 33720036 0
 33720037 0

expansions/script/c29065607.lua

@@ -45,7 +45,7 @@ function c29065607.eqop(e,tp,eg,ep,ev,re,r,rp)
 	e1:SetCode(EFFECT_EQUIP_LIMIT)
 	e1:SetReset(RESET_EVENT+RESETS_STANDARD)
 	e1:SetLabelObject(c)
-	e1:SetValue(c29065605.eqlimit)
+	e1:SetValue(c29065607.eqlimit)
 	tc:RegisterEffect(e1)
 	tc=g:GetNext()
 	end

expansions/script/c33200420.lua

@@ -5,6 +5,7 @@ function c33200420.initial_effect(c)
 	e1:SetDescription(aux.Stringid(33200420,0))
 	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
 	e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e1:SetCode(EVENT_SUMMON_SUCCESS)
 	e1:SetCondition(c33200420.smcon)
 	e1:SetTarget(c33200420.smtg)
@@ -41,12 +42,11 @@ function c33200420.smop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:IsFacedown() and tc:IsRelateToEffect(e) then
 		local e1=Effect.CreateEffect(e:GetHandler())
-		e1:SetDescription(aux.Stringid(33200420,4))
-		e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
 		e1:SetType(EFFECT_TYPE_SINGLE)
 		e1:SetCode(EFFECT_CANNOT_TRIGGER)
 		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
 		tc:RegisterEffect(e1)
+		tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(33200420,4))
 	end
 end
 function c33200420.limit(c)

expansions/script/c33701353.lua

@@ -39,22 +39,23 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,0,0,0)
 end
 function cm.tgfilter(c)
-	return c:IsSetCard(0x442) and c:IsAbleToGrave()
+	return c:IsSetCard(0x442)
 end
 function cm.regop(e,tp)
-	local g=Duel.GetFieldGroup(tp,LOCATION_DECK,0)
+	local g=Duel.GetFieldGroup(tp,LOCATION_DECK,0):Filter(Card.IsAbleToGrave,nil)
 	local g1=Duel.GetMatchingGroup(Card.IsSetCard,tp,LOCATION_GRAVE,0,nil,0x442)
 	if g:GetCount()>0 then
 		Duel.ConfirmCards(1-tp,g)
 		Duel.ConfirmCards(tp,g)
 		if g:GetClassCount(Card.GetCode,nil)==g:GetCount() then
-			if g1:GetCount()==0 and g:Filter(cm.tgfilter,nil):GetClassCount(Card.GetCode,nil)>=7 then
+			g=g:Filter(cm.tgfilter,nil)
+			if g1:GetCount()==0 and g:GetClassCount(Card.GetCode,nil)>=7 then
 				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
-				local sg=g:SelectSubGroup(tp,cm.thfilter,true,7,7)
+				local sg=g:SelectSubGroup(tp,aux.dncheck,true,7,7)
 				Duel.SendtoGrave(sg,REASON_EFFECT)
 			elseif g1:FilterCount(Card.IsAbleToDeck,nil)>0 then
 				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-				local sg=g:FilterSelect(tp,Card.IsAbleToDeck,1,math.min(7,g:GetCount()),nil)
+				local sg=g1:FilterSelect(tp,Card.IsAbleToDeck,1,math.min(7,g:GetCount()),nil)
 				Duel.DisableShuffleCheck()
 				Duel.SendtoDeck(sg,nil,0,REASON_EFFECT)
 				local g2=Duel.GetOperatedGroup()

expansions/script/c33701382.lua

@@ -18,7 +18,7 @@ function cm.initial_effect(c)
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
 	e2:SetCode(EVENT_CHAINING)
-	e2:SetRange(LOCATION_FZONE)
+	e2:SetRange(LOCATION_MZONE)
 	e2:SetCondition(cm.condition)
 	e2:SetOperation(cm.counter)
 	c:RegisterEffect(e2)
@@ -37,7 +37,7 @@ function cm.initial_effect(c)
 end
 function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x40,3,REASON_COST) end
-	c:RemoveCounter(tp,0x40,3,REASON_COST)
+	e:GetHandler():RemoveCounter(tp,0x40,3,REASON_COST)
 end
 function cm.lcheck(g)
 	return g:IsExists(Card.IsSetCard,1,nil,0x442) 

expansions/script/c53718001.lua

@@ -5,45 +5,51 @@ function cm.initial_effect(c)
 	aux.AddCodeList(c,53718001)
 	aux.AddCodeList(c,53718002)
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetTarget(cm.atktg)
-	e1:SetOperation(cm.atkop)
+	e1:SetTarget(cm.stg)
+	e1:SetOperation(cm.sop)
 	c:RegisterEffect(e1)
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,1))
-	e2:SetType(EFFECT_TYPE_ACTIVATE)
-	e2:SetCategory(CATEGORY_RECOVER)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetTarget(cm.rectg)
-	e2:SetOperation(cm.recop)
+	e2:SetDescription(aux.Stringid(m,3))
+	e2:SetCategory(CATEGORY_TOHAND)
+	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+	e2:SetCode(EVENT_PHASE+PHASE_END)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1)
+	e2:SetCost(cm.cost)
+	e2:SetTarget(cm.tg)
+	e2:SetOperation(cm.op)
 	c:RegisterEffect(e2)
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(m,3))
-	e3:SetCategory(CATEGORY_TOHAND)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-	e3:SetCode(EVENT_PHASE+PHASE_END)
-	e3:SetRange(LOCATION_GRAVE)
-	e3:SetCountLimit(1)
-	e3:SetCost(cm.cost)
-	e3:SetTarget(cm.tg)
-	e3:SetOperation(cm.op)
-	c:RegisterEffect(e3)
 end
-function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+function cm.stg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local b=Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil)
+	if chk==0 then return true end
+	local op=0
+	if b then op=Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1))
+	else op=Duel.SelectOption(tp,aux.Stringid(m,1))+1 end
+	e:SetLabel(op)
+	if op==0 then
+		if Duel.GetFlagEffect(tp,m)==0 then e:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE+CATEGORY_SEARCH+CATEGORY_TOHAND) else e:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE) end
+		e:SetProperty(0)
+	else
+		if Duel.GetFlagEffect(tp,m)==0 then e:SetCategory(CATEGORY_RECOVER+CATEGORY_SEARCH+CATEGORY_TOHAND) else e:SetCategory(CATEGORY_RECOVER) end
+		e:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		Duel.SetTargetPlayer(tp)
+		Duel.SetTargetParam(500)
+		Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,500)
+	end
 end
 function cm.thfilter(c)
 	return c:IsCode(m+1) and c:IsAbleToHand()
 end
-function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
+function cm.sop(e,tp,eg,ep,ev,re,r,rp)
+	local res=0
+	if e:GetLabel()==0 then
 		local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
-	local tc=g:GetFirst()
-	while tc do
+		if #g>0 then
+			res=1
+			for tc in aux.Next(g) do
 				local e1=Effect.CreateEffect(e:GetHandler())
 				e1:SetType(EFFECT_TYPE_SINGLE)
 				e1:SetCode(EFFECT_UPDATE_ATTACK)
@@ -53,27 +59,13 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
 				local e2=e1:Clone()
 				e2:SetCode(EFFECT_UPDATE_DEFENSE)
 				tc:RegisterEffect(e2)
-		tc=g:GetNext()
 			end
-	if Duel.GetFlagEffect(tp,m)==0 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
-		Duel.BreakEffect()
-		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
 		end
-end
-function cm.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.SetTargetPlayer(tp)
-	Duel.SetTargetParam(500)
-	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,500)
-end
-function cm.recop(e,tp,eg,ep,ev,re,r,rp)
+	else
 		local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	if Duel.Recover(p,d,REASON_EFFECT)~=0 and Duel.GetFlagEffect(tp,m)==0 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
+		if Duel.Recover(p,d,REASON_EFFECT)~=0 then res=1 end
+	end
+	if res==1 and Duel.GetFlagEffect(tp,m)==0 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
 		Duel.BreakEffect()
 		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
@@ -96,7 +88,5 @@ function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
 end
 function cm.op(e,tp,eg,ep,ev,re,r,rp)
-	if e:GetHandler():IsRelateToEffect(e) then
-		Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
-	end
+	if e:GetHandler():IsRelateToEffect(e) then Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT) end
 end

expansions/script/c53718002.lua

@@ -5,22 +5,11 @@ function cm.initial_effect(c)
 	aux.AddCodeList(c,53718001)
 	aux.AddCodeList(c,53718002)
 	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(m,0))
-	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
 	e1:SetType(EFFECT_TYPE_ACTIVATE)
 	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetTarget(cm.atktg)
-	e1:SetOperation(cm.atkop)
+	e1:SetTarget(cm.stg)
+	e1:SetOperation(cm.sop)
 	c:RegisterEffect(e1)
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,1))
-	e2:SetType(EFFECT_TYPE_ACTIVATE)
-	e2:SetCategory(CATEGORY_RECOVER)
-	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetTarget(cm.damtg)
-	e2:SetOperation(cm.damop)
-	c:RegisterEffect(e2)
 	local e3=Effect.CreateEffect(c)
 	e3:SetDescription(aux.Stringid(m,3))
 	e3:SetCategory(CATEGORY_TOHAND)
@@ -33,17 +22,34 @@ function cm.initial_effect(c)
 	e3:SetOperation(cm.op)
 	c:RegisterEffect(e3)
 end
-function cm.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+function cm.stg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local b=Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil)
+	if chk==0 then return true end
+	local op=0
+	if b then op=Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1))
+	else op=Duel.SelectOption(tp,aux.Stringid(m,1))+1 end
+	e:SetLabel(op)
+	if op==0 then
+		if Duel.GetFlagEffect(tp,m)==0 then e:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE+CATEGORY_SEARCH+CATEGORY_TOHAND) else e:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE) end
+		e:SetProperty(0)
+	else
+		if Duel.GetFlagEffect(tp,m)==0 then e:SetCategory(CATEGORY_DAMAGE+CATEGORY_SEARCH+CATEGORY_TOHAND) else e:SetCategory(CATEGORY_DAMAGE) end
+		e:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		Duel.SetTargetPlayer(1-tp)
+		Duel.SetTargetParam(500)
+		Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,500)
+	end
 end
 function cm.thfilter(c)
 	return c:IsCode(m-1) and c:IsAbleToHand()
 end
-function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
+function cm.sop(e,tp,eg,ep,ev,re,r,rp)
+	local res=0
+	if e:GetLabel()==0 then
 		local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,0,nil)
-	local tc=g:GetFirst()
-	while tc do
+		if #g>0 then
+			res=1
+			for tc in aux.Next(g) do
 				local e1=Effect.CreateEffect(e:GetHandler())
 				e1:SetType(EFFECT_TYPE_SINGLE)
 				e1:SetCode(EFFECT_UPDATE_ATTACK)
@@ -53,27 +59,13 @@ function cm.atkop(e,tp,eg,ep,ev,re,r,rp)
 				local e2=e1:Clone()
 				e2:SetCode(EFFECT_UPDATE_DEFENSE)
 				tc:RegisterEffect(e2)
-		tc=g:GetNext()
 			end
-	if Duel.GetFlagEffect(tp,m)==0 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
-		Duel.BreakEffect()
-		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
-		Duel.SendtoHand(g,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,g)
 		end
-end
-function cm.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
-	Duel.SetTargetPlayer(1-tp)
-	Duel.SetTargetParam(500)
-	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,500)
-end
-function cm.damop(e,tp,eg,ep,ev,re,r,rp)
+	else
 		local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
-	if Duel.Damage(p,d,REASON_EFFECT)~=0 and Duel.GetFlagEffect(tp,m)==0 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
+		if Duel.Damage(p,d,REASON_EFFECT)~=0 then res=1 end
+	end
+	if res==1 and Duel.GetFlagEffect(tp,m)==0 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
 		Duel.BreakEffect()
 		Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
@@ -96,7 +88,5 @@ function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,e:GetHandler(),1,0,0)
 end
 function cm.op(e,tp,eg,ep,ev,re,r,rp)
-	if e:GetHandler():IsRelateToEffect(e) then
-		Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT)
-	end
+	if e:GetHandler():IsRelateToEffect(e) then Duel.SendtoHand(e:GetHandler(),nil,REASON_EFFECT) end
 end

expansions/script/c53718005.lua

@@ -29,7 +29,7 @@ function cm.thfilter(c)
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and cm.thfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
+	if chk==0 then return Duel.IsExistingTarget(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 	local g=Duel.SelectTarget(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)

expansions/script/c53720001.lua

@@ -24,23 +24,6 @@ function cm.initial_effect(c)
 	e2:SetTarget(cm.sptg)
 	e2:SetOperation(cm.spop)
 	c:RegisterEffect(e2)
-	if not cm.global_check then
-		cm.global_check=true
-		local ge1=Effect.CreateEffect(c)
-		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-		ge1:SetCode(EVENT_TO_GRAVE)
-		ge1:SetOperation(cm.checkop)
-		Duel.RegisterEffect(ge1,0)
-	end
-end
-function cm.callback(c)
-	local tp=c:GetPreviousControler()
-	if c:IsRace(RACE_FIEND) and c:IsControler(tp) then
-		c:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD,0,1)
-	end
-end
-function cm.checkop(e,tp,eg,ep,ev,re,r,rp)
-	eg:ForEach(cm.callback)
 end
 function cm.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return not e:GetHandler():IsPublic() end
@@ -69,21 +52,17 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
 	end
 end
 function cm.filter(c,e,tp)
-	return c:GetFlagEffect(m)~=0 and c:IsLocation(LOCATION_GRAVE) and c:IsControler(tp) and bit.band(c:GetReason(),0x41)==0x41 and not c:IsSetCard(0x353e)
-		and c:IsCanBeEffectTarget(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
+	return c:IsLocation(LOCATION_GRAVE) and c:IsControler(tp) and bit.band(c:GetReason(),0x41)==0x41 and not c:IsSetCard(0x353e) and c:IsCanBeEffectTarget(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then
-		local g=eg:Filter(cm.filter,nil,e,tp)
-		e:SetLabelObject(g:GetFirst())
-		return g:GetCount()~=0
-	end
-	Duel.SetTargetCard(e:GetLabelObject())
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetLabelObject(),1,0,0)
+	if chkc then return eg:IsContains(chkc) and cm.filter(chkc,e,tp) end
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and eg:IsExists(cm.filter,1,nil,e,tp) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+	local g=eg:FilterSelect(tp,cm.filter,1,1,nil,e,tp)
+	Duel.SetTargetCard(g)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
-	if tc:IsRelateToEffect(e) then
-		Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
-	end
+	if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) end
 end

expansions/script/c53720002.lua

@@ -46,7 +46,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 		if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)~=0 then
 			Duel.BreakEffect()
 			Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
-			local dg=Duel.SelectMatchingCard(tp,cm.filter1,tp,LOCATION_HAND+LOCATION_MZONE,0,1,2,nil)
+			local dg=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,2,nil)
 			if dg:GetCount()>0 then Duel.Destroy(dg,REASON_EFFECT) end
 		end
 	end

expansions/script/c72410280.lua

@@ -88,7 +88,7 @@ function c72410280.retop(e,tp,eg,ep,ev,re,r,rp)
 end
 --
 function c72410280.filter1(c,e,tp)
-	return c:IsFaceup() and c:IsSetCard(0xa729) and c~=e:GetHandler() and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
+	return c:IsFaceup() and c:IsSetCard(0xa729) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
 end
 function c72410280.spellcon(e,tp,eg,ep,ev,re,r,rp)
 	return e:GetHandler():IsType(TYPE_SPELL) and e:GetHandler():IsType(TYPE_CONTINUOUS)

expansions/strings.conf

@@ -892,3 +892,10 @@
 !setname 0x62a »Æ»èÆïÊ¿ DusKnights
 !setname 0xec1	フレンズ	フレンズ
 !setname 0x9f3e Mec-Desortal(荒仙)
+!setname 0x675 珊海环
+!setname 0x3675 珊海环舰
+!setname 0xcaa 永狱
+!setname 0x5f3f Regrotesque(异再神)
+!setname 0x5329 圣殿剑骑
+!setname 0x3329 魔力联合
+!setname 0xa32a 电子音姬
\ No newline at end of file