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
f21b9b62
Commit
f21b9b62
authored
Sep 19, 2019
by
TanakaKotoha
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix and remove rubbish
parent
f15a92d0
Changes
13
Hide whitespace changes
Inline
Side-by-side
Showing
13 changed files
with
0 additions
and
400 deletions
+0
-400
expansions/pics/26069.jpg
expansions/pics/26069.jpg
+0
-0
expansions/pics/26801001.jpg
expansions/pics/26801001.jpg
+0
-0
expansions/pics/26801002.jpg
expansions/pics/26801002.jpg
+0
-0
expansions/pics/26801003.jpg
expansions/pics/26801003.jpg
+0
-0
expansions/pics/field/26801000.png
expansions/pics/field/26801000.png
+0
-0
expansions/pics/field/26801001.png
expansions/pics/field/26801001.png
+0
-0
expansions/pics/field/26801002.png
expansions/pics/field/26801002.png
+0
-0
expansions/pics/field/26801003.png
expansions/pics/field/26801003.png
+0
-0
expansions/pics/field/26801004.png
expansions/pics/field/26801004.png
+0
-0
expansions/pics/thumbnail/33330413.jpg
expansions/pics/thumbnail/33330413.jpg
+0
-0
expansions/script/c26801001.lua
expansions/script/c26801001.lua
+0
-145
expansions/script/c26801002.lua
expansions/script/c26801002.lua
+0
-106
expansions/script/c26801003.lua
expansions/script/c26801003.lua
+0
-149
No files found.
expansions/pics/26069.jpg
deleted
100644 → 0
View file @
f15a92d0
45.7 KB
expansions/pics/26801001.jpg
deleted
100644 → 0
View file @
f15a92d0
42.6 KB
expansions/pics/26801002.jpg
deleted
100644 → 0
View file @
f15a92d0
51.8 KB
expansions/pics/26801003.jpg
deleted
100644 → 0
View file @
f15a92d0
50 KB
expansions/pics/field/26801000.png
deleted
100644 → 0
View file @
f15a92d0
252 KB
expansions/pics/field/26801001.png
deleted
100644 → 0
View file @
f15a92d0
367 KB
expansions/pics/field/26801002.png
deleted
100644 → 0
View file @
f15a92d0
476 KB
expansions/pics/field/26801003.png
deleted
100644 → 0
View file @
f15a92d0
363 KB
expansions/pics/field/26801004.png
deleted
100644 → 0
View file @
f15a92d0
326 KB
expansions/pics/thumbnail/33330413.jpg
deleted
100644 → 0
View file @
f15a92d0
4.25 KB
expansions/script/c26801001.lua
deleted
100644 → 0
View file @
f15a92d0
--BLACK SQUARE
c26801001
.
dfc_front_side
=
26801000
c26801001
.
dfc_back1_side
=
26801001
function
c26801001
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
c
:
RegisterEffect
(
e1
)
--back
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e0
:
SetCode
(
EVENT_ADJUST
)
e0
:
SetRange
(
LOCATION_DECK
+
LOCATION_GRAVE
+
LOCATION_REMOVED
+
LOCATION_HAND
+
LOCATION_EXTRA
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e0
:
SetCountLimit
(
1
)
e0
:
SetCondition
(
c26801001
.
backon
)
e0
:
SetOperation
(
c26801001
.
backop
)
c
:
RegisterEffect
(
e0
)
--atkup
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e2
:
SetCode
(
EFFECT_UPDATE_ATTACK
)
e2
:
SetTarget
(
c26801001
.
target
)
e2
:
SetValue
(
500
)
c
:
RegisterEffect
(
e2
)
local
e3
=
e2
:
Clone
()
e3
:
SetCode
(
EFFECT_UPDATE_DEFENSE
)
c
:
RegisterEffect
(
e3
)
--special summon
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_FUSION_SUMMON
)
e4
:
SetType
(
EFFECT_TYPE_IGNITION
)
e4
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e4
:
SetRange
(
LOCATION_FZONE
)
e4
:
SetCountLimit
(
1
)
e4
:
SetTarget
(
c26801001
.
sptg
)
e4
:
SetOperation
(
c26801001
.
spop
)
c
:
RegisterEffect
(
e4
)
--destroy
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetCategory
(
CATEGORY_DESTROY
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e5
:
SetRange
(
LOCATION_FZONE
)
e5
:
SetCountLimit
(
1
)
e5
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e5
:
SetCondition
(
c26801001
.
descon
)
e5
:
SetTarget
(
c26801001
.
destg
)
e5
:
SetOperation
(
c26801001
.
desop
)
c
:
RegisterEffect
(
e5
)
end
function
c26801001
.
backon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
c
.
dfc_front_side
and
c
:
GetOriginalCode
()
==
c
.
dfc_back1_side
end
function
c26801001
.
backop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tcode
=
c
.
dfc_front_side
c
:
SetEntityCode
(
tcode
)
c
:
ReplaceEffect
(
tcode
,
0
,
0
)
end
function
c26801001
.
target
(
e
,
c
)
return
c
:
IsFaceup
()
and
c
:
IsType
(
TYPE_FUSION
)
end
function
c26801001
.
filter1
(
c
,
e
)
return
not
c
:
IsImmuneToEffect
(
e
)
end
function
c26801001
.
filter2
(
c
,
e
,
tp
,
m
,
f
,
chkf
)
return
c
:
IsType
(
TYPE_FUSION
)
and
(
not
f
or
f
(
c
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_FUSION
,
tp
,
false
,
false
)
and
c
:
CheckFusionMaterial
(
m
,
nil
,
chkf
)
end
function
c26801001
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
local
chkf
=
tp
local
mg1
=
Duel
.
GetFusionMaterial
(
tp
)
local
res
=
Duel
.
IsExistingMatchingCard
(
c26801001
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
mg1
,
nil
,
chkf
)
if
not
res
then
local
ce
=
Duel
.
GetChainMaterial
(
tp
)
if
ce
~=
nil
then
local
fgroup
=
ce
:
GetTarget
()
local
mg2
=
fgroup
(
ce
,
e
,
tp
)
local
mf
=
ce
:
GetValue
()
res
=
Duel
.
IsExistingMatchingCard
(
c26801001
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
mg2
,
mf
,
chkf
)
end
end
return
res
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_EXTRA
)
end
function
c26801001
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
chkf
=
tp
local
mg1
=
Duel
.
GetFusionMaterial
(
tp
):
Filter
(
c26801001
.
filter1
,
nil
,
e
)
local
sg1
=
Duel
.
GetMatchingGroup
(
c26801001
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg1
,
nil
,
chkf
)
local
mg2
=
nil
local
sg2
=
nil
local
ce
=
Duel
.
GetChainMaterial
(
tp
)
if
ce
~=
nil
then
local
fgroup
=
ce
:
GetTarget
()
mg2
=
fgroup
(
ce
,
e
,
tp
)
local
mf
=
ce
:
GetValue
()
sg2
=
Duel
.
GetMatchingGroup
(
c26801001
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg2
,
mf
,
chkf
)
end
if
sg1
:
GetCount
()
>
0
or
(
sg2
~=
nil
and
sg2
:
GetCount
()
>
0
)
then
local
sg
=
sg1
:
Clone
()
if
sg2
then
sg
:
Merge
(
sg2
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
tg
=
sg
:
Select
(
tp
,
1
,
1
,
nil
)
local
tc
=
tg
:
GetFirst
()
if
sg1
:
IsContains
(
tc
)
and
(
sg2
==
nil
or
not
sg2
:
IsContains
(
tc
)
or
not
Duel
.
SelectYesNo
(
tp
,
ce
:
GetDescription
()))
then
local
mat1
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg1
,
nil
,
chkf
)
tc
:
SetMaterial
(
mat1
)
Duel
.
SendtoGrave
(
mat1
,
REASON_EFFECT
+
REASON_MATERIAL
+
REASON_FUSION
)
Duel
.
BreakEffect
()
Duel
.
SpecialSummon
(
tc
,
SUMMON_TYPE_FUSION
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
else
local
mat2
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg2
,
nil
,
chkf
)
local
fop
=
ce
:
GetOperation
()
fop
(
ce
,
e
,
tp
,
tc
,
mat2
)
end
tc
:
CompleteProcedure
()
end
end
function
c26801001
.
cfilter
(
c
,
tp
)
return
c
:
IsFaceup
()
and
c
:
IsType
(
TYPE_FUSION
)
and
c
:
IsControler
(
tp
)
end
function
c26801001
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
c26801001
.
cfilter
,
1
,
nil
,
tp
)
end
function
c26801001
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsOnField
()
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
nil
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_DESTROY
)
local
g
=
Duel
.
SelectTarget
(
tp
,
nil
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
1
,
1
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
1
,
0
,
0
)
end
function
c26801001
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
and
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
Destroy
(
tc
,
REASON_EFFECT
)
end
end
expansions/script/c26801002.lua
deleted
100644 → 0
View file @
f15a92d0
--CLAZZIQUAI
c26801002
.
dfc_front_side
=
26801000
c26801002
.
dfc_back2_side
=
26801002
function
c26801002
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
c
:
RegisterEffect
(
e1
)
--back
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e0
:
SetCode
(
EVENT_ADJUST
)
e0
:
SetRange
(
LOCATION_DECK
+
LOCATION_GRAVE
+
LOCATION_REMOVED
+
LOCATION_HAND
+
LOCATION_EXTRA
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e0
:
SetCountLimit
(
1
)
e0
:
SetCondition
(
c26801002
.
backon
)
e0
:
SetOperation
(
c26801002
.
backop
)
c
:
RegisterEffect
(
e0
)
--indes
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_INDESTRUCTABLE_COUNT
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e2
:
SetTarget
(
c26801002
.
target
)
e2
:
SetValue
(
c26801002
.
indct
)
c
:
RegisterEffect
(
e2
)
--special summon
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
26801002
,
0
))
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
)
e3
:
SetRange
(
LOCATION_FZONE
)
e3
:
SetCode
(
EVENT_FREE_CHAIN
)
e3
:
SetHintTiming
(
0
,
TIMING_BATTLE_START
+
TIMING_BATTLE_END
)
e3
:
SetCountLimit
(
1
)
e3
:
SetCondition
(
c26801002
.
sccon
)
e3
:
SetTarget
(
c26801002
.
sctg
)
e3
:
SetOperation
(
c26801002
.
scop
)
c
:
RegisterEffect
(
e3
)
--draw
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetDescription
(
aux
.
Stringid
(
26801002
,
1
))
e4
:
SetCategory
(
CATEGORY_DRAW
)
e4
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e4
:
SetCode
(
EVENT_BATTLE_DESTROYING
)
e4
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e4
:
SetRange
(
LOCATION_FZONE
)
e4
:
SetCountLimit
(
1
)
e4
:
SetCondition
(
c26801002
.
drcon
)
e4
:
SetTarget
(
c26801002
.
drtg
)
e4
:
SetOperation
(
c26801002
.
drop
)
c
:
RegisterEffect
(
e4
)
end
function
c26801002
.
backon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
c
.
dfc_front_side
and
c
:
GetOriginalCode
()
==
c
.
dfc_back2_side
end
function
c26801002
.
backop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tcode
=
c
.
dfc_front_side
c
:
SetEntityCode
(
tcode
)
c
:
ReplaceEffect
(
tcode
,
0
,
0
)
end
function
c26801002
.
target
(
e
,
c
)
return
c
:
IsType
(
TYPE_SYNCHRO
)
end
function
c26801002
.
indct
(
e
,
re
,
r
,
rp
)
if
bit
.
band
(
r
,
REASON_BATTLE
+
REASON_EFFECT
)
~=
0
then
return
1
else
return
0
end
end
function
c26801002
.
sccon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
(
Duel
.
GetCurrentPhase
()
>=
PHASE_BATTLE_START
and
Duel
.
GetCurrentPhase
()
<=
PHASE_BATTLE
)
end
function
c26801002
.
sctg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsSynchroSummonable
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_EXTRA
)
end
function
c26801002
.
scop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsSynchroSummonable
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
sg
=
g
:
Select
(
tp
,
1
,
1
,
nil
)
Duel
.
SynchroSummon
(
tp
,
sg
:
GetFirst
(),
nil
)
end
end
function
c26801002
.
drcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
rc
=
eg
:
GetFirst
()
return
rc
:
IsRelateToBattle
()
and
rc
:
IsStatus
(
STATUS_OPPO_BATTLE
)
and
rc
:
IsFaceup
()
and
rc
:
IsRace
(
RACE_SPELLCASTER
)
and
rc
:
IsControler
(
tp
)
end
function
c26801002
.
drtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
end
Duel
.
SetTargetPlayer
(
tp
)
Duel
.
SetTargetParam
(
1
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
end
function
c26801002
.
drop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
local
p
,
d
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_PLAYER
,
CHAININFO_TARGET_PARAM
)
Duel
.
Draw
(
p
,
d
,
REASON_EFFECT
)
end
expansions/script/c26801003.lua
deleted
100644 → 0
View file @
f15a92d0
--PORTABLE 3
c26801003
.
dfc_front_side
=
26801000
c26801003
.
dfc_back3_side
=
26801003
function
c26801003
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
c
:
RegisterEffect
(
e1
)
--back
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e0
:
SetCode
(
EVENT_ADJUST
)
e0
:
SetRange
(
LOCATION_DECK
+
LOCATION_GRAVE
+
LOCATION_REMOVED
+
LOCATION_HAND
+
LOCATION_EXTRA
)
e0
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_SET_AVAILABLE
)
e0
:
SetCountLimit
(
1
)
e0
:
SetCondition
(
c26801003
.
backon
)
e0
:
SetOperation
(
c26801003
.
backop
)
c
:
RegisterEffect
(
e0
)
--cannot be target
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_CANNOT_BE_EFFECT_TARGET
)
e2
:
SetProperty
(
EFFECT_FLAG_IGNORE_IMMUNE
)
e2
:
SetRange
(
LOCATION_FZONE
)
e2
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e2
:
SetCondition
(
c26801003
.
tgcon
)
e2
:
SetTarget
(
c26801003
.
tglimit
)
e2
:
SetValue
(
aux
.
tgoval
)
c
:
RegisterEffect
(
e2
)
--special summon
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
26801003
,
0
))
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetProperty
(
EFFECT_FLAG_NO_TURN_RESET
+
EFFECT_FLAG_CARD_TARGET
)
e3
:
SetRange
(
LOCATION_FZONE
)
e3
:
SetCountLimit
(
1
)
e3
:
SetTarget
(
c26801003
.
target
)
e3
:
SetOperation
(
c26801003
.
activate
)
c
:
RegisterEffect
(
e3
)
--search
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetDescription
(
aux
.
Stringid
(
26801003
,
0
))
e4
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e4
:
SetType
(
EFFECT_TYPE_IGNITION
)
e4
:
SetRange
(
LOCATION_FZONE
)
e4
:
SetCountLimit
(
1
)
e4
:
SetCost
(
c26801003
.
thcost
)
e4
:
SetTarget
(
c26801003
.
thtg
)
e4
:
SetOperation
(
c26801003
.
thop
)
c
:
RegisterEffect
(
e4
)
end
function
c26801003
.
backon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
return
c
.
dfc_front_side
and
c
:
GetOriginalCode
()
==
c
.
dfc_back3_side
end
function
c26801003
.
backop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tcode
=
c
.
dfc_front_side
c
:
SetEntityCode
(
tcode
)
c
:
ReplaceEffect
(
tcode
,
0
,
0
)
end
function
c26801003
.
tgcon
(
e
)
return
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN1
and
Duel
.
GetTurnPlayer
()
==
e
:
GetHandlerPlayer
()
end
function
c26801003
.
tglimit
(
e
,
c
)
return
c
:
IsType
(
TYPE_XYZ
)
end
function
c26801003
.
filter
(
c
,
e
,
tp
)
return
c
:
IsCanBeEffectTarget
(
e
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c26801003
.
xyzfilter
(
c
,
mg
,
ct
)
return
c
:
IsXyzSummonable
(
mg
,
2
,
ct
)
end
function
c26801003
.
mfilter1
(
c
,
mg
,
exg
,
ct
)
return
mg
:
IsExists
(
c26801003
.
mfilter2
,
1
,
nil
,
Group
.
FromCards
(
c
),
mg
,
exg
,
ct
)
end
function
c26801003
.
mfilter2
(
c
,
g
,
mg
,
exg
,
ct
)
local
tc
=
g
:
GetFirst
()
while
tc
do
if
c
:
IsCode
(
tc
:
GetCode
())
then
return
false
end
tc
=
g
:
GetNext
()
end
g
:
AddCard
(
c
)
local
result
=
exg
:
IsExists
(
Card
.
IsXyzSummonable
,
1
,
nil
,
g
,
g
:
GetCount
(),
g
:
GetCount
())
or
(
g
:
GetCount
()
<
ct
and
mg
:
IsExists
(
c26801003
.
mfilter2
,
1
,
nil
,
g
,
mg
,
exg
,
ct
))
g
:
RemoveCard
(
c
)
return
result
end
function
c26801003
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
false
end
local
mg
=
Duel
.
GetMatchingGroup
(
c26801003
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
nil
,
e
,
tp
)
local
ct
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
local
exg
=
Duel
.
GetMatchingGroup
(
c26801003
.
xyzfilter
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
mg
,
ct
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanSpecialSummonCount
(
tp
,
2
)
and
not
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
and
ct
>
1
and
mg
:
IsExists
(
c26801003
.
mfilter1
,
1
,
nil
,
mg
,
exg
,
ct
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
sg1
=
mg
:
FilterSelect
(
tp
,
c26801003
.
mfilter1
,
1
,
1
,
nil
,
mg
,
exg
,
ct
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
sg2
=
mg
:
FilterSelect
(
tp
,
c26801003
.
mfilter2
,
1
,
1
,
nil
,
sg1
,
mg
,
exg
,
ct
)
sg1
:
Merge
(
sg2
)
while
sg1
:
GetCount
()
<
ct
and
mg
:
IsExists
(
c26801003
.
mfilter2
,
1
,
nil
,
sg1
,
mg
,
exg
,
ct
)
and
(
not
exg
:
IsExists
(
Card
.
IsXyzSummonable
,
1
,
nil
,
sg1
,
sg1
:
GetCount
(),
sg1
:
GetCount
())
or
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
26801003
,
0
)))
do
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
sg3
=
mg
:
FilterSelect
(
tp
,
c26801003
.
mfilter2
,
1
,
1
,
nil
,
sg1
,
mg
,
exg
,
ct
)
sg1
:
Merge
(
sg3
)
end
Duel
.
SetTargetCard
(
sg1
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
sg1
,
sg1
:
GetCount
(),
0
,
0
)
end
function
c26801003
.
filter2
(
c
,
e
,
tp
)
return
c
:
IsRelateToEffect
(
e
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c26801003
.
spfilter
(
c
,
mg
,
ct
)
return
c
:
IsXyzSummonable
(
mg
,
ct
,
ct
)
end
function
c26801003
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
IsPlayerAffectedByEffect
(
tp
,
59822133
)
then
return
end
local
g
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
):
Filter
(
c26801003
.
filter2
,
nil
,
e
,
tp
)
local
ct
=
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
local
xyzg
=
Duel
.
GetMatchingGroup
(
c26801003
.
spfilter
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
g
,
ct
)
if
ct
>=
2
and
xyzg
:
GetCount
()
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
xyz
=
xyzg
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
Duel
.
XyzSummon
(
tp
,
xyz
,
g
)
end
end
function
c26801003
.
thcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsDiscardable
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
)
end
Duel
.
DiscardHand
(
tp
,
Card
.
IsDiscardable
,
1
,
1
,
REASON_COST
+
REASON_DISCARD
)
end
function
c26801003
.
thfilter
(
c
)
return
c
:
IsSetCard
(
0x95
)
and
c
:
IsType
(
TYPE_SPELL
)
and
c
:
IsAbleToHand
()
end
function
c26801003
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c26801003
.
thfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
function
c26801003
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
not
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
c26801003
.
thfilter
),
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
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