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
a7f5005e
Commit
a7f5005e
authored
Jan 05, 2022
by
Tachibana
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
eme
parent
f15b2d4a
Pipeline
#8506
passed with stages
in 34 minutes and 31 seconds
Changes
12
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
12 changed files
with
209 additions
and
426 deletions
+209
-426
expansions/222DIY.cdb
expansions/222DIY.cdb
+0
-0
expansions/script/c10071211.lua
expansions/script/c10071211.lua
+1
-2
expansions/script/c10071221.lua
expansions/script/c10071221.lua
+1
-2
expansions/script/c12043080.lua
expansions/script/c12043080.lua
+3
-3
expansions/script/c24865313.lua
expansions/script/c24865313.lua
+22
-73
expansions/script/c24865314.lua
expansions/script/c24865314.lua
+34
-26
expansions/script/c24865315.lua
expansions/script/c24865315.lua
+33
-83
expansions/script/c24865316.lua
expansions/script/c24865316.lua
+49
-89
expansions/script/c24865317.lua
expansions/script/c24865317.lua
+32
-67
expansions/script/c24865318.lua
expansions/script/c24865318.lua
+1
-1
expansions/script/c24865320.lua
expansions/script/c24865320.lua
+8
-7
expansions/script/c24865321.lua
expansions/script/c24865321.lua
+25
-73
No files found.
expansions/222DIY.cdb
View file @
a7f5005e
No preview for this file type
expansions/script/c10071211.lua
View file @
a7f5005e
...
...
@@ -78,8 +78,7 @@ function cm.counterop(e,tp,eg,ep,ev,re,r,rp)
end
--to gave
function
cm
.
tgcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
not
re
:
GetHandler
():
IsCode
(
m
)
return
not
re
or
not
re
:
GetHandler
():
IsCode
(
m
)
end
function
cm
.
tgtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsAbleToGrave
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
)
end
...
...
expansions/script/c10071221.lua
View file @
a7f5005e
...
...
@@ -51,8 +51,7 @@ function cm.initial_effect(c)
end
--code
function
cm
.
condition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
c
:
IsFaceup
()
and
c
:
IsLocation
(
LOCATION_MZONE
)
return
not
re
or
not
re
:
GetHandler
():
IsCode
(
m
)
end
--add conter
function
cm
.
countercost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
...
...
expansions/script/c12043080.lua
View file @
a7f5005e
...
...
@@ -45,7 +45,7 @@ function cm.spfilter(c,e,tp)
return
srre
.
check_set_FRXS
(
c
)
and
c
:
IsType
(
TYPE_DUAL
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
cm
.
disfilter
(
c
)
return
srre
.
check_set_FRXS
(
c
)
and
c
:
IsDiscardable
()
return
srre
.
check_set_FRXS
(
c
)
and
c
:
IsDiscardable
()
and
c
:
IsType
(
TYPE_MONSTER
)
end
function
cm
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
...
...
@@ -82,10 +82,10 @@ function cm.sumfilter1(c)
return
c
:
IsSummonable
(
true
,
nil
)
and
srre
.
check_set_FRXS
(
c
)
end
function
cm
.
sumfilter3
(
c
,
e
,
tp
)
return
c
:
GetSummonPlayer
()
==
1
-
tp
return
c
:
GetSummonPlayer
()
==
1
-
tp
end
function
cm
.
sumcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
cm
.
sumfilter3
,
1
,
nil
,
nil
,
tp
)
return
eg
:
IsExists
(
cm
.
sumfilter3
,
1
,
nil
,
nil
,
tp
)
end
function
cm
.
sumtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
cm
.
sumfilter1
,
tp
,
LOCATION_HAND
+
LOCATION_MZONE
,
0
,
1
,
nil
)
end
...
...
expansions/script/c24865313.lua
View file @
a7f5005e
...
...
@@ -3,25 +3,20 @@ local m=24865313
local
cm
=
_G
[
"c"
..
m
]
function
c24865313
.
initial_effect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCountLimit
(
1
,
24865313
)
e1
:
SetCost
(
cm
.
disrmcost
)
e1
:
SetCountLimit
(
1
,
24865313
)
e1
:
SetTarget
(
c24865313
.
tg
)
e1
:
SetOperation
(
c24865313
.
op
)
e1
:
SetCondition
(
cm
.
atkcon
)
c
:
RegisterEffect
(
e1
)
e4
=
e1
:
Clone
()
e4
:
SetTarget
(
cm
.
stg
)
e4
:
SetCondition
(
cm
.
atkcon2
)
c
:
RegisterEffect
(
e4
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetCategory
(
CATEGORY_TODECK
)
e2
:
SetCountLimit
(
1
,
24865313
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetCountLimit
(
1
,
24865313
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetRange
(
LOCATION_GRAVE
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetTarget
(
c24865313
.
drtg
)
...
...
@@ -31,54 +26,38 @@ end
function
c24865313
.
filte
(
c
,
e
,
tp
,
check
)
return
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
c
:
IsSetCard
(
0xb10
)
end
function
cm
.
atkcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865313
)
==
0
end
function
cm
.
atkcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865313
)
==
0
end
function
cm
.
disrmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
24865313
)
==
0
end
c
:
RegisterFlagEffect
(
24865313
,
RESET_CHAIN
,
0
,
1
)
end
function
c24865313
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
0
local
b2
=
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
1
local
b4
=
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
2
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
1
local
b4
=
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
2
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
(
b1
and
b2
)
or
(
b3
and
b4
)
end
Duel
.
SetOperationInfo
(
tp
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
tp
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
2
,
tp
,
LOCATION_DECK
)
end
function
c24865313
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
(
b1
and
b2
)
then
local
b1
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b2
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
1
and
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
2
,
nil
,
e
,
tp
)
if
not
b1
and
not
b2
then
return
end
if
b1
then
ops
[
off
]
=
aux
.
Stringid
(
24865313
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
(
b3
and
b4
)
then
if
b2
then
ops
[
off
]
=
aux
.
Stringid
(
24865313
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
1
-
tp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
e
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
Duel
.
SetOperationInfo
(
tp
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
if
sel
==
2
then
e
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
Duel
.
SetOperationInfo
(
tp
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
2
,
tp
,
LOCATION_DECK
)
end
end
function
c24865313
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sel
=
e
:
GetLabel
()
if
sel
==
1
then
if
sel
==
1
then
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
c24865313
.
filte
)
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
e
,
tp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
local
tc
=
g
:
GetFirst
()
...
...
@@ -92,10 +71,10 @@ function c24865313.op(e,tp,eg,ep,ev,re,r,rp)
e2
:
SetCondition
(
c24865313
.
descon
)
e2
:
SetOperation
(
c24865313
.
desop
)
Duel
.
RegisterEffect
(
e2
,
tp
)
end
end
end
--从卡组特殊召唤一张量子海妖怪兽
if
sel
==
2
then
--从卡组特殊召唤一张量子海妖怪兽
if
sel
==
2
then
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
return
end
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<
2
then
return
end
local
g
=
Duel
.
GetMatchingGroup
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
...
...
@@ -129,37 +108,7 @@ function c24865313.op(e,tp,eg,ep,ev,re,r,rp)
end
--从卡组特殊召唤两张量子海妖怪兽
end
function
c24865313
.
stg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
0
local
b2
=
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
GetLocationCount
(
0
,
LOCATION_MZONE
)
>
1
local
b4
=
Duel
.
IsExistingMatchingCard
(
c24865313
.
filte
,
tp
,
LOCATION_DECK
,
0
,
2
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
(
b1
and
b2
)
or
(
b3
and
b4
)
end
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
(
b1
and
b2
)
then
ops
[
off
]
=
aux
.
Stringid
(
24865313
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
(
b3
and
b4
)
then
ops
[
off
]
=
aux
.
Stringid
(
24865313
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
tp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
e
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
Duel
.
SetOperationInfo
(
tp
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
if
sel
==
2
then
e
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
Duel
.
SetOperationInfo
(
tp
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
2
,
tp
,
LOCATION_DECK
)
end
end
function
c24865313
.
desfilter
(
c
,
fid
)
return
c
:
GetFlagEffectLabel
(
24865313
)
==
fid
end
...
...
expansions/script/c24865314.lua
View file @
a7f5005e
...
...
@@ -2,14 +2,14 @@
local
m
=
24865314
local
cm
=
_G
[
"c"
..
m
]
function
c24865314
.
initial_effect
(
c
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_CANNOT_BE_LINK_MATERIAL
)
e0
:
SetValue
(
1
)
c
:
RegisterEffect
(
e0
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_CANNOT_BE_LINK_MATERIAL
)
e0
:
SetValue
(
1
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865314
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
24865314
,
0
))
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
)
...
...
@@ -21,7 +21,7 @@ function c24865314.initial_effect(c)
e1
:
SetTarget
(
c24865314
.
sptg
)
e1
:
SetOperation
(
c24865314
.
spop
)
c
:
RegisterEffect
(
e1
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
24865314
)
...
...
@@ -34,7 +34,7 @@ function c24865314.initial_effect(c)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetCode
(
EVENT_CHAINING
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e3
:
SetCountLimit
(
1
,
24865314
)
e3
:
SetCountLimit
(
1
)
e3
:
SetCost
(
c24865314
.
cost
)
e3
:
SetTarget
(
c24865314
.
tg
)
e3
:
SetOperation
(
c24865314
.
op
)
...
...
@@ -50,49 +50,57 @@ function c24865314.splimit(e,se,sp,st)
return
se
:
IsHasType
(
EFFECT_TYPE_ACTIONS
)
end
function
c24865314
.
filter2
(
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
end
function
c24865314
.
filter
(
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
and
not
c
:
IsCode
(
24865314
)
end
function
c24865314
.
spfilter
(
c
,
e
,
tp
,
code
)
return
c
:
IsSetCard
(
0xb10
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
c
:
IsType
(
TYPE_MONSTER
)
function
c24865314
.
nfilter
(
c
,
e
,
tp
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
and
not
c
:
IsCode
(
24865314
)
and
Duel
.
GetMZoneCount
(
tp
,
c
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c24865314
.
spfilter
,
tp
,
LOCATION_DECK
+
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
function
c24865314
.
spfilter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0xb10
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
c
:
IsType
(
TYPE_MONSTER
)
end
function
c24865314
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b1
=
Duel
.
GetCustomActivityCount
(
m
,
1
-
tp
,
ACTIVITY_CHAIN
)
local
b2
=
Duel
.
GetCustomActivityCount
(
m
,
tp
,
ACTIVITY_CHAIN
)
return
(
b1
+
b2
)
>=
5
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
(
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN1
or
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN2
)
end
end
function
c24865314
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanSpecialSummonCount
(
tp
,
1
)
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
function
c24865314
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
not
c
:
IsRelateToEffect
(
e
)
and
c
:
IsHasEffect
(
EFFECT_NECRO_VALLEY
)
then
return
end
if
not
c
:
IsRelateToEffect
(
e
)
or
c
:
IsHasEffect
(
EFFECT_NECRO_VALLEY
)
then
return
end
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
function
c24865314
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
CheckReleaseGroup
(
tp
,
c24865314
.
filter
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g
=
Duel
.
SelectReleaseGroup
(
tp
,
c24865314
.
filter
,
1
,
1
,
nil
,
e
,
tp
)
e
:
SetLabel
(
g
:
GetFirst
():
GetCode
())
Duel
.
Release
(
g
,
REASON_COST
)
e
:
SetLabel
(
1
)
return
true
end
function
c24865314
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
if
e
:
GetLabel
()
==
1
then
return
Duel
.
CheckReleaseGroup
(
tp
,
c24865314
.
nfilter
,
1
,
nil
,
e
,
tp
)
else
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c24865314
.
spfilter
,
tp
,
LOCATION_DECK
+
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
end
if
e
:
GetLabel
()
==
1
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_RELEASE
)
local
g
=
Duel
.
SelectReleaseGroup
(
tp
,
c24865314
.
nfilter
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
Release
(
g
,
REASON_COST
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_DECK
+
LOCATION_HAND
+
LOCATION_GRAVE
)
end
function
c24865314
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetMatchingGroup
(
c24865314
.
filter2
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
if
Duel
.
GetMZoneCount
(
tp
,
g
,
tp
)
>
0
then
return
end
local
code
=
e
:
GetLabel
()
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865314
.
spfilter
,
tp
,
LOCATION_DECK
+
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
,
code
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
c24865314
.
spfilter
),
tp
,
LOCATION_DECK
+
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
...
...
expansions/script/c24865315.lua
View file @
a7f5005e
...
...
@@ -2,27 +2,22 @@
local
m
=
24865315
local
cm
=
_G
[
"c"
..
m
]
function
c24865315
.
initial_effect
(
c
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_CANNOT_BE_LINK_MATERIAL
)
e0
:
SetValue
(
1
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865315
,
0
))
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865315
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
)
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetHintTiming
(
0
,
TIMINGS_CHECK_MONSTER
+
TIMING_MAIN_END
)
e1
:
SetRange
(
LOCATION_HAND
+
LOCATION_GRAVE
)
e1
:
SetCountLimit
(
1
,
24865
3
15
)
e1
:
SetCountLimit
(
1
,
24865
5
15
)
e1
:
SetCondition
(
c24865315
.
spcon
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetTarget
(
c24865315
.
sptg
)
e1
:
SetOperation
(
c24865315
.
spop
)
c
:
RegisterEffect
(
e1
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_AVOID_BATTLE_DAMAGE
)
e2
:
SetProperty
(
EFFECT_FLAG_IGNORE_IMMUNE
)
...
...
@@ -31,22 +26,16 @@ function c24865315.initial_effect(c)
e2
:
SetTarget
(
aux
.
TargetBoolFunction
(
Card
.
IsSetCard
,
0xb10
))
e2
:
SetValue
(
1
)
c
:
RegisterEffect
(
e2
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_
DESTROY
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_
TOGRAVE
+
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetCondition
(
c24865315
.
atkcon
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e3
:
SetCode
(
EVENT_CHAINING
)
e3
:
SetCountLimit
(
1
,
24865415
)
e3
:
SetCost
(
cm
.
disrmcost
)
e3
:
SetCountLimit
(
1
)
e3
:
SetTarget
(
c24865315
.
tg
)
e3
:
SetOperation
(
c24865315
.
op
)
c
:
RegisterEffect
(
e3
)
e4
=
e3
:
Clone
()
e4
:
SetTarget
(
c24865315
.
stg
)
e4
:
SetCondition
(
c24865315
.
atkcon2
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
)
...
...
@@ -61,7 +50,7 @@ function c24865315.filter(c)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
and
c
:
IsAbleToGrave
()
end
function
c24865315
.
filter2
(
c
,
e
,
tp
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c24865315
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b1
=
Duel
.
GetCustomActivityCount
(
m
,
1
-
tp
,
ACTIVITY_CHAIN
)
...
...
@@ -72,7 +61,7 @@ function c24865315.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if
chk
==
0
then
return
Duel
.
IsPlayerCanSpecialSummonCount
(
tp
,
1
)
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
function
c24865315
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
@@ -80,67 +69,17 @@ function c24865315.spop(e,tp,eg,ep,ev,re,r,rp)
if
not
c
:
IsRelateToEffect
(
e
)
and
c
:
IsHasEffect
(
EFFECT_NECRO_VALLEY
)
then
return
end
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
function
cm
.
disrmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
24865315
)
==
0
end
c
:
RegisterFlagEffect
(
24865315
,
RESET_CHAIN
,
0
,
1
)
end
function
c24865315
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865315
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865315
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865315
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
b1
or
b3
end
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
b1
then
ops
[
off
]
=
aux
.
Stringid
(
24865315
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
b3
then
ops
[
off
]
=
aux
.
Stringid
(
24865315
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
1
-
tp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
if
sel
==
2
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
function
c24865315
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sel
=
e
:
GetLabel
()
if
sel
==
1
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865315
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
end
if
sel
==
2
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865315
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
function
c24865315
.
atkcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865315
)
==
0
end
function
c24865315
.
atkcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865315
)
==
0
end
function
c24865315
.
stg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865315
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865315
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
b1
or
b3
end
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865315
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
if
not
b1
and
not
b3
then
return
end
local
off
=
1
local
ops
=
{}
local
opval
=
{}
...
...
@@ -154,13 +93,24 @@ function c24865315.stg(e,tp,eg,ep,ev,re,r,rp,chk)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
tp
,
table.unpack
(
ops
))
local
sp
=
1
-
tp
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
then
sp
=
tp
end
local
op
=
Duel
.
SelectOption
(
sp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
if
sel
==
2
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865315
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
end
if
sel
==
2
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865315
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
\ No newline at end of file
expansions/script/c24865316.lua
View file @
a7f5005e
...
...
@@ -2,14 +2,9 @@
local
m
=
24865316
local
cm
=
_G
[
"c"
..
m
]
function
c24865316
.
initial_effect
(
c
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_CANNOT_BE_LINK_MATERIAL
)
e0
:
SetValue
(
1
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865316
,
0
))
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865316
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
)
e1
:
SetCondition
(
c24865316
.
spcon
)
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
...
...
@@ -21,7 +16,7 @@ function c24865316.initial_effect(c)
e1
:
SetTarget
(
c24865316
.
sptg
)
e1
:
SetOperation
(
c24865316
.
spop
)
c
:
RegisterEffect
(
e1
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_INDESTRUCTABLE_EFFECT
)
...
...
@@ -36,16 +31,10 @@ function c24865316.initial_effect(c)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e3
:
SetCode
(
EVENT_CHAINING
)
e3
:
SetCost
(
cm
.
disrmcost
)
e3
:
SetCondition
(
c24865316
.
atkcon
)
e3
:
SetCountLimit
(
1
,
24865416
)
e3
:
SetCountLimit
(
1
)
e3
:
SetTarget
(
c24865316
.
tg
)
e3
:
SetOperation
(
c24865316
.
op
)
c
:
RegisterEffect
(
e3
)
e4
=
e3
:
Clone
()
e4
:
SetTarget
(
c24865316
.
stg
)
e4
:
SetCondition
(
c24865316
.
atkcon2
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
)
...
...
@@ -66,12 +55,12 @@ function c24865316.spcon(e,tp,eg,ep,ev,re,r,rp)
local
b1
=
Duel
.
GetCustomActivityCount
(
m
,
1
-
tp
,
ACTIVITY_CHAIN
)
local
b2
=
Duel
.
GetCustomActivityCount
(
m
,
tp
,
ACTIVITY_CHAIN
)
return
(
b1
+
b2
)
>=
5
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
(
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN1
or
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN2
)
end
end
function
c24865316
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanSpecialSummonCount
(
tp
,
1
)
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
function
c24865316
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
@@ -79,23 +68,22 @@ function c24865316.spop(e,tp,eg,ep,ev,re,r,rp)
if
not
c
:
IsRelateToEffect
(
e
)
and
c
:
IsHasEffect
(
EFFECT_NECRO_VALLEY
)
then
return
end
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
function
c24865316
.
filter
(
c
,
tp
)
return
c
:
IsType
(
TYPE_FIELD
)
and
c
:
GetActivateEffect
():
IsActivatable
(
tp
,
true
,
true
)
and
c
:
IsCode
(
24865310
)
return
c
:
IsType
(
TYPE_FIELD
)
and
(
c
:
GetActivateEffect
():
IsActivatable
(
tp
,
true
,
true
)
or
c
:
IsAbleToHand
()
)
and
c
:
IsCode
(
24865310
)
end
function
c24865316
.
filter2
(
c
)
return
c
:
IsType
(
TYPE_TRAP
)
and
c
:
IsSetCard
(
0xb10
)
and
c
:
IsSSetable
()
end
function
cm
.
disrmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
24865316
)
==
0
end
c
:
RegisterFlagEffect
(
24865316
,
RESET_CHAIN
,
0
,
1
)
end
function
c24865316
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b2
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
b1
or
(
b3
and
b2
)
end
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b2
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
if
chk
==
0
then
return
b1
or
b2
end
if
not
Duel
.
CheckPhaseActivity
()
then
e
:
SetLabel
(
1
)
else
e
:
SetLabel
(
0
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
c24865316
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b2
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
local
off
=
1
local
ops
=
{}
local
opval
=
{}
...
...
@@ -104,52 +92,50 @@ function c24865316.tg(e,tp,eg,ep,ev,re,r,rp,chk)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
(
b2
and
b3
)
then
if
b2
then
ops
[
off
]
=
aux
.
Stringid
(
24865316
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
1
-
tp
,
table.unpack
(
ops
))
local
sp
=
1
-
tp
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
then
sp
=
tp
end
if
not
b1
and
not
b2
then
return
end
local
op
=
Duel
.
SelectOption
(
sp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
end
function
c24865316
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sel
=
e
:
GetLabel
()
if
sel
==
1
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_OPERATECARD
)
if
e
:
GetLabel
()
==
1
then
Duel
.
RegisterFlagEffect
(
tp
,
15248873
,
RESET_CHAIN
,
0
,
1
)
end
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865316
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
tp
)
Duel
.
ResetFlagEffect
(
tp
,
15248873
)
local
tc
=
g
:
GetFirst
()
if
tc
then
local
te
=
tc
:
GetActivateEffect
()
local
b1
=
tc
:
IsAbleToHand
()
if
e
:
GetLabel
()
==
1
then
Duel
.
RegisterFlagEffect
(
tp
,
15248873
,
RESET_CHAIN
,
0
,
1
)
end
local
b2
=
te
:
IsActivatable
(
tp
,
true
,
true
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865316
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
tp
)
Duel
.
ResetFlagEffect
(
tp
,
15248873
)
if
b1
and
(
not
b2
or
Duel
.
SelectOption
(
tp
,
1190
,
1150
)
==
0
)
then
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
else
local
fc
=
Duel
.
GetFieldCard
(
tp
,
LOCATION_FZONE
,
0
)
if
fc
then
Duel
.
SendtoGrave
(
fc
,
REASON_RULE
)
Duel
.
BreakEffect
()
local
tc
=
g
:
GetFirst
()
if
tc
then
local
te
=
tc
:
GetActivateEffect
()
local
b1
=
tc
:
IsAbleToHand
()
if
e
:
GetLabel
()
==
1
then
Duel
.
RegisterFlagEffect
(
tp
,
15248873
,
RESET_CHAIN
,
0
,
1
)
end
local
b2
=
te
:
IsActivatable
(
tp
,
true
,
true
)
Duel
.
ResetFlagEffect
(
tp
,
15248873
)
if
b1
and
(
not
b2
or
Duel
.
SelectOption
(
tp
,
1190
,
1150
)
==
0
)
then
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
else
local
fc
=
Duel
.
GetFieldCard
(
tp
,
LOCATION_FZONE
,
0
)
if
fc
then
Duel
.
SendtoGrave
(
fc
,
REASON_RULE
)
Duel
.
BreakEffect
()
end
Duel
.
MoveToField
(
tc
,
tp
,
tp
,
LOCATION_FZONE
,
POS_FACEUP
,
true
)
te
:
UseCountLimit
(
tp
,
1
,
true
)
local
tep
=
tc
:
GetControler
()
local
cost
=
te
:
GetCost
()
if
cost
then
cost
(
te
,
tep
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
1
)
end
Duel
.
RaiseEvent
(
tc
,
4179255
,
te
,
0
,
tp
,
tp
,
Duel
.
GetCurrentChain
())
end
Duel
.
MoveToField
(
tc
,
tp
,
tp
,
LOCATION_FZONE
,
POS_FACEUP
,
true
)
te
:
UseCountLimit
(
tp
,
1
,
true
)
local
tep
=
tc
:
GetControler
()
local
cost
=
te
:
GetCost
()
if
cost
then
cost
(
te
,
tep
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
1
)
end
Duel
.
RaiseEvent
(
tc
,
4179255
,
te
,
0
,
tp
,
tp
,
Duel
.
GetCurrentChain
())
end
end
end
--从卡组选一张「量子妖海-狄拉克」加入手卡或在把这张卡发动的玩家的场上发动
if
sel
==
2
then
--从卡组选一张「量子妖海-狄拉克」加入手卡或在把这张卡发动的玩家的场上发动
if
sel
==
2
then
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
<=
0
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOFIELD
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865316
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
...
...
@@ -162,30 +148,4 @@ function c24865316.op(e,tp,eg,ep,ev,re,r,rp)
tc
:
RegisterEffect
(
e1
)
end
end
end
--卡组选一张「量子海妖」陷井卡在把这张卡发动的玩家的场上盖放
function
c24865316
.
stg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b2
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865316
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
b1
or
(
b3
and
b2
)
end
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
b1
then
ops
[
off
]
=
aux
.
Stringid
(
24865316
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
(
b2
and
b3
)
then
ops
[
off
]
=
aux
.
Stringid
(
24865316
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
tp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
end
\ No newline at end of file
expansions/script/c24865317.lua
View file @
a7f5005e
...
...
@@ -2,14 +2,9 @@
local
m
=
24865317
local
cm
=
_G
[
"c"
..
m
]
function
c24865317
.
initial_effect
(
c
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_CANNOT_BE_LINK_MATERIAL
)
e0
:
SetValue
(
1
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865317
,
0
))
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865317
,
0
))
e1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
)
...
...
@@ -21,8 +16,8 @@ function c24865317.initial_effect(c)
e1
:
SetTarget
(
c24865317
.
sptg
)
e1
:
SetOperation
(
c24865317
.
spop
)
c
:
RegisterEffect
(
e1
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
Duel
.
AddCustomActivityCounter
(
m
,
ACTIVITY_CHAIN
,
aux
.
FALSE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
0x10000000
+
24865317
)
e2
:
SetRange
(
LOCATION_MZONE
)
...
...
@@ -30,21 +25,15 @@ function c24865317.initial_effect(c)
e2
:
SetTargetRange
(
1
,
0
)
c
:
RegisterEffect
(
e2
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
+
CATEGORY_DESTROY
)
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
+
CATEGORY_DESTROY
)
e3
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e3
:
SetCondition
(
c24865317
.
atkcon
)
e3
:
SetCode
(
EVENT_CHAINING
)
e3
:
SetCost
(
cm
.
disrmcost
)
e3
:
SetCountLimit
(
1
,
24865417
)
e3
:
SetCountLimit
(
1
)
e3
:
SetTarget
(
c24865317
.
tg
)
e3
:
SetOperation
(
c24865317
.
op
)
c
:
RegisterEffect
(
e3
)
e4
=
e3
:
Clone
()
e4
:
SetTarget
(
c24865317
.
stg
)
e4
:
SetCondition
(
c24865317
.
atkcon2
)
c
:
RegisterEffect
(
e4
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e5
:
SetType
(
EFFECT_TYPE_SINGLE
)
...
...
@@ -56,10 +45,10 @@ function c24865317.splimit(e,se,sp,st)
return
se
:
IsHasType
(
EFFECT_TYPE_ACTIONS
)
end
function
c24865317
.
atkcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865317
)
==
0
return
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
end
function
c24865317
.
atkcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865317
)
==
0
return
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
end
function
c24865317
.
tkcfilter
(
c
)
return
not
c
:
IsType
(
TYPE_EFFECT
)
...
...
@@ -73,7 +62,7 @@ function c24865317.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if
chk
==
0
then
return
Duel
.
IsPlayerCanSpecialSummonCount
(
tp
,
1
)
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
function
c24865317
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
@@ -83,75 +72,51 @@ function c24865317.spop(e,tp,eg,ep,ev,re,r,rp)
end
function
cm
.
disrmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
24865317
)
==
0
end
c
:
RegisterFlagEffect
(
24865317
,
RESET_
CHAIN
,
0
,
1
)
c
:
RegisterFlagEffect
(
24865317
,
RESET_
TOFIELD
,
0
,
1
)
end
function
c24865317
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
local
sg
=
Duel
.
GetMatchingGroup
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
)
if
chk
==
0
then
return
b1
end
if
not
Duel
.
CheckPhaseActivity
()
then
e
:
SetLabel
(
1
)
else
e
:
SetLabel
(
0
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOKEN
,
nil
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
b1
,
b1
:
GetCount
(),
0
,
0
)
end
function
c24865317
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
)
if
not
b1
then
return
end
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
c24865317
.
tkcfilter
then
if
g
:
GetCount
()
>
0
then
ops
[
off
]
=
aux
.
Stringid
(
24865317
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
sg
>
0
then
if
b1
then
ops
[
off
]
=
aux
.
Stringid
(
24865317
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
1
-
tp
,
table.unpack
(
ops
))
local
sp
=
1
-
tp
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
then
sp
=
tp
end
local
op
=
Duel
.
SelectOption
(
sp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOKEN
,
nil
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
0
,
0
)
end
if
sel
==
2
then
Duel
.
IsExistingMatchingCard
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
sg
,
sg
:
GetCount
(),
0
,
0
)
end
function
c24865317
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sel
=
e
:
GetLabel
()
if
sel
==
1
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_OPERATECARD
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
or
not
Duel
.
IsPlayerCanSpecialSummonMonster
(
tp
,
24865324
,
0
,
TYPES_TOKEN_MONSTER
,
0
,
0
,
1
,
RACE_SEASERPENT
,
ATTRIBUTE_DARK
)
then
return
end
local
token
=
Duel
.
CreateToken
(
tp
,
24865324
)
Duel
.
SpecialSummon
(
token
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
--在场上特殊召唤一个量子海妖衍生物
if
sel
==
2
then
--在场上特殊召唤一个量子海妖衍生物
if
sel
==
2
then
local
sg
=
Duel
.
GetMatchingGroup
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
)
Duel
.
Destroy
(
sg
,
REASON_EFFECT
)
end
end
function
c24865317
.
stg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
local
sg
=
Duel
.
GetMatchingGroup
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
nil
)
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
c24865317
.
tkcfilter
then
ops
[
off
]
=
aux
.
Stringid
(
24865317
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
c24865317
.
tkcfilter
then
ops
[
off
]
=
aux
.
Stringid
(
24865317
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
tp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOKEN
,
nil
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
0
,
0
)
end
if
sel
==
2
then
Duel
.
IsExistingMatchingCard
(
c24865317
.
tkcfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
sg
,
sg
:
GetCount
(),
0
,
0
)
end
\ No newline at end of file
expansions/script/c24865318.lua
View file @
a7f5005e
...
...
@@ -80,7 +80,7 @@ end
function
cm
.
disrmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
24865318
)
==
0
end
c
:
RegisterFlagEffect
(
24865318
,
RESET_
CHAIN
,
0
,
1
)
c
:
RegisterFlagEffect
(
24865318
,
RESET_
TOFIELD
,
0
,
1
)
end
function
c24865318
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsChainDisablable
(
ev
)
...
...
expansions/script/c24865320.lua
View file @
a7f5005e
...
...
@@ -19,11 +19,11 @@ function c24865320.initial_effect(c)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
24865320
,
1
))
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOEXTRA
)
e2
:
SetType
(
EFFECT_TYPE_
QUICK_O
)
e2
:
SetType
(
EFFECT_TYPE_
IGNITION
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
Set
CountLimit
(
1
,
24865320
)
e2
:
Set
Property
(
EFFECT_FLAG_DELAY
)
e2
:
SetTarget
(
c24865320
.
sptg
)
e2
:
SetOperation
(
c24865320
.
spop
)
e2
:
SetCondition
(
c24865320
.
spcd
)
...
...
@@ -71,14 +71,15 @@ end
function
c24865320
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
Duel
.
GetFirstTarget
()
local
c
=
e
:
GetHandler
()
if
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
Duel
.
SendtoDeck
(
c
,
nil
,
0
,
REASON_EFFECT
)
if
tc
:
IsRelateToEffect
(
e
)
and
c
:
IsRelateToEffect
(
e
)
then
if
Duel
.
SendtoDeck
(
c
,
nil
,
0
,
REASON_EFFECT
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
function
c24865320
.
spcd
(
e
)
return
e
:
GetHandler
():
GetOverlayCount
()
==
0
return
e
:
GetHandler
():
GetOverlayCount
()
==
0
end
function
c24865320
.
gl
(
c
)
return
c
:
IsCode
(
24865317
)
and
not
c
:
IsDisabled
()
end
\ No newline at end of file
end
expansions/script/c24865321.lua
View file @
a7f5005e
...
...
@@ -2,12 +2,7 @@
local
m
=
24865321
local
cm
=
_G
[
"c"
..
m
]
function
c24865321
.
initial_effect
(
c
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e0
:
SetCode
(
EFFECT_CANNOT_BE_LINK_MATERIAL
)
e0
:
SetValue
(
1
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
24865321
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_TOKEN
)
...
...
@@ -37,16 +32,10 @@ function c24865321.initial_effect(c)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e3
:
SetCode
(
EVENT_CHAINING
)
e3
:
SetCost
(
cm
.
disrmcost
)
e3
:
SetCondition
(
c24865321
.
atkcon
)
e3
:
SetCountLimit
(
1
,
24865421
)
e3
:
SetTarget
(
c24865321
.
tg
)
e3
:
SetOperation
(
c24865321
.
op
)
c
:
RegisterEffect
(
e3
)
e4
=
e3
:
Clone
()
e4
:
SetTarget
(
c24865321
.
stg
)
e4
:
SetCondition
(
c24865321
.
atkcon2
)
c
:
RegisterEffect
(
e4
)
end
function
c24865321
.
filter
(
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsSetCard
(
0xb10
)
and
c
:
IsAbleToGrave
()
and
not
c
:
IsCode
(
24865321
)
...
...
@@ -74,15 +63,16 @@ end
function
c24865321
.
tnval
(
e
,
c
)
return
e
:
GetHandler
():
IsDefensePos
()
end
function
cm
.
disrmcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
GetFlagEffect
(
24865321
)
==
0
end
c
:
RegisterFlagEffect
(
24865321
,
RESET_CHAIN
,
0
,
1
)
end
function
c24865321
.
tg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865321
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865321
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
b1
or
b3
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
c24865321
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865321
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b2
=
Duel
.
IsExistingMatchingCard
(
c24865321
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
off
=
1
local
ops
=
{}
local
opval
=
{}
...
...
@@ -91,69 +81,31 @@ function c24865321.tg(e,tp,eg,ep,ev,re,r,rp,chk)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
b
3
then
if
b
2
then
ops
[
off
]
=
aux
.
Stringid
(
24865321
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
1
-
tp
,
table.unpack
(
ops
))
local
sp
=
1
-
tp
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
then
sp
=
tp
end
if
not
b1
and
not
b2
then
return
end
local
op
=
Duel
.
SelectOption
(
sp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
if
sel
==
2
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
end
end
function
c24865321
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sel
=
e
:
GetLabel
()
if
sel
==
1
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865321
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865321
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
end
--从卡组选一张「量子妖海-狄拉克」加入手卡或在把这张卡发动的玩家的场上发动
if
sel
==
2
then
--从卡组选一张「量子妖海-狄拉克」加入手卡或在把这张卡发动的玩家的场上发动
if
sel
==
2
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865321
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c24865321
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
end
end
function
c24865321
.
atkcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865321
)
==
0
end
function
c24865321
.
atkcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
aux
.
dscon
()
and
Duel
.
IsPlayerAffectedByEffect
(
tp
,
24865314
)
and
Duel
.
GetFlagEffect
(
tp
,
24865321
)
==
0
end
function
c24865321
.
stg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
b1
=
Duel
.
IsExistingMatchingCard
(
c24865321
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
local
b3
=
Duel
.
IsExistingMatchingCard
(
c24865321
.
filter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
if
chk
==
0
then
return
b1
or
b3
end
local
off
=
1
local
ops
=
{}
local
opval
=
{}
if
b1
then
ops
[
off
]
=
aux
.
Stringid
(
24865321
,
0
)
opval
[
off
-
1
]
=
1
off
=
off
+
1
end
if
(
b2
and
b3
)
then
ops
[
off
]
=
aux
.
Stringid
(
24865321
,
1
)
opval
[
off
-
1
]
=
2
off
=
off
+
1
end
local
op
=
Duel
.
SelectOption
(
tp
,
table.unpack
(
ops
))
local
sel
=
opval
[
op
]
e
:
SetLabel
(
sel
)
if
sel
==
1
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
if
sel
==
2
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DECKDES
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
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