Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
E
Entertainment Server
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
Peter Xin
Entertainment Server
Commits
d458e763
Commit
d458e763
authored
Sep 28, 2024
by
root
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Refresh on 2024-09-28 20:01:56
parent
dd61c217
Changes
15
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
15 changed files
with
728 additions
and
44 deletions
+728
-44
lflist.conf
lflist.conf
+427
-11
script/c101206091.lua
script/c101206091.lua
+2
-1
script/c101207037.lua
script/c101207037.lua
+93
-0
script/c101207079.lua
script/c101207079.lua
+133
-0
script/c114514130.lua
script/c114514130.lua
+1
-1
script/c114514131.lua
script/c114514131.lua
+1
-1
script/c114514135.lua
script/c114514135.lua
+3
-3
script/c191981030.lua
script/c191981030.lua
+44
-0
script/c191981051.lua
script/c191981051.lua
+9
-9
script/c191981052.lua
script/c191981052.lua
+1
-1
script/c191981054.lua
script/c191981054.lua
+4
-5
script/c191981055.lua
script/c191981055.lua
+2
-7
script/c191981056.lua
script/c191981056.lua
+4
-4
script/c191981075.lua
script/c191981075.lua
+1
-0
texts/balanced.txt
texts/balanced.txt
+3
-1
No files found.
lflist.conf
View file @
d458e763
This diff is collapsed.
Click to expand it.
script/c101206091.lua
View file @
d458e763
...
...
@@ -45,7 +45,8 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp)
end
function
s
.
aclimit
(
e
,
re
,
tp
)
local
rc
=
re
:
GetHandler
()
return
re
:
IsActiveType
(
TYPE_MONSTER
)
and
rc
:
IsSummonType
(
SUMMON_TYPE_SPECIAL
)
and
rc
:
IsLocation
(
LOCATION_MZONE
)
and
rc
:
IsSummonLocation
(
LOCATION_HAND
)
return
re
:
IsActiveType
(
TYPE_MONSTER
)
and
rc
:
IsSummonType
(
SUMMON_TYPE_SPECIAL
)
and
rc
:
IsLocation
(
LOCATION_MZONE
)
and
rc
:
GetPreviousControler
()
==
tp
and
rc
:
IsSummonLocation
(
LOCATION_HAND
)
end
function
s
.
sspfilter
(
c
,
tp
,
e
)
return
Duel
.
IsExistingMatchingCard
(
aux
.
AND
(
Card
.
IsFaceup
,
Card
.
IsSetCard
),
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
,
0x1b7
)
...
...
script/c101207037.lua
0 → 100644
View file @
d458e763
--刻まれし魔レクストレメンデ
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--fusion material
aux
.
AddFusionProcFun2
(
c
,
s
.
mfilter1
,
s
.
mfilter2
,
true
)
c
:
EnableReviveLimit
()
--to grave
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_TOGRAVE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetCountLimit
(
1
,
id
)
e1
:
SetCondition
(
s
.
tgcon
)
e1
:
SetCost
(
s
.
tgcost
)
e1
:
SetTarget
(
s
.
tgtg
)
e1
:
SetOperation
(
s
.
tgop
)
c
:
RegisterEffect
(
e1
)
--immune
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EFFECT_IMMUNE_EFFECT
)
e2
:
SetProperty
(
EFFECT_FLAG_SINGLE_RANGE
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCondition
(
s
.
imcon
)
e2
:
SetValue
(
s
.
efilter
)
c
:
RegisterEffect
(
e2
)
--to hand
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
id
,
1
))
e3
:
SetCategory
(
CATEGORY_TOHAND
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetCode
(
EVENT_TO_GRAVE
)
e3
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e3
:
SetCountLimit
(
1
,
id
+
o
)
e3
:
SetTarget
(
s
.
thtg
)
e3
:
SetOperation
(
s
.
thop
)
c
:
RegisterEffect
(
e3
)
end
function
s
.
mfilter1
(
c
)
return
c
:
IsFusionSetCard
(
0x1b0
)
and
c
:
IsFusionType
(
TYPE_FUSION
)
end
function
s
.
mfilter2
(
c
)
return
c
:
IsFusionType
(
TYPE_FUSION
+
TYPE_LINK
)
end
function
s
.
tgcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_FUSION
)
end
function
s
.
tgcost
(
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
s
.
tgfilter
(
c
)
return
c
:
IsAttribute
(
ATTRIBUTE_LIGHT
)
and
c
:
IsRace
(
RACE_FIEND
)
and
c
:
IsAbleToGrave
()
end
function
s
.
tgtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
s
.
tgfilter
,
tp
,
LOCATION_DECK
+
LOCATION_EXTRA
,
0
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOGRAVE
,
nil
,
1
,
tp
,
LOCATION_DECK
+
LOCATION_EXTRA
)
end
function
s
.
tgop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
tgfilter
,
tp
,
LOCATION_DECK
+
LOCATION_EXTRA
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoGrave
(
g
,
REASON_EFFECT
)
end
end
function
s
.
eqfilter
(
c
)
return
c
:
IsSetCard
(
0x1b0
)
and
bit
.
band
(
c
:
GetType
(),
TYPE_SPELL
+
TYPE_EQUIP
)
==
TYPE_SPELL
+
TYPE_EQUIP
end
function
s
.
imcon
(
e
)
local
sg
=
e
:
GetHandler
():
GetEquipGroup
()
return
sg
:
IsExists
(
s
.
eqfilter
,
1
,
nil
)
end
function
s
.
efilter
(
e
,
te
)
return
not
te
:
GetOwner
():
IsSetCard
(
0x1b0
)
end
function
s
.
thfilter
(
c
)
return
c
:
IsFaceupEx
()
and
c
:
IsSetCard
(
0x1b0
)
and
c
:
IsAbleToHand
()
end
function
s
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
+
LOCATION_REMOVED
)
and
chkc
:
IsControler
(
tp
)
and
s
.
thfilter
(
chkc
)
and
chkc
~=
e
:
GetHandler
()
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
s
.
thfilter
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
e
:
GetHandler
())
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectTarget
(
tp
,
s
.
thfilter
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
1
,
e
:
GetHandler
())
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
g
,
1
,
0
,
0
)
end
function
s
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
and
aux
.
NecroValleyFilter
()(
tc
)
then
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
end
end
\ No newline at end of file
script/c101207079.lua
0 → 100644
View file @
d458e763
--刻まれし魔の憐歌
local
s
,
id
,
o
=
GetID
()
function
s
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetCondition
(
aux
.
bpcon
)
e1
:
SetTarget
(
s
.
target
)
e1
:
SetOperation
(
s
.
activate
)
c
:
RegisterEffect
(
e1
)
--special summon
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
+
CATEGORY_FUSION_SUMMON
)
e2
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e2
:
SetRange
(
LOCATION_GRAVE
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetCountLimit
(
1
,
id
)
e2
:
SetCost
(
aux
.
bfgcost
)
e2
:
SetTarget
(
s
.
fstg
)
e2
:
SetOperation
(
s
.
fsop
)
c
:
RegisterEffect
(
e2
)
end
s
.
fusion_effect
=
true
function
s
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
id
)
==
0
end
end
function
s
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_INDESTRUCTABLE_BATTLE
)
e1
:
SetTargetRange
(
LOCATION_MZONE
,
0
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
e1
:
SetTarget
(
s
.
ptfilter
)
e1
:
SetValue
(
1
)
Duel
.
RegisterEffect
(
e1
,
tp
)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_FIELD
)
e2
:
SetCode
(
EFFECT_CHANGE_BATTLE_DAMAGE
)
e2
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e2
:
SetTargetRange
(
1
,
0
)
e2
:
SetValue
(
HALF_DAMAGE
)
e2
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e2
,
tp
)
Duel
.
RegisterFlagEffect
(
tp
,
id
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
s
.
ptfilter
(
e
,
c
)
return
c
:
IsAttribute
(
ATTRIBUTE_LIGHT
)
and
c
:
IsRace
(
RACE_FIEND
)
end
function
s
.
mttg
(
e
,
c
)
local
tc
=
c
:
GetEquipTarget
()
return
tc
and
tc
:
IsFaceup
()
and
tc
:
IsSetCard
(
0x1b0
)
and
c
:
GetOriginalType
()
&
TYPE_MONSTER
~=
0
end
function
s
.
fuslimit
(
e
,
c
,
sumtype
)
if
not
c
then
return
false
end
return
c
:
IsControler
(
e
:
GetHandlerPlayer
())
end
function
s
.
filter
(
c
,
e
,
tp
,
m
,
f
,
chkf
)
return
c
:
IsSetCard
(
0x1b0
)
and
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
s
.
filter2
(
c
,
e
)
return
not
c
:
IsImmuneToEffect
(
e
)
end
function
s
.
fstg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
local
me
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
me
:
SetType
(
EFFECT_TYPE_FIELD
)
me
:
SetCode
(
EFFECT_EXTRA_FUSION_MATERIAL
)
me
:
SetTargetRange
(
LOCATION_SZONE
,
0
)
me
:
SetTarget
(
s
.
mttg
)
me
:
SetValue
(
s
.
fuslimit
)
Duel
.
RegisterEffect
(
me
,
tp
)
local
chkf
=
tp
local
mg1
=
Duel
.
GetFusionMaterial
(
tp
):
Filter
(
Card
.
IsOnField
,
nil
)
local
res
=
Duel
.
IsExistingMatchingCard
(
s
.
filter
,
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
mg3
=
fgroup
(
ce
,
e
,
tp
)
local
mf
=
ce
:
GetValue
()
res
=
Duel
.
IsExistingMatchingCard
(
s
.
filter
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
mg3
,
mf
,
chkf
)
end
end
me
:
Reset
()
return
res
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_EXTRA
)
end
function
s
.
fsop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
me
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
me
:
SetType
(
EFFECT_TYPE_FIELD
)
me
:
SetCode
(
EFFECT_EXTRA_FUSION_MATERIAL
)
me
:
SetTargetRange
(
LOCATION_SZONE
,
0
)
me
:
SetTarget
(
s
.
mttg
)
me
:
SetValue
(
s
.
fuslimit
)
Duel
.
RegisterEffect
(
me
,
tp
)
local
chkf
=
tp
local
mg1
=
Duel
.
GetFusionMaterial
(
tp
):
Filter
(
Card
.
IsOnField
,
nil
):
Filter
(
s
.
filter2
,
nil
,
e
)
local
sg1
=
Duel
.
GetMatchingGroup
(
s
.
filter
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg1
,
nil
,
chkf
)
local
mg3
=
nil
local
sg2
=
nil
local
ce
=
Duel
.
GetChainMaterial
(
tp
)
if
ce
~=
nil
then
local
fgroup
=
ce
:
GetTarget
()
mg3
=
fgroup
(
ce
,
e
,
tp
)
local
mf
=
ce
:
GetValue
()
sg2
=
Duel
.
GetMatchingGroup
(
s
.
filter
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg3
,
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
ce
and
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
)
elseif
ce
~=
nil
then
local
mat2
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg3
,
nil
,
chkf
)
local
fop
=
ce
:
GetOperation
()
fop
(
ce
,
e
,
tp
,
tc
,
mat2
)
end
tc
:
CompleteProcedure
()
end
me
:
Reset
()
end
\ No newline at end of file
script/c114514130.lua
View file @
d458e763
...
...
@@ -56,7 +56,7 @@ function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
PayLPCost
(
tp
,
600
)
end
function
s
.
thfilter
(
c
,
e
,
tp
)
if
not
(
c
:
IsSetCard
(
0x171
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsLevelBelow
(
4
))
then
return
false
end
if
not
(
c
:
IsSetCard
(
0x171
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
not
c
:
IsLevel
(
8
))
then
return
false
end
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
return
c
:
IsAbleToHand
()
or
(
ft
>
0
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
))
end
...
...
script/c114514131.lua
View file @
d458e763
...
...
@@ -50,7 +50,7 @@ function s.cfilter(c)
return
c
:
IsLevel
(
3
)
and
c
:
IsRace
(
RACE_PSYCHO
)
end
function
s
.
con2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
Duel
.
IsChainNegatable
(
ev
)
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_BATTLE_DESTROYED
)
and
Duel
.
IsExistingMatchingCard
(
s
.
cfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
return
re
:
IsActiveType
(
TYPE_MONSTER
)
and
Duel
.
IsChainNegatable
(
ev
)
and
not
e
:
GetHandler
():
IsStatus
(
STATUS_BATTLE_DESTROYED
)
and
Duel
.
IsExistingMatchingCard
(
s
.
cfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
function
s
.
cost2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
CheckRemoveOverlayCard
(
tp
,
1
,
REASON_COST
)
end
...
...
script/c114514135.lua
View file @
d458e763
...
...
@@ -61,16 +61,16 @@ function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
local
c
=
e
:
GetHandler
()
if
chk
==
0
then
return
c
:
IsAbleToHand
()
and
Duel
.
GetMZoneCount
(
tp
,
c
)
>
0
and
Duel
.
IsExistingMatchingCard
(
s
.
spfilter2
,
tp
,
LOCATION_
HAND
,
0
,
1
,
nil
,
e
,
tp
)
end
and
Duel
.
IsExistingMatchingCard
(
s
.
spfilter2
,
tp
,
LOCATION_
DECK
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
c
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_
HAND
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_
DECK
)
end
function
s
.
spop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
c
:
IsRelateToEffect
(
e
)
and
Duel
.
SendtoHand
(
c
,
nil
,
REASON_EFFECT
)
~=
0
and
c
:
IsLocation
(
LOCATION_HAND
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
spfilter2
,
tp
,
LOCATION_
HAND
,
0
,
1
,
1
,
nil
,
e
,
tp
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
spfilter2
,
tp
,
LOCATION_
DECK
,
0
,
1
,
1
,
nil
,
e
,
tp
)
if
g
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
g
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
...
...
script/c191981030.lua
View file @
d458e763
...
...
@@ -21,6 +21,29 @@ function c191981030.initial_effect(c)
e2
:
SetTarget
(
s
.
tdtg
)
e2
:
SetOperation
(
s
.
tdop
)
c
:
RegisterEffect
(
e2
)
--damage
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e3
:
SetCode
(
EVENT_LEAVE_FIELD
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetOperation
(
s
.
dam
)
c
:
RegisterEffect
(
e3
)
--material check
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_SINGLE
)
e4
:
SetCode
(
EFFECT_MATERIAL_CHECK
)
e4
:
SetValue
(
s
.
valcheck
)
e4
:
SetCondition
(
s
.
regcon
)
c
:
RegisterEffect
(
e4
)
-- redirect todeck
local
e5
=
Effect
.
CreateEffect
(
c
)
e5
:
SetType
(
EFFECT_TYPE_FIELD
)
e5
:
SetProperty
(
EFFECT_FLAG_SET_AVAILABLE
+
EFFECT_FLAG_IGNORE_RANGE
+
EFFECT_FLAG_IGNORE_IMMUNE
)
e5
:
SetRange
(
LOCATION_MZONE
)
e5
:
SetCode
(
EFFECT_TO_GRAVE_REDIRECT
)
e5
:
SetTargetRange
(
0
,
0xff
)
e5
:
SetValue
(
LOCATION_DECKBOT
)
c
:
RegisterEffect
(
e5
)
end
s
.
material_setcode
=
0x8
s
.
dark_calling
=
true
...
...
@@ -53,4 +76,25 @@ function s.tdop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
end
--redirect
function
s
.
regcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsSummonType
(
SUMMON_TYPE_FUSION
)
and
e
:
GetLabelObject
():
GetLabel
()
~=
0
end
function
s
.
valcheck
(
e
,
c
)
local
mg
=
c
:
GetMaterial
()
local
flag
=
0
if
mg
:
IsExists
(
Card
.
IsType
,
2
,
nil
,
TYPE_NORMAL
)
then
flag
=
1
end
c
:
RegisterFlagEffect
(
id
,
RESET_EVENT
+
0x4fe0000
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
id
,
2
))
e
:
SetLabel
(
flag
)
end
--damage
function
s
.
filter1
(
c
,
tp
)
return
c
:
IsPreviousLocation
(
LOCATION_ONFIELD
)
and
c
:
IsPreviousControler
(
tp
)
end
function
s
.
dam
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
d1
=
eg
:
FilterCount
(
s
.
filter1
,
nil
,
1
-
tp
)
*
300
Duel
.
Damage
(
1
-
tp
,
d1
,
REASON_EFFECT
,
true
)
Duel
.
RDComplete
()
end
\ No newline at end of file
script/c191981051.lua
View file @
d458e763
...
...
@@ -17,7 +17,7 @@ function s.initial_effect(c)
c
:
RegisterEffect
(
e1
)
--sp
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
m
,
2
))
e2
:
SetDescription
(
aux
.
Stringid
(
id
,
2
))
e2
:
SetCategory
(
CATEGORY_TODECK
+
CATEGORY_SPECIAL_SUMMON
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
...
...
@@ -34,7 +34,7 @@ function s.initial_effect(c)
c
:
RegisterEffect
(
e9
)
--sp
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
m
,
3
))
e3
:
SetDescription
(
aux
.
Stringid
(
id
,
3
))
e3
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e3
:
SetCode
(
EVENT_FREE_CHAIN
)
...
...
@@ -57,10 +57,10 @@ function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
end
function
s
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
4
))
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
id
,
4
))
local
tc
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
tgtfilter
,
tp
,
0x01
,
0
,
1
,
1
,
nil
):
GetFirst
()
if
tc
then
if
tc
:
IsAbleToHand
()
and
(
not
tc
:
IsAbleToGrave
()
or
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
m
,
0
),
aux
.
Stringid
(
m
,
1
))
==
0
)
then
if
tc
:
IsAbleToHand
()
and
(
not
tc
:
IsAbleToGrave
()
or
Duel
.
SelectOption
(
tp
,
aux
.
Stringid
(
id
,
0
),
aux
.
Stringid
(
id
,
1
))
==
0
)
then
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
else
...
...
@@ -75,12 +75,12 @@ end
function
s
.
valcheck
(
e
,
c
)
if
c
:
GetMaterial
():
IsExists
(
s
.
ckvalfilter
,
1
,
nil
)
then
c
:
RegisterFlagEffect
(
m
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
m
,
5
))
c
:
RegisterFlagEffect
(
id
,
RESET_EVENT
+
RESETS_STANDARD
-
RESET_TOFIELD
,
EFFECT_FLAG_CLIENT_HINT
,
1
,
0
,
aux
.
Stringid
(
id
,
5
))
end
end
function
s
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
GetFlagEffect
(
m
)
~=
0
return
e
:
GetHandler
():
GetFlagEffect
(
id
)
~=
0
end
function
s
.
tgsfilter
(
c
)
...
...
@@ -91,7 +91,7 @@ function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if
chkc
then
return
chkc
:
IsControler
(
tp
)
and
chkc
:
IsLocation
(
0x20
)
and
s
.
tgsfilter
(
chkc
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
s
.
tgsfilter
,
tp
,
0x20
,
0
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TODECK
)
local
g
=
Duel
.
Select
MatchingCard
(
tp
,
s
.
tgsfilter
,
tp
,
0x20
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
Select
Target
(
tp
,
s
.
tgsfilter
,
tp
,
0x20
,
0
,
1
,
1
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
g
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
0x40
)
end
...
...
@@ -107,8 +107,8 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
Duel
.
BreakEffect
()
local
exshuffleck
=
false
if
tc
:
IsLocation
(
0x40
)
then
exshuffleck
=
true
end
if
lv
~=
0
and
Duel
.
IsExistingMatchingCard
(
s
.
opsfilter
,
tp
,
0x40
,
0
,
1
,
nil
,
e
,
tp
,
lv
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
6
))
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
m
,
6
))
if
lv
~=
0
and
Duel
.
IsExistingMatchingCard
(
s
.
opsfilter
,
tp
,
0x40
,
0
,
1
,
nil
,
e
,
tp
,
lv
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
id
,
6
))
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
aux
.
Stringid
(
id
,
6
))
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
opsfilter
,
tp
,
0x40
,
0
,
1
,
1
,
nil
,
e
,
tp
,
lv
)
if
#
g
>
0
then
if
exshuffleck
then
Duel
.
ShuffleExtra
(
tp
)
end
...
...
script/c191981052.lua
View file @
d458e763
...
...
@@ -73,7 +73,7 @@ end
function
s
.
tgop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
tc
=
Duel
.
Select
Target
(
tp
,
s
.
tgtfilter
,
tp
,
0x40
,
0
,
1
,
1
,
nil
):
GetFirst
()
local
tc
=
Duel
.
Select
MatchingCard
(
tp
,
s
.
tgtfilter
,
tp
,
0x40
,
0
,
1
,
1
,
nil
):
GetFirst
()
if
tc
and
Duel
.
SendtoGrave
(
tc
,
REASON_EFFECT
)
and
tc
:
IsLocation
(
0x10
)
then
Duel
.
BreakEffect
()
if
Duel
.
IsExistingMatchingCard
(
s
.
optfilter
,
tp
,
0x20
,
0
,
1
,
nil
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
m
,
0
))
then
...
...
script/c191981054.lua
View file @
d458e763
...
...
@@ -21,7 +21,7 @@ function s.initial_effect(c)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetCode
(
EVENT_REMOVE
)
e2
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e2
:
SetCountLimit
(
1
,
id
+
100
)
e2
:
SetCountLimit
(
1
,
id
+
id
)
e2
:
SetTarget
(
s
.
tgtg
)
e2
:
SetOperation
(
s
.
tgop
)
c
:
RegisterEffect
(
e2
)
...
...
@@ -43,12 +43,11 @@ end
function
s
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
c
:
IsRelateToChain
()
and
Duel
.
SpecialSummonStep
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
then
if
c
:
IsRelateToChain
()
and
Duel
.
SpecialSummonStep
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
id
,
0
))
then
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
m
,
0
))
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CLIENT_HINT
)
e1
:
Set
Code
(
EFFECT
_TUNER
)
e1
:
SetCode
(
EFFECT_ADD_TYPE
)
e1
:
Set
Value
(
TYPE
_TUNER
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
)
c
:
RegisterEffect
(
e1
,
true
)
Duel
.
SpecialSummonComplete
()
...
...
script/c191981055.lua
View file @
d458e763
--疾行机人赛道
local
s
,
id
,
o
=
GetID
()
function
c191981055
.
initial_effect
(
c
)
function
s
.
initial_effect
(
c
)
--Activate
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_SEARCH
+
CATEGORY_TOHAND
)
e1
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e1
:
SetCode
(
EVENT_FREE_CHAIN
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetCountLimit
(
1
,
id
+
EFFECT_COUNT_CODE_OATH
)
e1
:
SetTarget
(
s
.
thtg
)
e1
:
SetOperation
(
s
.
thop
)
...
...
@@ -18,7 +17,6 @@ function c191981055.initial_effect(c)
e2
:
SetCategory
(
CATEGORY_CONTROL
)
e2
:
SetType
(
EFFECT_TYPE_ACTIVATE
)
e2
:
SetCode
(
EVENT_FREE_CHAIN
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetCountLimit
(
1
,
id
+
EFFECT_COUNT_CODE_OATH
)
e2
:
SetCost
(
s
.
cost
)
e2
:
SetTarget
(
s
.
thtg2
)
...
...
@@ -77,13 +75,10 @@ end
function
s
.
thop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
end
local
tc
=
g
:
GetFirst
()
if
tc
and
Duel
.
SendtoHand
(
tc
,
nil
,
REASON_EFFECT
)
~=
0
then
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
if
tc
:
IsLocation
(
LOCATION_HAND
)
and
Duel
.
IsExistingMatchingCard
(
s
.
thfilter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
then
if
Duel
.
IsExistingMatchingCard
(
s
.
thfilter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
then
Duel
.
BreakEffect
()
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
tg
=
Duel
.
SelectMatchingCard
(
tp
,
s
.
thfilter2
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
...
...
script/c191981056.lua
View file @
d458e763
...
...
@@ -9,7 +9,7 @@ function s.initial_effect(c)
c
:
RegisterEffect
(
e1
)
--
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
m
,
0
))
e3
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e3
:
SetCategory
(
CATEGORY_DESTROY
)
e3
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e3
:
SetCode
(
EVENT_CHAINING
)
...
...
@@ -22,13 +22,13 @@ function s.initial_effect(c)
c
:
RegisterEffect
(
e3
)
--
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetDescription
(
aux
.
Stringid
(
m
,
1
))
e4
:
SetDescription
(
aux
.
Stringid
(
id
,
1
))
e4
:
SetCategory
(
CATEGORY_DAMAGE
)
e4
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e4
:
SetCode
(
EVENT_FREE_CHAIN
)
e4
:
SetRange
(
0x08
)
e4
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e4
:
SetCountLimit
(
1
,
id
+
100
)
e4
:
SetCountLimit
(
1
,
id
+
id
)
e4
:
SetTarget
(
s
.
damtg
)
e4
:
SetOperation
(
s
.
damop
)
c
:
RegisterEffect
(
e4
)
...
...
@@ -71,7 +71,7 @@ function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
s
.
tgdfilter
,
tp
,
0x04
,
0
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TARGET
)
local
tc
=
Duel
.
SelectTarget
(
tp
,
s
.
tgdfilter
,
tp
,
0x04
,
0
,
1
,
1
,
nil
):
GetFirst
()
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
1
-
tp
,
id
ath
.
abs
(
tc
:
GetAttack
()
-
tc
:
GetBaseAttack
()))
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DAMAGE
,
nil
,
0
,
1
-
tp
,
m
ath.abs
(
tc
:
GetAttack
()
-
tc
:
GetBaseAttack
()))
end
function
s
.
damop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
script/c191981075.lua
View file @
d458e763
...
...
@@ -3,6 +3,7 @@ function s.initial_effect(c)
--synchro summon
aux
.
AddSynchroProcedure
(
c
,
aux
.
FilterBoolFunction
(
Card
.
IsLevelAbove
,
5
),
aux
.
NonTuner
(
nil
),
1
)
aux
.
AddSynchroProcedure
(
c
,
nil
,
aux
.
NonTuner
(
Card
.
IsLevelAbove
,
5
),
1
)
c
:
EnableReviveLimit
()
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
id
,
0
))
e1
:
SetCategory
(
CATEGORY_COUNTER
+
CATEGORY_SEARCH
+
CATEGORY_TOHAND
)
...
...
texts/balanced.txt
View file @
d458e763
...
...
@@ -11254,6 +11254,7 @@ SHUT UP!(172016014) 通常魔法 (Custom)
①:这张卡特殊召唤的场合才能发动。双方场上·墓地合计5张卡回到卡组。那之后,可以从卡组把1张记述有「暗黑融合」的卡或者1张「融合」魔法卡加入手卡。
②:这张卡是使用2只以上通常怪兽作为融合素材融合召唤的场合,被送去对方墓地的卡不去墓地而回到卡组最下面。
③:卡从对方场上离开的场合,给与对方那个数量×300的伤害。
提示文本:、、用2只通常怪兽作素材融合召唤
邪心英雄 掠食死翼(191981031) 风 3星 恶魔 1000 1000 (Custom)
系列:邪心英雄
...
...
@@ -11405,8 +11406,9 @@ SHUT UP!(172016014) 通常魔法 (Custom)
系列:疾行机人
风属性调整+调整以外的风属性怪兽1只以上
这个卡名的①②的效果1回合各能使用1次。
①:这张卡从场上送去墓地的场合才能发动。这张卡特殊召唤。
这个效果特殊召唤的这张卡作为同调素材的场合,可以当作调整使用
。
①:这张卡从场上送去墓地的场合才能发动。这张卡特殊召唤。
那之后,可以把这张卡变成调整
。
②:这张卡被除外的场合才能发动。从卡组把1张「疾行机人」陷阱卡在自己场上盖放。
提示文本:是否变成调整?
疾行机人赛道(191981055) 场地魔法 (Custom)
系列:疾行机人
...
...
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