eme

expansions/script/c45745917.lua

@@ -2,7 +2,7 @@
 function c45745917.initial_effect(c)
 	--synchro summon
 	c:EnableReviveLimit()
-	aux.AddSynchroMixProcedure(c,c45745917.matfilter1,nil,nil,c45745917.matfilter2,1,99)
+	aux.AddSynchroMixProcedure(c,c45745917.matfilter1,nil,nil,aux.NonTuner(Card.IsType,TYPE_SYNCHRO),1,99)
 
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_SINGLE)
@@ -11,7 +11,7 @@ function c45745917.initial_effect(c)
 	c:RegisterEffect(e1)
 
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(m,0))
+	e2:SetDescription(aux.Stringid(45745917,0))
 	e2:SetCategory(CATEGORY_TOHAND)
 	e2:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
 	e2:SetProperty(EFFECT_FLAG_DELAY)
@@ -21,7 +21,7 @@ function c45745917.initial_effect(c)
 	c:RegisterEffect(e2)
 	local e3=e2:Clone()
 	e3:SetCode(EVENT_MOVE)
-	e3:SetCondition(srprzm.thcon)
+	e3:SetCondition(c45745917.thcon)
 	c:RegisterEffect(e3)
 
 	local e4=Effect.CreateEffect(c)
@@ -31,18 +31,16 @@ function c45745917.initial_effect(c)
 	e4:SetCode(EVENT_CHAINING)
 	e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
 	e4:SetRange(LOCATION_MZONE)
-	e4:SetCountLimit(1,45745917)
+	e4:SetCountLimit(1)
 	e4:SetCondition(c45745917.negcon)
 	e4:SetTarget(c45745917.negtg)
 	e4:SetOperation(c45745917.negop)
 	c:RegisterEffect(e4)
 
 end
+
 function c45745917.matfilter1(c)
-	return (c:IsSynchroType(TYPE_TUNER) and c:IsSetCard(0x881)) or c:IsSetCard(0x881)
-end
-function c45745917.matfilter2(c)
-	return c:IsType(TYPE_SYNCHRO) and c:IsSetCard(0x881) and not c:IsSynchroType(TYPE_TUNER)
+	return c:IsType(TYPE_TUNER) or c:IsSetCard(0x881) 
 end
 --e1
 function c45745917.cost1(e,c,tp,st)
@@ -54,7 +52,7 @@ function c45745917.thfilter(c)
 	return c:IsAbleToHand()
 end
 function c45745917.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c45745917.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
+	if chk==0 then return Duel.IsExistingMatchingCard(c45745917.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
 	local g=Duel.GetMatchingGroup(c45745917.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
 	Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
 end
@@ -67,6 +65,10 @@ function c45745917.thop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 	end
 end
+function c45745917.thcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsLocation(LOCATION_MZONE) and c:IsPreviousLocation(LOCATION_REMOVED) and not c:IsReason(REASON_SPSUMMON)
+end
 --e4
 function c45745917.negcon(e,tp,eg,ep,ev,re,r,rp)
 	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and rp==1-tp