add 超融合 fix 融合

script/c48130397.lua

+--超融合
+local s,id,o=GetID()
+function s.initial_effect(c)
+	--Activate
+    local e1=FusionSpell.CreateSummonEffect(c,{
+        pre_select_mat_location=LOCATION_ONFIELD,
+        pre_select_mat_opponent_location=LOCATION_ONFIELD,
+        extra_target=s.extra_target
+        })
+	e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
+	e1:SetCost(s.cost)
+	c:RegisterEffect(e1)
+end
+function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
+	Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
+end
+function s.extra_target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
+		Duel.SetChainLimit(aux.FALSE)
+	end
+end