Update c4239451.lua

c4239451.lua

 --EMヒックリカエル
 function c4239451.initial_effect(c)
 	--pendulum summon
-	aux.AddPendulumProcedure(c)
-	--Activate
+	aux.EnablePendulumAttribute(c)
+	--swap1
 	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetDescription(aux.Stringid(4239451,0))
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_PZONE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCountLimit(1)
+	e1:SetTarget(c4239451.adtg1)
+	e1:SetOperation(c4239451.adop1)
 	c:RegisterEffect(e1)
-	--swap1
+	--swap2
 	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(4239451,0))
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_PZONE)
+	e2:SetDescription(aux.Stringid(4239451,1))
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetRange(LOCATION_MZONE)
 	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e2:SetCountLimit(1)
-	e2:SetTarget(c4239451.adtg1)
-	e2:SetOperation(c4239451.adop1)
+	e2:SetCondition(c4239451.adcon2)
+	e2:SetTarget(c4239451.adtg2)
+	e2:SetOperation(c4239451.adop2)
 	c:RegisterEffect(e2)
-	--swap2
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(4239451,1))
-	e3:SetType(EFFECT_TYPE_QUICK_O)
-	e3:SetCode(EVENT_FREE_CHAIN)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e3:SetCountLimit(1)
-	e3:SetCondition(c4239451.adcon2)
-	e3:SetTarget(c4239451.adtg2)
-	e3:SetOperation(c4239451.adop2)
-	c:RegisterEffect(e3)
 end
 function c4239451.filter(c)
 	return c:IsFaceup()