Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
P
pre-release-database-cdb
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
Vury Leo
pre-release-database-cdb
Commits
50e54352
Commit
50e54352
authored
Feb 12, 2025
by
zengsxing
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
add 19-21
parent
723827b0
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
621 additions
and
0 deletions
+621
-0
script/c100236019.lua
script/c100236019.lua
+205
-0
script/c100236020.lua
script/c100236020.lua
+199
-0
script/c100236021.lua
script/c100236021.lua
+217
-0
No files found.
script/c100236019.lua
0 → 100644
View file @
50e54352
--甜杯猫妖★味奇喵运输
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--synchro summon
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetDescription
(
1164
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetCondition
(
s
.
LSynCondition
)
e0
:
SetTarget
(
s
.
LSynTarget
)
e0
:
SetOperation
(
Auxiliary
.
SynOperation
())
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
c
:
RegisterEffect
(
e0
)
c
:
EnableReviveLimit
()
--search
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetCountLimit
(
1
,
id
)
e1
:
SetCondition
(
s
.
thcon
)
e1
:
SetTarget
(
s
.
thtg
)
e1
:
SetOperation
(
s
.
thop
)
c
:
RegisterEffect
(
e1
)
--spsummon
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
id
,
1
))
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
,
id
+
o
)
e2
:
SetCondition
(
s
.
spcon
)
e2
:
SetCost
(
s
.
spcost
)
e2
:
SetTarget
(
s
.
sptg
)
e2
:
SetOperation
(
s
.
spop
)
c
:
RegisterEffect
(
e2
)
end
function
s
.
CheckGroup
(
g
,
f
,
cg
,
min
,
max
,
...
)
if
cg
then
Duel
.
SetSelectedCard
(
cg
)
end
return
g
:
CheckSubGroup
(
f
,
min
,
max
,
...
)
end
function
s
.
SelectGroupNew
(
tp
,
desc
,
cancelable
,
g
,
f
,
cg
,
min
,
max
,
...
)
local
min
=
min
or
1
local
max
=
max
or
#
g
local
ext_params
=
{
...
}
if
cg
then
Duel
.
SetSelectedCard
(
cg
)
end
Duel
.
Hint
(
tp
,
HINT_SELECTMSG
,
desc
)
return
g
:
SelectSubGroup
(
tp
,
f
,
cancelable
,
min
,
max
,
...
)
end
function
s
.
SelectGroup
(
tp
,
desc
,
g
,
f
,
cg
,
min
,
max
,
...
)
return
s
.
SelectGroupNew
(
tp
,
desc
,
false
,
g
,
f
,
cg
,
min
,
max
,
...
)
end
function
s
.
matfilter1
(
c
,
syncard
,
tp
)
if
c
:
IsFacedown
()
then
return
false
end
if
c
:
IsSynchroType
(
TYPE_LINK
)
and
c
:
IsControler
(
tp
)
then
return
true
end
return
c
:
IsSynchroType
(
TYPE_TUNER
)
and
c
:
IsCanBeSynchroMaterial
(
syncard
)
end
function
s
.
matfilter2
(
c
,
syncard
)
return
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
c
:
IsNotTuner
(
syncard
)
and
c
:
IsCanBeSynchroMaterial
(
syncard
)
end
function
s
.
val
(
c
,
syncard
)
if
c
:
IsSynchroType
(
TYPE_LINK
)
then
return
c
:
GetLink
()
else
return
c
:
GetSynchroLevel
(
syncard
)
end
end
function
s
.
CheckGroupRecursive
(
c
,
sg
,
g
,
f
,
min
,
max
,
ext_params
)
sg
:
AddCard
(
c
)
local
ct
=
sg
:
GetCount
()
local
res
=
(
ct
>=
min
and
f
(
sg
,
table.unpack
(
ext_params
)))
or
(
ct
<
max
and
g
:
IsExists
(
s
.
CheckGroupRecursive
,
1
,
sg
,
sg
,
g
,
f
,
min
,
max
,
ext_params
))
sg
:
RemoveCard
(
c
)
return
res
end
function
s
.
synfilter
(
c
,
syncard
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
local
tsg
=
c
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g3
or
g2
local
f
=
c
.
tuner_filter
if
c
.
tuner_filter
then
tsg
=
tsg
:
Filter
(
f
,
nil
)
end
return
s
.
CheckGroup
(
tsg
,
s
.
goal
,
Group
.
FromCards
(
c
),
minc
,
maxc
,
tp
,
lv
,
syncard
,
c
)
end
function
s
.
goal
(
g
,
tp
,
lv
,
syncard
,
tuc
)
if
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
syncard
)
<=
0
then
return
false
end
if
tuc
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g
:
IsExists
(
Card
.
IsLocation
,
2
,
tuc
,
LOCATION_HAND
)
then
return
false
end
local
ct
=
g
:
GetCount
()
return
g
:
CheckWithSumEqual
(
s
.
val
,
lv
,
ct
,
ct
,
syncard
)
end
function
s
.
LSynCondition
(
e
,
c
,
tuner
,
mg
)
if
c
==
nil
then
return
true
end
if
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsFaceup
()
then
return
false
end
local
tp
=
c
:
GetControler
()
local
minc
=
2
local
maxc
=
c
:
GetLevel
()
local
g1
=
nil
local
g2
=
nil
local
g3
=
nil
if
mg
then
g1
=
mg
:
Filter
(
s
.
matfilter1
,
nil
,
c
,
tp
)
g2
=
mg
:
Filter
(
s
.
matfilter2
,
nil
,
c
)
g3
=
g2
:
Clone
()
else
g1
=
Duel
.
GetMatchingGroup
(
s
.
matfilter1
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
,
tp
)
g2
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
)
g3
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
+
LOCATION_HAND
,
LOCATION_MZONE
,
nil
,
c
)
end
local
pe
=
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_SMATERIAL
)
local
lv
=
c
:
GetLevel
()
local
sg
=
nil
if
tuner
then
return
s
.
matfilter1
(
c
,
tp
)
and
s
.
synfilter
(
tuner
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
elseif
pe
then
return
s
.
matfilter1
(
pe
:
GetOwner
(),
tp
)
and
s
.
synfilter
(
pe
:
GetOwner
(),
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
else
return
g1
:
IsExists
(
s
.
synfilter
,
1
,
nil
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
end
end
function
s
.
LSynTarget
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
c
,
tuner
,
mg
)
local
minc
=
2
local
maxc
=
c
:
GetLevel
()
local
g1
=
nil
local
g2
=
nil
local
g3
=
nil
if
mg
then
g1
=
mg
:
Filter
(
s
.
matfilter1
,
nil
,
c
,
tp
)
g2
=
mg
:
Filter
(
s
.
matfilter2
,
nil
,
c
)
g3
=
g2
:
Clone
()
else
g1
=
Duel
.
GetMatchingGroup
(
s
.
matfilter1
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
,
tp
)
g2
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
)
g3
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
+
LOCATION_HAND
,
LOCATION_MZONE
,
nil
,
c
)
end
local
pe
=
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_SMATERIAL
)
local
lv
=
c
:
GetLevel
()
local
tuc
=
nil
if
tuner
then
tuner
=
tuc
else
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SMATERIAL
)
if
not
pe
then
local
t1
=
g1
:
FilterSelect
(
tp
,
s
.
synfilter
,
1
,
1
,
nil
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
tuc
=
t1
:
GetFirst
()
else
tuc
=
pe
:
GetOwner
()
Group
.
FromCards
(
tuc
):
Select
(
tp
,
1
,
1
,
nil
)
end
end
local
tsg
=
tuc
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g3
or
g2
local
f
=
tuc
.
tuner_filter
if
tuc
.
tuner_filter
then
tsg
=
tsg
:
Filter
(
f
,
nil
)
end
local
g
=
s
.
SelectGroup
(
tp
,
HINTMSG_SMATERIAL
,
tsg
,
s
.
goal
,
Group
.
FromCards
(
tuc
),
minc
,
maxc
,
tp
,
lv
,
c
,
tuc
)
if
g
then
g
:
KeepAlive
()
e
:
SetLabelObject
(
g
)
return
true
else
return
false
end
end
function
s
.
thcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
end
function
s
.
thfilter
(
c
)
return
c
:
IsSetCard
(
0x2c8
)
and
c
:
IsAbleToHand
()
and
c
:
IsType
(
TYPE_MONSTER
)
end
function
s
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
2
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
s
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
2
,
2
,
nil
)
if
g
:
GetCount
()
>
0
and
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
>
0
then
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
Duel
.
ShuffleHand
(
tp
)
Duel
.
BreakEffect
()
Duel
.
DiscardHand
(
tp
,
nil
,
1
,
1
,
REASON_EFFECT
+
REASON_DISCARD
,
nil
)
end
end
function
s
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
rp
==
1
-
tp
end
function
s
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
IsAbleToExtraAsCost
()
end
Duel
.
SendtoDeck
(
e
:
GetHandler
(),
nil
,
0
,
REASON_COST
)
end
function
s
.
spfilter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x2c8
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
s
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetMZoneCount
(
tp
,
e
:
GetHandler
(),
tp
)
>
0
and
Duel
.
IsExistingMatchingCard
(
s
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
function
s
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ft
=
math.min
(
2
,
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
))
if
ft
==
0
then
return
end
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
ft
=
1
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
s
.
spfilter
),
tp
,
LOCATION_GRAVE
,
0
,
1
,
ft
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
\ No newline at end of file
script/c100236020.lua
0 → 100644
View file @
50e54352
--曲奇猫妖★味奇喵运输
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--synchro summon
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetDescription
(
1164
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetCondition
(
s
.
LSynCondition
)
e0
:
SetTarget
(
s
.
LSynTarget
)
e0
:
SetOperation
(
Auxiliary
.
SynOperation
())
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
c
:
RegisterEffect
(
e0
)
c
:
EnableReviveLimit
()
--position change
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_POSITION
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetCountLimit
(
1
,
id
)
e1
:
SetCondition
(
s
.
tdcon
)
e1
:
SetTarget
(
s
.
tdtg
)
e1
:
SetOperation
(
s
.
tdop
)
c
:
RegisterEffect
(
e1
)
--spsummon
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
id
,
1
))
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
,
id
+
o
)
e2
:
SetCondition
(
s
.
spcon
)
e2
:
SetCost
(
s
.
spcost
)
e2
:
SetTarget
(
s
.
sptg
)
e2
:
SetOperation
(
s
.
spop
)
c
:
RegisterEffect
(
e2
)
end
function
s
.
CheckGroup
(
g
,
f
,
cg
,
min
,
max
,
...
)
if
cg
then
Duel
.
SetSelectedCard
(
cg
)
end
return
g
:
CheckSubGroup
(
f
,
min
,
max
,
...
)
end
function
s
.
SelectGroupNew
(
tp
,
desc
,
cancelable
,
g
,
f
,
cg
,
min
,
max
,
...
)
local
min
=
min
or
1
local
max
=
max
or
#
g
local
ext_params
=
{
...
}
if
cg
then
Duel
.
SetSelectedCard
(
cg
)
end
Duel
.
Hint
(
tp
,
HINT_SELECTMSG
,
desc
)
return
g
:
SelectSubGroup
(
tp
,
f
,
cancelable
,
min
,
max
,
...
)
end
function
s
.
SelectGroup
(
tp
,
desc
,
g
,
f
,
cg
,
min
,
max
,
...
)
return
s
.
SelectGroupNew
(
tp
,
desc
,
false
,
g
,
f
,
cg
,
min
,
max
,
...
)
end
function
s
.
matfilter1
(
c
,
syncard
,
tp
)
if
c
:
IsFacedown
()
then
return
false
end
if
c
:
IsSynchroType
(
TYPE_LINK
)
and
c
:
IsControler
(
tp
)
then
return
true
end
return
c
:
IsSynchroType
(
TYPE_TUNER
)
and
c
:
IsCanBeSynchroMaterial
(
syncard
)
end
function
s
.
matfilter2
(
c
,
syncard
)
return
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
c
:
IsNotTuner
(
syncard
)
and
c
:
IsCanBeSynchroMaterial
(
syncard
)
end
function
s
.
val
(
c
,
syncard
)
if
c
:
IsSynchroType
(
TYPE_LINK
)
then
return
c
:
GetLink
()
else
return
c
:
GetSynchroLevel
(
syncard
)
end
end
function
s
.
CheckGroupRecursive
(
c
,
sg
,
g
,
f
,
min
,
max
,
ext_params
)
sg
:
AddCard
(
c
)
local
ct
=
sg
:
GetCount
()
local
res
=
(
ct
>=
min
and
f
(
sg
,
table.unpack
(
ext_params
)))
or
(
ct
<
max
and
g
:
IsExists
(
s
.
CheckGroupRecursive
,
1
,
sg
,
sg
,
g
,
f
,
min
,
max
,
ext_params
))
sg
:
RemoveCard
(
c
)
return
res
end
function
s
.
synfilter
(
c
,
syncard
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
local
tsg
=
c
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g3
or
g2
local
f
=
c
.
tuner_filter
if
c
.
tuner_filter
then
tsg
=
tsg
:
Filter
(
f
,
nil
)
end
return
s
.
CheckGroup
(
tsg
,
s
.
goal
,
Group
.
FromCards
(
c
),
minc
,
maxc
,
tp
,
lv
,
syncard
,
c
)
end
function
s
.
goal
(
g
,
tp
,
lv
,
syncard
,
tuc
)
if
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
syncard
)
<=
0
then
return
false
end
if
tuc
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g
:
IsExists
(
Card
.
IsLocation
,
2
,
tuc
,
LOCATION_HAND
)
then
return
false
end
local
ct
=
g
:
GetCount
()
return
g
:
CheckWithSumEqual
(
s
.
val
,
lv
,
ct
,
ct
,
syncard
)
end
function
s
.
LSynCondition
(
e
,
c
,
tuner
,
mg
)
if
c
==
nil
then
return
true
end
if
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsFaceup
()
then
return
false
end
local
tp
=
c
:
GetControler
()
local
minc
=
2
local
maxc
=
c
:
GetLevel
()
local
g1
=
nil
local
g2
=
nil
local
g3
=
nil
if
mg
then
g1
=
mg
:
Filter
(
s
.
matfilter1
,
nil
,
c
,
tp
)
g2
=
mg
:
Filter
(
s
.
matfilter2
,
nil
,
c
)
g3
=
g2
:
Clone
()
else
g1
=
Duel
.
GetMatchingGroup
(
s
.
matfilter1
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
,
tp
)
g2
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
)
g3
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
+
LOCATION_HAND
,
LOCATION_MZONE
,
nil
,
c
)
end
local
pe
=
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_SMATERIAL
)
local
lv
=
c
:
GetLevel
()
local
sg
=
nil
if
tuner
then
return
s
.
matfilter1
(
c
,
tp
)
and
s
.
synfilter
(
tuner
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
elseif
pe
then
return
s
.
matfilter1
(
pe
:
GetOwner
(),
tp
)
and
s
.
synfilter
(
pe
:
GetOwner
(),
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
else
return
g1
:
IsExists
(
s
.
synfilter
,
1
,
nil
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
end
end
function
s
.
LSynTarget
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
c
,
tuner
,
mg
)
local
minc
=
2
local
maxc
=
c
:
GetLevel
()
local
g1
=
nil
local
g2
=
nil
local
g3
=
nil
if
mg
then
g1
=
mg
:
Filter
(
s
.
matfilter1
,
nil
,
c
,
tp
)
g2
=
mg
:
Filter
(
s
.
matfilter2
,
nil
,
c
)
g3
=
g2
:
Clone
()
else
g1
=
Duel
.
GetMatchingGroup
(
s
.
matfilter1
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
,
tp
)
g2
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
)
g3
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
+
LOCATION_HAND
,
LOCATION_MZONE
,
nil
,
c
)
end
local
pe
=
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_SMATERIAL
)
local
lv
=
c
:
GetLevel
()
local
tuc
=
nil
if
tuner
then
tuner
=
tuc
else
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SMATERIAL
)
if
not
pe
then
local
t1
=
g1
:
FilterSelect
(
tp
,
s
.
synfilter
,
1
,
1
,
nil
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
tuc
=
t1
:
GetFirst
()
else
tuc
=
pe
:
GetOwner
()
Group
.
FromCards
(
tuc
):
Select
(
tp
,
1
,
1
,
nil
)
end
end
local
tsg
=
tuc
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g3
or
g2
local
f
=
tuc
.
tuner_filter
if
tuc
.
tuner_filter
then
tsg
=
tsg
:
Filter
(
f
,
nil
)
end
local
g
=
s
.
SelectGroup
(
tp
,
HINTMSG_SMATERIAL
,
tsg
,
s
.
goal
,
Group
.
FromCards
(
tuc
),
minc
,
maxc
,
tp
,
lv
,
c
,
tuc
)
if
g
then
g
:
KeepAlive
()
e
:
SetLabelObject
(
g
)
return
true
else
return
false
end
end
function
s
.
tdcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
end
function
s
.
tdtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsCanTurnSet
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_POSCHANGE
)
local
g
=
Duel
.
SelectTarget
(
tp
,
Card
.
IsCanTurnSet
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
2
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_POSITION
,
g
,
#
g
,
0
,
0
)
end
function
s
.
tdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sg
=
Duel
.
GetTargetsRelateToChain
()
if
#
sg
==
0
then
return
end
Duel
.
ChangePosition
(
sg
,
POS_FACEDOWN_DEFENSE
)
end
function
s
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
rp
==
1
-
tp
end
function
s
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
IsAbleToExtraAsCost
()
end
Duel
.
SendtoDeck
(
e
:
GetHandler
(),
nil
,
0
,
REASON_COST
)
end
function
s
.
spfilter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x2c8
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
s
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetMZoneCount
(
tp
,
e
:
GetHandler
(),
tp
)
>
0
and
Duel
.
IsExistingMatchingCard
(
s
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
function
s
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ft
=
math.min
(
2
,
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
))
if
ft
==
0
then
return
end
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
ft
=
1
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
s
.
spfilter
),
tp
,
LOCATION_GRAVE
,
0
,
1
,
ft
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
\ No newline at end of file
script/c100236021.lua
0 → 100644
View file @
50e54352
--棒棒猫妖★味奇喵运输
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--synchro summon
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetDescription
(
1164
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
)
e0
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetRange
(
LOCATION_EXTRA
)
e0
:
SetCondition
(
s
.
LSynCondition
)
e0
:
SetTarget
(
s
.
LSynTarget
)
e0
:
SetOperation
(
Auxiliary
.
SynOperation
())
e0
:
SetValue
(
SUMMON_TYPE_SYNCHRO
)
c
:
RegisterEffect
(
e0
)
c
:
EnableReviveLimit
()
--position change
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetCountLimit
(
1
,
id
)
e1
:
SetCondition
(
s
.
gspcon
)
e1
:
SetTarget
(
s
.
gsptg
)
e1
:
SetOperation
(
s
.
gspop
)
c
:
RegisterEffect
(
e1
)
--spsummon
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
id
,
1
))
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetCode
(
EVENT_CHAINING
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
,
id
+
o
)
e2
:
SetCondition
(
s
.
spcon
)
e2
:
SetCost
(
s
.
spcost
)
e2
:
SetTarget
(
s
.
sptg
)
e2
:
SetOperation
(
s
.
spop
)
c
:
RegisterEffect
(
e2
)
end
function
s
.
CheckGroup
(
g
,
f
,
cg
,
min
,
max
,
...
)
if
cg
then
Duel
.
SetSelectedCard
(
cg
)
end
return
g
:
CheckSubGroup
(
f
,
min
,
max
,
...
)
end
function
s
.
SelectGroupNew
(
tp
,
desc
,
cancelable
,
g
,
f
,
cg
,
min
,
max
,
...
)
local
min
=
min
or
1
local
max
=
max
or
#
g
local
ext_params
=
{
...
}
if
cg
then
Duel
.
SetSelectedCard
(
cg
)
end
Duel
.
Hint
(
tp
,
HINT_SELECTMSG
,
desc
)
return
g
:
SelectSubGroup
(
tp
,
f
,
cancelable
,
min
,
max
,
...
)
end
function
s
.
SelectGroup
(
tp
,
desc
,
g
,
f
,
cg
,
min
,
max
,
...
)
return
s
.
SelectGroupNew
(
tp
,
desc
,
false
,
g
,
f
,
cg
,
min
,
max
,
...
)
end
function
s
.
matfilter1
(
c
,
syncard
,
tp
)
if
c
:
IsFacedown
()
then
return
false
end
if
c
:
IsSynchroType
(
TYPE_LINK
)
and
c
:
IsControler
(
tp
)
then
return
true
end
return
c
:
IsSynchroType
(
TYPE_TUNER
)
and
c
:
IsCanBeSynchroMaterial
(
syncard
)
end
function
s
.
matfilter2
(
c
,
syncard
)
return
(
c
:
IsLocation
(
LOCATION_HAND
)
or
c
:
IsFaceup
())
and
c
:
IsNotTuner
(
syncard
)
and
c
:
IsCanBeSynchroMaterial
(
syncard
)
end
function
s
.
val
(
c
,
syncard
)
if
c
:
IsSynchroType
(
TYPE_LINK
)
then
return
c
:
GetLink
()
else
return
c
:
GetSynchroLevel
(
syncard
)
end
end
function
s
.
CheckGroupRecursive
(
c
,
sg
,
g
,
f
,
min
,
max
,
ext_params
)
sg
:
AddCard
(
c
)
local
ct
=
sg
:
GetCount
()
local
res
=
(
ct
>=
min
and
f
(
sg
,
table.unpack
(
ext_params
)))
or
(
ct
<
max
and
g
:
IsExists
(
s
.
CheckGroupRecursive
,
1
,
sg
,
sg
,
g
,
f
,
min
,
max
,
ext_params
))
sg
:
RemoveCard
(
c
)
return
res
end
function
s
.
synfilter
(
c
,
syncard
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
local
tsg
=
c
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g3
or
g2
local
f
=
c
.
tuner_filter
if
c
.
tuner_filter
then
tsg
=
tsg
:
Filter
(
f
,
nil
)
end
return
s
.
CheckGroup
(
tsg
,
s
.
goal
,
Group
.
FromCards
(
c
),
minc
,
maxc
,
tp
,
lv
,
syncard
,
c
)
end
function
s
.
goal
(
g
,
tp
,
lv
,
syncard
,
tuc
)
if
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
g
,
syncard
)
<=
0
then
return
false
end
if
tuc
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g
:
IsExists
(
Card
.
IsLocation
,
2
,
tuc
,
LOCATION_HAND
)
then
return
false
end
local
ct
=
g
:
GetCount
()
return
g
:
CheckWithSumEqual
(
s
.
val
,
lv
,
ct
,
ct
,
syncard
)
end
function
s
.
LSynCondition
(
e
,
c
,
tuner
,
mg
)
if
c
==
nil
then
return
true
end
if
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsFaceup
()
then
return
false
end
local
tp
=
c
:
GetControler
()
local
minc
=
2
local
maxc
=
c
:
GetLevel
()
local
g1
=
nil
local
g2
=
nil
local
g3
=
nil
if
mg
then
g1
=
mg
:
Filter
(
s
.
matfilter1
,
nil
,
c
,
tp
)
g2
=
mg
:
Filter
(
s
.
matfilter2
,
nil
,
c
)
g3
=
g2
:
Clone
()
else
g1
=
Duel
.
GetMatchingGroup
(
s
.
matfilter1
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
,
tp
)
g2
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
)
g3
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
+
LOCATION_HAND
,
LOCATION_MZONE
,
nil
,
c
)
end
local
pe
=
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_SMATERIAL
)
local
lv
=
c
:
GetLevel
()
local
sg
=
nil
if
tuner
then
return
s
.
matfilter1
(
c
,
tp
)
and
s
.
synfilter
(
tuner
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
elseif
pe
then
return
s
.
matfilter1
(
pe
:
GetOwner
(),
tp
)
and
s
.
synfilter
(
pe
:
GetOwner
(),
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
else
return
g1
:
IsExists
(
s
.
synfilter
,
1
,
nil
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
end
end
function
s
.
LSynTarget
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
c
,
tuner
,
mg
)
local
minc
=
2
local
maxc
=
c
:
GetLevel
()
local
g1
=
nil
local
g2
=
nil
local
g3
=
nil
if
mg
then
g1
=
mg
:
Filter
(
s
.
matfilter1
,
nil
,
c
,
tp
)
g2
=
mg
:
Filter
(
s
.
matfilter2
,
nil
,
c
)
g3
=
g2
:
Clone
()
else
g1
=
Duel
.
GetMatchingGroup
(
s
.
matfilter1
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
,
tp
)
g2
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
,
c
)
g3
=
Duel
.
GetMatchingGroup
(
s
.
matfilter2
,
tp
,
LOCATION_MZONE
+
LOCATION_HAND
,
LOCATION_MZONE
,
nil
,
c
)
end
local
pe
=
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_SMATERIAL
)
local
lv
=
c
:
GetLevel
()
local
tuc
=
nil
if
tuner
then
tuner
=
tuc
else
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SMATERIAL
)
if
not
pe
then
local
t1
=
g1
:
FilterSelect
(
tp
,
s
.
synfilter
,
1
,
1
,
nil
,
c
,
lv
,
g2
,
g3
,
minc
,
maxc
,
tp
)
tuc
=
t1
:
GetFirst
()
else
tuc
=
pe
:
GetOwner
()
Group
.
FromCards
(
tuc
):
Select
(
tp
,
1
,
1
,
nil
)
end
end
local
tsg
=
tuc
:
IsHasEffect
(
EFFECT_HAND_SYNCHRO
)
and
g3
or
g2
local
f
=
tuc
.
tuner_filter
if
tuc
.
tuner_filter
then
tsg
=
tsg
:
Filter
(
f
,
nil
)
end
local
g
=
s
.
SelectGroup
(
tp
,
HINTMSG_SMATERIAL
,
tsg
,
s
.
goal
,
Group
.
FromCards
(
tuc
),
minc
,
maxc
,
tp
,
lv
,
c
,
tuc
)
if
g
then
g
:
KeepAlive
()
e
:
SetLabelObject
(
g
)
return
true
else
return
false
end
end
function
s
.
gspcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_SYNCHRO
)
end
function
s
.
gspfilter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x2c8
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
)
end
function
s
.
gsptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>=
2
and
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
and
Duel
.
IsExistingMatchingCard
(
s
.
gspfilter
,
tp
,
LOCATION_GRAVE
,
0
,
2
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
2
,
tp
,
LOCATION_GRAVE
)
end
function
s
.
gspop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<
2
or
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
return
end
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
NecroValleyFilter
(
s
.
gspfilter
),
tp
,
LOCATION_GRAVE
,
0
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>=
2
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
sg
=
g
:
Select
(
tp
,
2
,
2
,
nil
)
for
tc
in
aux
.
Next
(
sg
)
do
Duel
.
SpecialSummonStep
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_DISABLE
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
tc
:
RegisterEffect
(
e1
)
local
e2
=
e1
:
Clone
()
e2
:
SetCode
(
EFFECT_DISABLE_EFFECT
)
tc
:
RegisterEffect
(
e2
)
end
Duel
.
SpecialSummonComplete
()
end
end
function
s
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
rp
==
1
-
tp
end
function
s
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
IsAbleToExtraAsCost
()
end
Duel
.
SendtoDeck
(
e
:
GetHandler
(),
nil
,
0
,
REASON_COST
)
end
function
s
.
spfilter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x2c8
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
s
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetMZoneCount
(
tp
,
e
:
GetHandler
(),
tp
)
>
0
and
Duel
.
IsExistingMatchingCard
(
s
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
function
s
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ft
=
math.min
(
2
,
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
))
if
ft
==
0
then
return
end
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
ft
=
1
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
s
.
spfilter
),
tp
,
LOCATION_GRAVE
,
0
,
1
,
ft
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
\ No newline at end of file
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