1+ -- 夢中のラーヴァ
2+ -- Delirium Larva
3+ -- Scripted by YoshiDuels
4+ local s ,id = GetID ()
5+ function s .initial_effect (c )
6+ -- fusion material
7+ c :EnableReviveLimit ()
8+ Fusion .AddProcMixN (c ,true ,true ,s .matfilter ,2 )
9+ -- Atk
10+ local e1 = Effect .CreateEffect (c )
11+ e1 :SetType (EFFECT_TYPE_FIELD )
12+ e1 :SetCode (EFFECT_UPDATE_ATTACK )
13+ e1 :SetRange (LOCATION_MZONE )
14+ e1 :SetTargetRange (LOCATION_MZONE ,0 )
15+ e1 :SetTarget (aux .TargetBoolFunction (Card .IsRace ,RACE_INSECT ))
16+ e1 :SetValue (800 )
17+ c :RegisterEffect (e1 )
18+ -- Spells/Traps cannot be returned
19+ local e2 = Effect .CreateEffect (c )
20+ e2 :SetType (EFFECT_TYPE_FIELD )
21+ e2 :SetCode (EFFECT_CANNOT_TO_DECK )
22+ e2 :SetProperty (EFFECT_FLAG_IGNORE_IMMUNE + EFFECT_FLAG_SET_AVAILABLE )
23+ e2 :SetRange (LOCATION_MZONE )
24+ e2 :SetCondition (s .indcond )
25+ e2 :SetTarget (s .indtg )
26+ e2 :SetTargetRange (LOCATION_ONFIELD ,0 )
27+ e2 :SetValue (s .value )
28+ c :RegisterEffect (e2 )
29+ local e3 = e2 :Clone ()
30+ e3 :SetCode (EFFECT_CANNOT_TO_HAND )
31+ c :RegisterEffect (e3 )
32+ end
33+ function s .matfilter (c ,fc ,sumtype ,tp )
34+ return c :IsLevelBelow (6 ) and c :IsRace (RACE_INSECT ,fc ,sumtype ,tp ) and c :IsType (TYPE_EFFECT ,fc ,sumtype ,tp )
35+ end
36+ function s .indcond (e )
37+ return Duel .IsTurnPlayer (1 - e :GetHandlerPlayer ())
38+ end
39+ function s .indtg (e ,c )
40+ return c :IsSpellTrap ()
41+ end
42+ function s .value (e ,re ,rp )
43+ return nil ~= re
44+ end
0 commit comments