22-- Artifact Mjollnir
33local s ,id = GetID ()
44function s .initial_effect (c )
5- -- Set itself to the S/T zone
5+ -- Set itself to the Spell/Trap Zone as a Spell
66 local e1 = Effect .CreateEffect (c )
77 e1 :SetType (EFFECT_TYPE_SINGLE )
88 e1 :SetCode (EFFECT_MONSTER_SSET )
99 e1 :SetValue (TYPE_SPELL )
1010 c :RegisterEffect (e1 )
11- -- Special summon itsel
11+ -- Special Summon this card from the GY
1212 local e2 = Effect .CreateEffect (c )
1313 e2 :SetDescription (aux .Stringid (id ,0 ))
1414 e2 :SetCategory (CATEGORY_SPECIAL_SUMMON )
@@ -18,10 +18,9 @@ function s.initial_effect(c)
1818 e2 :SetTarget (s .sptg1 )
1919 e2 :SetOperation (s .spop1 )
2020 c :RegisterEffect (e2 )
21- -- Special summon a target from the GY
21+ -- Special Summon 1 "Artifact" monster from the GY
2222 local e3 = Effect .CreateEffect (c )
2323 e3 :SetDescription (aux .Stringid (id ,1 ))
24- e3 :SetCategory (CATEGORY_SPECIAL_SUMMON )
2524 e3 :SetType (EFFECT_TYPE_SINGLE + EFFECT_TYPE_TRIGGER_F )
2625 e3 :SetProperty (EFFECT_FLAG_DELAY + EFFECT_FLAG_CARD_TARGET )
2726 e3 :SetCode (EVENT_SPSUMMON_SUCCESS )
@@ -57,27 +56,26 @@ function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
5756 if chk == 0 then return true end
5857 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_SPSUMMON )
5958 local g = Duel .SelectTarget (tp ,s .spfilter ,tp ,LOCATION_GRAVE ,0 ,1 ,1 ,nil ,e ,tp )
60- Duel .SetOperationInfo (0 ,CATEGORY_SPECIAL_SUMMON ,g ,1 ,0 ,0 )
59+ if # g > 0 then
60+ e :SetCategory (CATEGORY_SPECIAL_SUMMON )
61+ Duel .SetOperationInfo (0 ,CATEGORY_SPECIAL_SUMMON ,g ,1 ,tp ,0 )
62+ end
6163end
6264function s .spop2 (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
6365 local tc = Duel .GetFirstTarget ()
6466 if tc and tc :IsRelateToEffect (e ) then
6567 Duel .SpecialSummon (tc ,0 ,tp ,tp ,false ,false ,POS_FACEUP_DEFENSE )
6668 end
69+ -- You cannot Special Summon monsters until the end of the next turn, except "Artifact" monsters
6770 local e1 = Effect .CreateEffect (e :GetHandler ())
71+ e1 :SetDescription (aux .Stringid (id ,2 ))
6872 e1 :SetType (EFFECT_TYPE_FIELD )
6973 e1 :SetCode (EFFECT_CANNOT_SPECIAL_SUMMON )
70- e1 :SetProperty (EFFECT_FLAG_PLAYER_TARGET )
74+ e1 :SetProperty (EFFECT_FLAG_PLAYER_TARGET + EFFECT_FLAG_CLIENT_HINT )
7175 e1 :SetTargetRange (1 ,0 )
7276 e1 :SetTarget (s .splimit )
7377 e1 :SetReset (RESET_PHASE |PHASE_END ,2 )
7478 Duel .RegisterEffect (e1 ,tp )
75- local e2 = Effect .CreateEffect (e :GetHandler ())
76- e2 :SetProperty (EFFECT_FLAG_PLAYER_TARGET + EFFECT_FLAG_CLIENT_HINT + EFFECT_FLAG_OATH )
77- e2 :SetDescription (aux .Stringid (id ,2 ))
78- e2 :SetReset (RESET_PHASE |PHASE_END )
79- e2 :SetTargetRange (1 ,0 )
80- Duel .RegisterEffect (e2 ,tp )
8179end
8280function s .splimit (e ,c )
8381 return not c :IsSetCard (SET_ARTIFACT )
0 commit comments