Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro
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
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
MyCard
ygopro
Commits
802252a4
Commit
802252a4
authored
Apr 27, 2014
by
VanillaSalt
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
9eff40c3
Changes
12
Hide whitespace changes
Inline
Side-by-side
Showing
12 changed files
with
96 additions
and
99 deletions
+96
-99
script/c11747708.lua
script/c11747708.lua
+1
-1
script/c1784686.lua
script/c1784686.lua
+19
-19
script/c19667590.lua
script/c19667590.lua
+1
-1
script/c35629124.lua
script/c35629124.lua
+9
-1
script/c43892408.lua
script/c43892408.lua
+4
-11
script/c45286019.lua
script/c45286019.lua
+1
-1
script/c68812773.lua
script/c68812773.lua
+27
-21
script/c72502414.lua
script/c72502414.lua
+0
-1
script/c75380687.lua
script/c75380687.lua
+9
-14
script/c80831721.lua
script/c80831721.lua
+1
-1
script/c86039057.lua
script/c86039057.lua
+1
-1
script/c89397517.lua
script/c89397517.lua
+23
-27
No files found.
script/c11747708.lua
View file @
802252a4
...
...
@@ -25,7 +25,7 @@ end
function
c11747708
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
c
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
()
,
1
,
0
,
0
)
end
function
c11747708
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
...
...
script/c1784686.lua
View file @
802252a4
...
...
@@ -11,30 +11,30 @@ function c1784686.initial_effect(c)
e1
:
SetOperation
(
c1784686
.
activate
)
c
:
RegisterEffect
(
e1
)
--add code
--
local e2=Effect.CreateEffect(c)
--
e2:SetType(EFFECT_TYPE_SINGLE)
--
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
--
e2:SetCode(EFFECT_ADD_CODE)
--e2:SetValue(88888888
)
--
c:RegisterEffect(e2)
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
)
e2
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e2
:
SetCode
(
EFFECT_ADD_CODE
)
e2
:
SetValue
(
10000050
)
c
:
RegisterEffect
(
e2
)
end
function
c1784686
.
tgfilter
(
c
,
e
,
tp
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0xa2
)
and
c
:
IsCanBeFusionMaterial
()
and
not
c
:
IsImmuneToEffect
(
e
)
and
Duel
.
IsExistingMatchingCard
(
c1784686
.
spfilter
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
c
:
GetCode
())
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0xa2
)
and
c
:
IsCanBeFusionMaterial
()
and
not
c
:
IsImmuneToEffect
(
e
)
and
Duel
.
IsExistingMatchingCard
(
c1784686
.
spfilter
,
tp
,
LOCATION_EXTRA
,
0
,
1
,
nil
,
e
,
tp
,
c
:
GetCode
())
end
function
c1784686
.
spfilter
(
c
,
e
,
tp
,
code
)
local
t
=
c
.
material
return
c
:
IsType
(
TYPE_FUSION
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_FUSION
,
tp
,
false
,
false
)
and
aux
.
Contains
(
t
,
code
)
if
not
c
.
material_count
or
not
c
:
IsCanBeSpecialSummoned
(
e
,
SUMMON_TYPE_FUSION
,
tp
,
false
,
false
)
then
return
false
end
for
i
=
1
,
c
.
material_count
do
if
code
==
c
.
material
[
i
]
then
return
true
end
end
return
false
end
function
c1784686
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
==
0
then
return
c1784686
.
tgfilter
(
chkc
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c1784686
.
tgfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
,
e
,
tp
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>-
1
end
if
chkc
==
0
then
return
chkc
:
IsLocation
(
LOCATION_MZONE
)
and
chkc
:
IsControler
(
tp
)
and
c1784686
.
tgfilter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>-
1
and
Duel
.
IsExistingTarget
(
c1784686
.
tgfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TARGET
)
Duel
.
SelectTarget
(
tp
,
c1784686
.
tgfilter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_EXTRA
)
end
...
...
@@ -53,4 +53,4 @@ function c1784686.activate(e,tp,eg,ep,ev,re,r,rp)
sc
:
CompleteProcedure
()
end
end
end
\ No newline at end of file
end
script/c19667590.lua
View file @
802252a4
...
...
@@ -33,7 +33,7 @@ function c19667590.spcon(e,tp,eg,ep,ev,re,r,rp)
return
eg
:
IsExists
(
c19667590
.
cfilter
,
1
,
nil
,
tp
)
end
function
c19667590
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
19667590
)
==
0
end
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_CANNOT_BP
)
...
...
script/c35629124.lua
View file @
802252a4
...
...
@@ -20,6 +20,11 @@ function c35629124.initial_effect(c)
ge1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
ge1
:
SetOperation
(
c35629124
.
checkop
)
Duel
.
RegisterEffect
(
ge1
,
0
)
local
ge2
=
Effect
.
CreateEffect
(
c
)
ge2
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_CONTINUOUS
)
ge2
:
SetCode
(
EVENT_PHASE_START
+
PHASE_BATTLE
)
ge2
:
SetOperation
(
c35629124
.
checkop2
)
Duel
.
RegisterEffect
(
ge2
,
0
)
end
end
function
c35629124
.
checkop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
...
...
@@ -35,11 +40,14 @@ function c35629124.checkop(e,tp,eg,ep,ev,re,r,rp)
if
p1
then
Duel
.
RegisterFlagEffect
(
0
,
35629124
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
if
p2
then
Duel
.
RegisterFlagEffect
(
1
,
35629124
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
end
function
c35629124
.
checkop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
RegisterFlagEffect
(
Duel
.
GetTurnPlayer
(),
35629124
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
c35629124
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
not
e
:
GetHandler
():
IsReason
(
REASON_RETURN
)
end
function
c35629124
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
not
(
Duel
.
GetTurnPlayer
()
==
tp
and
Duel
.
GetCurrentPhase
()
>
PHASE_MAIN1
and
Duel
.
GetCurrentPhase
()
<
PHASE_END
)
end
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
35629124
)
==
0
end
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetCode
(
EFFECT_CANNOT_BP
)
...
...
script/c43892408.lua
View file @
802252a4
...
...
@@ -2,7 +2,7 @@
function
c43892408
.
initial_effect
(
c
)
--fusion material
c
:
EnableReviveLimit
()
aux
.
AddFusionProcCodeFun
(
c
,
38033121
,
c43892408
.
fusfilter
,
1
,
false
,
false
)
aux
.
AddFusionProcCodeFun
(
c
,
38033121
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_DRAGON
)
,
1
,
false
,
false
)
--spsummon condition
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
...
...
@@ -24,19 +24,12 @@ function c43892408.initial_effect(c)
e2
:
SetOperation
(
c43892408
.
activate
)
c
:
RegisterEffect
(
e2
)
end
c43892408
.
material_count
=
1
c43892408
.
material
=
{
38033121
}
function
c43892408
.
splimit
(
e
,
se
,
sp
,
st
)
return
bit
.
band
(
st
,
SUMMON_TYPE_FUSION
)
==
SUMMON_TYPE_FUSION
or
e
:
GetHandler
():
IsCode
(
1784686
)
end
function
c43892408
.
fusfilter
(
c
)
return
c
:
IsRace
(
RACE_DRAGON
)
return
bit
.
band
(
st
,
SUMMON_TYPE_FUSION
)
==
SUMMON_TYPE_FUSION
or
se
:
GetHandler
():
IsCode
(
1784686
)
end
function
c43892408
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsAbleToGraveAsCost
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
)
end
local
g
=
Duel
.
GetFieldGroup
(
tp
,
LOCATION_HAND
,
0
)
local
sg
=
g
:
FilterSelect
(
tp
,
Card
.
IsAbleToGraveAsCost
,
1
,
1
,
nil
)
Duel
.
SendtoGrave
(
sg
,
REASON_COST
)
Duel
.
DiscardHand
(
tp
,
Card
.
IsAbleToGraveAsCost
,
1
,
1
,
REASON_COST
)
end
function
c43892408
.
filter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsDestructable
()
...
...
@@ -53,4 +46,4 @@ function c43892408.activate(e,tp,eg,ep,ev,re,r,rp)
if
tc
and
tc
:
IsRelateToEffect
(
e
)
and
tc
:
IsFaceup
()
then
Duel
.
Destroy
(
tc
,
REASON_EFFECT
)
end
end
\ No newline at end of file
end
script/c45286019.lua
View file @
802252a4
...
...
@@ -38,7 +38,7 @@ function c45286019.spcon(e,tp,eg,ep,ev,re,r,rp)
return
re
:
GetHandler
():
IsSetCard
(
0x72
)
end
function
c45286019
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
true
end
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
45286019
)
==
0
end
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
e1
:
SetType
(
EFFECT_TYPE_FIELD
)
e1
:
SetProperty
(
EFFECT_FLAG_PLAYER_TARGET
)
...
...
script/c68812773.lua
View file @
802252a4
...
...
@@ -19,16 +19,17 @@ function c68812773.initial_effect(c)
e3
:
SetType
(
EFFECT_TYPE_IGNITION
)
e3
:
SetRange
(
LOCATION_MZONE
)
e3
:
SetCountLimit
(
1
)
e3
:
SetCost
(
c68812773
.
spcost
1
)
e3
:
SetTarget
(
c68812773
.
sptg
1
)
e3
:
SetOperation
(
c68812773
.
spop
1
)
e3
:
SetCost
(
c68812773
.
spcost
)
e3
:
SetTarget
(
c68812773
.
sptg
2
)
e3
:
SetOperation
(
c68812773
.
spop
2
)
c
:
RegisterEffect
(
e3
)
end
function
c68812773
.
filter
(
c
,
e
,
tp
)
return
c
:
IsCode
(
71071546
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
return
c
:
IsCode
(
71071546
)
and
(
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
or
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEDOWN
))
end
function
c68812773
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
tp
)
and
c
71175527
.
filter
(
chkc
,
e
,
tp
)
end
if
chkc
then
return
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
chkc
:
IsControler
(
tp
)
and
c
68812773
.
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
c68812773
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
...
...
@@ -38,29 +39,34 @@ end
function
c68812773
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP_ATTACK
+
POS_FACEDOWN_DEFENCE
)
local
spos
=
0
if
tc
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
then
spos
=
spos
+
POS_FACEUP_ATTACK
end
if
tc
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
,
POS_FACEDOWN
)
then
spos
=
spos
+
POS_FACEDOWN_DEFENCE
end
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
spos
)
if
tc
:
IsFacedown
()
then
Duel
.
ConfirmCards
(
1
-
tp
,
tc
)
end
end
end
function
c68812773
.
costfilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsRace
(
RACE_MACHINE
)
end
function
c68812773
.
spfilter
(
c
,
e
,
tp
)
return
(
c
:
IsSetCard
(
0x7b
)
or
c
:
IsSetCard
(
0x55
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
return
(
c
:
IsSetCard
(
0x7b
)
or
c
:
IsSetCard
(
0x55
))
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c68812773
.
spcost1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
CheckReleaseGroup
(
tp
,
c68812773
.
costfilter
,
1
,
nil
)
end
local
ct1
=
Duel
.
GetMatchingGroupCount
(
c68812773
.
spfilter
,
tp
,
LOCATION_HAND
,
0
,
nil
,
e
,
tp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMST_RELEASE
)
local
rg
=
Duel
.
SelectReleaseGroupEx
(
tp
,
c68812773
.
costfilter
,
1
,
ct1
,
nil
)
e
:
SetLabel
(
rg
:
GetCount
())
Duel
.
Release
(
rg
,
REASON_COST
)
function
c68812773
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
CheckReleaseGroup
(
tp
,
Card
.
IsRace
,
1
,
nil
,
RACE_MACHINE
)
end
local
ct
=
Duel
.
GetMatchingGroupCount
(
c68812773
.
spfilter
,
tp
,
LOCATION_HAND
,
0
,
nil
,
e
,
tp
)
local
rg
=
Duel
.
SelectReleaseGroup
(
tp
,
Card
.
IsRace
,
1
,
ct
,
nil
,
RACE_MACHINE
)
ct
=
Duel
.
Release
(
rg
,
REASON_COST
)
e
:
SetLabel
(
ct
)
end
function
c68812773
.
sptg1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c68812773
.
spfilter
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
,
e
,
tp
)
end
function
c68812773
.
sptg2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>-
1
and
Duel
.
IsExistingMatchingCard
(
c68812773
.
spfilter
,
tp
,
LOCATION_HAND
,
0
,
1
,
nil
,
e
,
tp
)
end
local
ct
=
e
:
GetLabel
()
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
ct
,
0
,
0
)
end
function
c68812773
.
spop1
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c68812773
.
spop2
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
if
ft
<=
0
then
return
end
local
ct
=
e
:
GetLabel
()
local
ct1
=
Duel
.
GetMatchingGroupCount
(
c68812773
.
spfilter
,
tp
,
LOCATION_HAND
,
0
,
nil
,
e
,
tp
)
if
ct1
<
ct
then
ct
=
ct1
end
...
...
@@ -69,4 +75,4 @@ function c68812773.spop1(e,tp,eg,ep,ev,re,r,rp)
if
dg
:
GetCount
()
>
0
then
Duel
.
SpecialSummon
(
dg
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
\ No newline at end of file
end
script/c72502414.lua
View file @
802252a4
...
...
@@ -8,7 +8,6 @@ function c72502414.initial_effect(c)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetRange
(
LOCATION_GRAVE
)
e1
:
SetCountLimit
(
1
,
72502414
+
EFFECT_COUNT_CODE_DUEL
)
e1
:
SetCost
(
c72502414
.
cost
)
e1
:
SetTarget
(
c72502414
.
target
)
e1
:
SetOperation
(
c72502414
.
operation
)
c
:
RegisterEffect
(
e1
)
...
...
script/c75380687.lua
View file @
802252a4
...
...
@@ -2,7 +2,7 @@
function
c75380687
.
initial_effect
(
c
)
--fusion material
c
:
EnableReviveLimit
()
aux
.
AddFusionProcCodeFun
(
c
,
46986414
,
c75380687
.
fusfilter
,
1
,
false
,
false
)
aux
.
AddFusionProcCodeFun
(
c
,
46986414
,
aux
.
FilterBoolFunction
(
Card
.
IsRace
,
RACE_DRAGON
)
,
1
,
false
,
false
)
--spsummon condition
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
...
...
@@ -12,18 +12,18 @@ function c75380687.initial_effect(c)
c
:
RegisterEffect
(
e1
)
--remove
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
7
3891874
,
0
))
e2
:
SetDescription
(
aux
.
Stringid
(
7
5380687
,
0
))
e2
:
SetCategory
(
CATEGORY_ATKCHANGE
+
CATEGORY_REMOVE
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_F
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e2
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e2
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e2
:
SetTarget
(
c75380687
.
target
)
e2
:
SetOperation
(
c75380687
.
operation
)
c
:
RegisterEffect
(
e2
)
c
:
RegisterEffect
(
e2
)
--summon
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetDescription
(
aux
.
Stringid
(
7
3891874
,
0
))
e3
:
SetCategory
(
CATEGORY_SPSUMMON
)
e3
:
SetDescription
(
aux
.
Stringid
(
7
5380687
,
1
))
e3
:
SetCategory
(
CATEGORY_SP
ECIAL_
SUMMON
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e3
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
+
EFFECT_FLAG_DELAY
)
e3
:
SetCode
(
EVENT_DESTROYED
)
...
...
@@ -31,13 +31,8 @@ function c75380687.initial_effect(c)
e3
:
SetOperation
(
c75380687
.
spop
)
c
:
RegisterEffect
(
e3
)
end
c75380687
.
material_count
=
1
c75380687
.
material
=
{
46986414
}
function
c75380687
.
splimit
(
e
,
se
,
sp
,
st
)
return
bit
.
band
(
st
,
SUMMON_TYPE_FUSION
)
==
SUMMON_TYPE_FUSION
or
e
:
GetHandler
():
IsCode
(
1784686
)
end
function
c75380687
.
fusfilter
(
c
)
return
c
:
IsRace
(
RACE_DRAGON
)
return
bit
.
band
(
st
,
SUMMON_TYPE_FUSION
)
==
SUMMON_TYPE_FUSION
or
se
:
GetHandler
():
IsCode
(
1784686
)
end
function
c75380687
.
filter
(
c
)
return
c
:
IsType
(
TYPE_SPELL
)
and
c
:
IsAbleToRemove
()
...
...
@@ -66,7 +61,7 @@ function c75380687.spfilter(c,e,tp)
return
c
:
IsRace
(
RACE_SPELLCASTER
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c75380687
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chkc
then
return
chkc
:
GetControler
()
==
tp
and
chkc
:
GetLocation
()
==
LOCATION_GRAVE
and
c75380687
.
filter
(
chkc
,
e
,
tp
)
end
if
chkc
then
return
chkc
:
IsControler
(
tp
)
and
chkc
:
IsLocation
(
LOCATION_GRAVE
)
and
c75380687
.
sp
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingTarget
(
c75380687
.
spfilter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
...
...
@@ -78,4 +73,4 @@ function c75380687.spop(e,tp,eg,ep,ev,re,r,rp)
if
tc
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
\ No newline at end of file
end
script/c80831721.lua
View file @
802252a4
...
...
@@ -30,7 +30,7 @@ function c80831721.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel
.
PayLPCost
(
tp
,
math.floor
(
Duel
.
GetLP
(
tp
)
/
2
))
end
function
c80831721
.
filter
(
c
)
return
c
:
IsSetCard
(
0x46
)
and
c
:
IsAbleToHand
()
return
c
:
IsSetCard
(
0x46
)
and
c
:
Is
Type
(
TYPE_SPELL
)
and
c
:
Is
AbleToHand
()
end
function
c80831721
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c80831721
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
...
...
script/c86039057.lua
View file @
802252a4
...
...
@@ -20,7 +20,7 @@ end
function
c86039057
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
c
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
()
,
1
,
0
,
0
)
end
function
c86039057
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
...
...
script/c89397517.lua
View file @
802252a4
...
...
@@ -13,54 +13,50 @@ function c89397517.initial_effect(c)
end
function
c89397517
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
CheckLPCost
(
tp
,
2000
)
and
Duel
.
CheckReleaseGroup
(
tp
,
Card
.
IsRace
,
1
,
nil
,
RACE_WARRIOR
)
end
Duel
.
PayLPCost
(
tp
,
2000
)
Duel
.
PayLPCost
(
tp
,
2000
)
local
sg
=
Duel
.
SelectReleaseGroup
(
tp
,
Card
.
IsRace
,
1
,
1
,
nil
,
RACE_WARRIOR
)
Duel
.
Release
(
sg
,
REASON_COST
)
end
function
c89397517
.
rmfilter
(
c
)
return
c
:
Is
Type
(
TYPE_SPELL
)
and
c
:
IsAbleToRemove
()
and
c
:
IsSetCard
(
0xa1
)
return
c
:
Is
SetCard
(
0xa1
)
and
c
:
IsType
(
TYPE_SPELL
)
and
c
:
IsAbleToRemove
()
end
function
c89397517
.
spfilter
(
c
,
e
,
tp
)
return
c
:
Is
Type
(
TYPE_MONSTER
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
true
,
false
)
and
c
:
IsSetCard
(
0xa0
)
return
c
:
Is
SetCard
(
0xa0
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
true
,
false
)
end
function
c89397517
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
,
chkc
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
function
c89397517
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
Duel
.
IsExistingMatchingCard
(
c89397517
.
rmfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
1
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
c89397517
.
spfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
end
local
g
=
Duel
.
GetMatchingGroup
(
c89397517
.
rmfilter
,
tp
,
0
,
LOCATION_HAND
+
LOCATION_GRAVE
,
nil
)
and
Duel
.
IsExistingMatchingCard
(
c89397517
.
spfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_DECK
,
0
,
1
,
nil
,
e
,
tp
)
end
local
g
=
Duel
.
GetMatchingGroup
(
c89397517
.
rmfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_REMOVE
,
g
,
1
,
0
,
0
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
nil
,
1
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_DECK
)
end
function
c89397517
.
activate
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
ft
=
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
if
ft
<=
0
then
return
end
local
rmg
=
Duel
.
GetMatchingGroup
(
c89397517
.
rmfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
,
0
,
nil
)
local
rmct
=
rmg
:
GetClassCount
(
Card
.
GetCode
)
local
rmct
=
rmg
:
GetClassCount
(
Card
.
GetCode
)
local
spg
=
Duel
.
GetMatchingGroup
(
c89397517
.
spfilter
,
tp
,
LOCATION_HAND
+
LOCATION_GRAVE
+
LOCATION_DECK
,
0
,
nil
,
e
,
tp
)
local
spct
=
spg
:
GetClassCount
(
Card
.
GetCode
)
if
spct
>
3
then
spct
=
3
end
if
spct
<
rmct
then
rmct
=
spct
end
if
rmct
==
0
then
return
end
local
ct
=
math.min
(
3
,
ft
,
spct
,
rmct
)
if
ct
==
0
then
return
end
local
g
=
Group
.
CreateGroup
()
local
tc
repeat
repeat
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_REMOVE
)
tc
=
rmg
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
local
tc
=
rmg
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
rmg
:
Remove
(
Card
.
IsCode
,
nil
,
tc
:
GetCode
())
g
:
AddCard
(
tc
)
rmct
=
rm
ct
-
1
until
rm
ct
<
1
or
not
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
89397517
,
1
))
ct
=
ct
-
1
until
ct
<
1
or
not
Duel
.
SelectYesNo
(
tp
,
aux
.
Stringid
(
89397517
,
1
))
Duel
.
Remove
(
g
,
POS_FACEUP
,
REASON_EFFECT
)
spct
=
g
:
FilterCount
(
Card
.
IsLocation
,
nil
,
LOCATION_REMOVED
)
while
spct
>
0
do
tc
=
spg
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
ct
=
g
:
FilterCount
(
Card
.
IsLocation
,
nil
,
LOCATION_REMOVED
)
while
ct
>
0
do
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
tc
=
spg
:
Select
(
tp
,
1
,
1
,
nil
):
GetFirst
()
spg
:
Remove
(
Card
.
IsCode
,
nil
,
tc
:
GetCode
())
Duel
.
SpecialSummon
(
tc
,
0
,
tp
,
tp
,
true
,
false
,
POS_FACEUP
)
Duel
.
SpecialSummon
Step
(
tc
,
0
,
tp
,
tp
,
true
,
false
,
POS_FACEUP
)
tc
:
CompleteProcedure
()
spct
=
sp
ct
-
1
ct
=
ct
-
1
end
Duel
.
SpecialSummonComplete
()
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