33local s ,id = GetID ()
44function s .initial_effect (c )
55 -- Activate
6- local e1 = Fusion .CreateSummonEff (c ,aux .FilterBoolFunction (Card .ListsCodeAsMaterial ,78193831 ),nil ,s .fextra )
6+ local e1 = Fusion .CreateSummonEff (c ,aux .FilterBoolFunction (Card .ListsCodeAsMaterial ,CARD_BUSTER_BLADER ),nil ,s .fextra )
77 e1 :SetCountLimit (1 ,id )
88 c :RegisterEffect (e1 )
9- -- tohand
9+ -- Add this card to your hand
1010 local e2 = Effect .CreateEffect (c )
1111 e2 :SetDescription (aux .Stringid (id ,1 ))
1212 e2 :SetCategory (CATEGORY_TOHAND )
@@ -19,21 +19,21 @@ function s.initial_effect(c)
1919 c :RegisterEffect (e2 )
2020end
2121function s .fcheck (tp ,sg ,fc )
22- return sg :IsExists (aux .FilterBoolFunction (Card .IsSummonCode ,fc ,SUMMON_TYPE_FUSION ,tp ,78193831 ),1 ,nil )
22+ return sg :IsExists (aux .FilterBoolFunction (Card .IsSummonCode ,fc ,SUMMON_TYPE_FUSION ,tp ,CARD_BUSTER_BLADER ),1 ,nil )
2323end
2424function s .fextra (e ,tp ,mg )
25- return Duel .GetMatchingGroup (Fusion .IsMonsterFilter (Card .IsAbleToGrave ),tp ,0 ,LOCATION_MZONE ,nil ),s .fcheck
25+ return Duel .GetMatchingGroup (Fusion .IsMonsterFilter (aux . FaceupFilter ( Card .IsAbleToGrave ) ),tp ,0 ,LOCATION_MZONE ,nil ),s .fcheck
2626end
2727function s .thcost (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
2828 if chk == 0 then return Duel .IsExistingMatchingCard (Card .IsAbleToGraveAsCost ,tp ,LOCATION_HAND ,0 ,1 ,nil ) end
2929 Duel .DiscardHand (tp ,Card .IsAbleToGraveAsCost ,1 ,1 ,REASON_COST )
3030end
3131function s .thtg (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
3232 if chk == 0 then return e :GetHandler ():IsAbleToHand () end
33- Duel .SetOperationInfo (0 ,CATEGORY_TOHAND ,e :GetHandler (),1 ,0 ,0 )
33+ Duel .SetOperationInfo (0 ,CATEGORY_TOHAND ,e :GetHandler (),1 ,tp ,0 )
3434end
3535function s .thop (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
3636 if e :GetHandler ():IsRelateToEffect (e ) then
3737 Duel .SendtoHand (e :GetHandler (),nil ,REASON_EFFECT )
3838 end
39- end
39+ end
0 commit comments