Replace c81902092.lua

expansions/script/c81902092.lua

@@ -6,7 +6,7 @@ cm.TC_number=91
 function cm.initial_effect(c)
 	aux.AddCodeList(c,81902000)
 	--xyz summon
-	aux.AddXyzProcedure(c,nil,5,3,cm.ovfilter,aux.Stringid(m,0))
+	aux.AddXyzProcedure(c,nil,5,3,cm.ovfilter,aux.Stringid(m,0),3,cm.xyzop)
 	c:EnableReviveLimit()
 	--atk
 	local e1=Effect.CreateEffect(c)
@@ -46,6 +46,10 @@ end
 function cm.ovfilter(c)
 	return c:IsFaceup() and c:IsRace(RACE_FAIRY) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_XYZ) and c:IsRank(7)
 end
+function cm.xyzop(e,tp,chk)
+	if chk==0 then return Duel.GetFlagEffect(tp,m)==0 end
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
+end
 --atk up
 function cm.atkval(e,tp)
    local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE)