33-- Scripted by Eerie Code
44local s ,id = GetID ()
55function s .initial_effect (c )
6- -- Special Summon 1 "Elemental HERO" or "Neo-Spacian" monster
6+ -- Special Summon 1 "Elemental HERO" or "Neo-Spacian" monster from your Deck
77 local e1 = Effect .CreateEffect (c )
88 e1 :SetDescription (aux .Stringid (id ,0 ))
99 e1 :SetCategory (CATEGORY_TODECK + CATEGORY_SPECIAL_SUMMON )
@@ -20,20 +20,20 @@ function s.initial_effect(c)
2020 e2 :SetType (EFFECT_TYPE_IGNITION )
2121 e2 :SetRange (LOCATION_GRAVE )
2222 e2 :SetCountLimit (1 ,{id ,1 })
23- e2 :SetCost (aux .bfgcost )
23+ e2 :SetCost (aux .SelfBanishCost )
2424 e2 :SetTarget (s .drtg )
2525 e2 :SetOperation (s .drop )
2626 c :RegisterEffect (e2 )
2727end
2828s .listed_names = {CARD_NEOS }
29- s .listed_series = {0x3008 , 0x1f }
29+ s .listed_series = {SET_ELEMENTAL_HERO , SET_NEO_SPACIAN }
3030function s .tdfilter (c ,e ,tp )
31- return ( c :IsSetCard (0x3008 ) or c : IsSetCard ( 0x1f ) ) and c :IsFaceup ()
31+ return c :IsSetCard ({ SET_ELEMENTAL_HERO , SET_NEO_SPACIAN } ) and c :IsFaceup ()
3232 and c :IsAbleToDeck () and Duel .GetMZoneCount (tp ,c )> 0
3333 and Duel .IsExistingMatchingCard (s .spfilter ,tp ,LOCATION_DECK ,0 ,1 ,nil ,e ,tp ,c :GetCode ())
3434end
3535function s .spfilter (c ,e ,tp ,code )
36- return ( c :IsSetCard (0x3008 ) or c : IsSetCard ( 0x1f ) ) and not c :IsCode (code )
36+ return c :IsSetCard ({ SET_ELEMENTAL_HERO , SET_NEO_SPACIAN } ) and not c :IsCode (code )
3737 and c :IsCanBeSpecialSummoned (e ,0 ,tp ,false ,false )
3838end
3939function s .target (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
@@ -47,17 +47,17 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
4747 if not tc then return end
4848 Duel .HintSelection (tc ,true )
4949 local code = tc :GetCode ()
50- if Duel .SendtoDeck (tc ,nil ,SEQ_DECKSHUFFLE ,REASON_EFFECT )> 0 and tc :IsLocation (LOCATION_DECK + LOCATION_EXTRA ) then
50+ if Duel .SendtoDeck (tc ,nil ,SEQ_DECKSHUFFLE ,REASON_EFFECT )> 0 and tc :IsLocation (LOCATION_DECK | LOCATION_EXTRA ) then
5151 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_SPSUMMON )
5252 local g = Duel .SelectMatchingCard (tp ,s .spfilter ,tp ,LOCATION_DECK ,0 ,1 ,1 ,nil ,e ,tp ,code )
5353 Duel .SpecialSummon (g ,0 ,tp ,tp ,false ,false ,POS_FACEUP )
5454 end
5555end
5656function s .tdfilter2 (c )
57- return (c :IsSetCard (0x3008 ) or c :IsSetCard (0x1f )) and c :IsMonster () and c :IsAbleToDeck ()
57+ return (c :IsSetCard (SET_ELEMENTAL_HERO ) or c :IsSetCard (SET_NEO_SPACIAN )) and c :IsMonster () and c :IsAbleToDeck ()
5858end
5959function s .resfilter (c ,sg )
60- return c :IsSetCard (0x3008 ) and sg :IsExists (Card .IsSetCard ,1 ,c ,0x1f )
60+ return c :IsSetCard (SET_ELEMENTAL_HERO ) and sg :IsExists (Card .IsSetCard ,1 ,c ,SET_NEO_SPACIAN )
6161end
6262function s .rescon (sg ,e ,tp )
6363 return (# sg == 1 and sg :IsExists (Card .IsCode ,1 ,nil ,CARD_NEOS )) or sg :IsExists (s .resfilter ,1 ,nil ,sg )
@@ -70,7 +70,7 @@ function s.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
7070end
7171function s .drop (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
7272 local g = Duel .GetMatchingGroup (s .tdfilter2 ,tp ,LOCATION_GRAVE ,0 ,nil )
73- local sg = aux .SelectUnselectGroup (g ,e ,tp ,1 ,2 ,s .rescon ,1 ,tp ,HINTMSG_DISCARD ,s .rescon )
73+ local sg = aux .SelectUnselectGroup (g ,e ,tp ,1 ,2 ,s .rescon ,1 ,tp ,HINTMSG_TODECK ,s .rescon )
7474 if # sg == 0 then return end
7575 Duel .HintSelection (sg ,true )
7676 if Duel .SendtoDeck (sg ,nil ,SEQ_DECKSHUFFLE ,REASON_EFFECT )==# sg then
0 commit comments