Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro-222DIY-cards
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Packages
Packages
List
Container Registry
Analytics
Analytics
CI / CD
Code Review
Insights
Issues
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
alstroemeria-silentlove
ygopro-222DIY-cards
Commits
3f708418
Commit
3f708418
authored
Jun 26, 2021
by
Tachibana
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
12
parent
d77ae5a3
Pipeline
#3808
passed with stages
in 44 minutes and 24 seconds
Changes
36
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
36 changed files
with
422 additions
and
386 deletions
+422
-386
expansions/script/c115010.lua
expansions/script/c115010.lua
+1
-0
expansions/script/c11800010.lua
expansions/script/c11800010.lua
+2
-1
expansions/script/c12048035.lua
expansions/script/c12048035.lua
+1
-0
expansions/script/c14000034.lua
expansions/script/c14000034.lua
+1
-0
expansions/script/c15000357.lua
expansions/script/c15000357.lua
+1
-0
expansions/script/c16063023.lua
expansions/script/c16063023.lua
+1
-0
expansions/script/c17035130.lua
expansions/script/c17035130.lua
+1
-0
expansions/script/c17035340.lua
expansions/script/c17035340.lua
+1
-0
expansions/script/c18004010.lua
expansions/script/c18004010.lua
+1
-0
expansions/script/c18004014.lua
expansions/script/c18004014.lua
+1
-0
expansions/script/c18004016.lua
expansions/script/c18004016.lua
+1
-0
expansions/script/c23000309.lua
expansions/script/c23000309.lua
+1
-0
expansions/script/c23000350.lua
expansions/script/c23000350.lua
+1
-0
expansions/script/c32912374.lua
expansions/script/c32912374.lua
+54
-53
expansions/script/c37564502.lua
expansions/script/c37564502.lua
+1
-0
expansions/script/c37564520.lua
expansions/script/c37564520.lua
+1
-0
expansions/script/c37564539.lua
expansions/script/c37564539.lua
+1
-0
expansions/script/c37564540.lua
expansions/script/c37564540.lua
+1
-0
expansions/script/c37564566.lua
expansions/script/c37564566.lua
+1
-0
expansions/script/c40009518.lua
expansions/script/c40009518.lua
+3
-2
expansions/script/c47500101.lua
expansions/script/c47500101.lua
+114
-113
expansions/script/c47501006.lua
expansions/script/c47501006.lua
+89
-88
expansions/script/c47501010.lua
expansions/script/c47501010.lua
+130
-129
expansions/script/c50220110.lua
expansions/script/c50220110.lua
+1
-0
expansions/script/c50220115.lua
expansions/script/c50220115.lua
+1
-0
expansions/script/c50220120.lua
expansions/script/c50220120.lua
+1
-0
expansions/script/c50220125.lua
expansions/script/c50220125.lua
+1
-0
expansions/script/c50220130.lua
expansions/script/c50220130.lua
+1
-0
expansions/script/c77707029.lua
expansions/script/c77707029.lua
+1
-0
expansions/script/c81002014.lua
expansions/script/c81002014.lua
+1
-0
expansions/script/c81015011.lua
expansions/script/c81015011.lua
+1
-0
expansions/script/c81019071.lua
expansions/script/c81019071.lua
+1
-0
expansions/script/c81024027.lua
expansions/script/c81024027.lua
+1
-0
expansions/script/c81024030.lua
expansions/script/c81024030.lua
+1
-0
expansions/script/c81042008.lua
expansions/script/c81042008.lua
+1
-0
expansions/script/c98600007.lua
expansions/script/c98600007.lua
+1
-0
No files found.
expansions/script/c115010.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@
local
m
=
115010
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
15000351
)
aux
.
AddCodeList
(
c
,
15000351
,
15000348
)
c
:
SetUniqueOnField
(
1
,
1
,
m
)
--synchro summon
...
...
expansions/script/c11800010.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@
local
m
=
11800010
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
11800009
)
--synchro summon
aux
.
AddSynchroMixProcedure
(
c
,
cm
.
mfilter1
,
cm
.
mfilter2
,
nil
,
aux
.
NonTuner
(
cm
.
mfilter3
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
@@ -82,6 +83,6 @@ end
function
cm
.
disop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
Duel
.
NegateActivation
(
ev
)
and
re
:
GetHandler
():
IsRelateToEffect
(
re
)
then
Duel
.
Destroy
(
eg
,
REASON_EFFECT
)
Duel
.
Destroy
(
eg
,
REASON_EFFECT
)
end
end
\ No newline at end of file
expansions/script/c12048035.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local m=12048035
local
cm
=
_G
[
"c"
..
m
]
cm
.
named_with_HakaShiro
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
12048031
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
cm
.
tfilter
,
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c14000034.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@
local
m
=
14000034
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
14000021
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
14000021
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c15000357.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=15000357
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"纯粹容器 空洞骑士"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
15000351
)
aux
.
AddCodeList
(
c
,
15000351
)
aux
.
AddSynchroProcedure
(
c
,
aux
.
Tuner
(
nil
),
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
15000351
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c16063023.lua
View file @
3f708418
--pianzhang jiuyuan
function
c16063023
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
16063005
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
16063005
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c17035130.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@
local
m
=
17035130
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
17035020
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
17035020
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c17035340.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@
local
m
=
17035340
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
17035300
)
c
:
EnableReviveLimit
()
aux
.
EnablePendulumAttribute
(
c
,
false
)
local
e0
=
Effect
.
CreateEffect
(
c
)
...
...
expansions/script/c18004010.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local m=18004010
local
cm
=
_G
[
"c"
..
m
]
cm
.
rssetcode
=
"SexGun"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
18004005
)
rssg
.
SexGunCode
(
c
)
aux
.
AddSynchroProcedure
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
18004005
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c18004014.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local m=18004014
local
cm
=
_G
[
"c"
..
m
]
cm
.
rssetcode
=
"SexGun"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
18004005
)
aux
.
AddSynchroProcedure
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
18004005
),
2
,
99
)
c
:
EnableReviveLimit
()
rssg
.
SexGunCode
(
c
)
...
...
expansions/script/c18004016.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local m=18004016
local
cm
=
_G
[
"c"
..
m
]
cm
.
rssetcode
=
"SexGun"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
18004005
)
aux
.
AddSynchroProcedure
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
18004005
),
2
,
99
)
c
:
EnableReviveLimit
()
rssg
.
SexGunCode
(
c
)
...
...
expansions/script/c23000309.lua
View file @
3f708418
--赛须眉·公孙玥
function
c23000309
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
23000303
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_WARRIOR
),
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
23000303
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c23000350.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=23000350
local
cm
=
_G
[
"c"
..
m
]
--白马队率 子龙
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
23000304
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_WARRIOR
),
aux
.
NonTuner
(
Card
.
IsCode
,
23000304
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c32912374.lua
View file @
3f708418
--Spiral Drill - Sky Drive Warrior
function
c32912374
.
initial_effect
(
c
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
32912371
),
aux
.
NonTuner
(
Card
.
IsSetCard
,
0xa15
),
1
)
c
:
EnableReviveLimit
()
--cannot special summon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
+
EFFECT_FLAG_SINGLE_RANGE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetRange
(
LOCATION_EXTRA
)
e1
:
SetCode
(
EFFECT_SPSUMMON_CONDITION
)
e1
:
SetValue
(
aux
.
synlimit
)
c
:
RegisterEffect
(
e1
)
--actlimit
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e2
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetTargetRange
(
0
,
1
)
e2
:
SetValue
(
c32912374
.
aclimit
)
e2
:
SetCondition
(
c32912374
.
actcon
)
c
:
RegisterEffect
(
e2
)
--pierce
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
)
e3
:
SetCode
(
EFFECT_PIERCE
)
c
:
RegisterEffect
(
e3
)
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e4
:
SetCode
(
EVENT_PRE_BATTLE_DAMAGE
)
e4
:
SetCondition
(
c32912374
.
damcon
)
e4
:
SetOperation
(
c32912374
.
damop
)
c
:
RegisterEffect
(
e4
)
--position
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetDescription
(
aux
.
Stringid
(
32912374
,
1
))
e5
:
SetCategory
(
CATEGORY_POSITION
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_ATTACK_ANNOUNCE
)
e5
:
SetTarget
(
c32912374
.
postg
)
e5
:
SetOperation
(
c32912374
.
posop
)
c
:
RegisterEffect
(
e5
)
aux
.
AddMaterialCodeList
(
c
,
32912371
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
32912371
),
aux
.
NonTuner
(
Card
.
IsSetCard
,
0xa15
),
1
)
c
:
EnableReviveLimit
()
--cannot special summon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
+
EFFECT_FLAG_SINGLE_RANGE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetRange
(
LOCATION_EXTRA
)
e1
:
SetCode
(
EFFECT_SPSUMMON_CONDITION
)
e1
:
SetValue
(
aux
.
synlimit
)
c
:
RegisterEffect
(
e1
)
--actlimit
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e2
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetTargetRange
(
0
,
1
)
e2
:
SetValue
(
c32912374
.
aclimit
)
e2
:
SetCondition
(
c32912374
.
actcon
)
c
:
RegisterEffect
(
e2
)
--pierce
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
)
e3
:
SetCode
(
EFFECT_PIERCE
)
c
:
RegisterEffect
(
e3
)
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e4
:
SetCode
(
EVENT_PRE_BATTLE_DAMAGE
)
e4
:
SetCondition
(
c32912374
.
damcon
)
e4
:
SetOperation
(
c32912374
.
damop
)
c
:
RegisterEffect
(
e4
)
--position
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetDescription
(
aux
.
Stringid
(
32912374
,
1
))
e5
:
SetCategory
(
CATEGORY_POSITION
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_ATTACK_ANNOUNCE
)
e5
:
SetTarget
(
c32912374
.
postg
)
e5
:
SetOperation
(
c32912374
.
posop
)
c
:
RegisterEffect
(
e5
)
end
function
c32912374
.
aclimit
(
e
,
re
,
tp
)
return
not
re
:
GetHandler
():
IsImmuneToEffect
(
e
)
return
not
re
:
GetHandler
():
IsImmuneToEffect
(
e
)
end
function
c32912374
.
actcon
(
e
)
return
Duel
.
GetAttacker
()
==
e
:
GetHandler
()
return
Duel
.
GetAttacker
()
==
e
:
GetHandler
()
end
function
c32912374
.
damcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
ep
~=
tp
and
c
==
Duel
.
GetAttacker
()
and
Duel
.
GetAttackTarget
()
and
Duel
.
GetAttackTarget
():
IsDefensePos
()
local
c
=
e
:
GetHandler
()
return
ep
~=
tp
and
c
==
Duel
.
GetAttacker
()
and
Duel
.
GetAttackTarget
()
and
Duel
.
GetAttackTarget
():
IsDefensePos
()
end
function
c32912374
.
damop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
ChangeBattleDamage
(
ep
,
ev
*
2
)
Duel
.
ChangeBattleDamage
(
ep
,
ev
*
2
)
end
function
c32912374
.
postg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
d
=
Duel
.
GetAttackTarget
()
if
chk
==
0
then
return
d
and
d
:
IsControler
(
1
-
tp
)
and
d
:
IsCanChangePosition
()
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_POSITION
,
d
,
1
,
0
,
0
)
local
d
=
Duel
.
GetAttackTarget
()
if
chk
==
0
then
return
d
and
d
:
IsControler
(
1
-
tp
)
and
d
:
IsCanChangePosition
()
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_POSITION
,
d
,
1
,
0
,
0
)
end
function
c32912374
.
posop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
d
=
Duel
.
GetAttackTarget
()
if
d
:
IsRelateToBattle
()
then
Duel
.
ChangePosition
(
d
,
POS_FACEUP_DEFENSE
,
POS_FACEDOWN_DEFENSE
,
POS_FACEUP_ATTACK
,
POS_FACEUP_ATTACK
)
end
local
d
=
Duel
.
GetAttackTarget
()
if
d
:
IsRelateToBattle
()
then
Duel
.
ChangePosition
(
d
,
POS_FACEUP_DEFENSE
,
POS_FACEDOWN_DEFENSE
,
POS_FACEUP_ATTACK
,
POS_FACEUP_ATTACK
)
end
end
\ No newline at end of file
expansions/script/c37564502.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local cm=_G["c"..m]
Duel
.
LoadScript
(
"c37564765.lua"
)
cm
.
Senya_desc_with_nanahira
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
37564765
)
Senya
.
Nanahira
(
c
)
aux
.
AddSynchroProcedure2
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
))
c
:
EnableReviveLimit
()
...
...
expansions/script/c37564520.lua
View file @
3f708418
...
...
@@ -3,6 +3,7 @@ local cm=_G["c"..m]
Duel
.
LoadScript
(
"c37564765.lua"
)
cm
.
Senya_desc_with_nanahira
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
37564765
)
Senya
.
Nanahira
(
c
)
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
),
aux
.
NonTuner
(
Card
.
IsRace
,
RACE_FAIRY
),
1
)
Senya
.
AddSummonMusic
(
c
,
m
*
16
+
2
,
SUMMON_TYPE_SYNCHRO
)
...
...
expansions/script/c37564539.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local cm=_G["c"..m]
Duel
.
LoadScript
(
"c37564765.lua"
)
cm
.
Senya_desc_with_nanahira
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
37564765
)
Senya
.
Nanahira
(
c
)
aux
.
AddSynchroProcedure2
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
))
c
:
EnableReviveLimit
()
...
...
expansions/script/c37564540.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local cm=_G["c"..m]
Duel
.
LoadScript
(
"c37564765.lua"
)
cm
.
Senya_desc_with_nanahira
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
37564765
)
Senya
.
Nanahira
(
c
)
aux
.
AddSynchroProcedure2
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsSynchroType
,
TYPE_SYNCHRO
),
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
))
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
expansions/script/c37564566.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local cm=_G["c"..m]
Duel
.
LoadScript
(
"c37564765.lua"
)
cm
.
Senya_desc_with_nanahira
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
37564765
)
Senya
.
Nanahira
(
c
)
aux
.
AddSynchroProcedure2
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
),
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
))
c
:
EnableReviveLimit
()
...
...
expansions/script/c40009518.lua
View file @
3f708418
--黄金之剑毅 格吉特·布雷德
function
c40009518
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
40009510
)
aux
.
AddCodeList
(
c
,
40009510
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
40009510
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--search
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
40009518
,
0
))
...
...
@@ -51,7 +52,7 @@ function c40009518.cfilter(c)
return
c
:
IsFacedown
()
or
not
c
:
IsRace
(
RACE_WARRIOR
)
end
function
c40009518
.
tscon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
not
Duel
.
IsExistingMatchingCard
(
c40009518
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
return
not
Duel
.
IsExistingMatchingCard
(
c40009518
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
end
function
c40009518
.
tsfilter
(
c
)
return
c
:
IsRace
(
RACE_WARRIOR
)
and
c
:
IsAbleToHand
()
...
...
expansions/script/c47500101.lua
View file @
3f708418
--拳皇 姬塔
function
c47500101
.
initial_effect
(
c
)
aux
.
AddCodeList
(
c
,
47500000
)
--synchro summon
aux
.
AddSynchroMixProcedure
(
c
,
aux
.
Tuner
(
nil
),
aux
.
Tuner
(
nil
),
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
47500000
),
1
,
1
)
c
:
EnableReviveLimit
()
--pendulum summon
aux
.
EnablePendulumAttribute
(
c
,
false
)
--splimit
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetTarget
(
c47500101
.
psplimit
)
c
:
RegisterEffect
(
e1
)
--double battle phase
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetCountLimit
(
1
,
47500101
)
e2
:
SetOperation
(
c47500101
.
bpop
)
c
:
RegisterEffect
(
e2
)
--act limit
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_F
)
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetCondition
(
c47500101
.
negcon
)
e3
:
SetOperation
(
c47500101
.
negop
)
c
:
RegisterEffect
(
e3
)
--battle soul
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e4
:
SetCode
(
EVENT_BATTLE_DAMAGE
)
e4
:
SetCondition
(
c47500101
.
cacon
)
e4
:
SetOperation
(
c47500101
.
caop
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
)
e5
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCode
(
EFFECT_INDESTRUCTABLE_BATTLE
)
e5
:
SetValue
(
1
)
c
:
RegisterEffect
(
e5
)
local
e6
=
e5
:
Clone
()
e6
:
SetCode
(
EFFECT_INDESTRUCTABLE_EFFECT
)
c
:
RegisterEffect
(
e6
)
local
e7
=
Effect
.
CreateEffect
(
c
)
e7
:
SetCategory
(
CATEGORY_DAMAGE
)
e7
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e7
:
SetCode
(
EVENT_BE_BATTLE_TARGET
)
e7
:
SetRange
(
LOCATION_MZONE
)
e7
:
SetOperation
(
c47500101
.
fop1
)
c
:
RegisterEffect
(
e7
)
local
e8
=
Effect
.
CreateEffect
(
c
)
e8
:
SetCategory
(
CATEGORY_DAMAGE
)
e8
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e8
:
SetCode
(
EVENT_BECOME_TARGET
)
e8
:
SetRange
(
LOCATION_MZONE
)
e8
:
SetTarget
(
c47500101
.
ftg
)
e8
:
SetOperation
(
c47500101
.
fop2
)
c
:
RegisterEffect
(
e8
)
aux
.
AddMaterialCodeList
(
c
,
47500000
)
aux
.
AddCodeList
(
c
,
47500000
)
--synchro summon
aux
.
AddSynchroMixProcedure
(
c
,
aux
.
Tuner
(
nil
),
aux
.
Tuner
(
nil
),
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
47500000
),
1
,
1
)
c
:
EnableReviveLimit
()
--pendulum summon
aux
.
EnablePendulumAttribute
(
c
,
false
)
--splimit
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetTarget
(
c47500101
.
psplimit
)
c
:
RegisterEffect
(
e1
)
--double battle phase
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetCountLimit
(
1
,
47500101
)
e2
:
SetOperation
(
c47500101
.
bpop
)
c
:
RegisterEffect
(
e2
)
--act limit
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_F
)
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetCondition
(
c47500101
.
negcon
)
e3
:
SetOperation
(
c47500101
.
negop
)
c
:
RegisterEffect
(
e3
)
--battle soul
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e4
:
SetCode
(
EVENT_BATTLE_DAMAGE
)
e4
:
SetCondition
(
c47500101
.
cacon
)
e4
:
SetOperation
(
c47500101
.
caop
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
)
e5
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCode
(
EFFECT_INDESTRUCTABLE_BATTLE
)
e5
:
SetValue
(
1
)
c
:
RegisterEffect
(
e5
)
local
e6
=
e5
:
Clone
()
e6
:
SetCode
(
EFFECT_INDESTRUCTABLE_EFFECT
)
c
:
RegisterEffect
(
e6
)
local
e7
=
Effect
.
CreateEffect
(
c
)
e7
:
SetCategory
(
CATEGORY_DAMAGE
)
e7
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e7
:
SetCode
(
EVENT_BE_BATTLE_TARGET
)
e7
:
SetRange
(
LOCATION_MZONE
)
e7
:
SetOperation
(
c47500101
.
fop1
)
c
:
RegisterEffect
(
e7
)
local
e8
=
Effect
.
CreateEffect
(
c
)
e8
:
SetCategory
(
CATEGORY_DAMAGE
)
e8
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e8
:
SetCode
(
EVENT_BECOME_TARGET
)
e8
:
SetRange
(
LOCATION_MZONE
)
e8
:
SetTarget
(
c47500101
.
ftg
)
e8
:
SetOperation
(
c47500101
.
fop2
)
c
:
RegisterEffect
(
e8
)
end
function
c47500101
.
pefilter
(
c
)
return
c
:
IsRace
(
RACE_WARRIOR
)
or
c
:
IsRace
(
RACE_SPELLCASTER
)
and
c
:
IsLevel
(
8
)
return
c
:
IsRace
(
RACE_WARRIOR
)
or
c
:
IsRace
(
RACE_SPELLCASTER
)
and
c
:
IsLevel
(
8
)
end
function
c47500101
.
psplimit
(
e
,
c
,
tp
,
sumtp
,
sumpos
)
return
not
c47500101
.
pefilter
(
c
)
and
bit
.
band
(
sumtp
,
SUMMON_TYPE_PENDULUM
)
==
SUMMON_TYPE_PENDULUM
return
not
c47500101
.
pefilter
(
c
)
and
bit
.
band
(
sumtp
,
SUMMON_TYPE_PENDULUM
)
==
SUMMON_TYPE_PENDULUM
end
function
c47500101
.
bpop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_BP_TWICE
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e1
:
SetTargetRange
(
1
,
1
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_BP_TWICE
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e1
:
SetTargetRange
(
1
,
1
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
end
function
c47500101
.
negcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
end
function
c47500101
.
filter
(
c
)
return
c
:
IsFaceup
()
and
(
c
:
IsLocation
(
LOCATION_SZONE
)
or
c
:
IsType
(
TYPE_EFFECT
))
and
not
c
:
IsDisabled
()
return
c
:
IsFaceup
()
and
(
c
:
IsLocation
(
LOCATION_SZONE
)
or
c
:
IsType
(
TYPE_EFFECT
))
and
not
c
:
IsDisabled
()
end
function
c47500101
.
negop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47500101
.
filter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
aux
.
ExceptThisCard
(
e
))
local
tc
=
g
:
GetFirst
()
while
tc
do
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_DISABLE
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
tc
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EFFECT_DISABLE_EFFECT
)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
tc
:
RegisterEffect
(
e2
)
tc
=
g
:
GetNext
()
end
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e1
:
SetTargetRange
(
0
,
1
)
e1
:
SetValue
(
c47500101
.
aclimit
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47500101
.
filter
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
aux
.
ExceptThisCard
(
e
))
local
tc
=
g
:
GetFirst
()
while
tc
do
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_DISABLE
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
tc
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EFFECT_DISABLE_EFFECT
)
e2
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
tc
:
RegisterEffect
(
e2
)
tc
=
g
:
GetNext
()
end
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e1
:
SetTargetRange
(
0
,
1
)
e1
:
SetValue
(
c47500101
.
aclimit
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
end
function
c47500101
.
aclimit
(
e
,
re
,
tp
)
return
re
:
GetHandler
():
IsOnField
()
and
not
re
:
GetHandler
():
IsImmuneToEffect
(
e
)
return
re
:
GetHandler
():
IsOnField
()
and
not
re
:
GetHandler
():
IsImmuneToEffect
(
e
)
end
function
c47500101
.
cacon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
ep
~=
tp
and
e
:
GetHandler
():
GetBattleTarget
()
~=
nil
return
ep
~=
tp
and
e
:
GetHandler
():
GetBattleTarget
()
~=
nil
end
function
c47500101
.
caop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
ChainAttack
()
Duel
.
ChainAttack
()
end
function
c47500101
.
fop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
atk
=
c
:
GetAttack
()
if
Duel
.
NegateAttack
()
then
Duel
.
Damage
(
1
-
tp
,
atk
/
2
,
REASON_EFFECT
)
end
local
c
=
e
:
GetHandler
()
local
atk
=
c
:
GetAttack
()
if
Duel
.
NegateAttack
()
then
Duel
.
Damage
(
1
-
tp
,
atk
/
2
,
REASON_EFFECT
)
end
end
function
c47500101
.
ftg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DISABLE
,
eg
,
1
,
0
,
0
)
if
chk
==
0
then
return
true
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DISABLE
,
eg
,
1
,
0
,
0
)
end
function
c47500101
.
fop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
local
atk
=
c
:
GetAttack
()
if
rp
==
1
-
tp
then
Duel
.
NegateEffect
(
ev
)
Duel
.
Damage
(
1
-
tp
,
atk
/
2
,
REASON_EFFECT
)
end
local
c
=
e
:
GetHandler
()
local
atk
=
c
:
GetAttack
()
if
rp
==
1
-
tp
then
Duel
.
NegateEffect
(
ev
)
Duel
.
Damage
(
1
-
tp
,
atk
/
2
,
REASON_EFFECT
)
end
end
\ No newline at end of file
expansions/script/c47501006.lua
View file @
3f708418
--圣者 姬塔
function
c47501006
.
initial_effect
(
c
)
aux
.
AddCodeList
(
c
,
47500000
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsSynchroType
,
TYPE_SYNCHRO
),
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
47500000
),
1
,
1
)
c
:
EnableReviveLimit
()
--special summon rule
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
e0
:
SetCondition
(
c47501006
.
sprcon
)
e0
:
SetOperation
(
c47501006
.
sprop
)
c
:
RegisterEffect
(
e0
)
--splimit
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetTarget
(
c47501006
.
psplimit
)
c
:
RegisterEffect
(
e1
)
--draw
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetCategory
(
CATEGORY_DRAW
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e2
:
SetCountLimit
(
1
,
47501006
)
e2
:
SetTarget
(
c47501006
.
drtg
)
e2
:
SetOperation
(
c47501006
.
drop
)
c
:
RegisterEffect
(
e2
)
--
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e5
:
SetType
(
EFFECT_TYPE_IGNITION
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCountLimit
(
1
)
e5
:
SetTarget
(
c47501006
.
sptg
)
e5
:
SetOperation
(
c47501006
.
spop
)
c
:
RegisterEffect
(
e5
)
aux
.
AddMaterialCodeList
(
c
,
47500000
)
aux
.
AddCodeList
(
c
,
47500000
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsSynchroType
,
TYPE_SYNCHRO
),
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
47500000
),
1
,
1
)
c
:
EnableReviveLimit
()
--special summon rule
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
e0
:
SetCondition
(
c47501006
.
sprcon
)
e0
:
SetOperation
(
c47501006
.
sprop
)
c
:
RegisterEffect
(
e0
)
--splimit
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetTarget
(
c47501006
.
psplimit
)
c
:
RegisterEffect
(
e1
)
--draw
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetCategory
(
CATEGORY_DRAW
)
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e2
:
SetCountLimit
(
1
,
47501006
)
e2
:
SetTarget
(
c47501006
.
drtg
)
e2
:
SetOperation
(
c47501006
.
drop
)
c
:
RegisterEffect
(
e2
)
--
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e5
:
SetType
(
EFFECT_TYPE_IGNITION
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCountLimit
(
1
)
e5
:
SetTarget
(
c47501006
.
sptg
)
e5
:
SetOperation
(
c47501006
.
spop
)
c
:
RegisterEffect
(
e5
)
end
function
c47501006
.
pefilter
(
c
)
return
c
:
IsRace
(
RACE_WARRIOR
)
or
c
:
IsRace
(
RACE_SPELLCASTER
)
return
c
:
IsRace
(
RACE_WARRIOR
)
or
c
:
IsRace
(
RACE_SPELLCASTER
)
end
function
c47501006
.
psplimit
(
e
,
c
,
tp
,
sumtp
,
sumpos
)
return
not
c47501006
.
pefilter
(
c
)
and
bit
.
band
(
sumtp
,
SUMMON_TYPE_PENDULUM
)
==
SUMMON_TYPE_PENDULUM
return
not
c47501006
.
pefilter
(
c
)
and
bit
.
band
(
sumtp
,
SUMMON_TYPE_PENDULUM
)
==
SUMMON_TYPE_PENDULUM
end
function
c47501006
.
fusfilter1
(
c
)
return
c
:
GetOriginalCode
()
==
47500000
return
c
:
GetOriginalCode
()
==
47500000
end
function
c47501006
.
cfilter
(
c
)
return
(
c
:
IsCode
(
47500000
)
or
c
:
GetOriginalCode
()
==
47500000
)
and
c
:
IsCanBeSynchroMaterial
()
and
c
:
IsReleasable
()
return
(
c
:
IsCode
(
47500000
)
or
c
:
GetOriginalCode
()
==
47500000
)
and
c
:
IsCanBeSynchroMaterial
()
and
c
:
IsReleasable
()
end
function
c47501006
.
spfilter1
(
c
,
tp
,
g
)
return
g
:
IsExists
(
c47501006
.
spfilter2
,
1
,
c
,
tp
,
c
)
return
g
:
IsExists
(
c47501006
.
spfilter2
,
1
,
c
,
tp
,
c
)
end
function
c47501006
.
spfilter2
(
c
,
tp
,
mc
)
return
(
c
:
GetOriginalCode
()
==
47500000
and
mc
:
IsCode
(
47500000
)
or
c
:
IsCode
(
47500000
)
and
mc
:
GetOriginalCode
()
==
47500000
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
Group
.
FromCards
(
c
,
mc
))
>
0
return
(
c
:
GetOriginalCode
()
==
47500000
and
mc
:
IsCode
(
47500000
)
or
c
:
IsCode
(
47500000
)
and
mc
:
GetOriginalCode
()
==
47500000
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
Group
.
FromCards
(
c
,
mc
))
>
0
end
function
c47501006
.
sprcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
local
tp
=
c
:
GetControler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47501006
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
return
g
:
IsExists
(
c47501006
.
spfilter1
,
1
,
nil
,
tp
,
g
)
if
c
==
nil
then
return
true
end
local
tp
=
c
:
GetControler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47501006
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
return
g
:
IsExists
(
c47501006
.
spfilter1
,
1
,
nil
,
tp
,
g
)
end
function
c47501006
.
sprop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
local
g
=
Duel
.
GetMatchingGroup
(
c47501006
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g1
=
g
:
FilterSelect
(
tp
,
c47501006
.
spfilter1
,
1
,
1
,
nil
,
tp
,
g
)
local
mc
=
g1
:
GetFirst
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g2
=
g
:
FilterSelect
(
tp
,
c47501006
.
spfilter2
,
1
,
1
,
mc
,
tp
,
mc
)
g1
:
Merge
(
g2
)
Duel
.
Release
(
g1
,
REASON_COST
+
REASON_MATERIAL
+
REASON_SYNCHRO
)
local
g
=
Duel
.
GetMatchingGroup
(
c47501006
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g1
=
g
:
FilterSelect
(
tp
,
c47501006
.
spfilter1
,
1
,
1
,
nil
,
tp
,
g
)
local
mc
=
g1
:
GetFirst
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g2
=
g
:
FilterSelect
(
tp
,
c47501006
.
spfilter2
,
1
,
1
,
mc
,
tp
,
mc
)
g1
:
Merge
(
g2
)
Duel
.
Release
(
g1
,
REASON_COST
+
REASON_MATERIAL
+
REASON_SYNCHRO
)
end
function
c47501006
.
drtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
end
function
c47501006
.
drop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
local
lp1
=
Duel
.
GetLP
(
tp
)
local
lp2
=
Duel
.
GetLP
(
1
-
tp
)
Duel
.
SetLP
(
tp
,
lp1
+
3000
)
Duel
.
SetLP
(
1
-
tp
,
lp2
+
3000
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
local
lp1
=
Duel
.
GetLP
(
tp
)
local
lp2
=
Duel
.
GetLP
(
1
-
tp
)
Duel
.
SetLP
(
tp
,
lp1
+
3000
)
Duel
.
SetLP
(
1
-
tp
,
lp2
+
3000
)
end
function
c47501006
.
spfilter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x5d0
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
return
c
:
IsSetCard
(
0x5d0
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c47501006
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
tp
)
and
c47501006
.
spfilter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
c47501006
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c47501006
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g
,
1
,
0
,
0
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
tp
)
and
c47501006
.
spfilter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
c47501006
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c47501006
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g
,
1
,
0
,
0
)
end
function
c47501006
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetCode
(
EFFECT_EXTRA_ATTACK_MONSTER
)
e1
:
SetValue
(
1
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
c
:
RegisterEffect
(
e1
)
end
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetCode
(
EFFECT_EXTRA_ATTACK_MONSTER
)
e1
:
SetValue
(
1
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
c
:
RegisterEffect
(
e1
)
end
end
\ No newline at end of file
expansions/script/c47501010.lua
View file @
3f708418
--天女 姬塔
function
c47501010
.
initial_effect
(
c
)
aux
.
AddCodeList
(
c
,
47500000
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
47500000
),
aux
.
FilterBoolFunction
(
Card
.
IsType
,
TYPE_SYNCHRO
),
1
,
1
)
c
:
EnableReviveLimit
()
--special summon rule
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
e0
:
SetCondition
(
c47501010
.
sprcon
)
e0
:
SetOperation
(
c47501010
.
sprop
)
c
:
RegisterEffect
(
e0
)
--splimit
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetTarget
(
c47501010
.
psplimit
)
c
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetOperation
(
c47501010
.
chainop
)
c
:
RegisterEffect
(
e2
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetCode
(
EVENT_PRE_BATTLE_DAMAGE
)
e3
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetTargetRange
(
0
,
1
)
e3
:
SetOperation
(
c47501010
.
damop
)
c
:
RegisterEffect
(
e3
)
--salvage
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetDescription
(
aux
.
Stringid
(
47501010
,
0
))
e5
:
SetCategory
(
CATEGORY_TOHAND
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e5
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e5
:
SetCountLimit
(
1
,
47501910
)
e5
:
SetCondition
(
c47501010
.
thcon
)
e5
:
SetTarget
(
c47501010
.
thtg
)
e5
:
SetOperation
(
c47501010
.
thop
)
c
:
RegisterEffect
(
e5
)
local
e7
=
Effect
.
CreateEffect
(
c
)
e7
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e7
:
SetCode
(
EVENT_BE_BATTLE_TARGET
)
e7
:
SetRange
(
LOCATION_MZONE
)
e7
:
SetCondition
(
c47501010
.
fcon
)
e7
:
SetOperation
(
c47501010
.
fop1
)
c
:
RegisterEffect
(
e7
)
local
e9
=
Effect
.
CreateEffect
(
c
)
e9
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e9
:
SetCode
(
EVENT_BECOME_TARGET
)
e9
:
SetRange
(
LOCATION_MZONE
)
e9
:
SetCondition
(
c47501010
.
fcon
)
e9
:
SetTarget
(
c47501010
.
ftg
)
e9
:
SetOperation
(
c47501010
.
fop2
)
c
:
RegisterEffect
(
e9
)
local
e8
=
Effect
.
CreateEffect
(
c
)
e8
:
SetType
(
EFFECT_TYPE_FIELD
)
e8
:
SetCode
(
EFFECT_UPDATE_ATTACK
)
e8
:
SetRange
(
LOCATION_MZONE
)
e8
:
SetCondition
(
c47501010
.
fcon1
)
e8
:
SetValue
(
2000
)
e8
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
c
:
RegisterEffect
(
e8
)
aux
.
AddMaterialCodeList
(
c
,
47500000
)
aux
.
AddCodeList
(
c
,
47500000
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
47500000
),
aux
.
FilterBoolFunction
(
Card
.
IsType
,
TYPE_SYNCHRO
),
1
,
1
)
c
:
EnableReviveLimit
()
--special summon rule
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
e0
:
SetCondition
(
c47501010
.
sprcon
)
e0
:
SetOperation
(
c47501010
.
sprop
)
c
:
RegisterEffect
(
e0
)
--splimit
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetTarget
(
c47501010
.
psplimit
)
c
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_PZONE
)
e2
:
SetOperation
(
c47501010
.
chainop
)
c
:
RegisterEffect
(
e2
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetCode
(
EVENT_PRE_BATTLE_DAMAGE
)
e3
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetTargetRange
(
0
,
1
)
e3
:
SetOperation
(
c47501010
.
damop
)
c
:
RegisterEffect
(
e3
)
--salvage
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetDescription
(
aux
.
Stringid
(
47501010
,
0
))
e5
:
SetCategory
(
CATEGORY_TOHAND
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e5
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e5
:
SetCountLimit
(
1
,
47501910
)
e5
:
SetCondition
(
c47501010
.
thcon
)
e5
:
SetTarget
(
c47501010
.
thtg
)
e5
:
SetOperation
(
c47501010
.
thop
)
c
:
RegisterEffect
(
e5
)
local
e7
=
Effect
.
CreateEffect
(
c
)
e7
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e7
:
SetCode
(
EVENT_BE_BATTLE_TARGET
)
e7
:
SetRange
(
LOCATION_MZONE
)
e7
:
SetCondition
(
c47501010
.
fcon
)
e7
:
SetOperation
(
c47501010
.
fop1
)
c
:
RegisterEffect
(
e7
)
local
e9
=
Effect
.
CreateEffect
(
c
)
e9
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e9
:
SetCode
(
EVENT_BECOME_TARGET
)
e9
:
SetRange
(
LOCATION_MZONE
)
e9
:
SetCondition
(
c47501010
.
fcon
)
e9
:
SetTarget
(
c47501010
.
ftg
)
e9
:
SetOperation
(
c47501010
.
fop2
)
c
:
RegisterEffect
(
e9
)
local
e8
=
Effect
.
CreateEffect
(
c
)
e8
:
SetType
(
EFFECT_TYPE_FIELD
)
e8
:
SetCode
(
EFFECT_UPDATE_ATTACK
)
e8
:
SetRange
(
LOCATION_MZONE
)
e8
:
SetCondition
(
c47501010
.
fcon1
)
e8
:
SetValue
(
2000
)
e8
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
c
:
RegisterEffect
(
e8
)
end
function
c47501010
.
pefilter
(
c
)
return
c
:
IsRace
(
RACE_WARRIOR
)
or
c
:
IsRace
(
RACE_SPELLCASTER
)
return
c
:
IsRace
(
RACE_WARRIOR
)
or
c
:
IsRace
(
RACE_SPELLCASTER
)
end
function
c47501010
.
psplimit
(
e
,
c
,
tp
,
sumtp
,
sumpos
)
return
not
c47501010
.
pefilter
(
c
)
and
bit
.
band
(
sumtp
,
SUMMON_TYPE_PENDULUM
)
==
SUMMON_TYPE_PENDULUM
return
not
c47501010
.
pefilter
(
c
)
and
bit
.
band
(
sumtp
,
SUMMON_TYPE_PENDULUM
)
==
SUMMON_TYPE_PENDULUM
end
function
c47501010
.
fusfilter1
(
c
)
return
c
:
GetOriginalCode
()
==
47500000
return
c
:
GetOriginalCode
()
==
47500000
end
function
c47501010
.
cfilter
(
c
)
return
(
c
:
IsCode
(
47500000
)
or
c
:
GetOriginalCode
()
==
47500000
)
and
c
:
IsCanBeSynchroMaterial
()
and
c
:
IsReleasable
()
return
(
c
:
IsCode
(
47500000
)
or
c
:
GetOriginalCode
()
==
47500000
)
and
c
:
IsCanBeSynchroMaterial
()
and
c
:
IsReleasable
()
end
function
c47501010
.
spfilter1
(
c
,
tp
,
g
)
return
g
:
IsExists
(
c47501010
.
spfilter2
,
1
,
c
,
tp
,
c
)
return
g
:
IsExists
(
c47501010
.
spfilter2
,
1
,
c
,
tp
,
c
)
end
function
c47501010
.
spfilter2
(
c
,
tp
,
mc
)
return
(
c
:
GetOriginalCode
()
==
47500000
and
mc
:
IsCode
(
47500000
)
or
c
:
IsCode
(
47500000
)
and
mc
:
GetOriginalCode
()
==
47500000
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
Group
.
FromCards
(
c
,
mc
))
>
0
return
(
c
:
GetOriginalCode
()
==
47500000
and
mc
:
IsCode
(
47500000
)
or
c
:
IsCode
(
47500000
)
and
mc
:
GetOriginalCode
()
==
47500000
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
Group
.
FromCards
(
c
,
mc
))
>
0
end
function
c47501010
.
sprcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
local
tp
=
c
:
GetControler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47501010
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
return
g
:
IsExists
(
c47501010
.
spfilter1
,
1
,
nil
,
tp
,
g
)
if
c
==
nil
then
return
true
end
local
tp
=
c
:
GetControler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47501010
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
return
g
:
IsExists
(
c47501010
.
spfilter1
,
1
,
nil
,
tp
,
g
)
end
function
c47501010
.
sprop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
local
g
=
Duel
.
GetMatchingGroup
(
c47501010
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g1
=
g
:
FilterSelect
(
tp
,
c47501010
.
spfilter1
,
1
,
1
,
nil
,
tp
,
g
)
local
mc
=
g1
:
GetFirst
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g2
=
g
:
FilterSelect
(
tp
,
c47501010
.
spfilter2
,
1
,
1
,
mc
,
tp
,
mc
)
g1
:
Merge
(
g2
)
Duel
.
Release
(
g1
,
REASON_COST
+
REASON_MATERIAL
+
REASON_SYNCHRO
)
local
g
=
Duel
.
GetMatchingGroup
(
c47501010
.
cfilter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g1
=
g
:
FilterSelect
(
tp
,
c47501010
.
spfilter1
,
1
,
1
,
nil
,
tp
,
g
)
local
mc
=
g1
:
GetFirst
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g2
=
g
:
FilterSelect
(
tp
,
c47501010
.
spfilter2
,
1
,
1
,
mc
,
tp
,
mc
)
g1
:
Merge
(
g2
)
Duel
.
Release
(
g1
,
REASON_COST
+
REASON_MATERIAL
+
REASON_SYNCHRO
)
end
function
c47501010
.
damop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
ChangeBattleDamage
(
ep
,
ev
*
2
)
Duel
.
ChangeBattleDamage
(
ep
,
ev
*
2
)
end
function
c47501010
.
chainop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
re
:
IsHasCategory
(
CATEGORY_DAMAGE
)
and
ep
==
tp
then
Duel
.
SetChainLimit
(
c47501010
.
chainlm
)
end
if
re
:
IsHasCategory
(
CATEGORY_DAMAGE
)
and
ep
==
tp
then
Duel
.
SetChainLimit
(
c47501010
.
chainlm
)
end
end
function
c47501010
.
chainlm
(
e
,
rp
,
tp
)
return
tp
==
rp
return
tp
==
rp
end
function
c47501010
.
thcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
end
function
c47501010
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c47501010
.
penfiltert
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c47501010
.
penfiltert
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
)
end
end
function
c47501010
.
penfiltert
(
c
)
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsAbleToHand
()
and
c
:
IsFaceup
()
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsAbleToHand
()
and
c
:
IsFaceup
()
end
function
c47501010
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c47501010
.
penfiltert
,
tp
,
LOCATION_EXTRA
,
0
,
2
,
2
,
nil
)
local
tc
=
g
:
GetFirst
()
while
tc
do
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
tc
=
g
:
GetNext
()
end
local
c
=
e
:
GetHandler
()
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
47501010
,
2
))
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_EXTRA_PENDULUM_SUMMON
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e2
:
SetTargetRange
(
1
,
0
)
e2
:
SetValue
(
c47501010
.
pendvalue
)
e2
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e2
,
tp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c47501010
.
penfiltert
,
tp
,
LOCATION_EXTRA
,
0
,
2
,
2
,
nil
)
local
tc
=
g
:
GetFirst
()
while
tc
do
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
tc
=
g
:
GetNext
()
end
local
c
=
e
:
GetHandler
()
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
47501010
,
2
))
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_EXTRA_PENDULUM_SUMMON
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e2
:
SetTargetRange
(
1
,
0
)
e2
:
SetValue
(
c47501010
.
pendvalue
)
e2
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e2
,
tp
)
end
function
c47501010
.
pendvalue
(
e
,
c
)
return
aux
.
IsCodeListed
(
c
,
47500000
)
return
aux
.
IsCodeListed
(
c
,
47500000
)
end
function
c47501010
.
fcon
(
e
)
return
e
:
GetHandler
():
GetFlagEffect
(
47501010
)
<
1
return
e
:
GetHandler
():
GetFlagEffect
(
47501010
)
<
1
end
function
c47501010
.
fcon1
(
e
)
return
e
:
GetHandler
():
GetFlagEffect
(
47501010
)
==
1
return
e
:
GetHandler
():
GetFlagEffect
(
47501010
)
==
1
end
function
c47501010
.
fop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
Duel
.
NegateAttack
()
then
c
:
RegisterFlagEffect
(
47501010
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
local
c
=
e
:
GetHandler
()
if
Duel
.
NegateAttack
()
then
c
:
RegisterFlagEffect
(
47501010
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
end
function
c47501010
.
ftg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DISABLE
,
eg
,
1
,
0
,
0
)
if
chk
==
0
then
return
true
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DISABLE
,
eg
,
1
,
0
,
0
)
end
function
c47501010
.
fop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
Duel
.
NegateEffect
(
ev
)
then
c
:
RegisterFlagEffect
(
47501010
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
local
c
=
e
:
GetHandler
()
if
Duel
.
NegateEffect
(
ev
)
then
c
:
RegisterFlagEffect
(
47501010
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
end
\ No newline at end of file
expansions/script/c50220110.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=50220110
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"觉醒之龙王-玛里苟斯"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
50220105
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
50220105
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c50220115.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=50220115
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"觉醒之龙王-阿莱克斯塔萨"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
50220105
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
50220105
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c50220120.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=50220120
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"觉醒之龙王-诺兹多姆"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
50220105
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
50220105
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c50220125.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=50220125
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"觉醒之龙王-伊瑟拉"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
50220105
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
50220105
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c50220130.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@ local m=50220130
local
cm
=
_G
[
"c"
..
m
]
cm
.
name
=
"觉醒之龙王-耐萨里奥"
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
50220105
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
50220105
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c77707029.lua
View file @
3f708418
local
m
=
77707029
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
77707705
)
aux
.
AddSynchroProcedure
(
c
,
cm
.
tfilter
,
aux
.
NonTuner
(
nil
),
2
)
c
:
EnableReviveLimit
()
c
:
SetUniqueOnField
(
1
,
0
,
m
)
...
...
expansions/script/c81002014.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local cm=_G["c"..m]
xpcall
(
function
()
require
(
"expansions/script/c1110198"
)
end
,
function
()
require
(
"script/c1110198"
)
end
)
cm
.
named_with_Urban
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
81002000
)
aux
.
AddCodeList
(
c
,
81002000
)
--synchro summon
aux
.
AddSynchroMixProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
81002000
),
nil
,
nil
,
cm
.
mfilter
,
1
,
1
)
...
...
expansions/script/c81015011.lua
View file @
3f708418
--MS-765改·北上丽花
require
(
"expansions/script/c81000000"
)
function
c81015011
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
81015010
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
81015010
),
aux
.
NonTuner
(
Card
.
IsSetCard
,
0x81a
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c81019071.lua
View file @
3f708418
...
...
@@ -3,6 +3,7 @@ local m=81019071
local
cm
=
_G
[
"c"
..
m
]
Duel
.
LoadScript
(
"c81000000.lua"
)
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
81019000
)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
81019000
),
aux
.
NonTuner
(
nil
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c81024027.lua
View file @
3f708418
...
...
@@ -3,6 +3,7 @@ local m=81024027
local
cm
=
_G
[
"c"
..
m
]
Duel
.
LoadScript
(
"c81000000.lua"
)
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
81024020
)
Tenka
.
Einstein
(
c
)
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
81024020
),
aux
.
NonTuner
(
cm
.
sfilter
),
1
)
c
:
EnableReviveLimit
()
...
...
expansions/script/c81024030.lua
View file @
3f708418
...
...
@@ -3,6 +3,7 @@ local m=81024030
local
cm
=
_G
[
"c"
..
m
]
Duel
.
LoadScript
(
"c81000000.lua"
)
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
81024013
)
--synchro summon
Tenka
.
Einstein
(
c
)
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
81024013
),
aux
.
NonTuner
(
cm
.
sfilter
),
1
)
...
...
expansions/script/c81042008.lua
View file @
3f708418
...
...
@@ -4,6 +4,7 @@ local cm=_G["c"..m]
Duel
.
LoadScript
(
"c37564765.lua"
)
cm
.
Senya_desc_with_nanahira
=
true
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
37564765
)
Senya
.
Nanahira
(
c
)
aux
.
AddSynchroProcedure2
(
c
,
nil
,
aux
.
FilterBoolFunction
(
Card
.
IsCode
,
37564765
))
c
:
EnableReviveLimit
()
...
...
expansions/script/c98600007.lua
View file @
3f708418
...
...
@@ -2,6 +2,7 @@
local
m
=
98600007
local
cm
=
_G
[
"c"
..
m
]
function
cm
.
initial_effect
(
c
)
aux
.
AddMaterialCodeList
(
c
,
m
-
4
,
m
-
3
)
--synchro summon
aux
.
AddSynchroMixProcedure
(
c
,
cm
.
mfilter1
,
cm
.
mfilter2
,
nil
,
aux
.
NonTuner
(
nil
),
1
,
1
)
c
:
EnableReviveLimit
()
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment