fix

expansions/script/c11513086.lua

@@ -221,7 +221,7 @@ function c11513086.mnfilter2(c,mc)
 	return math.abs(c:GetLevel()-mc:GetLevel())==4
 end
 function c11513086.fselect(g,tp,sc)
-	return g:GetCount()==2 and g:IsExists(Card.IsSetCard,1,nil,0x1a2) and g:IsExists(c11513086.mnfilter,1,nil,g) and g:GetClassCount(Card.GetLocation)==2
+	return g:GetCount()==2 and g:IsExists(Card.IsSetCard,1,nil,0x1a2) and g:IsExists(c11513086.mnfilter,1,nil,g) 
 end
 function c11513086.target(e,tp,eg,ep,ev,re,r,rp,chk)
 	local g=Duel.GetMatchingGroup(c11513086.tgrfilter,tp,LOCATION_MZONE+LOCATION_HAND,0,nil)

expansions/script/c65133200.lua

@@ -83,13 +83,13 @@ function s.costop(e,tp,eg,ep,ev,re,r,rp)
 	s[0]=true
 	local bool=false
 	--if KOISHI_CHECK then
-	--	local effects={tc:GetCardRegistered(nil,GETEFFECT_INITIAL)} 
-	--	for _,ce in ipairs(effects) do
-	--		if s.issameeffect(te,ce) then
-	--			bool=true
-	--			break
-	--		end
-	--	end
+	--  local effects={tc:GetCardRegistered(nil,GETEFFECT_INITIAL)} 
+	--  for _,ce in ipairs(effects) do
+	--	  if s.issameeffect(te,ce) then
+	--		  bool=true
+	--		  break
+	--	  end
+	--  end
 	--else
 		bool=true
 	--end
@@ -228,6 +228,7 @@ local function GetFunctionSignature(func)
 	return table.concat(t)
 end
 function s.issamefunc(f1,f2,bool)
+	if f1==nil and f2==nil then return true end
 	if aux.GetValueType(f1)~="function" or aux.GetValueType(f2)~= "function" then
 		return false 
 	end
@@ -238,7 +239,7 @@ function s.issamefunc(f1,f2,bool)
 		local d2=string.dump(f2)
 		if d1==d2 then
 			--Debug.Message(f1)
-			--Debug.Message(f2)	  
+			--Debug.Message(f2)   
 			return true
 		elseif bool then
 			f1(e,tp,eg,ep,ev,re,r,rp,1)
@@ -256,10 +257,9 @@ function s.issameeffect(e1,e2)
 	local code1=e1:GetCode()
 	local code2=e2:GetCode()
 	local res1=s.issamefunc(tg,e2:GetTarget())
-	local res2=op==nil or s.issamefunc(op,e2:GetOperation())
+	local res2=s.issamefunc(op,e2:GetOperation())
 	local res3=code1==code2 or code1 and code2 and code1*code2==EVENT_SPSUMMON_SUCCESS*EVENT_SUMMON_SUCCESS
 	--if Duel.GetTurnCount()==2 then tg(e1,tp,eg,ep,ev,re,r,rp,1) end
-	--if Duel.GetTurnCount()==2 then Debug.Message(res1) end
 	return res1 and res2 and res3
 end
 function s.addData(ctable,cdata)

expansions/script/c67201623.lua

@@ -91,6 +91,7 @@ function c67201623.activate(e,tp,eg,ep,ev,re,r,rp)
 			if spct>0 and c:IsRelateToEffect(e) and c:IsCanOverlay() and tc:IsCanOverlay() and Duel.IsExistingMatchingCard(c67201623.matfilter,tp,LOCATION_MZONE,0,1,tc) and Duel.SelectYesNo(tp,aux.Stringid(67201623,2)) then
 				Duel.BreakEffect()
 				c:CancelToGrave()
+				tc:CancelToGrave()
 				local ttc=Duel.SelectMatchingCard(tp,c67201623.matfilter,tp,LOCATION_MZONE,0,1,1,tc):GetFirst()
 				if c:IsRelateToEffect(e) and not ttc:IsImmuneToEffect(e) then
 					local og=tc:GetOverlayGroup()

expansions/script/c71403001.lua

@@ -3,6 +3,7 @@ yume=yume or {}
 if c71403001 then
 ---@param c Card
 function c71403001.initial_effect(c)
+	if yume.import_flag then return	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403001,0))

expansions/script/c71403002.lua

 --气泡方块使 T
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
----@param c Card
 function c71403002.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403003.lua

 --气泡方块使 I
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403003.initial_effect(c)
-	--pendulum summon
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale
 	local ep1=Effect.CreateEffect(c)

expansions/script/c71403004.lua

 --气泡方块使 S
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403004.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403005.lua

 --气泡方块使 Z
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403005.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403006.lua

 --T旋爆裂！
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403006.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403006,0))

expansions/script/c71403008.lua

 --TETRIS！
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403008.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403008,0))

expansions/script/c71403009.lua

 --美学魔术！
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403009.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_ACTIVATE)

expansions/script/c71403010.lua

 --存块！旋转！
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403010.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403014,0))

expansions/script/c71403011.lua

 --气泡方块的星舰舰长 T
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403011.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--xyz summon
 	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsXyzType,TYPE_PENDULUM),4,2,nil,nil,99)
 	c:EnableReviveLimit()

expansions/script/c71403012.lua

 --气泡方块使 J&L
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403012.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403013.lua

 --气泡方块使 O
 ---@param c Card
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 function c71403013.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403014.lua

 --两个人在一起就是最强的！
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403014.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403014,0))

expansions/script/c71403015.lua

 --气泡方块的淘气双子 J&L
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403015.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--xyz summon
 	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsXyzType,TYPE_PENDULUM),4,2,nil,nil,99)
 	c:EnableReviveLimit()

expansions/script/c71403016.lua

 --气泡方块的千金与管家 S&Z
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403016.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--xyz summon
 	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsXyzType,TYPE_PENDULUM),4,2,nil,nil,99)
 	c:EnableReviveLimit()

expansions/script/c71403017.lua

 --我来做你的对手。
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403017.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403014,0))

expansions/script/c71403018.lua

 --魔法气泡连锁！
 local s,id,o=GetID()
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function s.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))

expansions/script/c71403019.lua

 --气泡方块使 林檎
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403019.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403021.lua

 --气泡方块使 亚鲁鲁
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403021.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,true)
 	--scale

expansions/script/c71403022.lua

 --气泡方块的见习法师与搭档 亚鲁鲁·娜嘉&卡邦可
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403022.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--syn summon
 	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_PENDULUM),aux.NonTuner(aux.FilterBoolFunction(Card.IsSynchroType,TYPE_PENDULUM)),1,1)
 	c:EnableReviveLimit()

expansions/script/c71403023.lua

 --L-J幻象！
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function c71403023.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--destroy
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(71403023,0))

expansions/script/c71403024.lua

 --气泡方块的女中学生 安藤林檎
 local s,id,o=GetID()
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 ---@param c Card
 function s.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--syn summon
 	aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_PENDULUM),aux.NonTuner(aux.FilterBoolFunction(Card.IsSynchroType,TYPE_PENDULUM)),1)
 	c:EnableReviveLimit()

expansions/script/c71403025.lua

 --正弦！余弦！正切！
 local s,id,o=GetID()
-if not c71403001 then dofile("expansions/script/c71403001.lua") end
 function s.initial_effect(c)
+	if not (yume and yume.PPT_loaded) then
+		yume=yume or {}
+		yume.import_flag=true
+		c:CopyEffect(71403001,0)
+		yume.import_flag=false
+	end
 	--Activate
 	local e1=Effect.CreateEffect(c)
 	e1:SetDescription(aux.Stringid(id,0))
@@ -20,10 +25,10 @@ function s.filter1tg(c)
 	return c:IsFaceup() and aux.NegateAnyFilter(c)
 end
 function s.filter1(c,e,tp)
-	return c:IsSetCard(0x715) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
+	return c:IsSetCard(0x715) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE)
 end
 function s.filter1a(c)
-	return c:IsSetCard(0x715) and c:IsFaceup()
+	return c:IsSetCard(0x715)
 end
 function s.tg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	local c=e:GetHandler()
@@ -42,7 +47,7 @@ function s.op1(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
 	local g=Duel.SelectMatchingCard(tp,s.filter1,tp,LOCATION_HAND,0,1,1,nil,e,tp)
-	if #g>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)>0 and 
+	if #g>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEDOWN_DEFENSE)>0 and 
 		tc:IsRelateToChain() and tc:IsFaceup() and tc:IsCanBeDisabledByEffect(e) then
 		local c=e:GetHandler()
 		local e1=Effect.CreateEffect(c)
@@ -71,6 +76,8 @@ function s.op1(e,tp,eg,ep,ev,re,r,rp)
 				Duel.BreakEffect()
 				Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 				local sg=dg:Select(tp,1,1,nil)
+				local cg=sg:Filter(Card.IsFacedown,nil)
+				Duel.ConfirmCards(1-tp,cg)
 				Duel.Destroy(sg,REASON_EFFECT)
 			end
 		end