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
Amiya
pre-release-database-cdb
Commits
721a0296
Commit
721a0296
authored
Nov 30, 2023
by
Tang Xinwei
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'master' of
https://code.mycard.moe/mycard/pre-release-database-cdb
parents
d0b8414f
d8fa1e2c
Changes
31
Show whitespace changes
Inline
Side-by-side
Showing
31 changed files
with
164 additions
and
161 deletions
+164
-161
script/c100200244.lua
script/c100200244.lua
+90
-95
script/c100211123.lua
script/c100211123.lua
+2
-3
script/c100212002.lua
script/c100212002.lua
+3
-2
script/c100214002.lua
script/c100214002.lua
+1
-3
script/c100214007.lua
script/c100214007.lua
+4
-4
script/c100214018.lua
script/c100214018.lua
+4
-4
script/c101202081.lua
script/c101202081.lua
+1
-1
script/c101202082.lua
script/c101202082.lua
+1
-1
script/c101202083.lua
script/c101202083.lua
+2
-2
script/c101202084.lua
script/c101202084.lua
+1
-1
script/c101202085.lua
script/c101202085.lua
+1
-1
script/c101202086.lua
script/c101202086.lua
+1
-1
script/c101202087.lua
script/c101202087.lua
+1
-1
script/c101202090.lua
script/c101202090.lua
+1
-1
script/c101202091.lua
script/c101202091.lua
+1
-1
script/c101202092.lua
script/c101202092.lua
+1
-1
script/c101203004.lua
script/c101203004.lua
+1
-1
script/c101203005.lua
script/c101203005.lua
+1
-1
script/c101203015.lua
script/c101203015.lua
+8
-7
script/c101203044.lua
script/c101203044.lua
+9
-10
script/c101203045.lua
script/c101203045.lua
+16
-7
script/c101203046.lua
script/c101203046.lua
+1
-1
script/c101203056.lua
script/c101203056.lua
+2
-1
script/c101203057.lua
script/c101203057.lua
+1
-1
script/c101203074.lua
script/c101203074.lua
+1
-1
script/c101203075.lua
script/c101203075.lua
+1
-1
script/c101203078.lua
script/c101203078.lua
+2
-3
script/c101204004.lua
script/c101204004.lua
+1
-1
script/c101204054.lua
script/c101204054.lua
+4
-3
script/c58132856.lua
script/c58132856.lua
+1
-1
test-release.cdb
test-release.cdb
+0
-0
No files found.
script/c100200244.lua
View file @
721a0296
--
灵摆女巫
local
cm
,
m
,
o
=
GetID
()
function
cm
.
initial_effect
(
c
)
--pendulum summon
--
coded by Lyris
--Pendulum Witch
local
s
,
id
,
o
=
GetID
(
)
function
s
.
initial_effect
(
c
)
aux
.
EnablePendulumAttribute
(
c
)
--Destroy P
--to extra
aux
.
RegisterMergedDelayedEvent
(
c
,
id
,
EVENT_DESTROYED
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_DESTROY
+
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_TOEXTRA
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e1
:
SetCountLimit
(
1
,
m
)
e1
:
SetTarget
(
cm
.
destg
)
e1
:
SetOperation
(
cm
.
desop
)
e1
:
SetCode
(
EVENT_CUSTOM
+
id
)
e1
:
SetRange
(
LOCATION_PZONE
)
e1
:
SetCountLimit
(
1
,
id
)
e1
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e1
:
SetCondition
(
s
.
txcon
)
e1
:
SetTarget
(
s
.
txtg
)
e1
:
SetOperation
(
s
.
txop
)
c
:
RegisterEffect
(
e1
)
local
e4
=
e1
:
Clone
()
e4
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e4
:
SetCondition
(
cm
.
condition
)
c
:
RegisterEffect
(
e4
)
--pendulum
--search
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
id
,
1
))
e2
:
SetCategory
(
CATEGORY_DESTROY
+
CATEGORY_SEARCH
+
CATEGORY_TOHAND
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetCode
(
EVENT_
DESTROYED
)
e2
:
Set
Property
(
EFFECT_FLAG_DELAY
)
e2
:
Set
Condition
(
cm
.
pencon
)
e2
:
SetTarget
(
cm
.
pen
tg
)
e2
:
SetOperation
(
cm
.
pen
op
)
e2
:
SetCode
(
EVENT_
SUMMON_SUCCESS
)
e2
:
Set
CountLimit
(
1
,
id
+
o
)
e2
:
Set
Property
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e2
:
SetTarget
(
s
.
th
tg
)
e2
:
SetOperation
(
s
.
th
op
)
c
:
RegisterEffect
(
e2
)
--to EX
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_TOEXTRA
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_DESTROYED
)
e3
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e3
:
SetRange
(
LOCATION_PZONE
)
e3
:
SetCountLimit
(
1
,
m
+
o
)
e3
:
SetCondition
(
cm
.
tecon
)
e3
:
SetTarget
(
cm
.
tetg
)
e3
:
SetOperation
(
cm
.
teop
)
local
e3
=
e2
:
Clone
()
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e3
:
SetCondition
(
s
.
thcon
)
c
:
RegisterEffect
(
e3
)
--to scale
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetDescription
(
aux
.
Stringid
(
id
,
2
))
e4
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e4
:
SetCode
(
EVENT_DESTROYED
)
e4
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e4
:
SetCondition
(
s
.
pzcon
)
e4
:
SetTarget
(
s
.
pztg
)
e4
:
SetOperation
(
s
.
pzop
)
c
:
RegisterEffect
(
e4
)
end
function
s
.
cfilter
(
c
,
tp
,
chk
)
return
c
:
IsPreviousPosition
(
POS_FACEUP
)
and
c
:
GetPreviousTypeOnField
()
&
(
TYPE_FUSION
+
TYPE_SYNCHRO
+
TYPE_XYZ
)
>
0
and
c
:
IsPreviousLocation
(
LOCATION_MZONE
)
and
c
:
IsPreviousControler
(
tp
)
and
(
c
:
IsReason
(
REASON_BATTLE
)
or
c
:
IsReason
(
REASON_EFFECT
)
and
c
:
GetReasonPlayer
()
==
1
-
tp
)
and
(
not
chk
or
Duel
.
IsExistingMatchingCard
(
s
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
c
))
end
function
s
.
chk
(
c
,
tc
)
return
c
:
GetOriginalRace
()
==
tc
:
GetOriginalRace
()
end
function
s
.
filter
(
c
,
r
)
if
not
c
:
IsType
(
TYPE_PENDULUM
)
then
return
false
end
local
t
=
type
(
r
)
if
t
==
'userdata'
then
local
v
=
aux
.
GetValueType
(
r
)
if
v
==
'Card'
then
return
s
.
chk
(
c
,
r
)
elseif
v
==
'Group'
then
return
r
:
IsExists
(
s
.
chk
,
1
,
c
,
c
)
else
return
false
end
elseif
t
==
'number'
then
return
c
:
GetOriginalRace
()
==
r
else
return
false
end
end
function
s
.
txcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
s
.
cfilter
,
1
,
nil
,
tp
)
end
function
s
.
txtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
g
=
eg
:
Filter
(
s
.
cfilter
,
nil
,
tp
,
chk
==
0
)
if
chk
==
0
then
return
#
g
>
0
end
Duel
.
SetTargetCard
(
g
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOEXTRA
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
cm
.
desfilter
(
c
)
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsFaceup
()
function
s
.
txop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetTargetsRelateToChain
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
id
,
3
))
local
tg
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
filter
,
tp
,
LOCATION_DECK
,
1
,
1
,
nil
,
g
)
Duel
.
SendtoExtraP
(
tg
,
nil
,
REASON_EFFECT
)
end
function
cm
.
th
filter
(
c
)
function
s
.
s
filter
(
c
)
return
c
:
IsLevelBelow
(
4
)
and
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsAbleToHand
()
end
function
cm
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_PZONE
)
and
c
m
.
desfilter
(
chkc
)
and
chkc
~=
e
:
GetHandler
(
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
cm
.
desfilter
,
tp
,
LOCATION_PZONE
,
LOCATION_PZONE
,
1
,
e
:
GetHandler
()
)
and
Duel
.
IsExistingMatchingCard
(
cm
.
th
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
function
s
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_PZONE
)
and
c
hkc
:
IsControler
(
tp
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
nil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
s
.
s
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_DESTROY
)
local
g
=
Duel
.
SelectTarget
(
tp
,
cm
.
desfilter
,
tp
,
LOCATION_PZONE
,
LOCATION_PZONE
,
1
,
1
,
e
:
GetHandler
())
g
:
AddCard
(
e
:
GetHandler
())
local
g
=
Duel
.
SelectTarget
(
tp
,
nil
,
tp
,
LOCATION_PZONE
,
0
,
1
,
1
,
nil
)
+
e
:
GetHandler
()
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
2
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
cm
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
s
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
and
e
:
GetHandler
():
IsRelateToEffect
(
e
)
and
Duel
.
Destroy
(
Group
.
FromCards
(
tc
,
e
:
GetHandler
()),
REASON_EFFECT
)
==
2
then
local
g
=
Group
.
FromCards
(
c
,
tc
):
Filter
(
Card
.
IsRelateToChain
,
nil
)
if
#
g
<
2
or
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
<
2
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
cm
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
end
end
local
sg
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
sfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
Duel
.
SendtoHand
(
sg
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
sg
)
end
function
cm
.
conditi
on
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
s
.
thc
on
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_PENDULUM
)
end
function
cm
.
pen
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
s
.
pz
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
c
:
IsPreviousLocation
(
LOCATION_MZONE
)
and
c
:
IsFaceup
()
return
c
:
IsPreviousLocation
(
LOCATION_MZONE
)
and
c
:
IsFaceup
Ex
()
end
function
cm
.
pen
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
s
.
pz
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
0
)
or
Duel
.
CheckLocation
(
tp
,
LOCATION_PZONE
,
1
)
end
end
function
cm
.
pen
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
s
.
pz
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
c
:
IsRelateToEffect
(
e
)
then
Duel
.
MoveToField
(
c
,
tp
,
tp
,
LOCATION_PZONE
,
POS_FACEUP
,
true
)
end
end
function
cm
.
cfilter
(
c
,
tp
)
return
c
:
IsPreviousLocation
(
LOCATION_MZONE
)
and
c
:
IsPreviousPosition
(
POS_FACEUP
)
and
c
:
IsPreviousControler
(
tp
)
and
c
:
IsType
(
TYPE_XYZ
+
TYPE_SYNCHRO
+
TYPE_FUSION
)
and
c
:
IsReason
(
REASON_DESTROY
)
and
(
c
:
IsReason
(
REASON_BATTLE
)
or
c
:
GetReasonPlayer
()
==
1
-
tp
)
end
function
cm
.
tefilter
(
c
,
race
)
return
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
GetOriginalRace
()
&
race
~=
0
end
function
cm
.
tecon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
cm
.
cfilter
,
1
,
nil
,
tp
)
end
function
cm
.
tetg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
g
=
eg
:
Filter
(
cm
.
cfilter
,
nil
,
tp
)
local
tc
=
g
:
GetFirst
()
local
sg
=
Group
.
CreateGroup
()
while
tc
do
local
rg
=
Duel
.
GetMatchingGroup
(
cm
.
tefilter
,
tp
,
LOCATION_DECK
,
0
,
nil
,
tc
:
GetOriginalRace
())
sg
:
Merge
(
rg
)
tc
=
g
:
GetNext
()
end
if
chk
==
0
then
return
sg
:
GetCount
()
>
0
end
end
function
cm
.
teop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
eg
:
Filter
(
cm
.
cfilter
,
nil
,
tp
)
local
tc
=
g
:
GetFirst
()
local
sg
=
Group
.
CreateGroup
()
while
tc
do
local
rg
=
Duel
.
GetMatchingGroup
(
cm
.
tefilter
,
tp
,
LOCATION_DECK
,
0
,
nil
,
tc
:
GetOriginalRace
())
sg
:
Merge
(
rg
)
tc
=
g
:
GetNext
()
end
if
sg
:
GetCount
()
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
0
))
local
exg
=
sg
:
Select
(
tp
,
1
,
1
,
nil
)
Duel
.
SendtoExtraP
(
exg
,
nil
,
REASON_EFFECT
)
end
if
c
:
IsRelateToChain
()
then
Duel
.
MoveToField
(
c
,
tp
,
tp
,
LOCATION_PZONE
,
POS_FACEUP
,
true
)
end
end
\ No newline at end of file
script/c100211123.lua
View file @
721a0296
...
...
@@ -45,11 +45,10 @@ function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
s
.
filter
(
c
,
e
,
tp
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0xb5
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
)
and
Duel
.
IsExistingTarget
(
s
.
filter2
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
c
,
e
,
tp
)
end
function
s
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_REMOVED
)
and
chkc
:
IsControler
(
tp
)
and
s
.
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
Get
LocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
s
.
filter
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
nil
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
Get
MZoneCount
(
tp
,
e
:
GetHandler
()
)
>
0
and
Duel
.
IsExistingTarget
(
s
.
filter
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
tc
=
Duel
.
SelectTarget
(
tp
,
s
.
filter
,
tp
,
LOCATION_REMOVED
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
tc
,
1
,
0
,
0
)
...
...
script/c100212002.lua
View file @
721a0296
...
...
@@ -14,6 +14,7 @@ function s.initial_effect(c)
e2
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e2
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e2
:
SetRange
(
LOCATION_HAND
+
LOCATION_GRAVE
)
e2
:
SetCountLimit
(
1
,
id
+
EFFECT_COUNT_CODE_OATH
)
e2
:
SetCondition
(
s
.
spcon
)
e2
:
SetOperation
(
s
.
spop
)
c
:
RegisterEffect
(
e2
)
...
...
@@ -39,7 +40,7 @@ function s.initial_effect(c)
end
s
.
lvup
=
{
57116033
,
id
}
function
s
.
spfilter
(
c
)
return
(
c
:
IsCode
(
57116033
)
or
c
:
IsSetCard
(
0x3008
))
and
c
:
IsFaceupEx
()
and
c
:
IsAbleToRemoveAsCost
()
return
(
c
:
IsCode
(
57116033
)
or
c
:
IsSetCard
(
0x3008
)
and
c
:
IsType
(
TYPE_FUSION
)
)
and
c
:
IsFaceupEx
()
and
c
:
IsAbleToRemoveAsCost
()
end
function
s
.
spcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
...
...
@@ -72,7 +73,7 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
end
end
function
s
.
descon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
re
:
GetHandler
():
IsOnField
()
and
re
:
GetHandler
():
IsRelateToEffect
(
re
)
and
re
:
IsActiveType
(
TYPE_MONSTER
)
return
r
p
~=
tp
and
r
e
:
GetHandler
():
IsOnField
()
and
re
:
GetHandler
():
IsRelateToEffect
(
re
)
and
re
:
IsActiveType
(
TYPE_MONSTER
)
end
function
s
.
destg2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
re
:
GetHandler
():
IsDestructable
()
end
...
...
script/c100214002.lua
View file @
721a0296
...
...
@@ -60,9 +60,7 @@ function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
local
check
=
Duel
.
IsExistingMatchingCard
(
s
.
checkfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>-
1
and
Duel
.
IsExistingMatchingCard
(
s
.
spfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
,
check
)
end
if
check
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_HAND
)
else
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
)
end
function
s
.
spop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
then
return
end
...
...
script/c100214007.lua
View file @
721a0296
script/c100214018.lua
View file @
721a0296
...
...
@@ -84,10 +84,10 @@ function s.splimit(e,c)
return
not
c
:
IsRace
(
RACE_MACHINE
)
and
c
:
IsLocation
(
LOCATION_EXTRA
)
end
function
s
.
thfilter
(
c
,
e
,
tp
)
return
c
:
IsCode
(
37351133
)
and
(
c
:
IsAbleToHand
()
or
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
))
return
c
:
IsCode
(
37351133
)
and
(
c
:
IsAbleToHand
()
or
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
))
and
c
:
IsFaceupEx
()
end
function
s
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
thfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
thfilter
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
)
end
function
s
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
script/c101202081.lua
View file @
721a0296
--
越龙武士 谦
--
Ken the Warrior Dragon
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--to hand
...
...
script/c101202082.lua
View file @
721a0296
--
斐钻之虎 玄
--
Gen the Diamond Tiger
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--to hand
...
...
script/c101202083.lua
View file @
721a0296
--
勤劳的山螳螂
--
Asset Mountis
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--special summon
...
...
@@ -37,7 +37,7 @@ function s.spfilter(c)
end
function
s
.
spcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
return
Duel
.
IsExistingMatchingCard
(
s
.
spfilter
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
)
return
Duel
.
IsExistingMatchingCard
(
s
.
spfilter
,
c
:
GetControler
()
,
0
,
LOCATION_MZONE
,
1
,
nil
)
end
function
s
.
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsCanChangePosition
()
...
...
script/c101202084.lua
View file @
721a0296
--
维修区骑士 菲莉
--
Pitknight Filly
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
c
:
EnableReviveLimit
()
...
...
script/c101202085.lua
View file @
721a0296
--
电气念力斗技传承者
--
Wattsychic Fighting Porter
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--Activate
...
...
script/c101202086.lua
View file @
721a0296
--
Déchu d
e Tistina
--
Fallen of th
e Tistina
--Coded by Lee
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101202087.lua
View file @
721a0296
--Re
venant d
e Tistina
--Re
turned of th
e Tistina
--Coded by Lee
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101202090.lua
View file @
721a0296
--
Jeu D
e Tistina
--
Play of th
e Tistina
--Coded by Lee
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101202091.lua
View file @
721a0296
--
Étreinte d
e Tistina
--
Embrace of th
e Tistina
--Coded by Lee
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101202092.lua
View file @
721a0296
--Dis
sonance d
e Tistina
--Dis
cordance of th
e Tistina
--Coded by Lee
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101203004.lua
View file @
721a0296
--
急袭猛禽-漆黑伯劳
--
RR-ノワール・レイニアス
--lua by zengsxing
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101203005.lua
View file @
721a0296
--
急袭猛禽-繁盛秃鹫
--
RR-ブルーム・ヴァルチャー
--lua by zengsxing
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101203015.lua
View file @
721a0296
...
...
@@ -91,13 +91,14 @@ function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g2
,
1
,
0
,
0
)
end
function
s
.
rmop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ex1
,
tg1
=
Duel
.
GetOperationInfo
(
0
,
CATEGORY_REMOVE
)
local
ex2
,
tg2
=
Duel
.
GetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
)
if
tg1
:
GetFirst
():
IsRelateToEffect
(
e
)
and
Duel
.
Remove
(
e
:
GetHandler
(),
POS_FACEUP
,
REASON_EFFECT
)
~=
0
then
Duel
.
Remove
(
tg1
,
POS_FACEUP
,
REASON_EFFECT
)
local
res1
,
tg1
=
Duel
.
GetOperationInfo
(
0
,
CATEGORY_REMOVE
)
local
res2
,
tg2
=
Duel
.
GetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
)
local
c
,
rc
,
sc
=
e
:
GetHandler
(),
tg1
:
GetFirst
(),
tg2
:
GetFirst
()
if
rc
:
IsRelateToEffect
(
e
)
and
rc
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsOnField
()
and
Duel
.
Remove
(
c
,
POS_FACEUP
,
REASON_EFFECT
)
*
Duel
.
Remove
(
tg1
,
POS_FACEUP
,
REASON_EFFECT
)
>
0
then
if
sc
:
IsRelateToEffect
(
e
)
and
sc
:
IsRace
(
RACE_FISH
)
then
Duel
.
SpecialSummon
(
sc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
if
tg2
:
GetFirst
():
IsRelateToEffect
(
e
)
and
tg2
:
GetFirst
():
IsRace
(
RACE_FISH
)
then
Duel
.
SpecialSummon
(
tg2
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
--spsummon
...
...
script/c101203044.lua
View file @
721a0296
--灯魚
--Scripted by Crescent0v0
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--synchro summon
...
...
@@ -42,14 +41,6 @@ function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
2
,
0
,
0
)
end
function
s
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
return
end
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<
2
then
return
end
if
not
Duel
.
IsPlayerCanSpecialSummonMonster
(
tp
,
101203144
,
0
,
TYPES_TOKEN_MONSTER
,
0
,
0
,
1
,
RACE_FISH
,
ATTRIBUTE_FIRE
)
then
return
end
for
i
=
1
,
2
do
local
token
=
Duel
.
CreateToken
(
tp
,
101203144
)
Duel
.
SpecialSummonStep
(
token
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
Duel
.
SpecialSummonComplete
()
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_CANNOT_SPECIAL_SUMMON
)
...
...
@@ -58,6 +49,14 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
e1
:
SetTarget
(
s
.
splimit
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
return
end
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<
2
then
return
end
if
not
Duel
.
IsPlayerCanSpecialSummonMonster
(
tp
,
101203144
,
0
,
TYPES_TOKEN_MONSTER
,
0
,
0
,
1
,
RACE_FISH
,
ATTRIBUTE_FIRE
)
then
return
end
for
i
=
1
,
2
do
local
token
=
Duel
.
CreateToken
(
tp
,
101203144
+
i
)
Duel
.
SpecialSummonStep
(
token
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
Duel
.
SpecialSummonComplete
()
end
function
s
.
splimit
(
e
,
c
)
return
not
c
:
IsRace
(
RACE_FISH
)
and
c
:
IsLocation
(
LOCATION_EXTRA
)
...
...
script/c101203045.lua
View file @
721a0296
--急袭猛禽-崛起叛逆猎鹰
--lua by zengsxing
--RR-ライジング・リベリオン・ファルコン
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--Xyz Summon
...
...
@@ -41,18 +40,26 @@ end
function
s
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_XYZ
)
end
function
s
.
damval1
(
c
)
if
c
:
GetLocation
()
~=
LOCATION_MZONE
then
return
end
return
math.max
(
0
,
c
:
GetTextAttack
())
end
function
s
.
damval2
(
c
)
if
c
:
GetPreviousLocation
()
~=
LOCATION_MZONE
then
return
end
return
math.max
(
0
,
c
:
GetTextAttack
())
end
function
s
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_ONFIELD
,
nil
)
if
chk
==
0
then
return
#
g
>
0
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
g
:
GetCount
(),
0
,
0
)
local
atk
=
g
:
Filter
(
Card
.
IsType
,
nil
,
TYPE_MONSTER
):
GetSum
(
Card
.
GetBaseAttack
)
local
atk
=
g
:
GetSum
(
s
.
damval1
)
if
atk
>
0
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
1
-
tp
,
0
)
end
end
function
s
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_ONFIELD
,
nil
)
if
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
>
0
and
e
:
GetHandler
():
GetOverlayGroup
():
Filter
(
Card
.
IsType
,
nil
,
TYPE_XYZ
):
GetClassCount
(
Card
.
GetCode
)
>=
3
then
local
dg
=
Duel
.
GetOperatedGroup
()
:
Filter
(
Card
.
IsType
,
nil
,
TYPE_MONSTER
)
local
atk
=
dg
:
GetSum
(
Card
.
GetBaseAttack
)
local
dg
=
Duel
.
GetOperatedGroup
()
local
atk
=
dg
:
GetSum
(
s
.
damval2
)
if
atk
>
0
then
Duel
.
BreakEffect
()
Duel
.
Damage
(
1
-
tp
,
atk
,
REASON_EFFECT
)
...
...
@@ -63,8 +70,10 @@ function s.filter(c)
return
c
:
IsSetCard
(
0xba
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsType
(
TYPE_XYZ
)
and
not
c
:
IsForbidden
()
end
function
s
.
copycost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
CheckRemoveOverlayCard
(
tp
,
3
,
REASON_COST
)
end
e
:
GetHandler
():
RemoveOverlayCard
(
tp
,
3
,
3
,
REASON_COST
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
id
)
==
0
and
c
:
CheckRemoveOverlayCard
(
tp
,
3
,
REASON_COST
)
end
c
:
RemoveOverlayCard
(
tp
,
3
,
3
,
REASON_COST
)
c
:
RegisterFlagEffect
(
id
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
s
.
copytg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
tp
)
and
s
.
filter
(
chkc
)
end
...
...
script/c101203046.lua
View file @
721a0296
--
急袭猛禽-勇气林鸮
--
RR-ブレイブ・ストリクス
--lua by zengsxing
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101203056.lua
View file @
721a0296
--
跃升阶魔法-奇袭猛禽之力
--
RRUM-レイド・ラプターズ・フォース
--lua by zengsxing
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
@@ -45,6 +45,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
local
sg
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
1
,
nil
,
e
,
tp
,
tg
)
local
sc
=
sg
:
GetFirst
()
if
sc
and
Duel
.
SpecialSummon
(
sc
,
SUMMON_TYPE_XYZ
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
~=
0
then
sc
:
CompleteProcedure
()
for
tc
in
aux
.
Next
(
tg
)
do
local
mg
=
tc
:
GetOverlayGroup
()
if
mg
:
GetCount
()
~=
0
then
...
...
script/c101203057.lua
View file @
721a0296
--
急袭猛禽-栖所
--
RR-ルースト
--lua by zengsxing
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101203074.lua
View file @
721a0296
--
急袭猛禽-壮丽之光
--
RR-グロリアス・ブライト
--lua by zengsxing
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
...
...
script/c101203075.lua
View file @
721a0296
...
...
@@ -59,7 +59,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function
s
.
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0xac
)
and
c
:
IsType
(
TYPE_MONSTER
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0xac
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsType
(
TYPE_XYZ
)
end
function
s
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsExistingMatchingCard
(
s
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
...
...
script/c101203078.lua
View file @
721a0296
--嗤う黒山羊
--Scripted by Crescent0v0
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--Activate & sumlimit
...
...
@@ -48,7 +47,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp)
Duel
.
RegisterEffect
(
e1
,
tp
)
end
function
s
.
sumlimit
(
e
,
c
,
sump
,
sumtype
,
sumpos
,
targetp
)
return
c
:
IsCod
e
(
e
:
GetLabel
())
and
not
c
:
IsLocation
(
LOCATION_GRAVE
)
return
c
:
IsOriginalCodeRul
e
(
e
:
GetLabel
())
and
not
c
:
IsLocation
(
LOCATION_GRAVE
)
end
function
s
.
alop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
...
...
@@ -65,5 +64,5 @@ function s.alop(e,tp,eg,ep,ev,re,r,rp)
end
function
s
.
actlimit
(
e
,
re
,
tp
)
local
rc
=
re
:
GetHandler
()
return
rc
:
Is
Cod
e
(
e
:
GetLabel
())
and
(
rc
:
IsOnField
()
or
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
))
return
rc
:
Is
OriginalCodeRul
e
(
e
:
GetLabel
())
and
(
rc
:
IsOnField
()
or
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
))
end
\ No newline at end of file
script/c101204004.lua
View file @
721a0296
...
...
@@ -29,7 +29,7 @@ function s.initial_effect(c)
c
:
RegisterEffect
(
e1
)
end
function
s
.
srfilter
(
c
)
return
c
:
IsCode
(
101204051
)
or
(
aux
.
IsCodeListed
(
c
,
101204051
)
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
))
and
c
:
IsAbleToHand
()
return
(
c
:
IsCode
(
101204051
)
or
aux
.
IsCodeListed
(
c
,
101204051
)
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
))
and
c
:
IsAbleToHand
()
end
function
s
.
srtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
srfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
...
...
script/c101204054.lua
View file @
721a0296
...
...
@@ -65,6 +65,7 @@ function s.dactivate(e,tp,eg,ep,ev,re,r,rp)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
end
local
ct1
=
6
-
Duel
.
GetFieldGroupCount
(
tp
,
LOCATION_HAND
,
0
)
local
ct2
=
6
-
Duel
.
GetFieldGroupCount
(
tp
,
0
,
LOCATION_HAND
)
...
...
script/c58132856.lua
View file @
721a0296
...
...
@@ -33,7 +33,7 @@ function c58132856.initial_effect(c)
e4
:
SetOperation
(
c58132856
.
desop
)
c
:
RegisterEffect
(
e4
)
end
s
.
set_as_spell
=
true
c58132856
.
set_as_spell
=
true
function
c58132856
.
regop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
c
:
IsPreviousLocation
(
LOCATION_SZONE
)
and
c
:
IsPreviousPosition
(
POS_FACEDOWN
)
...
...
test-release.cdb
View file @
721a0296
No preview for this file type
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