fix 古代の進軍

close #2614

c4064925.lua

@@ -36,6 +36,10 @@ function c4064925.initial_effect(c)
 		ge3:SetCode(EVENT_SPSUMMON_SUCCESS)
 		ge3:SetCondition(c4064925.ssetcon)
 		Duel.RegisterEffect(ge3,0)
+		local ge4=ge1:Clone()
+		ge4:SetCode(EVENT_CHANGE_POS)
+		ge4:SetCondition(c4064925.cpcon)
+		Duel.RegisterEffect(ge4,0)	
 	end
 end
 function c4064925.checkop(e,tp,eg,ep,ev,re,r,rp)
@@ -47,6 +51,12 @@ end
 function c4064925.ssetcon(e,tp,eg,ep,ev,re,r,rp)
 	return eg:IsExists(c4064925.cfilter,1,nil)
 end
+function c4064925.cfilter2(c)
+	return c:IsPreviousPosition(POS_FACEUP) and c:IsFacedown()
+end
+function c4064925.cpcon(e,tp,eg,ep,ev,re,r,rp)
+	return eg:IsExists(c4064925.cfilter2,1,nil)
+end
 function c4064925.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetFlagEffect(tp,4064925)==0 end
 	local e1=Effect.CreateEffect(e:GetHandler())
@@ -120,4 +130,4 @@ function c4064925.ntcon(e,c,minc)
 end
 function c4064925.nttg(e,c)
 	return c:IsLevelAbove(5) and (c:IsCode(83104731) or aux.IsCodeListed(c,83104731))
-end
\ No newline at end of file
+end