1+1=3

expansions/script/c81086010.lua

@@ -6,6 +6,8 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,81086006,cm.mfilter,1,true,true)
+	--same effect send this card to grave and spsummon another card check
+	local e0=aux.AddThisCardInGraveAlreadyCheck(c)
 	--
 	local e1=Effect.CreateEffect(c)
 	e1:SetCategory(CATEGORY_TOGRAVE)
@@ -28,6 +30,7 @@ function cm.initial_effect(c)
 	e2:SetCondition(cm.spcon)
 	e2:SetTarget(cm.sptg)
 	e2:SetOperation(cm.spop)
+	e2:SetLabelObject(e0)
 	c:RegisterEffect(e2)
 end
 function cm.mfilter(c)
@@ -52,12 +55,14 @@ function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoGrave(tc,REASON_EFFECT)
 	end
 end
-function cm.cfilter(c,tp)
+function cm.cfilter(c,tp,se)
 	return c:IsType(TYPE_FUSION) and c:IsAttack(1550) and c:IsDefense(1050) and not c:IsCode(m)
 		and c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp)
+		and (se==nil or c:GetReasonEffect()~=se)
 end
 function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
-	return eg:IsExists(cm.cfilter,1,nil,tp) and not eg:IsContains(e:GetHandler())
+	local se=e:GetLabelObject():GetLabelObject()
+	return eg:IsExists(cm.cfilter,1,nil,tp,se) and not eg:IsContains(e:GetHandler())
 end
 function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and aux.NegateEffectMonsterFilter(chkc) end