Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro-THC-cards
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
1
Issues
1
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
HiiragiGuardians
ygopro-THC-cards
Commits
4687e6fd
Commit
4687e6fd
authored
Feb 05, 2022
by
tsubaki
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
1.999zfb更新
parent
435a6f6c
Pipeline
#9252
passed with stage
in 33 seconds
Changes
16
Pipelines
1
Show whitespace changes
Inline
Side-by-side
Showing
16 changed files
with
86 additions
and
92 deletions
+86
-92
expansions/AI.cdb
expansions/AI.cdb
+0
-0
expansions/strings.conf
expansions/strings.conf
+2
-0
expansions/thc.cdb
expansions/thc.cdb
+0
-0
script/c74560004.lua
script/c74560004.lua
+6
-18
script/c74560005.lua
script/c74560005.lua
+4
-3
script/c74560018.lua
script/c74560018.lua
+9
-1
script/c74562005.lua
script/c74562005.lua
+10
-8
script/c74562021.lua
script/c74562021.lua
+2
-1
script/c74563007.lua
script/c74563007.lua
+1
-1
script/c74563008.lua
script/c74563008.lua
+40
-13
script/c74563022.lua
script/c74563022.lua
+1
-7
script/c74563024.lua
script/c74563024.lua
+1
-1
script/c74563031.lua
script/c74563031.lua
+6
-35
script/c7770075.lua
script/c7770075.lua
+1
-1
script/c86379658.lua
script/c86379658.lua
+1
-1
script/c86379867.lua
script/c86379867.lua
+2
-2
No files found.
expansions/AI.cdb
View file @
4687e6fd
No preview for this file type
expansions/strings.conf
View file @
4687e6fd
...
...
@@ -17,6 +17,7 @@
!
counter
0
x28d
命莲指示物
!
counter
0
x208
阳光指示物
!
counter
0
x254c
虚幻指示物
!
counter
0
x500d
结晶指示物
!
counter
0
x373
粲辉指示物
!
counter
0
x1700
灵力指示物
...
...
@@ -123,6 +124,7 @@
!
setname
0
x240
青娥
!
setname
0
x242
宫古芳香
!
setname
0
x246
仙符
!
setname
0
x249
天理法则
!
setname
0
x250
原神
!
setname
0
x251
星莲
!
setname
0
x251a
一轮
...
...
expansions/thc.cdb
View file @
4687e6fd
No preview for this file type
script/c74560004.lua
View file @
4687e6fd
...
...
@@ -45,26 +45,14 @@ function cCardno.filter2(c,e,tp)
return
c
:
IsAbleToHand
()
and
c
:
IsSetCard
(
0x456
)
and
(
c
:
IsType
(
TYPE_SPELL
)
or
c
:
IsType
(
TYPE_TRAP
))
end
function
cCardno
.
op
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
Duel
.
GetFieldGroupCount
(
tp
,
0
,
LOCATION_HAND
)
<=
0
then
return
end
local
g
=
Duel
.
GetFieldGroup
(
tp
,
0
,
LOCATION_HAND
):
RandomSelect
(
tp
,
1
)
Duel
.
ConfirmCards
(
tp
,
g
)
--该 效 果 删 除
if
false
then
local
g
=
Duel
.
GetDecktopGroup
(
1
-
tp
,
1
)
local
tc
if
g
:
GetCount
()
>
0
then
tc
=
g
:
GetFirst
()
Duel
.
ConfirmDecktop
(
1
-
tp
,
1
)
Duel
.
Remove
(
g
,
POS_FACEDOWN
,
REASON_EFFECT
)
g
:
KeepAlive
()
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
e1
:
SetProperty
(
EFFECT_FLAG_SET_AVAILABLE
)
e1
:
SetCode
(
EVENT_PHASE
+
PHASE_END
)
e1
:
SetCountLimit
(
1
)
e1
:
SetLabelObject
(
g
)
e1
:
SetReset
(
RESET_EVENT
+
RESETS_STANDARD
+
RESET_PHASE
+
PHASE_END
)
e1
:
SetOperation
(
cCardno
.
retop
)
Duel
.
RegisterEffect
(
e1
,
tp
)
end
Duel
.
BreakEffect
()
local
tc
=
g
:
GetFirst
()
if
tc
:
IsType
(
TYPE_MONSTER
)
and
Duel
.
IsExistingMatchingCard
(
cCardno
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
then
local
ssg
=
Duel
.
SelectMatchingCard
(
tp
,
cCardno
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SendtoHand
(
ssg
,
tp
,
REASON_EFFECT
)
...
...
script/c74560005.lua
View file @
4687e6fd
...
...
@@ -61,12 +61,13 @@ function cCardno.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_REMOVED
)
and
chkc
:
IsControler
(
tp
)
and
cCardno
.
filter
(
chkc
)
end
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
cCardno
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TODECK
)
Duel
.
SelectTarget
(
tp
,
cCardno
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
1
,
nil
)
Duel
.
SelectTarget
(
tp
,
cCardno
.
filter
,
tp
,
LOCATION_GRAVE
+
LOCATION_REMOVED
,
0
,
1
,
3
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
nil
,
1
,
0
,
0
)
end
function
cCardno
.
drop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
then
local
g
=
Duel
.
GetChainInfo
(
0
,
CHAININFO_TARGET_CARDS
)
local
tg
=
g
:
Filter
(
Card
.
IsRelateToEffect
,
nil
,
e
)
if
tg
:
GetCount
()
>
0
then
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
Duel
.
SendtoDeck
(
tc
,
nil
,
2
,
REASON_EFFECT
)
end
...
...
script/c74560018.lua
View file @
4687e6fd
...
...
@@ -30,7 +30,15 @@ function cCardno.watop(e,tp,eg,ep,ev,re,r,rp)
if
t
==
1
then
t
=
1
-
tp
else
t
=
tp
end
local
g
=
Duel
.
GetDecktopGroup
(
t
,
5
)
Duel
.
ConfirmCards
(
tp
,
g
)
if
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
Cardno
,
4
))
then
Duel
.
ShuffleDeck
(
t
)
end
if
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
Cardno
,
4
))
then
Duel
.
ShuffleDeck
(
t
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
Card
.
IsSetCard
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
,
0x456
)
local
tc
=
g
:
GetFirst
()
if
tc
then
Duel
.
MoveSequence
(
tc
,
0
)
Duel
.
ConfirmDecktop
(
tp
,
1
)
end
end
end
--search
function
cCardno
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
script/c74562005.lua
View file @
4687e6fd
...
...
@@ -21,11 +21,11 @@ function cCardno.initial_effect(c)
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
Cardno
,
1
))
e3
:
SetCategory
(
CATEGORY_TODECK
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_
TRIGGER_O
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_
CONTINUOUS
)
e3
:
SetCode
(
EVENT_TO_GRAVE
)
e3
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
)
e3
:
SetCost
(
cCardno
.
cost
)
e3
:
SetTarget
(
cCardno
.
tdtg
)
e3
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
)
--
e3:SetCost(cCardno.cost)
--
e3:SetTarget(cCardno.tdtg)
e3
:
SetOperation
(
cCardno
.
tdop
)
c
:
RegisterEffect
(
e3
)
end
...
...
@@ -38,11 +38,13 @@ function cCardno.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TODECK
,
nil
,
0
,
tp
,
LOCATION_GRAVE
)
end
function
cCardno
.
tdop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
IsExistingMatchingCard
(
cCardno
.
tdfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
)
and
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
Cardno
,
1
))
then
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TODECK
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
cCardno
.
tdfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
2
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoDeck
(
g
,
nil
,
2
,
REASON_EFFECT
)
end
end
end
--search
function
cCardno
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
...
...
script/c74562021.lua
View file @
4687e6fd
...
...
@@ -61,7 +61,7 @@ function cCardno.ckop(e,tp,eg,ep,ev,re,r,rp)
local
c
=
e
:
GetHandler
()
c
:
ResetFlagEffect
(
Cardno
)
local
nowg
=
c
:
GetOverlayGroup
()
c
:
RegisterFlagEffect
(
Cardno
,
0
,
0
,
0
,
nowg
:
GetCount
(
))
c
:
RegisterFlagEffect
(
Cardno
,
0
,
0
,
0
,
nowg
:
FilterCount
(
Card
.
IsSetCard
,
nil
,
0x298
))
end
--SpecialSummon
function
cCardno
.
spfilter2
(
c
,
e
,
tp
)
...
...
@@ -113,6 +113,7 @@ function cCardno.sscon(e,tp,eg,ep,ev,re,r,rp)
return
e
:
GetHandler
():
GetSummonType
()
==
SUMMON_TYPE_XYZ
end
function
cCardno
.
sstg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
Duel
.
Hint
(
21
,
0
,
aux
.
Stringid
(
Cardno
,
6
))
if
chk
==
0
then
return
Duel
.
GetFieldGroupCount
(
tp
,
0
,
LOCATION_SZONE
)
>
0
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
Duel
.
GetFieldGroup
(
tp
,
0
,
LOCATION_SZONE
),
Duel
.
GetFieldGroupCount
(
tp
,
0
,
LOCATION_SZONE
),
1
-
tp
,
LOCATION_SZONE
)
end
...
...
script/c74563007.lua
View file @
4687e6fd
...
...
@@ -49,7 +49,7 @@ function c74563007.filter(c)
end
function
c74563007
.
damtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c74563007
.
filter
,
tp
,
LOCATION_DECK
+
LOCATION_REMOVED
+
LOCATION_GRAVE
,
0
,
1
,
nil
)
end
and
Duel
.
IsExistingMatchingCard
(
c74563007
.
filter
,
tp
,
LOCATION_DECK
+
LOCATION_REMOVED
+
LOCATION_GRAVE
,
0
,
1
,
nil
)
and
Duel
.
GetTurnPlayer
()
==
tp
end
end
function
c74563007
.
damop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
<=
0
then
return
end
...
...
script/c74563008.lua
View file @
4687e6fd
...
...
@@ -26,20 +26,37 @@ function c74563008.initial_effect(c)
c
:
RegisterEffect
(
e4
)
end
function
c74563008
.
filter0
(
c
)
return
c
:
IsCanBeFusionMaterial
()
return
c
:
IsCanBeFusionMaterial
()
and
c
:
IsType
(
TYPE_MONSTER
)
end
function
c74563008
.
filter1
(
c
,
e
)
return
c
:
IsCanBeFusionMaterial
()
and
not
c
:
IsImmuneToEffect
(
e
)
return
c
:
IsCanBeFusionMaterial
()
and
c
:
IsType
(
TYPE_MONSTER
)
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
c74563008
.
filter2
(
c
,
e
,
tp
,
m
,
f
,
chkf
)
return
(
not
f
or
f
(
c
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_FUSION
,
tp
,
false
,
false
)
and
c
:
CheckFusionMaterial
(
m
,
nil
,
chkf
)
end
function
c74563008
.
spfilter1
(
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
c74563008
.
mfilter0
(
c
,
e
)
return
c
:
IsType
(
TYPE_SPELL
+
TYPE_MONSTER
)
and
c
:
IsCanBeFusionMaterial
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
c74563008
.
mfilter2
(
c
,
e
)
return
c
:
IsType
(
TYPE_SPELL
+
TYPE_MONSTER
)
and
c
:
IsCanBeFusionMaterial
()
and
not
c
:
IsImmuneToEffect
(
e
)
end
function
c74563008
.
spfilter2
(
c
,
e
,
tp
,
m
,
f
,
chkf
)
return
c
:
IsType
(
TYPE_FUSION
)
and
c
:
IsSetCard
(
0x372
)
and
(
not
f
or
f
(
c
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_FUSION
,
tp
,
false
,
false
)
and
c
:
CheckFusionMaterial
(
m
,
nil
,
chkf
)
end
function
c74563008
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
local
chkf
=
tp
local
mg1
=
Duel
.
GetMatchingGroup
(
c74563008
.
filter0
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
nil
)
local
res
=
Duel
.
IsExistingMatchingCard
(
c74563008
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
mg1
,
nil
,
chkf
)
local
res
=
Duel
.
IsExistingMatchingCard
(
c74563008
.
spfilter1
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
mg1
,
nil
,
chkf
)
if
res
then
return
true
end
local
mg2
=
Duel
.
GetMatchingGroup
(
c74563008
.
mfilter0
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
nil
,
e
)
mg2
:
Merge
(
mg1
)
res
=
Duel
.
IsExistingMatchingCard
(
c74563008
.
spfilter2
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
mg2
,
nil
,
chkf
)
if
not
res
then
local
ce
=
Duel
.
GetChainMaterial
(
tp
)
if
ce
~=
nil
then
...
...
@@ -57,31 +74,41 @@ function c74563008.activate(e,tp,eg,ep,ev,re,r,rp)
local
chkf
=
tp
local
mg1
=
Duel
.
GetMatchingGroup
(
c74563008
.
filter1
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
nil
,
e
)
local
sg1
=
Duel
.
GetMatchingGroup
(
c74563008
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg1
,
nil
,
chkf
)
local
mg2
=
Duel
.
GetMatchingGroup
(
c74563008
.
mfilter2
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
nil
,
e
)
mg2
:
Merge
(
mg1
)
local
sg2
=
Duel
.
GetMatchingGroup
(
c74563008
.
spfilter2
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg2
,
nil
,
chkf
)
sg1
:
Merge
(
sg2
)
local
mg3
=
nil
local
sg
2
=
nil
local
sg
3
=
nil
local
ce
=
Duel
.
GetChainMaterial
(
tp
)
if
ce
~=
nil
then
local
fgroup
=
ce
:
GetTarget
()
mg3
=
fgroup
(
ce
,
e
,
tp
)
local
mf
=
ce
:
GetValue
()
sg
2
=
Duel
.
GetMatchingGroup
(
c74563008
.
filter2
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg3
,
mf
,
chkf
)
sg
3
=
Duel
.
GetMatchingGroup
(
c74563008
.
spfilter1
,
tp
,
LOCATION_EXTRA
,
0
,
nil
,
e
,
tp
,
mg3
,
mf
,
chkf
)
end
if
sg1
:
GetCount
()
>
0
or
(
sg
2
~=
nil
and
sg2
:
GetCount
()
>
0
)
then
if
sg1
:
GetCount
()
>
0
or
(
sg
3
~=
nil
and
sg3
:
GetCount
()
>
0
)
then
local
sg
=
sg1
:
Clone
()
if
sg
2
then
sg
:
Merge
(
sg2
)
end
if
sg
3
then
sg
:
Merge
(
sg3
)
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
)
if
sg1
:
IsContains
(
tc
)
and
(
sg3
==
nil
or
not
sg3
:
IsContains
(
tc
)
or
not
Duel
.
SelectYesNo
(
tp
,
ce
:
GetDescription
()))
then
if
tc
:
IsSetCard
(
0x372
)
then
local
mat1
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg2
,
nil
,
chkf
)
tc
:
SetMaterial
(
mat1
)
Duel
.
SendtoGrave
(
mat1
,
REASON_EFFECT
+
REASON_MATERIAL
+
REASON_FUSION
)
else
local
mat2
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg1
,
nil
,
chkf
)
tc
:
SetMaterial
(
mat2
)
Duel
.
SendtoGrave
(
mat2
,
REASON_EFFECT
+
REASON_MATERIAL
+
REASON_FUSION
)
end
Duel
.
BreakEffect
()
Duel
.
SpecialSummon
(
tc
,
SUMMON_TYPE_FUSION
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
else
local
mat
2
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg3
,
nil
,
chkf
)
local
mat
=
Duel
.
SelectFusionMaterial
(
tp
,
tc
,
mg3
,
nil
,
chkf
)
local
fop
=
ce
:
GetOperation
()
fop
(
ce
,
e
,
tp
,
tc
,
mat
2
)
fop
(
ce
,
e
,
tp
,
tc
,
mat
)
end
tc
:
CompleteProcedure
()
end
...
...
script/c74563022.lua
View file @
4687e6fd
...
...
@@ -8,12 +8,6 @@ function c74563022.initial_effect(c)
e1
:
SetTarget
(
c74563022
.
target
)
e1
:
SetOperation
(
c74563022
.
activate
)
c
:
RegisterEffect
(
e1
)
local
e12
=
e1
:
Clone
()
e12
:
SetType
(
EFFECT_TYPE_IGNITION
)
e12
:
SetRange
(
LOCATION_GRAVE
)
e12
:
SetCondition
(
aux
.
exccon
)
e12
:
SetCost
(
aux
.
bfgcost
)
c
:
RegisterEffect
(
e12
)
end
c74563022
.
DescSetName
=
0x258
function
c74563022
.
filter1
(
c
,
e
)
...
...
script/c74563024.lua
View file @
4687e6fd
...
...
@@ -22,6 +22,7 @@ function c74563024.initial_effect(c)
e3
:
SetType
(
EFFECT_TYPE_QUICK_O
)
e3
:
SetCode
(
EVENT_FREE_CHAIN
)
e3
:
SetRange
(
LOCATION_REMOVED
)
e3
:
SetCountLimit
(
1
,
74563024
)
e3
:
SetCost
(
c74563024
.
limcost
)
e3
:
SetTarget
(
c74563024
.
tktg
)
e3
:
SetOperation
(
c74563024
.
tkop
)
...
...
@@ -143,7 +144,6 @@ function c74563024.SetMaterial(c,g)
g
:
Sub
(
rg1
)
Duel
.
Remove
(
rg1
,
POS_FACEUP
,
REASON_FUSION
+
REASON_MATERIAL
+
REASON_EFFECT
)
end
Duel
.
SendtoGrave
(
g
,
REASON_FUSION
+
REASON_MATERIAL
+
REASON_EFFECT
)
end
function
c74563024
.
rfilter
(
c
,
l
)
return
c
:
IsLocation
(
LOCATION_GRAVE
)
and
c
:
IsCode
(
74563024
)
...
...
script/c74563031.lua
View file @
4687e6fd
...
...
@@ -22,32 +22,11 @@ function c74563031.initial_effect(c)
e12
:
SetCode
(
EFFECT_INDESTRUCTABLE_BATTLE
)
e12
:
SetValue
(
1
)
c
:
RegisterEffect
(
e12
)
--avoid damage
local
e4
=
Effect
.
CreateEffect
(
c
)
e4
:
SetType
(
EFFECT_TYPE_FIELD
)
e4
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
e4
:
SetCode
(
EFFECT_CHANGE_DAMAGE
)
e4
:
SetRange
(
LOCATION_MZONE
)
e4
:
SetTargetRange
(
1
,
0
)
e4
:
SetValue
(
c74563031
.
damval
)
c
:
RegisterEffect
(
e4
)
local
e5
=
e4
:
Clone
()
e5
:
SetCode
(
EFFECT_NO_EFFECT_DAMAGE
)
c
:
RegisterEffect
(
e5
)
--half atk
local
e41
=
Effect
.
CreateEffect
(
c
)
e41
:
SetType
(
EFFECT_TYPE_FIELD
)
e41
:
SetCode
(
EFFECT_SET_ATTACK_FINAL
)
e41
:
SetRange
(
LOCATION_MZONE
)
e41
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e41
:
SetTargetRange
(
LOCATION_MZONE
,
LOCATION_MZONE
)
e41
:
SetTarget
(
c74563031
.
atktg
)
e41
:
SetValue
(
c74563031
.
atkval
)
c
:
RegisterEffect
(
e41
)
local
e51
=
e4
:
Clone
()
e51
:
SetCode
(
EFFECT_SET_DEFENSE_FINAL
)
e51
:
SetValue
(
c74563031
.
defval
)
c
:
RegisterEffect
(
e51
)
--atklimit
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetCode
(
EFFECT_CANNOT_ATTACK
)
c
:
RegisterEffect
(
e2
)
end
function
c74563031
.
efilter
(
e
,
te
)
return
te
:
GetOwner
()
~=
e
:
GetOwner
()
...
...
@@ -56,12 +35,4 @@ function c74563031.damval(e,re,val,r,rp,rc)
if
bit
.
band
(
r
,
REASON_EFFECT
)
~=
0
then
return
0
end
return
val
end
function
c74563031
.
atktg
(
e
,
c
)
return
c
~=
e
:
GetHandler
()
end
function
c74563031
.
atkval
(
e
,
c
)
return
math.ceil
(
c
:
GetAttack
()
/
2
)
end
function
c74563031
.
defval
(
e
,
c
)
return
math.ceil
(
c
:
GetDefense
()
/
2
)
end
\ No newline at end of file
script/c7770075.lua
View file @
4687e6fd
...
...
@@ -27,7 +27,7 @@ function l.initial_effect(c)
end
function
l
.
conditionfilter
(
c
,
tp
)
return
c
:
GetSummonPlayer
()
==
1
-
tp
and
c
:
IsPreviousLocation
(
LOCATION_HAND
)
and
not
(
c
:
IsSetCard
(
0x815
)
or
c
:
IsSetCard
(
0x814
))
return
c
:
GetSummonPlayer
()
==
1
-
tp
and
c
:
IsPreviousLocation
(
LOCATION_HAND
)
end
function
l
.
target2filter
(
c
)
...
...
script/c86379658.lua
View file @
4687e6fd
...
...
@@ -204,7 +204,7 @@ function c86379658.rmtop1(e,tp,eg,ep,ev,re,r,rp)
end
elseif
rc
:
IsType
(
TYPE_PENDULUM
)
and
rc
:
IsPreviousLocation
(
LOCATION_PZONE
)
then
local
pos
=
rc
:
GetPreviousPosition
()
if
Duel
.
GetFieldCard
(
tp
,
LOCATION_PZONE
,
0
)
and
Duel
.
GetFieldCard
(
t
p
,
LOCATION_PZONE
,
1
)
then
if
Duel
.
GetFieldCard
(
cp
,
LOCATION_PZONE
,
0
)
and
Duel
.
GetFieldCard
(
c
p
,
LOCATION_PZONE
,
1
)
then
Duel
.
SendtoGrave
(
rc
,
REASON_RULE
)
else
Duel
.
MoveToField
(
rc
,
cp
,
cp
,
LOCATION_PZONE
,
pos
,
true
)
...
...
script/c86379867.lua
View file @
4687e6fd
...
...
@@ -36,7 +36,7 @@ function c86379867.spfilter(c,e,tp)
else
hasRoom
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
end
return
c
:
IsSetCard
(
0x190
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
tru
e
,
false
)
and
hasRoom
and
c
:
IsType
(
TYPE_MONSTER
)
return
c
:
IsSetCard
(
0x190
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
fals
e
,
false
)
and
hasRoom
and
c
:
IsType
(
TYPE_MONSTER
)
end
function
c86379867
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c86379867
.
spfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
+
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
)
end
...
...
@@ -54,7 +54,7 @@ function c86379867.operation(e,tp,eg,ep,ev,re,r,rp)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c86379867
.
spfilter
,
tp
,
LOCATION_DECK
+
LOCATION_GRAVE
+
LOCATION_EXTRA
,
0
,
1
,
1
,
nil
,
e
,
tp
)
local
tc
=
g
:
GetFirst
()
if
tc
and
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
tru
e
,
false
,
POS_FACEUP
)
>
0
then
if
tc
and
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
fals
e
,
false
,
POS_FACEUP
)
>
0
then
Duel
.
SendtoGrave
(
tc
,
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