Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
no81cards
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
Huangnan
no81cards
Commits
bab39e83
Commit
bab39e83
authored
May 14, 2023
by
Nemo Ma
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
del
parent
9c965598
Changes
13
Hide whitespace changes
Inline
Side-by-side
Showing
13 changed files
with
9 additions
and
519 deletions
+9
-519
expansions/lflist.conf
expansions/lflist.conf
+8
-0
expansions/no81.cdb
expansions/no81.cdb
+0
-0
expansions/pics/10700447.jpg
expansions/pics/10700447.jpg
+0
-0
expansions/pics/10700448.jpg
expansions/pics/10700448.jpg
+0
-0
expansions/pics/10700450.jpg
expansions/pics/10700450.jpg
+0
-0
expansions/pics/10700451.jpg
expansions/pics/10700451.jpg
+0
-0
expansions/pics/10700459.jpg
expansions/pics/10700459.jpg
+0
-0
expansions/script/c10700447.lua
expansions/script/c10700447.lua
+0
-81
expansions/script/c10700448.lua
expansions/script/c10700448.lua
+0
-225
expansions/script/c10700450.lua
expansions/script/c10700450.lua
+0
-86
expansions/script/c10700451.lua
expansions/script/c10700451.lua
+0
-39
expansions/script/c10700459.lua
expansions/script/c10700459.lua
+0
-87
expansions/script/c22348169.lua
expansions/script/c22348169.lua
+1
-1
No files found.
expansions/lflist.conf
View file @
bab39e83
...
@@ -1496,6 +1496,14 @@
...
@@ -1496,6 +1496,14 @@
3076
0
3076
0
3077
0
3077
0
3078
0
3078
0
#230514
88880220
1
88888002
1
98920576
1
88880225
2
88897017
2
98920548
2
98940002
2
#230507
#230507
25000035
0
25000035
0
33330093
0
33330093
0
...
...
expansions/no81.cdb
View file @
bab39e83
No preview for this file type
expansions/pics/10700447.jpg
deleted
100644 → 0
View file @
9c965598
71.1 KB
expansions/pics/10700448.jpg
deleted
100644 → 0
View file @
9c965598
68.3 KB
expansions/pics/10700450.jpg
deleted
100644 → 0
View file @
9c965598
13.4 KB
expansions/pics/10700451.jpg
deleted
100644 → 0
View file @
9c965598
12.9 KB
expansions/pics/10700459.jpg
deleted
100644 → 0
View file @
9c965598
62.4 KB
expansions/script/c10700447.lua
deleted
100644 → 0
View file @
9c965598
--魔偶甜点圣宴
function
c10700447
.
initial_effect
(
c
)
--Activate
local
e0
=
Effect
.
CreateEffect
(
c
)
e0
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e0
:
SetCode
(
EVENT_FREE_CHAIN
)
c
:
RegisterEffect
(
e0
)
--SpecialSummon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
10700447
,
0
))
e1
:
SetCategory
(
CATEGORY_TODECK
+
CATEGORY_ATKCHANGE
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetCountLimit
(
1
,
10700447
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetRange
(
LOCATION_SZONE
)
e1
:
SetTarget
(
c10700447
.
target
)
e1
:
SetOperation
(
c10700447
.
operation
)
c
:
RegisterEffect
(
e1
)
--indes
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
)
e3
:
SetCode
(
EFFECT_INDESTRUCTABLE_EFFECT
)
e3
:
SetRange
(
LOCATION_SZONE
)
e3
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e3
:
SetTarget
(
c10700447
.
intg
)
e3
:
SetValue
(
1
)
c
:
RegisterEffect
(
e3
)
end
function
c10700447
.
filter
(
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToDeck
()
end
function
c10700447
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsControler
(
tp
)
and
c10700447
.
filter
(
chkc
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c10700447
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_MZONE
,
0
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TODECK
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c10700447
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_MZONE
,
0
,
1
,
1
,
nil
)
local
tc
=
g
:
GetFirst
()
if
tc
:
IsFacedown
()
then
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
g
,
1
,
0
,
0
)
if
not
tc
:
IsType
(
0x4800000
)
then
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
0x01
)
end
end
function
c10700447
.
spfilter
(
c
,
e
,
tp
,
lv
)
return
c
:
IsSetCard
(
0x71
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
c
:
IsLevel
(
lv
)
end
function
c10700447
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
then
if
tc
:
IsFacedown
()
then
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
end
local
lv
=
tc
:
GetLevel
()
if
Duel
.
SendtoDeck
(
tc
,
nil
,
2
,
REASON_EFFECT
)
then
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_UPDATE_ATTACK
)
e1
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e1
:
SetTarget
(
c10700447
.
indtg
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
e1
:
SetValue
(
500
)
Duel
.
RegisterEffect
(
e1
,
tp
)
if
(
not
tc
:
IsType
(
0x4800000
))
and
Duel
.
GetLocationCount
(
tp
,
0x04
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c10700447
.
spfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
,
lv
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
10700447
,
1
))
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c10700447
.
spfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
e
,
tp
,
lv
)
if
#
g
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
end
end
end
function
c10700447
.
indtg
(
e
,
c
)
return
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x71
)
end
function
c10700447
.
intg
(
e
,
c
)
return
c
:
IsSetCard
(
0x71
)
end
\ No newline at end of file
expansions/script/c10700448.lua
deleted
100644 → 0
View file @
9c965598
--魔偶甜点 可可玛卡龙
function
c10700448
.
initial_effect
(
c
)
c
:
EnableReviveLimit
()
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_SPSUMMON_PROC
)
e1
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
+
EFFECT_FLAG_IGNORE_IMMUNE
)
e1
:
SetRange
(
LOCATION_EXTRA
)
e1
:
SetCondition
(
c10700448
.
lkcon
)
e1
:
SetOperation
(
c10700448
.
lkop
)
e1
:
SetValue
(
SUMMON_TYPE_LINK
)
c
:
RegisterEffect
(
e1
)
--search
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
10700448
,
0
))
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e2
:
SetCountLimit
(
1
,
10700448
)
e2
:
SetCondition
(
c10700448
.
stcon
)
e2
:
SetTarget
(
c10700448
.
sttg
)
e2
:
SetOperation
(
c10700448
.
stop
)
c
:
RegisterEffect
(
e2
)
--Destroy
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
10700448
,
1
))
e3
:
SetCategory
(
CATEGORY_DESTROY
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_F
)
e3
:
SetCode
(
EVENT_BATTLE_START
)
e3
:
SetCountLimit
(
1
,
10700449
)
e3
:
SetCondition
(
c10700448
.
descon
)
e3
:
SetTarget
(
c10700448
.
destg
)
e3
:
SetOperation
(
c10700448
.
desop
)
c
:
RegisterEffect
(
e3
)
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e5
:
SetCategory
(
CATEGORY_DESTROY
)
e5
:
SetCode
(
EVENT_FREE_CHAIN
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCountLimit
(
1
,
10700449
)
e5
:
SetCondition
(
c10700448
.
descon2
)
e5
:
SetTarget
(
c10700448
.
destg
)
e5
:
SetOperation
(
c10700448
.
desop
)
c
:
RegisterEffect
(
e5
)
end
--link
function
c10700448
.
lkfilter
(
c
,
lc
,
tp
)
if
not
(
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x71
))
then
return
false
else
if
c
:
IsType
(
TYPE_MONSTER
)
then
return
c
:
IsCanBeLinkMaterial
(
lc
)
else
return
true
end
end
end
function
c10700448
.
lvfilter
(
c
)
if
c
:
IsType
(
TYPE_LINK
)
and
c
:
GetLink
()
>
1
then
return
1
+
0x10000
*
c
:
GetLink
()
else
return
1
end
end
function
c10700448
.
lcheck
(
tp
,
sg
,
lc
,
minc
,
ct
)
return
ct
>=
minc
and
sg
:
CheckWithSumEqual
(
c10700448
.
lvfilter
,
lc
:
GetLink
(),
ct
,
ct
)
and
Duel
.
GetLocationCountFromEx
(
tp
,
tp
,
sg
,
lc
)
>
0
end
function
c10700448
.
lkchenk
(
c
,
tp
,
sg
,
mg
,
lc
,
ct
,
minc
,
maxc
)
sg
:
AddCard
(
c
)
ct
=
ct
+
1
local
res
=
c10700448
.
lcheck
(
tp
,
sg
,
lc
,
minc
,
ct
)
or
(
ct
<
maxc
and
mg
:
IsExists
(
c10700448
.
lkchenk
,
1
,
sg
,
tp
,
sg
,
mg
,
lc
,
ct
,
minc
,
maxc
))
sg
:
RemoveCard
(
c
)
ct
=
ct
-
1
return
res
end
function
c10700448
.
lkcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
if
c
:
IsType
(
TYPE_PENDULUM
)
and
c
:
IsFaceup
()
then
return
false
end
local
tp
=
c
:
GetControler
()
local
mg
=
Duel
.
GetMatchingGroup
(
c10700448
.
lkfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
nil
,
c
,
tp
)
local
sg
=
Group
.
CreateGroup
()
for
i
,
pe
in
ipairs
({
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_LMATERIAL
)})
do
local
pc
=
pe
:
GetHandler
()
if
not
mg
:
IsContains
(
pc
)
then
return
false
end
sg
:
AddCard
(
pc
)
end
local
ct
=
sg
:
GetCount
()
local
minc
=
2
local
maxc
=
99
if
ct
>
maxc
then
return
false
end
return
c10700448
.
lcheck
(
tp
,
sg
,
c
,
minc
,
ct
)
or
mg
:
IsExists
(
c10700448
.
lkchenk
,
1
,
nil
,
tp
,
sg
,
mg
,
c
,
ct
,
minc
,
maxc
)
end
function
c10700448
.
lkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
local
mg
=
Duel
.
GetMatchingGroup
(
c10700448
.
lkfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
nil
,
c
,
tp
)
local
sg
=
Group
.
CreateGroup
()
for
i
,
pe
in
ipairs
({
Duel
.
IsPlayerAffectedByEffect
(
tp
,
EFFECT_MUST_BE_LMATERIAL
)})
do
sg
:
AddCard
(
pe
:
GetHandler
())
end
local
ct
=
sg
:
GetCount
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_LMATERIAL
)
sg
:
Select
(
tp
,
ct
,
ct
,
nil
)
local
minc
=
2
local
maxc
=
99
for
i
=
ct
,
maxc
-
1
do
local
cg
=
mg
:
Filter
(
c10700448
.
lkchenk
,
sg
,
tp
,
sg
,
mg
,
c
,
i
,
minc
,
maxc
)
if
cg
:
GetCount
()
==
0
then
break
end
local
minct
=
1
if
c10700448
.
lcheck
(
tp
,
sg
,
c
,
minc
,
i
)
then
if
not
Duel
.
SelectYesNo
(
tp
,
210
)
then
break
end
minct
=
0
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_LMATERIAL
)
local
g
=
cg
:
Select
(
tp
,
minct
,
1
,
nil
)
if
g
:
GetCount
()
==
0
then
break
end
sg
:
Merge
(
g
)
end
c
:
SetMaterial
(
sg
)
Duel
.
SendtoGrave
(
sg
,
REASON_MATERIAL
+
REASON_LINK
)
end
--set
function
c10700448
.
stcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_LINK
)
end
function
c10700448
.
stfilter
(
c
)
return
c
:
IsSetCard
(
0x71
)
and
c
:
IsSSetable
()
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
end
function
c10700448
.
sttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
tp
=
e
:
GetHandler
():
GetControler
()
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c10700448
.
stfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
end
function
c10700448
.
stop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tp
=
e
:
GetHandler
():
GetControler
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SET
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c10700448
.
stfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
local
tc
=
g
:
GetFirst
()
if
g
:
GetCount
()
~=
0
and
Duel
.
SSet
(
tp
,
g
)
>
0
then
if
tc
:
IsType
(
TYPE_QUICKPLAY
)
then
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_SET_AVAILABLE
)
e1
:
SetCode
(
EFFECT_QP_ACT_IN_SET_TURN
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
tc
:
RegisterEffect
(
e1
)
end
if
tc
:
IsType
(
TYPE_TRAP
)
then
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_TRAP_ACT_IN_SET_TURN
)
e1
:
SetProperty
(
EFFECT_FLAG_SET_AVAILABLE
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
tc
:
RegisterEffect
(
e1
)
end
end
end
--get x y label
function
c10700448
.
xylabel
(
c
,
tp
)
local
x
=
c
:
GetSequence
()
local
y
=
0
if
c
:
GetControler
()
==
tp
then
if
c
:
IsLocation
(
LOCATION_SZONE
)
or
c
:
IsLocation
(
LOCATION_PZONE
)
then
y
=
0
elseif
c
:
IsLocation
(
LOCATION_MZONE
)
and
x
<=
4
then
y
=
1
elseif
c
:
IsLocation
(
LOCATION_MZONE
)
and
x
==
5
then
x
,
y
=
1
,
2
elseif
c
:
IsLocation
(
LOCATION_MZONE
)
and
x
==
6
then
x
,
y
=
3
,
2
else
x
,
y
=-
1
,
-
5
end
elseif
c
:
GetControler
()
==
1
-
tp
then
if
c
:
IsLocation
(
LOCATION_SZONE
)
or
c
:
IsLocation
(
LOCATION_PZONE
)
then
x
,
y
=
4
-
x
,
4
elseif
c
:
IsLocation
(
LOCATION_MZONE
)
and
x
<=
4
then
x
,
y
=
4
-
x
,
3
elseif
c
:
IsLocation
(
LOCATION_MZONE
)
and
x
==
5
then
x
,
y
=
3
,
2
elseif
c
:
IsLocation
(
LOCATION_MZONE
)
and
x
==
6
then
x
,
y
=
1
,
2
else
x
,
y
=
5
,
9
end
end
return
x
,
y
end
--gradient modification
function
c10700448
.
gradient
(
y
,
x
)
if
y
>
0
and
x
==
0
then
return
1000
end
if
y
<
0
and
x
==
0
then
return
1100
end
if
y
>
0
and
x
~=
0
then
return
y
/
x
end
if
y
<
0
and
x
~=
0
then
return
y
/
x
+
100
end
if
y
==
0
and
x
>
0
then
return
0
end
if
y
==
0
and
x
<
0
then
return
100
end
return
65536
end
--draw lines with gradients k
function
c10700448
.
line
(
tc
,
c
,
tp
,
...
)
local
x1
,
y1
=
c10700448
.
xylabel
(
c
,
tp
)
local
x2
,
y2
=
c10700448
.
xylabel
(
tc
,
tp
)
for
_
,
k
in
ipairs
({
...
})
do
if
c10700448
.
gradient
(
y2
-
y1
,
x2
-
x1
)
==
k
then
return
true
end
end
return
false
end
--Link Marker as example
-- ↙ 101
-- ↓ 1100
-- ↘ 99
-- ← 100
-- → 0
-- ↖ -1
-- ↑ 1000
-- ↗ 1
function
c10700448
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsRelateToBattle
()
end
function
c10700448
.
descon2
(
e
)
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsFaceup
,
0
,
LOCATION_FZONE
,
LOCATION_FZONE
,
1
,
nil
)
end
function
c10700448
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c10700448
.
line
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
,
c
,
tp
,
1
,
101
,
1000
,
1100
)
if
chk
==
0
then
return
#
g
>
0
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
#
g
,
0
,
0
)
end
function
c10700448
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
nil
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
)
for
tc
in
aux
.
Next
(
g
)
do
local
x1
,
y1
=
c10700448
.
xylabel
(
c
,
tp
)
local
x2
,
y2
=
c10700448
.
xylabel
(
tc
,
tp
)
end
local
g
=
Duel
.
GetMatchingGroup
(
c10700448
.
line
,
tp
,
LOCATION_ONFIELD
,
LOCATION_ONFIELD
,
nil
,
c
,
tp
,
1
,
101
,
1000
,
1100
)
if
#
g
>
0
then
Duel
.
Destroy
(
g
,
REASON_EFFECT
)
end
end
\ No newline at end of file
expansions/script/c10700450.lua
deleted
100644 → 0
View file @
9c965598
--魔偶甜点·巴伐露管理员
function
c10700450
.
initial_effect
(
c
)
--Copy Code
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
10700450
,
0
))
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e1
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
)
e1
:
SetTarget
(
c10700450
.
thtg
)
e1
:
SetOperation
(
c10700450
.
thop
)
c
:
RegisterEffect
(
e1
)
local
e2
=
e1
:
Clone
()
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
c
:
RegisterEffect
(
e2
)
--to deck
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
10700450
,
3
))
e3
:
SetCategory
(
CATEGORY_TODECK
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_F
)
e3
:
SetCode
(
EVENT_TO_GRAVE
)
e3
:
SetCondition
(
c10700450
.
retcon
)
e3
:
SetTarget
(
c10700450
.
rettg
)
e3
:
SetOperation
(
c10700450
.
retop
)
c
:
RegisterEffect
(
e3
)
end
function
c10700450
.
mfilter1
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x71
)
and
c
:
IsRace
(
RACE_BEAST
)
end
function
c10700450
.
filter1
(
c
)
return
c
:
IsSetCard
(
0x71
)
and
c
:
IsSSetable
()
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
end
function
c10700450
.
mfilter2
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x71
)
and
c
:
IsRace
(
RACE_FAIRY
)
end
function
c10700450
.
filter2
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x71
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP_DEFENSE
)
end
function
c10700450
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
tp
)
end
local
b1
=
Duel
.
IsExistingMatchingCard
(
c10700450
.
filter1
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
local
b2
=
Duel
.
IsExistingMatchingCard
(
c10700450
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
)
local
d1
=
Duel
.
IsExistingMatchingCard
(
c10700450
.
mfilter1
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
local
d2
=
Duel
.
IsExistingMatchingCard
(
c10700450
.
mfilter2
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
if
chk
==
0
then
return
(
b1
and
d1
)
or
(
b2
and
d2
)
end
local
op
=
0
if
b1
and
d1
and
b2
and
d2
then
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
10700450
,
1
),
aux
.
Stringid
(
10700450
,
2
))
elseif
(
b1
and
d1
)
and
not
(
b2
and
d2
)
then
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
10700450
,
1
))
elseif
(
b2
and
d2
)
and
not
(
b1
and
d1
)
then
op
=
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
10700450
,
2
))
+
1
end
e
:
SetLabel
(
op
)
if
op
==
0
then
e
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
)
else
e
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_GRAVE
)
end
end
function
c10700450
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
e
:
GetLabel
()
==
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SET
)
local
g1
=
Duel
.
SelectMatchingCard
(
tp
,
c10700450
.
filter1
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
if
g1
:
GetCount
()
>
0
then
Duel
.
HintSelection
(
g1
)
Duel
.
SSet
(
tp
,
g1
)
end
else
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g2
=
Duel
.
SelectMatchingCard
(
tp
,
c10700450
.
filter2
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
if
g2
:
GetCount
()
>
0
then
Duel
.
HintSelection
(
g2
)
Duel
.
SpecialSummon
(
g2
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP_DEFENSE
)
end
end
end
function
c10700450
.
retcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsReason
(
REASON_DESTROY
)
and
e
:
GetHandler
():
GetReasonPlayer
()
==
1
-
tp
and
e
:
GetHandler
():
GetPreviousControler
()
==
tp
end
function
c10700450
.
rettg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
function
c10700450
.
retop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
e
:
GetHandler
():
IsRelateToEffect
(
e
)
then
Duel
.
SendtoDeck
(
e
:
GetHandler
(),
nil
,
2
,
REASON_EFFECT
)
end
end
\ No newline at end of file
expansions/script/c10700451.lua
deleted
100644 → 0
View file @
9c965598
--魔偶甜点搜索
function
c10700451
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetHintTiming
(
0
,
TIMINGS_CHECK_MONSTER
+
TIMING_END_PHASE
)
e1
:
SetCountLimit
(
1
,
10700451
+
EFFECT_COUNT_CODE_OATH
)
e1
:
SetTarget
(
c10700451
.
target
)
e1
:
SetOperation
(
c10700451
.
activate
)
c
:
RegisterEffect
(
e1
)
end
function
c10700451
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c10700451
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
0
,
tp
,
LOCATION_DECK
)
end
function
c10700451
.
mfilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x71
)
and
c
:
IsRace
(
RACE_FAIRY
)
end
function
c10700451
.
filter
(
c
,
e
,
tp
)
return
c
:
IsSetCard
(
0x71
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
(
c
:
IsAbleToHand
()
or
(
Duel
.
IsExistingMatchingCard
(
c10700451
.
mfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
and
Duel
.
GetLocationCount
(
tp
,
0x04
)
>
0
))
end
function
c10700451
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
b
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c10700451
.
mfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c10700451
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
e
,
tp
)
local
tc
=
g
:
GetFirst
()
if
tc
then
if
b
and
tc
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEUP_ATTACK
)
and
(
not
tc
:
IsAbleToHand
()
or
Duel
.
SelectOption
(
tp
,
1190
,
1152
)
==
1
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
else
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
end
end
end
\ No newline at end of file
expansions/script/c10700459.lua
deleted
100644 → 0
View file @
9c965598
--红莲牛头人
function
c10700459
.
initial_effect
(
c
)
--cannot attack
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetCode
(
EFFECT_INDESTRUCTABLE_BATTLE
)
e1
:
SetCondition
(
c10700459
.
atcon2
)
e1
:
SetValue
(
1
)
c
:
RegisterEffect
(
e1
)
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_SINGLE
)
e4
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e4
:
SetRange
(
LOCATION_MZONE
)
e4
:
SetCode
(
EFFECT_INDESTRUCTABLE_EFFECT
)
e4
:
SetCondition
(
c10700459
.
atcon
)
e4
:
SetValue
(
1
)
c
:
RegisterEffect
(
e4
)
--search
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_TRIGGER_O
+
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EVENT_SUMMON_SUCCESS
)
e2
:
SetCountLimit
(
1
,
10700459
)
e2
:
SetTarget
(
c10700459
.
sptg
)
e2
:
SetOperation
(
c10700459
.
spop
)
c
:
RegisterEffect
(
e2
)
local
e3
=
e2
:
Clone
()
e3
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
c
:
RegisterEffect
(
e3
)
--special summon
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetDescription
(
aux
.
Stringid
(
10700459
,
0
))
e5
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e5
:
SetCode
(
EVENT_PHASE
+
PHASE_BATTLE
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCountLimit
(
1
,
10700460
)
e5
:
SetCondition
(
c10700459
.
setcon
)
e5
:
SetTarget
(
c10700459
.
settg
)
e5
:
SetOperation
(
c10700459
.
setop
)
c
:
RegisterEffect
(
e5
)
end
function
c10700459
.
cfilter
(
c
,
atk
)
return
c
:
IsFaceup
()
and
c
:
GetAttack
()
>
atk
end
function
c10700459
.
cfilter2
(
c
,
atk
)
return
c
:
IsFaceup
()
and
c
:
GetAttack
()
<
atk
end
function
c10700459
.
atcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsExistingMatchingCard
(
c10700459
.
cfilter
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
,
e
:
GetHandler
():
GetAttack
())
end
function
c10700459
.
atcon2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsExistingMatchingCard
(
c10700459
.
cfilter2
,
tp
,
LOCATION_MZONE
,
LOCATION_MZONE
,
1
,
nil
,
e
:
GetHandler
():
GetAttack
())
end
function
c10700459
.
spfilter
(
c
,
e
,
tp
)
return
c
:
GetAttack
()
==
1700
and
c
:
GetDefense
()
==
1000
and
c
:
IsRace
(
RACE_BEASTWARRIOR
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c10700459
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c10700459
.
spfilter
,
tp
,
LOCATION_HAND
+
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_DECK
+
LOCATION_GRAVE
)
end
function
c10700459
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
<=
0
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
aux
.
NecroValleyFilter
(
c10700459
.
spfilter
),
tp
,
LOCATION_HAND
+
LOCATION_DECK
+
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
function
c10700459
.
setcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
GetAttackAnnouncedCount
()
>
0
end
function
c10700459
.
setfilter
(
c
)
return
c
:
GetType
()
==
TYPE_CONTINUOUS
and
c
:
GetType
()
==
TYPE_TRAP
and
c
:
IsSSetable
()
end
function
c10700459
.
settg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c10700459
.
setfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
end
function
c10700459
.
setop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SET
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c10700459
.
setfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
)
local
tc
=
g
:
GetFirst
()
if
tc
then
Duel
.
SSet
(
tp
,
tc
)
end
end
\ No newline at end of file
expansions/script/c22348169.lua
View file @
bab39e83
...
@@ -54,7 +54,7 @@ function c22348169.desop(e,tp,eg,ep,ev,re,r,rp)
...
@@ -54,7 +54,7 @@ function c22348169.desop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
end
function
c22348169
.
thfilter
(
c
)
function
c22348169
.
thfilter
(
c
)
return
aux
.
IsCodeListed
(
c
,
22348157
)
and
not
c
:
IsCode
(
22348157
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToHand
()
return
aux
.
IsCodeListed
(
c
,
22348157
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToHand
()
end
end
function
c22348169
.
desttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c22348169
.
desttg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c22348169
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c22348169
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
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