@@ -9,15 +9,15 @@ function s.initial_effect(c)
99 e1 :SetHintTiming (0 ,TIMING_END_PHASE )
1010 e1 :SetTarget (s .target )
1111 c :RegisterEffect (e1 )
12- -- effect
12+ -- Activate 1 of these effects, or, if you send "Galaxy-Eyes Photon Dragon", you can activate both, in sequence
1313 local e2 = Effect .CreateEffect (c )
1414 e2 :SetDescription (aux .Stringid (id ,0 ))
1515 e2 :SetCategory (CATEGORY_SPECIAL_SUMMON + CATEGORY_TOHAND + CATEGORY_SEARCH )
1616 e2 :SetType (EFFECT_TYPE_QUICK_O )
1717 e2 :SetCode (EVENT_FREE_CHAIN )
18- e2 :SetCountLimit (1 ,id )
19- e2 :SetHintTiming (0 ,TIMING_END_PHASE )
2018 e2 :SetRange (LOCATION_SZONE )
19+ e2 :SetHintTiming (0 ,TIMING_END_PHASE )
20+ e2 :SetCountLimit (1 ,id )
2121 e2 :SetCost (s .effcost )
2222 e2 :SetTarget (s .efftg )
2323 e2 :SetOperation (s .effop )
@@ -28,14 +28,14 @@ s.listed_names={CARD_GALAXYEYES_P_DRAGON}
2828function s .target (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
2929 if chk == 0 then return true end
3030 local c = e :GetHandler ()
31- -- destroy
31+ -- Send this card to the GY during your 2nd Standby Phase after activation.
3232 local e1 = Effect .CreateEffect (c )
33- e1 :SetDescription (aux .Stringid (12670770 ,1 ))
33+ e1 :SetDescription (aux .Stringid (id ,1 ))
3434 e1 :SetType (EFFECT_TYPE_FIELD + EFFECT_TYPE_CONTINUOUS )
3535 e1 :SetProperty (EFFECT_FLAG_CANNOT_DISABLE )
3636 e1 :SetCode (EVENT_PHASE |PHASE_STANDBY )
37- e1 :SetCountLimit (1 )
3837 e1 :SetRange (LOCATION_SZONE )
38+ e1 :SetCountLimit (1 )
3939 e1 :SetCondition (s .descon )
4040 e1 :SetOperation (s .desop )
4141 e1 :SetReset (RESET_EVENT |RESETS_STANDARD |RESET_PHASE |PHASE_STANDBY |RESET_SELF_TURN ,3 )
@@ -58,22 +58,22 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
5858 ct = ct + 1
5959 c :SetTurnCounter (ct )
6060 if ct == 2 then
61- Duel .Destroy (c ,REASON_EFFECT )
61+ Duel .SendtoGrave (c ,REASON_EFFECT )
6262 end
6363end
6464function s .effcost (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
6565 if chk == 0 then return Duel .GetFlagEffect (tp ,id )== 0 end
6666 Duel .RegisterFlagEffect (tp ,id ,RESETS_STANDARD_PHASE_END ,0 ,1 )
6767end
6868function s .costfilter1 (c ,e ,tp )
69- return c :IsAbleToGraveAsCost () and c :IsFaceup () and ( c :IsSetCard (SET_PHOTON ) or c : IsSetCard ( SET_GALAXY ) ) and Duel .GetMZoneCount (tp ,c )> 0
69+ return c :IsAbleToGraveAsCost () and c :IsFaceup () and c :IsSetCard ({ SET_PHOTON , SET_GALAXY } ) and Duel .GetMZoneCount (tp ,c )> 0
7070 and Duel .IsExistingMatchingCard (s .spfilter1 ,tp ,LOCATION_DECK ,0 ,1 ,nil ,e ,tp ,c :GetOriginalCode ())
7171end
7272function s .spfilter1 (c ,e ,tp ,code )
7373 return c :IsSetCard (SET_PHOTON ) and c :GetOriginalCode ()~= code and c :IsCanBeSpecialSummoned (e ,0 ,tp ,false ,false )
7474end
7575function s .costfilter2 (c )
76- return c :IsFaceup () and ( c :IsSetCard (SET_PHOTON ) or c : IsSetCard ( SET_GALAXY ) ) and c :IsAbleToGraveAsCost ()
76+ return c :IsFaceup () and c :IsSetCard ({ SET_PHOTON , SET_GALAXY } ) and c :IsAbleToGraveAsCost ()
7777end
7878function s .thfilter (c )
7979 return c :IsSetCard (SET_PHOTON ) and not c :IsCode (id ) and c :IsAbleToHand ()
@@ -90,32 +90,28 @@ function s.efftg(e,tp,eg,ep,ev,re,r,rp,chk)
9090 local b1 = Duel .IsExistingMatchingCard (s .costfilter1 ,tp ,LOCATION_MZONE ,0 ,1 ,nil ,e ,tp )
9191 local b2 = Duel .IsExistingMatchingCard (s .costfilter2 ,tp ,LOCATION_MZONE ,0 ,1 ,nil )
9292 and Duel .IsExistingMatchingCard (s .thfilter ,tp ,LOCATION_DECK ,0 ,1 ,nil )
93- if chk == 0 then return b1 or b2 end
9493 local b3 = Duel .IsExistingMatchingCard (s .costfilter3 ,tp ,LOCATION_MZONE ,0 ,1 ,nil ,e ,tp )
95- if b1 and b2 and b3 then
96- op = Duel .SelectOption (tp ,aux .Stringid (id ,1 ),aux .Stringid (id ,2 ),aux .Stringid (id ,3 ))
97- elseif b1 and b2 then
98- op = Duel .SelectOption (tp ,aux .Stringid (id ,1 ),aux .Stringid (id ,2 ))
99- elseif b1 then
100- op = Duel .SelectOption (tp ,aux .Stringid (id ,1 ))
101- else
102- op = Duel .SelectOption (tp ,aux .Stringid (id ,2 ))+ 1
103- end
94+ if chk == 0 then return b1 or b2 end
95+ local op = Duel .SelectEffect (tp ,
96+ {b1 ,aux .Stringid (id ,2 )},
97+ {b2 ,aux .Stringid (id ,3 )},
98+ {b3 ,aux .Stringid (id ,4 )})
99+ e :SetLabel (op )
104100 e :SetLabel (op )
105- if op == 0 then
101+ if op == 1 then
106102 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_TOGRAVE )
107103 local g = Duel .SelectMatchingCard (tp ,s .costfilter1 ,tp ,LOCATION_MZONE ,0 ,1 ,1 ,nil ,e ,tp )
108104 e :SetValue (g :GetFirst ():GetOriginalCode ())
109105 Duel .SendtoGrave (g ,REASON_COST )
110106 e :SetCategory (CATEGORY_SPECIAL_SUMMON )
111107 Duel .SetOperationInfo (0 ,CATEGORY_SPECIAL_SUMMON ,nil ,1 ,tp ,LOCATION_DECK )
112- elseif op == 1 then
108+ elseif op == 2 then
113109 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_TOGRAVE )
114110 local g = Duel .SelectMatchingCard (tp ,s .costfilter2 ,tp ,LOCATION_MZONE ,0 ,1 ,1 ,nil )
115111 Duel .SendtoGrave (g ,REASON_COST )
116112 e :SetCategory (CATEGORY_TOHAND + CATEGORY_SEARCH )
117113 Duel .SetOperationInfo (0 ,CATEGORY_TOHAND ,nil ,1 ,tp ,LOCATION_DECK )
118- else
114+ elseif op == 3 then
119115 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_TOGRAVE )
120116 local g = Duel .SelectMatchingCard (tp ,s .costfilter3 ,tp ,LOCATION_MZONE ,0 ,1 ,1 ,nil ,e ,tp )
121117 e :SetValue (g :GetFirst ():GetOriginalCode ())
@@ -127,21 +123,21 @@ function s.efftg(e,tp,eg,ep,ev,re,r,rp,chk)
127123end
128124function s .effop (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
129125 local op = e :GetLabel ()
130- if op == 0 then
126+ if op == 1 then
131127 if Duel .GetLocationCount (tp ,LOCATION_MZONE )<= 0 then return end
132128 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_SPSUMMON )
133129 local g = Duel .SelectMatchingCard (tp ,s .spfilter1 ,tp ,LOCATION_DECK ,0 ,1 ,1 ,nil ,e ,tp ,e :GetValue ())
134130 if # g > 0 then
135131 Duel .SpecialSummon (g ,0 ,tp ,tp ,false ,false ,POS_FACEUP )
136132 end
137- elseif op == 1 then
133+ elseif op == 2 then
138134 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_ATOHAND )
139135 local g = Duel .SelectMatchingCard (tp ,s .thfilter ,tp ,LOCATION_DECK ,0 ,1 ,1 ,nil )
140136 if # g > 0 then
141137 Duel .SendtoHand (g ,nil ,REASON_EFFECT )
142138 Duel .ConfirmCards (1 - tp ,g )
143139 end
144- else
140+ elseif op == 3 then
145141 if Duel .GetLocationCount (tp ,LOCATION_MZONE )<= 0 then return end
146142 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_SPSUMMON )
147143 local g1 = Duel .SelectMatchingCard (tp ,s .spfilter2 ,tp ,LOCATION_DECK ,0 ,1 ,1 ,nil ,e ,tp ,e :GetValue ())
0 commit comments