22-- Elemental HERO Necroshade (Anime)
33local s ,id = GetID ()
44function s .initial_effect (c )
5- -- Normal Summon E・ HERO without Tributing
5+ -- Once while this card is in the GY, you can Normal Summon 1 "Elemental HERO" monster without Tributing
66 local e1 = Effect .CreateEffect (c )
77 e1 :SetDescription (aux .Stringid (id ,0 ))
8- e1 :SetCategory (CATEGORY_SUMMON )
9- e1 :SetType (EFFECT_TYPE_IGNITION )
10- e1 :SetRange (LOCATION_GRAVE )
8+ e1 :SetType (EFFECT_TYPE_FIELD )
119 e1 :SetProperty (EFFECT_FLAG_NO_TURN_RESET )
12- e1 :SetCountLimit (1 )
13- e1 :SetTarget (s .target )
14- e1 :SetOperation (s .operation )
15- c :RegisterEffect (e1 )
16- end
17- s .listed_series = {0x3008 }
18- function s .filter (c ,ec )
19- if not c :IsSetCard (SET_ELEMENTAL_HERO ) or not c :IsSummonableCard () then return false end
20- local e1 = Effect .CreateEffect (ec )
21- e1 :SetProperty (EFFECT_FLAG_UNCOPYABLE )
22- e1 :SetType (EFFECT_TYPE_SINGLE )
2310 e1 :SetCode (EFFECT_SUMMON_PROC )
11+ e1 :SetRange (LOCATION_GRAVE )
12+ e1 :SetTargetRange (LOCATION_HAND ,0 )
13+ e1 :SetCountLimit (1 )
2414 e1 :SetCondition (s .ntcon )
25- e1 :SetReset ( RESET_CHAIN )
15+ e1 :SetTarget ( aux . FieldSummonProcTg ( s . nttg ) )
2616 c :RegisterEffect (e1 )
27- local res = c :IsSummonable (true ,nil )
28- e1 :Reset ()
29- return res
30- end
31- function s .target (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
32- if chk == 0 then return Duel .IsExistingMatchingCard (s .filter ,tp ,LOCATION_HAND ,0 ,1 ,nil ,e :GetHandler ()) end
33- Duel .SetOperationInfo (0 ,CATEGORY_SUMMON ,nil ,1 ,tp ,LOCATION_HAND )
34- end
35- function s .operation (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
36- local c = e :GetHandler ()
37- Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_SUMMON )
38- local tc = Duel .SelectMatchingCard (tp ,s .filter ,tp ,LOCATION_HAND ,0 ,1 ,1 ,nil ,c ):GetFirst ()
39- if tc then
40- local e1 = Effect .CreateEffect (c )
41- e1 :SetProperty (EFFECT_FLAG_UNCOPYABLE )
42- e1 :SetType (EFFECT_TYPE_SINGLE )
43- e1 :SetCode (EFFECT_SUMMON_PROC )
44- e1 :SetCondition (s .ntcon )
45- e1 :SetReset (RESET_EVENT + RESETS_STANDARD + RESET_PHASE + PHASE_END )
46- tc :RegisterEffect (e1 )
47- Duel .Summon (tp ,tc ,true ,nil )
48- end
4917end
18+ s .listed_series = {SET_ELEMENTAL_HERO }
5019function s .ntcon (e ,c ,minc )
5120 if c == nil then return true end
52- return minc == 0 and c :GetLevel ()> 4 and Duel .GetLocationCount (c :GetControler (),LOCATION_MZONE )> 0
53- end
21+ return minc == 0 and Duel .GetLocationCount (c :GetControler (),LOCATION_MZONE )> 0
22+ end
23+ function s .nttg (e ,c )
24+ return c :IsSetCard (SET_ELEMENTAL_HERO )
25+ end
0 commit comments