1- -- Cyber Petit Angel
1+ -- サイバー・プチ・エンジェル (Anime)
2+ -- Cyber Petit Angel (Anime)
23local s ,id = GetID ()
34function s .initial_effect (c )
4- -- search
5+ -- When this card is Normal or Flip Summoned: Add 1 "Machine Angel Ritual" from your Deck to your hand.
56 local e1 = Effect .CreateEffect (c )
67 e1 :SetDescription (aux .Stringid (id ,0 ))
78 e1 :SetCategory (CATEGORY_TOHAND + CATEGORY_SEARCH )
8- e1 :SetType (EFFECT_TYPE_TRIGGER_O + EFFECT_TYPE_SINGLE )
9+ e1 :SetType (EFFECT_TYPE_SINGLE + EFFECT_TYPE_TRIGGER_F )
910 e1 :SetCode (EVENT_SUMMON_SUCCESS )
10- e1 :SetTarget (s .tg )
11- e1 :SetOperation (s .op )
11+ e1 :SetTarget (s .thtg )
12+ e1 :SetOperation (s .thop )
1213 c :RegisterEffect (e1 )
1314 local e2 = e1 :Clone ()
14- e2 :SetCode (EVENT_SPSUMMON_SUCCESS )
15+ e2 :SetCode (EVENT_FLIP_SUMMON_SUCCESS )
1516 c :RegisterEffect (e2 )
16- local e3 = e1 :Clone ()
17- e3 :SetCode (EVENT_FLIP_SUMMON_SUCCESS )
18- c :RegisterEffect (e3 )
1917end
20- s .listed_names = {39996157 }
21- function s .filter (c )
18+ s .listed_names = {39996157 } -- "Machine Angel Ritual"
19+ function s .thfilter (c )
2220 return c :IsCode (39996157 ) and c :IsAbleToHand ()
2321end
24- function s .tg (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
25- if chk == 0 then return Duel . IsExistingMatchingCard ( s . filter , tp , LOCATION_DECK , 0 , 1 , nil ) end
22+ function s .thtg (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
23+ if chk == 0 then return true end
2624 Duel .SetOperationInfo (0 ,CATEGORY_TOHAND ,nil ,1 ,tp ,LOCATION_DECK )
2725end
28- function s .op (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
26+ function s .thop (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
2927 Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_ATOHAND )
30- local g = Duel .SelectMatchingCard (tp ,s .filter ,tp ,LOCATION_DECK ,0 ,1 ,1 ,nil )
28+ local g = Duel .SelectMatchingCard (tp ,s .thfilter ,tp ,LOCATION_DECK ,0 ,1 ,1 ,nil )
3129 if # g > 0 then
3230 Duel .SendtoHand (g ,nil ,REASON_EFFECT )
3331 Duel .ConfirmCards (1 - tp ,g )
3432 end
35- end
33+ end
0 commit comments