fix

expansions/script/c21070004.lua

@@ -45,6 +45,14 @@ function c21070004.initial_effect(c)
 	e7:SetTarget(aux.TargetBoolFunction(Card.IsCode,21070001))
 	e7:SetValue(100)
 	c:RegisterEffect(e7)
+	local e71=Effect.CreateEffect(c)
+	e71:SetType(EFFECT_TYPE_FIELD)
+	e71:SetCode(EFFECT_UPDATE_ATTACK)
+	e71:SetRange(LOCATION_SZONE)
+	e71:SetTargetRange(LOCATION_MZONE,0)
+	e71:SetTarget(not(aux.TargetBoolFunction(Card.IsCode,21070001)))
+	e71:SetValue(-700)
+	c:RegisterEffect(e7)
 	local e8=Effect.CreateEffect(c)
 	e8:SetType(EFFECT_TYPE_FIELD)
 	e8:SetCode(EFFECT_EXTRA_ATTACK)

expansions/script/c91060003.lua

@@ -2,11 +2,11 @@
 local m=91060003
 local cm=c91060003
 function c91060003.initial_effect(c)
-	aux.EnableChangeCode(c,95440946,LOCATION_MZONE+LOCATION_GRAVE)
+	aux.EnableChangeCode(c,95440946,LOCATION_MZONE)
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_IGNITION)
 	e1:SetRange(LOCATION_HAND)
-	e1:SetProperty(EFFECT_FLAG_DELAY)
+	e1:SetProperty(EFFECT_FLAG_DELAY) 
 	e1:SetCountLimit(1,m)
 	e1:SetCost(cm.cost)
 	e1:SetTarget(cm.sstg)
@@ -70,7 +70,21 @@ if chk==0 then return  c:IsAbleToHand()  end
 end
 function cm.spop(e,tp,eg,ep,ev,re,r,rp)
 local c=e:GetHandler()
-if c:IsRelateToEffect(e) and Duel.SendtoHand(c,nil,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_HAND) and Duel.SelectYesNo(tp,aux.Stringid(91060003,0))then
+if c:IsRelateToEffect(e) and Duel.SendtoHand(c,nil,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_HAND) 
+	then  local chkf=tp
+		local mg1=Duel.GetFusionMaterial(tp)
+		local res=Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
+		if not res then
+			local ce=Duel.GetChainMaterial(tp)
+			if ce~=nil then
+				local fgroup=ce:GetTarget()
+				local mg2=fgroup(ce,e,tp)
+				local mf=ce:GetValue()
+				res=Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
+			end
+		end 
+	if not res then return end
+	if Duel.SelectYesNo(tp,aux.Stringid(91060003,0)) then
 	local chkf=tp
 	local mg1=Duel.GetFusionMaterial(tp):Filter(cm.filter1,nil,e)
 	local sg1=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
@@ -95,13 +109,14 @@ if c:IsRelateToEffect(e) and Duel.SendtoHand(c,nil,REASON_EFFECT)~=0 and c:IsLoc
 			Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
 			Duel.BreakEffect()
 		 if Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP) then
-			local e4=Effect.CreateEffect(c)
+			local e4=Effect.CreateEffect(tc)
 			e4:SetType(EFFECT_TYPE_SINGLE)
-			e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
 			e4:SetRange(LOCATION_MZONE)
 			e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+			e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 			e4:SetValue(aux.tgoval)
-			c:RegisterEffect(e4)
+			e4:SetReset(RESET_EVENT+RESETS_STANDARD)
+			tc:RegisterEffect(e4)
 		 end   
 		else
 			local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,nil,chkf)
@@ -109,6 +124,7 @@ if c:IsRelateToEffect(e) and Duel.SendtoHand(c,nil,REASON_EFFECT)~=0 and c:IsLoc
 			fop(ce,e,tp,tc,mat2)
 		end
 		tc:CompleteProcedure()
+		end
 	end
   end
 end