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
e9d923c5
Commit
e9d923c5
authored
Nov 07, 2019
by
nanahira
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'master' of github.com:alstroemeria-silentlove/ygopro-222DIY-cards
parents
114c8f49
1697645e
Changes
15
Hide whitespace changes
Inline
Side-by-side
Showing
15 changed files
with
146 additions
and
228 deletions
+146
-228
expansions/222DIY.cdb
expansions/222DIY.cdb
+0
-0
expansions/script/c11200031.lua
expansions/script/c11200031.lua
+3
-3
expansions/script/c1156012.lua
expansions/script/c1156012.lua
+1
-1
expansions/script/c12031011.lua
expansions/script/c12031011.lua
+4
-1
expansions/script/c26801005.lua
expansions/script/c26801005.lua
+1
-1
expansions/script/c26807032.lua
expansions/script/c26807032.lua
+0
-27
expansions/script/c30556807.lua
expansions/script/c30556807.lua
+1
-1
expansions/script/c33400257.lua
expansions/script/c33400257.lua
+5
-2
expansions/script/c47535020.lua
expansions/script/c47535020.lua
+1
-0
expansions/script/c65071106.lua
expansions/script/c65071106.lua
+5
-8
expansions/script/c77702002.lua
expansions/script/c77702002.lua
+119
-111
expansions/script/c81011502.lua
expansions/script/c81011502.lua
+0
-13
expansions/script/c81014000.lua
expansions/script/c81014000.lua
+0
-27
expansions/script/c81014034.lua
expansions/script/c81014034.lua
+0
-27
expansions/script/c81021005.lua
expansions/script/c81021005.lua
+6
-6
No files found.
expansions/222DIY.cdb
View file @
e9d923c5
No preview for this file type
expansions/script/c11200031.lua
View file @
e9d923c5
...
@@ -48,14 +48,14 @@ function c11200031.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -48,14 +48,14 @@ function c11200031.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
e
:
GetHandler
():
RemoveOverlayCard
(
tp
,
1
,
1
,
REASON_COST
)
e
:
GetHandler
():
RemoveOverlayCard
(
tp
,
1
,
1
,
REASON_COST
)
end
end
function
c11200031
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c11200031
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c11200031
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
tp
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c11200031
.
thfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
nil
,
tp
)
end
if
not
Duel
.
CheckPhaseActivity
()
then
e
:
SetLabel
(
1
)
else
e
:
SetLabel
(
0
)
end
if
not
Duel
.
CheckPhaseActivity
()
then
e
:
SetLabel
(
1
)
else
e
:
SetLabel
(
0
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
)
end
end
function
c11200031
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c11200031
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11200031
,
0
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
11200031
,
0
))
if
e
:
GetLabel
()
==
1
then
Duel
.
RegisterFlagEffect
(
tp
,
15248873
,
RESET_CHAIN
,
0
,
1
)
end
if
e
:
GetLabel
()
==
1
then
Duel
.
RegisterFlagEffect
(
tp
,
15248873
,
RESET_CHAIN
,
0
,
1
)
end
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c11200031
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
tp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c11200031
.
thfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
tp
)
Duel
.
ResetFlagEffect
(
tp
,
15248873
)
Duel
.
ResetFlagEffect
(
tp
,
15248873
)
local
tc
=
g
:
GetFirst
()
local
tc
=
g
:
GetFirst
()
if
tc
then
if
tc
then
...
...
expansions/script/c1156012.lua
View file @
e9d923c5
...
@@ -34,7 +34,7 @@ function c1156012.con1(e,tp,eg,ep,ev,re,r,rp)
...
@@ -34,7 +34,7 @@ function c1156012.con1(e,tp,eg,ep,ev,re,r,rp)
end
end
--
--
function
c1156012
.
tfilter1
(
c
)
function
c1156012
.
tfilter1
(
c
)
return
c
:
IsAbleToGrave
()
and
c
:
IsType
(
TYPE_MONSTER
)
and
not
(
c
:
IsAttribute
(
ATTRIBUTE_WATER
)
and
c
:
IsRace
(
RACE_ZOMBIE
)
)
return
c
:
IsAbleToGrave
()
and
c
:
IsType
(
TYPE_MONSTER
)
and
not
c
:
IsAttribute
(
ATTRIBUTE_WATER
)
end
end
function
c1156012
.
tg1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c1156012
.
tg1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
...
...
expansions/script/c12031011.lua
View file @
e9d923c5
...
@@ -2,7 +2,7 @@
...
@@ -2,7 +2,7 @@
function
c12031011
.
initial_effect
(
c
)
function
c12031011
.
initial_effect
(
c
)
c
:
SetSPSummonOnce
(
12031011
)
c
:
SetSPSummonOnce
(
12031011
)
--xyz summon
--xyz summon
aux
.
AddXyzProcedure
(
c
,
nil
,
8
,
2
,
c12031011
.
ovfilter
,
aux
.
Stringid
(
12031011
,
0
))
aux
.
AddXyzProcedure
(
c
,
c12031011
.
ovfilter1
,
4
,
4
,
c12031011
.
ovfilter
,
aux
.
Stringid
(
12031011
,
0
))
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--effect
--effect
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
...
@@ -47,6 +47,9 @@ end
...
@@ -47,6 +47,9 @@ end
function
c12031011
.
ovfilter
(
c
)
function
c12031011
.
ovfilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsCode
(
12031000
)
return
c
:
IsFaceup
()
and
c
:
IsCode
(
12031000
)
end
end
function
c12031011
.
ovfilter1
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsAttribute
(
ATTRIBUTE_DARK
)
end
function
c12031011
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c12031011
.
discon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
ep
~=
tp
return
ep
~=
tp
end
end
...
...
expansions/script/c26801005.lua
View file @
e9d923c5
...
@@ -27,7 +27,7 @@ function c26801005.filter(c,e,tp,m)
...
@@ -27,7 +27,7 @@ function c26801005.filter(c,e,tp,m)
return
m
:
CheckWithSumEqual
(
Card
.
GetRitualLevel
,
c
:
GetLevel
(),
1
,
99
,
c
)
return
m
:
CheckWithSumEqual
(
Card
.
GetRitualLevel
,
c
:
GetLevel
(),
1
,
99
,
c
)
end
end
function
c26801005
.
matfilter
(
c
)
function
c26801005
.
matfilter
(
c
)
return
bit
.
band
(
c
:
GetType
(),
0x81
)
~
=
0x81
and
c
:
IsAbleToGrave
()
return
bit
.
band
(
c
:
GetType
(),
0x81
)
=
=
0x81
and
c
:
IsAbleToGrave
()
end
end
function
c26801005
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c26801005
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
if
chk
==
0
then
...
...
expansions/script/c26807032.lua
View file @
e9d923c5
...
@@ -70,33 +70,6 @@ function c26807032.initial_effect(c)
...
@@ -70,33 +70,6 @@ function c26807032.initial_effect(c)
e6
:
SetTarget
(
c26807032
.
tdtg
)
e6
:
SetTarget
(
c26807032
.
tdtg
)
e6
:
SetOperation
(
c26807032
.
tdop
)
e6
:
SetOperation
(
c26807032
.
tdop
)
c
:
RegisterEffect
(
e6
)
c
:
RegisterEffect
(
e6
)
if
scard
.
counter
==
nil
then
scard
.
counter
=
true
scard
[
0
]
=
0
scard
[
1
]
=
0
local
ea
=
Effect
.
CreateEffect
(
c
)
ea
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
ea
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
ea
:
SetOperation
(
scard
.
resetcount
)
Duel
.
RegisterEffect
(
ea
,
0
)
local
eb
=
Effect
.
CreateEffect
(
c
)
eb
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
eb
:
SetCode
(
EVENT_RELEASE
)
eb
:
SetOperation
(
scard
.
addcount
)
Duel
.
RegisterEffect
(
eb
,
0
)
end
end
function
scard
.
resetcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
scard
[
0
]
=
0
scard
[
1
]
=
0
end
function
scard
.
addcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
eg
:
GetFirst
()
while
tc
do
local
p
=
tc
:
GetReasonPlayer
()
scard
[
p
]
=
scard
[
p
]
+
1
tc
=
eg
:
GetNext
()
end
end
end
function
c26807032
.
cfilter
(
c
,
tp
)
function
c26807032
.
cfilter
(
c
,
tp
)
return
c
:
GetOwner
()
==
1
-
tp
and
c
:
IsAbleToRemoveAsCost
()
return
c
:
GetOwner
()
==
1
-
tp
and
c
:
IsAbleToRemoveAsCost
()
...
...
expansions/script/c30556807.lua
View file @
e9d923c5
...
@@ -32,7 +32,7 @@ function c30556807.spop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -32,7 +32,7 @@ function c30556807.spop(e,tp,eg,ep,ev,re,r,rp)
if
g
:
GetCount
()
>
0
then
if
g
:
GetCount
()
>
0
then
-- Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
-- Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
local
tc
=
g
:
GetFirst
()
local
tc
=
g
:
GetFirst
()
if
tc
and
Duel
.
SpecialSummon
Step
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
then
if
tc
and
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
then
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_DISABLE
)
e1
:
SetCode
(
EFFECT_DISABLE
)
...
...
expansions/script/c33400257.lua
View file @
e9d923c5
...
@@ -26,8 +26,11 @@ function c33400257.refilter(c)
...
@@ -26,8 +26,11 @@ function c33400257.refilter(c)
return
(
c
:
IsSetCard
(
0x341
)
or
c
:
IsSetCard
(
0x340
))
and
c
:
IsReleasable
()
return
(
c
:
IsSetCard
(
0x341
)
or
c
:
IsSetCard
(
0x340
))
and
c
:
IsReleasable
()
end
end
function
c33400257
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c33400257
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c33400257
.
refilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
e
:
GetHandler
(),
e
,
tp
)
and
Duel
.
IsExistingMatchingCard
(
c33400257
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c33400257
.
refilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
1
,
e
:
GetHandler
())
local
loc
=
LOCATION_ONFIELD
if
ft
==
0
then
loc
=
LOCATION_MZONE
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c33400257
.
refilter
,
tp
,
loc
,
0
,
1
,
e
:
GetHandler
(),
e
,
tp
)
and
Duel
.
IsExistingMatchingCard
(
c33400257
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c33400257
.
refilter
,
tp
,
loc
,
0
,
1
,
1
,
e
:
GetHandler
())
Duel
.
Release
(
g
,
REASON_COST
)
Duel
.
Release
(
g
,
REASON_COST
)
end
end
function
c33400257
.
filter
(
c
,
e
,
tp
)
function
c33400257
.
filter
(
c
,
e
,
tp
)
...
...
expansions/script/c47535020.lua
View file @
e9d923c5
...
@@ -95,6 +95,7 @@ function c47535020.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
...
@@ -95,6 +95,7 @@ function c47535020.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_EXTRA
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_EXTRA
)
end
end
function
c47535020
.
scop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c47535020
.
scop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c47535020
.
scfilter
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
nil
)
local
g
=
Duel
.
GetMatchingGroup
(
c47535020
.
scfilter
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
nil
)
if
g
:
GetCount
()
>
0
then
if
g
:
GetCount
()
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
...
...
expansions/script/c65071106.lua
View file @
e9d923c5
...
@@ -32,9 +32,9 @@ function c65071106.initial_effect(c)
...
@@ -32,9 +32,9 @@ function c65071106.initial_effect(c)
local
e5
=
Effect
.
CreateEffect
(
c
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetCategory
(
CATEGORY_COUNTER
)
e5
:
SetCategory
(
CATEGORY_COUNTER
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_F
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_F
)
e5
:
SetRange
(
LOCATION_SZONE
)
e5
:
SetCountLimit
(
1
)
e5
:
SetCountLimit
(
1
)
e5
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e5
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e5
:
SetTarget
(
c65071106
.
contg
)
e5
:
SetOperation
(
c65071106
.
conop
)
e5
:
SetOperation
(
c65071106
.
conop
)
c
:
RegisterEffect
(
e5
)
c
:
RegisterEffect
(
e5
)
--tograve
--tograve
...
@@ -64,21 +64,18 @@ function c65071106.eqop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -64,21 +64,18 @@ function c65071106.eqop(e,tp,eg,ep,ev,re,r,rp)
end
end
function
c65071106
.
confil
(
c
,
e
)
function
c65071106
.
confil
(
c
,
e
)
return
c
:
GetCounter
(
0x1da0
)
==
0
return
c
:
GetCounter
(
0x1da0
)
==
0
and
c
:
IsFaceup
()
end
function
c65071106
.
contg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c65071106
.
confil
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
e
:
GetHandler
(),
e
)
and
Duel
.
IsExistingMatchingCard
(
c65071106
.
confil
,
tp
,
0
,
LOCATION_ONFIELD
,
1
,
nil
,
e
)
end
end
end
function
c65071106
.
conop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c65071106
.
conop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
(
Duel
.
IsExistingMatchingCard
(
c65071106
.
confil
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
e
:
GetHandler
(),
e
)
and
Duel
.
IsExistingMatchingCard
(
c65071106
.
confil
,
tp
,
0
,
LOCATION_ONFIELD
,
1
,
nil
,
e
))
then
return
end
if
not
(
Duel
.
IsExistingMatchingCard
(
c65071106
.
confil
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
e
:
GetHandler
(),
e
)
and
Duel
.
IsExistingMatchingCard
(
c65071106
.
confil
,
tp
,
0
,
LOCATION_ONFIELD
,
1
,
nil
,
e
))
then
return
end
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
g1
=
Duel
.
SelectMatchingCard
(
tp
,
c65071106
.
confil
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
1
,
e
:
GetHandler
(),
e
)
local
g1
=
Duel
.
SelectMatchingCard
(
tp
,
c65071106
.
confil
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
1
,
e
:
GetHandler
(),
e
)
Duel
.
HintSelection
(
g1
)
Duel
.
HintSelection
(
g1
)
local
g2
=
Duel
.
SelectMatchingCard
(
c65071106
.
confil
,
tp
,
0
,
LOCATION_ONFIELD
,
1
,
1
,
nil
,
e
)
local
g2
=
Duel
.
SelectMatchingCard
(
tp
,
c65071106
.
confil
,
tp
,
0
,
LOCATION_ONFIELD
,
1
,
1
,
nil
,
e
)
Duel
.
HintSelection
(
g2
)
Duel
.
HintSelection
(
g2
)
local
tc1
=
g1
:
GetFirst
()
local
tc1
=
g1
:
GetFirst
()
local
tc2
=
g
1
:
GetFirst
()
local
tc2
=
g
2
:
GetFirst
()
tc1
:
AddCounter
(
0x1da0
,
1
)
tc1
:
AddCounter
(
0x1da0
,
1
)
tc2
:
AddCounter
(
0x1da0
,
1
)
tc2
:
AddCounter
(
0x1da0
,
1
)
end
end
...
...
expansions/script/c77702002.lua
View file @
e9d923c5
local
scard
=
c77702002
local
scard
=
c77702002
local
id
=
77702002
local
id
=
77702002
local
m
=
id
local
m
=
id
local
cm
=
scard
local
cm
=
scard
function
scard
.
initial_effect
(
c
)
function
scard
.
initial_effect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e0
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e0
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e0
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetTarget
(
scard
.
regtg
)
e0
:
SetTarget
(
scard
.
regtg
)
e1
:
SetOperation
(
function
()
e0
:
SetOperation
(
function
()
Duel
.
Hint
(
HINT_MUSIC
,
0
,
id
*
16
+
math.random
(
0
,
1
))
Duel
.
Hint
(
HINT_MUSIC
,
0
,
id
*
16
+
math.random
(
0
,
1
))
end
)
end
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e1
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetCode
(
EFFECT_INDESTRUCTABLE_EFFECT
)
e1
:
SetValue
(
1
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
local
e2
=
Effect
.
CreateEffect
(
c
)
--cannot set/activate
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_CANNOT_SSET
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
Set
Code
(
EFFECT_INDESTRUCTABLE_EFFECT
)
e2
:
Set
TargetRange
(
1
,
0
)
e2
:
Set
Value
(
1
)
e2
:
Set
Target
(
cm
.
setlimit
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--Cannot activate
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
)
e3
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e3
:
SetCode
(
EFFECT_CANNOT_ACTIVATE
)
e3
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e3
:
SetRange
(
LOCATION_FZONE
)
e3
:
SetRange
(
LOCATION_FZONE
)
e3
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e3
:
SetTargetRange
(
1
,
0
)
e3
:
SetTargetRange
(
1
,
0
)
e3
:
SetValue
(
cm
.
actlimit
)
e3
:
SetValue
(
scard
.
efilter
)
c
:
RegisterEffect
(
e3
)
c
:
RegisterEffect
(
e3
)
local
e3
=
Effect
.
CreateEffect
(
c
)
local
e4
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
)
e4
:
SetCategory
(
CATEGORY_DRAW
)
e3
:
SetCode
(
EFFECT_CANNOT_SSET
)
e4
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetRange
(
LOCATION_FZONE
)
e4
:
SetRange
(
LOCATION_FZONE
)
e3
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_CANNOT_NEGATE
)
e4
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e3
:
SetTargetRange
(
1
,
0
)
e4
:
SetCountLimit
(
1
,
m
)
e3
:
SetValue
(
function
(
e
,
c
)
return
c
:
IsType
(
TYPE_FIELD
)
end
)
e4
:
SetCost
(
scard
.
cost
)
c
:
RegisterEffect
(
e3
)
e4
:
SetTarget
(
scard
.
target
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e4
:
SetOperation
(
scard
.
activate
)
e1
:
SetCategory
(
CATEGORY_DRAW
)
c
:
RegisterEffect
(
e4
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e1
:
SetRange
(
LOCATION_FZONE
)
e5
:
SetDescription
(
m
*
16
+
2
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e5
:
SetCategory
(
CATEGORY_DRAW
)
e1
:
SetCountLimit
(
1
,
m
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetCost
(
scard
.
cost
)
e5
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetTarget
(
scard
.
target
)
e5
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetOperation
(
scard
.
activate
)
e5
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
c
:
RegisterEffect
(
e1
)
e5
:
SetCountLimit
(
1
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e5
:
SetCondition
(
function
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
e1
:
SetDescription
(
m
*
16
+
2
)
e1
:
SetCategory
(
CATEGORY_DRAW
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e1
:
SetCountLimit
(
1
)
e1
:
SetCondition
(
function
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
GetTurnPlayer
()
==
tp
return
Duel
.
GetTurnPlayer
()
==
tp
end
)
end
)
e
1
:
SetTarget
(
function
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
e
5
:
SetTarget
(
function
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
scard
[
tp
]
>
0
and
Duel
.
IsPlayerCanDraw
(
tp
,
scard
[
tp
])
end
if
chk
==
0
then
return
scard
[
tp
]
>
0
and
Duel
.
IsPlayerCanDraw
(
tp
,
scard
[
tp
])
end
local
ct
=
scard
[
tp
]
local
ct
=
scard
[
tp
]
Duel
.
SetTargetPlayer
(
tp
)
Duel
.
SetTargetPlayer
(
tp
)
Duel
.
SetTargetParam
(
ct
)
Duel
.
SetTargetParam
(
ct
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
ct
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
ct
)
end
)
end
)
e
1
:
SetOperation
(
scard
.
activate
)
e
5
:
SetOperation
(
scard
.
activate
)
c
:
RegisterEffect
(
e
1
)
c
:
RegisterEffect
(
e
5
)
local
e
1
=
Effect
.
CreateEffect
(
c
)
local
e
6
=
Effect
.
CreateEffect
(
c
)
e
1
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e
6
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e
1
:
SetCode
(
EVENT_FREE_CHAIN
)
e
6
:
SetCode
(
EVENT_FREE_CHAIN
)
e
1
:
SetRange
(
LOCATION_GRAVE
)
e
6
:
SetRange
(
LOCATION_GRAVE
)
e
1
:
SetCost
(
aux
.
bfgcost
)
e
6
:
SetCost
(
aux
.
bfgcost
)
e
1
:
SetOperation
(
function
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
e
6
:
SetOperation
(
function
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
e
1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
local
e
7
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e
1
:
SetType
(
EFFECT_TYPE_FIELD
)
e
7
:
SetType
(
EFFECT_TYPE_FIELD
)
e
1
:
SetCode
(
EFFECT_IMMUNE_EFFECT
)
e
7
:
SetCode
(
EFFECT_IMMUNE_EFFECT
)
e
1
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e
7
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e
1
:
SetTarget
(
aux
.
TargetBoolFunction
(
Card
.
IsType
,
TYPE_RITUAL
))
e
7
:
SetTarget
(
aux
.
TargetBoolFunction
(
Card
.
IsType
,
TYPE_RITUAL
))
e
1
:
SetValue
(
function
(
e
,
re
)
e
7
:
SetValue
(
function
(
e
,
re
)
return
e
:
GetOwner
()
~=
re
:
GetOwner
()
and
re
:
IsActiveType
(
TYPE_SPELL
+
TYPE_TRAP
)
return
e
:
GetOwner
()
~=
re
:
GetOwner
()
and
re
:
IsActiveType
(
TYPE_SPELL
+
TYPE_TRAP
)
end
)
end
)
e
1
:
SetReset
(
RESET_PHASE
+
PHASE_MAIN2
)
e
7
:
SetReset
(
RESET_PHASE
+
PHASE_MAIN2
)
Duel
.
RegisterEffect
(
e
1
,
tp
)
Duel
.
RegisterEffect
(
e
7
,
tp
)
end
)
end
)
c
:
RegisterEffect
(
e
1
)
c
:
RegisterEffect
(
e
6
)
local
e2
=
Effect
.
CreateEffect
(
c
)
--local e8
=Effect.CreateEffect(c)
e2
:
SetDescription
(
m
*
16
+
4
)
--e8
:SetDescription(m*16+4)
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
--e8
:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
+
EFFECT_FLAG_CANNOT_DISABLE
)
--e8
:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e2
:
SetRange
(
LOCATION_FZONE
)
--e8
:SetRange(LOCATION_FZONE)
e2
:
SetCountLimit
(
1
)
--e8
:SetCountLimit(1)
e2
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
--e8
:SetCode(EVENT_PHASE+PHASE_END)
e2
:
SetCondition
(
cm
.
descon
)
--e8
:SetCondition(cm.descon)
e2
:
SetOperation
(
cm
.
desop
)
--e8
:SetOperation(cm.desop)
c
:
RegisterEffect
(
e2
)
--c:RegisterEffect(e8
)
if
scard
.
counter
==
nil
then
if
scard
.
counter
==
nil
then
scard
.
counter
=
true
scard
.
counter
=
true
scard
[
0
]
=
0
scard
[
0
]
=
0
scard
[
1
]
=
0
scard
[
1
]
=
0
local
e
2
=
Effect
.
CreateEffect
(
c
)
local
e
9
=
Effect
.
CreateEffect
(
c
)
e
2
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e
9
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e
2
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
e
9
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
e
2
:
SetOperation
(
scard
.
resetcount
)
e
9
:
SetOperation
(
scard
.
resetcount
)
Duel
.
RegisterEffect
(
e
2
,
0
)
Duel
.
RegisterEffect
(
e
9
,
0
)
local
e
3
=
Effect
.
CreateEffect
(
c
)
local
e
a
=
Effect
.
CreateEffect
(
c
)
e
3
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e
a
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e
3
:
SetCode
(
EVENT_RELEASE
)
e
a
:
SetCode
(
EVENT_RELEASE
)
e
3
:
SetOperation
(
scard
.
addcount
)
e
a
:
SetOperation
(
scard
.
addcount
)
Duel
.
RegisterEffect
(
e
3
,
0
)
Duel
.
RegisterEffect
(
e
a
,
0
)
end
end
end
end
function
scard
.
resetcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
scard
.
resetcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
@@ -138,48 +138,56 @@ function scard.activate(e,tp,eg,ep,ev,re,r,rp)
...
@@ -138,48 +138,56 @@ function scard.activate(e,tp,eg,ep,ev,re,r,rp)
local
p
,
d
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
,
CHAININFO_TARGET_PARAM
)
local
p
,
d
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
,
CHAININFO_TARGET_PARAM
)
Duel
.
Draw
(
p
,
d
,
REASON_EFFECT
)
Duel
.
Draw
(
p
,
d
,
REASON_EFFECT
)
end
end
function
scard
.
regtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
scard
.
efilter
(
e
,
re
,
tp
)
if
chk
==
0
then
return
re
:
GetHandler
():
IsType
(
TYPE_FIELD
)
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
end
function
scard
.
regtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
return
true
end
end
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
--to grave
--to grave
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
m
*
16
+
3
)
e1
:
SetDescription
(
m
*
16
+
3
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetCountLimit
(
1
)
e1
:
SetCountLimit
(
1
)
e1
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetCondition
(
scard
.
gycon
)
e1
:
SetCondition
(
scard
.
gycon
)
e1
:
SetOperation
(
scard
.
gyop
)
e1
:
SetOperation
(
scard
.
gyop
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
c
:
SetTurnCounter
(
0
)
c
:
SetTurnCounter
(
0
)
c
:
RegisterEffect
(
e1
)
c
:
RegisterEffect
(
e1
)
end
end
function
scard
.
gycon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
scard
.
gycon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
GetTurnPlayer
()
==
tp
return
Duel
.
GetTurnPlayer
()
==
tp
end
end
function
scard
.
gyop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
scard
.
gyop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
c
=
e
:
GetHandler
()
local
ct
=
c
:
GetTurnCounter
()
local
ct
=
c
:
GetTurnCounter
()
ct
=
ct
+
1
ct
=
ct
+
1
c
:
SetTurnCounter
(
ct
)
c
:
SetTurnCounter
(
ct
)
if
ct
==
7
then
if
ct
==
3
then
Duel
.
SendtoGrave
(
c
,
REASON_RULE
)
Duel
.
SendtoGrave
(
c
,
REASON_RULE
)
else
if
Duel
.
IsExistingMatchingCard
(
Card
.
IsDiscardable
,
tp
,
LOCATION_HAND
,
0
,
1
,
e
:
GetHandler
())
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
5
))
then
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_COST
+
REASON_DISCARD
,
e
:
GetHandler
())
else
Duel
.
SendtoGrave
(
c
,
REASON_COST
)
end
end
end
end
end
function
cm
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
--function cm.descon(e,tp,eg,ep,ev,re,r,rp)
return
Duel
.
GetTurnPlayer
()
==
tp
--local c=e:GetHandler()
--return Duel.GetTurnPlayer()==tp and
--end
--function cm.desop(e,tp,eg,ep,ev,re,r,rp)
--local c=e:GetHandler()
--Duel.HintSelection(Group.FromCards(c))
--if Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) and Duel.SelectYesNo(tp,aux.Stringid(m,5)) then
--Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD,e:GetHandler())
--else Duel.SendtoGrave(c,REASON_COST) end
--end
function
cm
.
setlimit
(
e
,
c
,
tp
)
return
c
:
IsType
(
TYPE_FIELD
)
end
end
function
cm
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
actlimit
(
e
,
re
,
tp
)
local
c
=
e
:
GetHandler
()
return
re
:
IsActiveType
(
TYPE_FIELD
)
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
Duel
.
HintSelection
(
Group
.
FromCards
(
c
))
if
Duel
.
IsExistingMatchingCard
(
Card
.
IsDiscardable
,
tp
,
LOCATION_HAND
,
0
,
1
,
e
:
GetHandler
())
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
5
))
then
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_COST
+
REASON_DISCARD
,
e
:
GetHandler
())
else
Duel
.
SendtoGrave
(
c
,
REASON_COST
)
end
end
end
expansions/script/c81011502.lua
View file @
e9d923c5
...
@@ -3,13 +3,6 @@ function c81011502.initial_effect(c)
...
@@ -3,13 +3,6 @@ function c81011502.initial_effect(c)
--pendulum summon
--pendulum summon
aux
.
EnablePendulumAttribute
(
c
)
aux
.
EnablePendulumAttribute
(
c
)
c
:
EnableReviveLimit
()
c
:
EnableReviveLimit
()
--spsummon bgm
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_CONTINUOUS
)
e0
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e0
:
SetCondition
(
c81011502
.
sumcon
)
e0
:
SetOperation
(
c81011502
.
sumsuc
)
c
:
RegisterEffect
(
e0
)
--pendulum set
--pendulum set
local
e1
=
Effect
.
CreateEffect
(
c
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_DESTROY
)
e1
:
SetCategory
(
CATEGORY_DESTROY
)
...
@@ -42,12 +35,6 @@ function c81011502.initial_effect(c)
...
@@ -42,12 +35,6 @@ function c81011502.initial_effect(c)
e4
:
SetOperation
(
c81011502
.
disop
)
e4
:
SetOperation
(
c81011502
.
disop
)
c
:
RegisterEffect
(
e4
)
c
:
RegisterEffect
(
e4
)
end
end
function
c81011502
.
sumcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_RITUAL
)
or
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_PENDULUM
)
end
function
c81011502
.
sumsuc
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_MUSIC
,
0
,
aux
.
Stringid
(
81011502
,
0
))
end
function
c81011502
.
penfilter
(
c
)
function
c81011502
.
penfilter
(
c
)
return
c
:
IsType
(
TYPE_RITUAL
)
and
not
c
:
IsCode
(
81011502
)
and
not
c
:
IsForbidden
()
return
c
:
IsType
(
TYPE_RITUAL
)
and
not
c
:
IsCode
(
81011502
)
and
not
c
:
IsForbidden
()
end
end
...
...
expansions/script/c81014000.lua
View file @
e9d923c5
...
@@ -76,33 +76,6 @@ function c81014000.initial_effect(c)
...
@@ -76,33 +76,6 @@ function c81014000.initial_effect(c)
e6
:
SetTarget
(
c81014000
.
negtg
)
e6
:
SetTarget
(
c81014000
.
negtg
)
e6
:
SetOperation
(
c81014000
.
negop
)
e6
:
SetOperation
(
c81014000
.
negop
)
c
:
RegisterEffect
(
e6
)
c
:
RegisterEffect
(
e6
)
if
scard
.
counter
==
nil
then
scard
.
counter
=
true
scard
[
0
]
=
0
scard
[
1
]
=
0
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
e2
:
SetOperation
(
scard
.
resetcount
)
Duel
.
RegisterEffect
(
e2
,
0
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e3
:
SetCode
(
EVENT_RELEASE
)
e3
:
SetOperation
(
scard
.
addcount
)
Duel
.
RegisterEffect
(
e3
,
0
)
end
end
function
scard
.
resetcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
scard
[
0
]
=
0
scard
[
1
]
=
0
end
function
scard
.
addcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
eg
:
GetFirst
()
while
tc
do
local
p
=
tc
:
GetReasonPlayer
()
scard
[
p
]
=
scard
[
p
]
+
1
tc
=
eg
:
GetNext
()
end
end
end
function
c81014000
.
setlimit
(
e
,
c
,
tp
)
function
c81014000
.
setlimit
(
e
,
c
,
tp
)
return
c
:
IsType
(
TYPE_FIELD
)
return
c
:
IsType
(
TYPE_FIELD
)
...
...
expansions/script/c81014034.lua
View file @
e9d923c5
...
@@ -65,33 +65,6 @@ function c81014034.initial_effect(c)
...
@@ -65,33 +65,6 @@ function c81014034.initial_effect(c)
e5
:
SetCondition
(
c81014034
.
drcon
)
e5
:
SetCondition
(
c81014034
.
drcon
)
e5
:
SetOperation
(
c81014034
.
drop
)
e5
:
SetOperation
(
c81014034
.
drop
)
c
:
RegisterEffect
(
e5
)
c
:
RegisterEffect
(
e5
)
if
scard
.
counter
==
nil
then
scard
.
counter
=
true
scard
[
0
]
=
0
scard
[
1
]
=
0
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
e2
:
SetOperation
(
scard
.
resetcount
)
Duel
.
RegisterEffect
(
e2
,
0
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_CONTINUOUS
+
EFFECT_TYPE_FIELD
)
e3
:
SetCode
(
EVENT_RELEASE
)
e3
:
SetOperation
(
scard
.
addcount
)
Duel
.
RegisterEffect
(
e3
,
0
)
end
end
function
scard
.
resetcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
scard
[
0
]
=
0
scard
[
1
]
=
0
end
function
scard
.
addcount
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
eg
:
GetFirst
()
while
tc
do
local
p
=
tc
:
GetReasonPlayer
()
scard
[
p
]
=
scard
[
p
]
+
1
tc
=
eg
:
GetNext
()
end
end
end
function
c81014034
.
setlimit
(
e
,
c
,
tp
)
function
c81014034
.
setlimit
(
e
,
c
,
tp
)
return
c
:
IsType
(
TYPE_FIELD
)
return
c
:
IsType
(
TYPE_FIELD
)
...
...
expansions/script/c81021005.lua
View file @
e9d923c5
...
@@ -30,9 +30,9 @@ function c81021005.initial_effect(c)
...
@@ -30,9 +30,9 @@ function c81021005.initial_effect(c)
e2
:
SetCode
(
EVENT_PAY_LPCOST
)
e2
:
SetCode
(
EVENT_PAY_LPCOST
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
,
81021905
)
e2
:
SetCountLimit
(
1
,
81021905
)
e2
:
SetCondition
(
c810210
11
.
tgcon
)
e2
:
SetCondition
(
c810210
05
.
tgcon
)
e2
:
SetTarget
(
c810210
11
.
tdtg
)
e2
:
SetTarget
(
c810210
05
.
tdtg
)
e2
:
SetOperation
(
c810210
11
.
tdop
)
e2
:
SetOperation
(
c810210
05
.
tdop
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
end
end
function
c81021005
.
matfilter
(
c
)
function
c81021005
.
matfilter
(
c
)
...
@@ -77,16 +77,16 @@ function c81021005.thop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -77,16 +77,16 @@ function c81021005.thop(e,tp,eg,ep,ev,re,r,rp)
Duel
.
ConfirmCards
(
1
-
tp
,
g1
)
Duel
.
ConfirmCards
(
1
-
tp
,
g1
)
end
end
end
end
function
c810210
11
.
tgcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c810210
05
.
tgcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
ep
==
tp
return
ep
==
tp
end
end
function
c810210
11
.
tdtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c810210
05
.
tdtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
true
end
Duel
.
SetTargetPlayer
(
1
-
tp
)
Duel
.
SetTargetPlayer
(
1
-
tp
)
Duel
.
SetTargetParam
(
1000
)
Duel
.
SetTargetParam
(
1000
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
1
-
tp
,
1000
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
1
-
tp
,
1000
)
end
end
function
c810210
11
.
tdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c810210
05
.
tdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
p
,
d
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
,
CHAININFO_TARGET_PARAM
)
local
p
,
d
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
,
CHAININFO_TARGET_PARAM
)
Duel
.
Damage
(
p
,
d
,
REASON_EFFECT
)
Duel
.
Damage
(
p
,
d
,
REASON_EFFECT
)
end
end
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