1+ -- 追火点
12-- Extra Blast
23local s ,id = GetID ()
34function s .initial_effect (c )
45 -- Activate
56 local e1 = Effect .CreateEffect (c )
7+ e1 :SetCategory (CATEGORY_DAMAGE )
68 e1 :SetType (EFFECT_TYPE_ACTIVATE )
79 e1 :SetCode (EVENT_DESTROYED )
10+ e1 :SetHintTiming (TIMING_DESTROY )
811 e1 :SetCondition (s .condition )
912 e1 :SetTarget (s .target )
1013 e1 :SetOperation (s .activate )
1114 c :RegisterEffect (e1 )
1215end
13- function s .filter (c ,tp )
14- return c :IsPreviousControler (1 - tp ) and (c :GetReason ()&0x41 ) == 0x41
16+ function s .desfilter (c ,tp )
17+ return c :IsPreviousControler (1 - tp ) and (c :GetReason ()&( REASON_DESTROY | REASON_EFFECT )) == ( REASON_DESTROY | REASON_EFFECT )
1518 and c :IsPreviousLocation (LOCATION_MZONE )
1619end
1720function s .condition (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
18- return eg :IsExists (s .filter ,1 ,nil ,tp )
21+ return eg :IsExists (s .desfilter ,1 ,nil ,tp )
1922end
20- function s .target (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk , chkc )
23+ function s .target (e ,tp ,eg ,ep ,ev ,re ,r ,rp ,chk )
2124 if chk == 0 then return true end
2225 Duel .SetTargetPlayer (1 - tp )
2326 Duel .SetTargetParam (500 )
2629function s .activate (e ,tp ,eg ,ep ,ev ,re ,r ,rp )
2730 local p ,d = Duel .GetChainInfo (0 ,CHAININFO_TARGET_PLAYER ,CHAININFO_TARGET_PARAM )
2831 Duel .Damage (p ,d ,REASON_EFFECT )
29- end
32+ end
0 commit comments