@@ -17,6 +17,15 @@ function s.initial_effect(c)
1717 e1 :SetTarget (s .target )
1818 e1 :SetOperation (s .operation )
1919 c :RegisterEffect (e1 )
20+ -- destroy monsters
21+ local e2 = Effect .CreateEffect (c )
22+ e2 :SetType (EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS )
23+ e2 :SetCode (EVENT_CHAIN_END )
24+ e2 :SetRange (LOCATION_MZONE )
25+ e2 :SetLabelObject (e1 )
26+ e2 :SetCondition (s .accon )
27+ e2 :SetOperation (s .acop )
28+ c :RegisterEffect (e2 )
2029end
2130s .named_material = {CARD_GALACTICA_OBLIVION }
2231function s .ffilter (c ,fc ,sumtype ,tp )
@@ -53,9 +62,18 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp)
5362 e1 :SetValue (700 )
5463 e1 :SetReset (RESETS_STANDARD_PHASE_END )
5564 c :RegisterEffect (e1 )
65+ e :SetLabel (1 )
66+ end
67+ function s .cfilter (c )
68+ return (c :GetPreviousPosition ()&POS_FACEDOWN )~= 0 and (c :GetPosition ()&POS_FACEUP )~= 0
69+ end
70+ function s .accon (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
71+ return e :GetLabelObject ():GetLabel ()== 1
72+ end
73+ function s .acop (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
5674 local g2 = Duel .GetMatchingGroup (s .desfilter ,tp ,0 ,LOCATION_MZONE ,nil )
5775 if # g2 > 0 and Duel .SelectYesNo (tp ,aux .Stringid (id ,1 )) then
58- Duel .BreakEffect ()
5976 Duel .Destroy (g2 ,REASON_EFFECT )
6077 end
61- end
78+ e :GetLabelObject ():SetLabel (0 )
79+ end
0 commit comments