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
fc37238e
Commit
fc37238e
authored
Jan 02, 2022
by
Tachibana
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
eme
parent
c1f35007
Pipeline
#8480
passed with stages
in 26 minutes and 31 seconds
Changes
7
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
7 changed files
with
68 additions
and
73 deletions
+68
-73
expansions/script/c24865323.lua
expansions/script/c24865323.lua
+23
-30
expansions/script/c33200501.lua
expansions/script/c33200501.lua
+1
-1
expansions/script/c33200511.lua
expansions/script/c33200511.lua
+1
-1
expansions/script/c33701501.lua
expansions/script/c33701501.lua
+4
-11
expansions/script/c33701502.lua
expansions/script/c33701502.lua
+25
-25
expansions/script/c33701506.lua
expansions/script/c33701506.lua
+4
-3
expansions/script/c33701518.lua
expansions/script/c33701518.lua
+10
-2
No files found.
expansions/script/c24865323.lua
View file @
fc37238e
...
...
@@ -2,7 +2,7 @@ local m=24865323
local
cm
=
_G
[
"c"
..
m
]
xpcall
(
function
()
require
(
"expansions/script/c24865340"
)
end
,
function
()
require
(
"script/c24865340"
)
end
)
--量子海妖-微观麦克劳
function
c
24865323
.
initial_effect
(
c
)
function
c
m
.
initial_effect
(
c
)
c
:
EnableReviveLimit
()
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_DICE
+
CATEGORY_TOGRAVE
)
...
...
@@ -10,55 +10,48 @@ function c24865323.initial_effect(c)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetHintTiming
(
0
,
TIMINGS_CHECK_MONSTER
+
TIMING_END_PHASE
)
e1
:
SetCost
(
c
24865323
.
lzcost
)
e1
:
SetTarget
(
c
24865323
.
lztg
)
e1
:
SetCost
(
c
m
.
lzcost
)
e1
:
SetTarget
(
c
m
.
lztg
)
e1
:
SetCountLimit
(
1
)
e1
:
SetOperation
(
c
24865323
.
lzop
)
e1
:
SetOperation
(
c
m
.
lzop
)
c
:
RegisterEffect
(
e1
)
local
e0
=
fu_lz
.
xyz
(
c
,
c
24865323
.
cfl
,
c24865323
.
lzfilter
,
2
)
local
e0
=
fu_lz
.
xyz
(
c
,
c
m
.
cfl
,
cm
.
lzfilter
,
2
)
end
c
24865323
.
toss_dice
=
true
function
c
24865323
.
lzfilter
(
g
)
c
m
.
toss_dice
=
true
function
c
m
.
lzfilter
(
g
)
return
g
:
IsExists
(
Card
.
IsSetCard
,
1
,
nil
,
0xb10
)
end
function
c
24865323
.
cfl
(
c
)
function
c
m
.
cfl
(
c
)
return
c
:
IsLevel
(
9
)
end
function
c
24865323
.
lzcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
m
.
lzcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
CheckRemoveOverlayCard
(
tp
,
1
,
REASON_COST
)
end
e
:
GetHandler
():
RemoveOverlayCard
(
tp
,
1
,
1
,
REASON_COST
)
end
function
c
24865323
.
lztg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
m
.
lztg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_MZONE
,
1
,
nil
)
end
local
sg
=
Duel
.
GetMatchingGroup
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_MZONE
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOGRAVE
,
sg
,
sg
:
GetCount
(),
0
,
0
)
end
function
c
24865323
.
lzop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
m
.
lzop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
d
=
Duel
.
TossDice
(
tp
,
1
)
if
d
==
1
or
d
==
3
or
d
==
5
then
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_MZONE
,
nil
)
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
elseif
d
==
2
or
d
==
4
or
d
==
6
then
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_MZONE
,
nil
)
local
e2
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e2
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e2
:
SetCountLimit
(
1
)
e2
:
SetLabelObject
(
g
)
e2
:
SetCondition
(
c24865323
.
descon
)
e2
:
SetOperation
(
c24865323
.
desop
)
e2
:
RegisterFlagEffect
(
24865323
,
RESET_EVENT
+
RESETS_STANDARD
,
0
,
1
)
Duel
.
RegisterEffect
(
e2
,
tp
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetCountLimit
(
1
)
e1
:
SetOperation
(
cm
.
desop2
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
end
end
function
c24865323
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsAbleToGrave
,
tp
,
0
,
LOCATION_ONFIELD
,
e
:
GetHandler
())
if
chk
==
0
then
return
#
g
>
0
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOGRAVE
,
g
,
#
g
,
0
,
0
)
end
function
c24865323
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
TRUE
,
tp
,
0
,
LOCATION_MZONE
,
1
,
1
,
nil
)
if
#
g
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
function
cm
.
desop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_CARD
,
0
,
m
)
local
g
=
Duel
.
GetMatchingGroup
(
aux
.
TRUE
,
tp
,
0
,
LOCATION_MZONE
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
end
\ No newline at end of file
expansions/script/c33200501.lua
View file @
fc37238e
...
...
@@ -7,7 +7,7 @@ function c33200501.initial_effect(c)
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetCode
(
EVENT_DESTROYED
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
+
EFFECT_FLAG_DAMAGE_STEP
)
e1
:
SetRange
(
LOCATION_HAND
)
e1
:
SetCountLimit
(
1
,
33200501
)
e1
:
SetCondition
(
c33200501
.
spcon
)
...
...
expansions/script/c33200511.lua
View file @
fc37238e
...
...
@@ -83,7 +83,7 @@ function c33200511.condition(e,tp,eg,ep,ev,re,r,rp)
end
function
c33200511
.
tztg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
tm
=
Duel
.
GetFlagEffect
(
tp
,
33200503
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
e
:
GetHandler
():
GetOriginalCode
())
<
tm
+
1
and
uel
.
IsExistingMatchingCard
(
c33200511
.
exfilter
,
tp
,
0
,
LOCATION_HAND
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
e
:
GetHandler
():
GetOriginalCode
())
<
tm
+
1
and
D
uel
.
IsExistingMatchingCard
(
c33200511
.
exfilter
,
tp
,
0
,
LOCATION_HAND
,
1
,
nil
)
end
Duel
.
RegisterFlagEffect
(
tp
,
e
:
GetHandler
():
GetOriginalCode
(),
RESET_PHASE
+
PHASE_END
,
0
,
1
)
e
:
GetHandler
():
RegisterFlagEffect
(
33200500
,
RESET_EVENT
+
RESET_CHAIN
,
0
,
1
)
end
...
...
expansions/script/c33701501.lua
View file @
fc37238e
...
...
@@ -22,7 +22,6 @@ function cm.initial_effect(c)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetCountLimit
(
1
)
e2
:
SetCondition
(
cm
.
rccon
)
e2
:
SetTarget
(
cm
.
rctg
)
e2
:
SetOperation
(
cm
.
rcop
)
c
:
RegisterEffect
(
e2
)
--cannot be destroyed
...
...
@@ -78,10 +77,10 @@ end
function
cm
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_MUSIC
,
0
,
aux
.
Stringid
(
m
,
3
))
end
function
cm
.
dam
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
rc
con
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
GetFlagEffectLabel
()
end
function
cm
.
dam
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
cm
.
rc
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_CARD
,
0
,
m
)
Duel
.
Recover
(
Duel
.
GetTurnPlayer
(),
e
:
GetHandler
():
GetFlagEffectLabel
(),
REASON_EFFECT
)
end
...
...
@@ -91,15 +90,9 @@ end
function
cm
.
actlimit
(
e
,
re
,
tp
)
return
re
:
IsActiveType
(
TYPE_FIELD
)
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
end
function
cm
.
repop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
sg
=
Duel
.
SelectMatchingCard
(
tp
,
cm
.
thfilter
,
tp
,
0
,
LOCATION_MZONE
,
1
,
1
,
nil
)
if
sg
:
GetCount
()
>
0
then
Duel
.
SendtoHand
(
sg
,
nil
,
REASON_EFFECT
)
end
end
function
cm
.
cecondition
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
re1
,
ep1
=
Duel
.
GetChainInfo
(
ev
,
CHAININFO_TRIGGERING_EFFECT
,
CHAININFO_TRIGGERING_PLAYER
)
return
ep
~=
tp
and
re1
:
IsActiveType
(
TYPE_MONSTER
)
local
re1
=
Duel
.
GetChainInfo
(
ev
,
CHAININFO_TRIGGERING_EFFECT
,
CHAININFO_TRIGGERING_PLAYER
)
return
re1
:
IsActiveType
(
TYPE_MONSTER
)
end
function
cm
.
ceoperation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
re1
,
ep1
=
Duel
.
GetChainInfo
(
ev
,
CHAININFO_TRIGGERING_EFFECT
,
CHAININFO_TRIGGERING_PLAYER
)
...
...
expansions/script/c33701502.lua
View file @
fc37238e
--【背景音台】Shelter
function
c
33701502
.
initial_effect
(
c
)
function
c
m
.
initial_effect
(
c
)
--activate
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e0
:
SetCode
(
EVENT_FREE_CHAIN
)
e0
:
SetTarget
(
c
33701502
.
target
)
e0
:
SetOperation
(
c
33701502
.
activate
)
e0
:
SetTarget
(
c
m
.
target
)
e0
:
SetOperation
(
c
m
.
activate
)
c
:
RegisterEffect
(
e0
)
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetCountLimit
(
1
)
e1
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetOperation
(
c
33701502
.
rcop
)
e1
:
SetOperation
(
c
m
.
rcop
)
c
:
RegisterEffect
(
e1
)
--cannot be destroyed
local
e7
=
Effect
.
CreateEffect
(
c
)
...
...
@@ -29,7 +29,7 @@ function c33701502.initial_effect(c)
e8
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e8
:
SetRange
(
LOCATION_FZONE
)
e8
:
SetTargetRange
(
1
,
0
)
e8
:
SetTarget
(
c
33701502
.
setlimit
)
e8
:
SetTarget
(
c
m
.
setlimit
)
c
:
RegisterEffect
(
e8
)
local
e9
=
Effect
.
CreateEffect
(
c
)
e9
:
SetType
(
EFFECT_TYPE_FIELD
)
...
...
@@ -37,25 +37,25 @@ function c33701502.initial_effect(c)
e9
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
+
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e9
:
SetRange
(
LOCATION_FZONE
)
e9
:
SetTargetRange
(
1
,
0
)
e9
:
SetValue
(
c
33701502
.
actlimit
)
e9
:
SetValue
(
c
m
.
actlimit
)
c
:
RegisterEffect
(
e9
)
if
not
c
33701502
.
global_check
then
c
33701502
.
global_check
=
true
c
33701502
[
0
]
=
0
if
not
c
m
.
global_check
then
c
m
.
global_check
=
true
c
m
[
0
]
=
0
local
ge1
=
Effect
.
CreateEffect
(
c
)
ge1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
ge1
:
SetCode
(
EVENT_TO_GRAVE
)
ge1
:
SetOperation
(
c
33701502
.
checkop
)
ge1
:
SetOperation
(
c
m
.
checkop
)
Duel
.
RegisterEffect
(
ge1
,
0
)
local
ge3
=
Effect
.
CreateEffect
(
c
)
ge3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
ge3
:
SetCode
(
EVENT_PHASE_START
+
PHASE_DRAW
)
ge3
:
SetOperation
(
c
33701502
.
clear
)
ge3
:
SetOperation
(
c
m
.
clear
)
Duel
.
RegisterEffect
(
ge3
,
0
)
end
end
function
c
33701502
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
m
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
local
c
=
e
:
GetHandler
()
--to grave
...
...
@@ -66,44 +66,44 @@ function c33701502.target(e,tp,eg,ep,ev,re,r,rp,chk)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetCountLimit
(
1
)
e1
:
SetRange
(
LOCATION_FZONE
)
e1
:
SetOperation
(
c
33701502
.
tgop
)
e1
:
SetOperation
(
c
m
.
tgop
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
,
6
)
c
:
SetTurnCounter
(
0
)
c
:
RegisterEffect
(
e1
)
end
function
c
33701502
.
tgop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
m
.
tgop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
ct
=
c
:
GetTurnCounter
()
ct
=
ct
+
1
c
:
SetTurnCounter
(
ct
)
if
ct
==
6
then
Duel
.
SendtoGrave
(
c
,
REASON_RULE
)
end
end
function
c
33701502
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
m
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_MUSIC
,
0
,
aux
.
Stringid
(
m
,
2
))
end
function
c
33701502
.
rccon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
c
33701502
[
0
]
>
0
function
c
m
.
rccon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
c
m
[
0
]
>
0
end
function
c
33701502
.
rcop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
Recover
(
tp
,
c
33701502
[
0
]
,
REASON_EFFECT
)
>=
2500
then
function
c
m
.
rcop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
Recover
(
tp
,
c
m
[
0
]
*
500
,
REASON_EFFECT
)
>=
2500
then
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
end
end
function
c
33701502
.
setlimit
(
e
,
c
,
tp
)
function
c
m
.
setlimit
(
e
,
c
,
tp
)
return
c
:
IsType
(
TYPE_FIELD
)
end
function
c
33701502
.
actlimit
(
e
,
re
,
tp
)
function
c
m
.
actlimit
(
e
,
re
,
tp
)
return
re
:
IsActiveType
(
TYPE_FIELD
)
and
re
:
IsHasType
(
EFFECT_TYPE_ACTIVATE
)
end
function
c
33701502
.
checkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
m
.
checkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
eg
:
GetFirst
()
while
tc
do
if
tc
:
IsType
(
TYPE_MONSTER
)
then
c
33701502
[
0
]
=
c33701502
[
0
]
+
tc
:
GetLevel
()
+
tc
:
GetRank
()
c
m
[
0
]
=
cm
[
0
]
+
tc
:
GetLevel
()
+
tc
:
GetRank
()
end
tc
=
eg
:
GetNext
()
end
end
function
c
33701502
.
clear
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
33701502
[
0
]
=
0
function
c
m
.
clear
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
c
m
[
0
]
=
0
end
expansions/script/c33701506.lua
View file @
fc37238e
...
...
@@ -59,12 +59,13 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
if
Duel
.
Remove
(
sg
,
POS_FACEUP
,
REASON_EFFECT
)
~=
0
then
local
og
=
Duel
.
GetOperatedGroup
()
local
oc
=
og
:
GetFirst
()
local
fid
=
c
:
GetFieldID
()
while
oc
do
oc
:
RegisterFlagEffect
(
m
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_STANDBY
+
RESET_SELF_TURN
,
0
,
1
)
oc
:
RegisterFlagEffect
(
m
,
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_STANDBY
+
RESET_SELF_TURN
,
0
,
1
,
fid
)
oc
=
og
:
GetNext
()
end
og
:
KeepAlive
()
e
:
SetLabel
(
c
:
GetFieldID
()
)
e
:
SetLabel
(
fid
)
e
:
SetLabelObject
(
og
)
end
if
Duel
.
GetTurnPlayer
()
==
tp
then
...
...
@@ -85,7 +86,7 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
c
:
RegisterEffect
(
e1
)
end
function
cm
.
con
(
e
)
return
not
Duel
.
IsExistingMatchingCard
(
aux
.
TRUE
,
tp
,
LOCATION_
HAND
+
LOCATION_
ONFIELD
,
0
,
1
,
c
)
return
not
Duel
.
IsExistingMatchingCard
(
aux
.
TRUE
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
c
)
end
function
cm
.
mtcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
GetTurnPlayer
()
==
tp
...
...
expansions/script/c33701518.lua
View file @
fc37238e
...
...
@@ -16,11 +16,12 @@ function cm.initial_effect(c)
e2
:
SetRange
(
LOCATION_SZONE
)
e2
:
SetCondition
(
cm
.
descon
)
e2
:
SetTarget
(
cm
.
destg
)
e2
:
SetOperation
(
cm
.
desrepop
)
e2
:
SetValue
(
cm
.
repval
)
c
:
RegisterEffect
(
e2
)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetRange
(
LOCATION_
GRAVE
+
LOCATION_REMOVED
)
e3
:
SetRange
(
LOCATION_
FZONE
)
e3
:
SetCode
(
EFFECT_SEND_REPLACE
)
e3
:
SetCondition
(
cm
.
repcon1
)
e3
:
SetTarget
(
cm
.
reptg1
)
...
...
@@ -53,6 +54,7 @@ function cm.descon(e,tp,eg,ep,ev,re,r,rp)
end
function
cm
.
repfilter
(
c
,
tp
)
return
c
:
IsControler
(
tp
)
and
c
:
IsLocation
(
LOCATION_ONFIELD
)
and
c
:
IsReason
(
REASON_BATTLE
+
REASON_EFFECT
)
and
not
c
:
IsReason
(
REASON_REPLACE
)
end
function
cm
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
eg
:
IsExists
(
cm
.
repfilter
,
1
,
e
:
GetHandler
(),
tp
)
and
eg
:
GetCount
()
==
1
end
...
...
@@ -62,8 +64,14 @@ function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
return
true
else
return
false
end
end
function
cm
.
desrepop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_CARD
,
0
,
m
)
local
c
=
e
:
GetHandler
()
c
:
SetStatus
(
STATUS_DESTROY_CONFIRMED
,
false
)
Duel
.
Destroy
(
c
,
REASON_EFFECT
+
REASON_REPLACE
)
end
function
cm
.
repval
(
e
,
c
)
return
c
~=
e
:
GetHandler
(
)
return
c
m
.
repfilter
(
c
,
e
:
GetHandlerPlayer
()
)
end
function
cm
.
repcon1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
GetFlagEffect
(
tp
,
m
)
==
0
...
...
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