1+ -- 綺羅流聖のプリアージュ
2+ -- Pliage the Stylish Sacred Shooting Star
3+ -- scripted by YoshiDuels
4+ local s ,id = GetID ()
5+ function s .initial_effect (c )
6+ -- Fusion Summon procedure
7+ c :EnableReviveLimit ()
8+ Fusion .AddProcMix (c ,true ,true ,160213069 ,aux .FilterBoolFunctionEx (Card .IsType ,TYPE_NORMAL ))
9+ -- Decrease ATK
10+ local e1 = Effect .CreateEffect (c )
11+ e1 :SetType (EFFECT_TYPE_IGNITION )
12+ e1 :SetRange (LOCATION_MZONE )
13+ e1 :SetCategory (CATEGORY_ATKCHANGE )
14+ e1 :SetCountLimit (1 )
15+ e1 :SetCost (s .cost )
16+ e1 :SetTarget (s .target )
17+ e1 :SetOperation (s .operation )
18+ c :RegisterEffect (e1 )
19+ end
20+ s .named_material = {160213069 }
21+ function s .cost (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
22+ if chk == 0 then return Duel .IsPlayerCanDiscardDeckAsCost (tp ,1 ) end
23+ end
24+ function s .target (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
25+ if chk == 0 then return Duel .IsExistingMatchingCard (aux .FilterMaximumSideFunctionEx (Card .IsFaceup ),tp ,0 ,LOCATION_MZONE ,1 ,nil ) end
26+ end
27+ function s .operation (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
28+ local c = e :GetHandler ()
29+ -- Requirement
30+ if Duel .DiscardDeck (tp ,1 ,REASON_COST )< 1 then return end
31+ -- Effect
32+ Duel .Hint (HINT_SELECTMSG ,tp ,HINTMSG_FACEUP )
33+ local g = Duel .SelectMatchingCard (tp ,aux .FilterMaximumSideFunctionEx (Card .IsFaceup ),tp ,0 ,LOCATION_MZONE ,1 ,1 ,nil )
34+ if # g > 0 then
35+ Duel .HintSelection (g )
36+ -- Decrease ATK
37+ local e1 = Effect .CreateEffect (c )
38+ e1 :SetType (EFFECT_TYPE_SINGLE )
39+ e1 :SetCode (EFFECT_UPDATE_ATTACK )
40+ e1 :SetValue (- 1700 )
41+ e1 :SetReset (RESETS_STANDARD_PHASE_END ,2 )
42+ g :GetFirst ():RegisterEffect (e1 )
43+ end
44+ end
0 commit comments