Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Y
ygopro-2pick
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-2pick
Commits
080bd0b5
Commit
080bd0b5
authored
Jan 15, 2013
by
argon.sun
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
fix
parent
0ac58aca
Changes
5
Hide whitespace changes
Inline
Side-by-side
Showing
5 changed files
with
94 additions
and
94 deletions
+94
-94
script/c30741334.lua
script/c30741334.lua
+11
-11
script/c30929786.lua
script/c30929786.lua
+29
-29
script/c3534077.lua
script/c3534077.lua
+15
-15
script/c66413481.lua
script/c66413481.lua
+22
-22
script/c67136033.lua
script/c67136033.lua
+17
-17
No files found.
script/c
20000005
.lua
→
script/c
30741334
.lua
View file @
080bd0b5
--熱血指導王ジャイアントレーナー
(test)
function
c
20000005
.
initial_effect
(
c
)
--熱血指導王ジャイアントレーナー
function
c
30741334
.
initial_effect
(
c
)
--xyz summon
aux
.
AddXyzProcedure
(
c
,
aux
.
XyzFilterFunction
(
c
,
8
),
3
)
c
:
EnableReviveLimit
()
--draw
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetCategory
(
CATEGORY_DRAW
+
CATEGORY_DAMAGE
)
e1
:
SetDescription
(
aux
.
Stringid
(
20000005
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
30741334
,
0
))
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetCost
(
c
20000005
.
cost
)
e1
:
SetTarget
(
c
20000005
.
target
)
e1
:
SetOperation
(
c
20000005
.
operation
)
e1
:
SetCost
(
c
30741334
.
cost
)
e1
:
SetTarget
(
c
30741334
.
target
)
e1
:
SetOperation
(
c
30741334
.
operation
)
c
:
RegisterEffect
(
e1
)
end
function
c
20000005
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN1
and
Duel
.
GetFlagEffect
(
tp
,
20000005
)
<
3
function
c
30741334
.
cost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetCurrentPhase
()
==
PHASE_MAIN1
and
Duel
.
GetFlagEffect
(
tp
,
30741334
)
<
3
and
e
:
GetHandler
():
CheckRemoveOverlayCard
(
tp
,
1
,
REASON_COST
)
end
e
:
GetHandler
():
RemoveOverlayCard
(
tp
,
1
,
1
,
REASON_COST
)
local
e1
=
Effect
.
CreateEffect
(
e
:
GetHandler
())
...
...
@@ -25,13 +25,13 @@ function c20000005.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e1
:
SetTargetRange
(
1
,
0
)
e1
:
SetReset
(
RESET_PHASE
+
PHASE_END
)
Duel
.
RegisterEffect
(
e1
,
tp
)
Duel
.
RegisterFlagEffect
(
tp
,
20000005
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
Duel
.
RegisterFlagEffect
(
tp
,
30741334
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
c
20000005
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
30741334
.
target
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsPlayerCanDraw
(
tp
,
1
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DRAW
,
nil
,
0
,
tp
,
1
)
end
function
c
20000005
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
30741334
.
operation
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
local
ct
=
Duel
.
Draw
(
tp
,
1
,
REASON_EFFECT
)
if
ct
==
0
then
return
end
local
dc
=
Duel
.
GetOperatedGroup
():
GetFirst
()
...
...
script/c
20000008
.lua
→
script/c
30929786
.lua
View file @
080bd0b5
--立炎星-トウケイ
(test)
function
c
20000008
.
initial_effect
(
c
)
--立炎星-トウケイ
function
c
30929786
.
initial_effect
(
c
)
--search
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
20000008
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
30929786
,
0
))
e1
:
SetCategory
(
CATEGORY_TOHAND
+
CATEGORY_SEARCH
)
e1
:
SetType
(
EFFECT_TYPE_TRIGGER_O
+
EFFECT_TYPE_SINGLE
)
e1
:
SetProperty
(
EFFECT_FLAG_CHAIN_UNIQUE
)
e1
:
SetCode
(
EVENT_SPSUMMON_SUCCESS
)
e1
:
SetCondition
(
c
20000008
.
thcon
)
e1
:
SetCost
(
c
20000008
.
thcost
)
e1
:
SetTarget
(
c
20000008
.
thtg
)
e1
:
SetOperation
(
c
20000008
.
thop
)
e1
:
SetCondition
(
c
30929786
.
thcon
)
e1
:
SetCost
(
c
30929786
.
thcost
)
e1
:
SetTarget
(
c
30929786
.
thtg
)
e1
:
SetOperation
(
c
30929786
.
thop
)
c
:
RegisterEffect
(
e1
)
--set
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
20000008
,
1
))
e2
:
SetDescription
(
aux
.
Stringid
(
30929786
,
1
))
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
)
e2
:
SetCost
(
c
20000008
.
setcost
)
e2
:
SetTarget
(
c
20000008
.
settg
)
e2
:
SetOperation
(
c
20000008
.
setop
)
e2
:
SetCost
(
c
30929786
.
setcost
)
e2
:
SetTarget
(
c
30929786
.
settg
)
e2
:
SetOperation
(
c
30929786
.
setop
)
c
:
RegisterEffect
(
e2
)
end
function
c
20000008
.
thcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
30929786
.
thcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
re
:
GetHandler
():
IsSetCard
(
0x79
)
and
re
:
GetHandler
():
IsType
(
TYPE_MONSTER
)
end
function
c
20000008
.
thcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
20000008
)
==
0
end
Duel
.
RegisterFlagEffect
(
tp
,
20000008
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
function
c
30929786
.
thcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
30929786
)
==
0
end
Duel
.
RegisterFlagEffect
(
tp
,
30929786
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
c
20000008
.
thfilter
(
c
)
function
c
30929786
.
thfilter
(
c
)
return
c
:
IsSetCard
(
0x79
)
and
c
:
IsType
(
TYPE_MONSTER
)
and
c
:
IsAbleToHand
()
end
function
c
20000008
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
20000008
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
function
c
30929786
.
thtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
30929786
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_TOHAND
,
nil
,
1
,
tp
,
LOCATION_DECK
)
end
function
c
20000008
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
30929786
.
thop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_ATOHAND
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
20000008
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
30929786
.
thfilter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SendtoHand
(
g
,
nil
,
REASON_EFFECT
)
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
end
end
function
c
20000008
.
cfilter
(
c
)
function
c
30929786
.
cfilter
(
c
)
return
c
:
IsFaceup
()
and
c
:
IsSetCard
(
0x7c
)
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
and
c
:
IsAbleToGraveAsCost
()
end
function
c
20000008
.
setcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
20000008
.
cfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
end
function
c
30929786
.
setcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
30929786
.
cfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
nil
)
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_TOGRAVE
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
20000008
.
cfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
30929786
.
cfilter
,
tp
,
LOCATION_ONFIELD
,
0
,
1
,
1
,
nil
)
Duel
.
SendtoGrave
(
g
,
REASON_COST
)
end
function
c
20000008
.
filter
(
c
)
function
c
30929786
.
filter
(
c
)
return
c
:
IsSetCard
(
0x7c
)
and
c
:
IsType
(
TYPE_SPELL
+
TYPE_TRAP
)
and
c
:
IsSSetable
(
true
)
end
function
c
20000008
.
settg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
30929786
.
settg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
>-
1
and
Duel
.
IsExistingMatchingCard
(
c
20000008
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
and
Duel
.
IsExistingMatchingCard
(
c
30929786
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
nil
)
end
end
function
c
20000008
.
setop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
30929786
.
setop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
if
Duel
.
GetLocationCount
(
tp
,
LOCATION_SZONE
)
<=
0
then
return
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SET
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
20000008
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
c
30929786
.
filter
,
tp
,
LOCATION_DECK
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
Duel
.
SSet
(
tp
,
g
:
GetFirst
())
Duel
.
ConfirmCards
(
1
-
tp
,
g
)
...
...
script/c
2000000
7.lua
→
script/c
353407
7.lua
View file @
080bd0b5
--熱血獣士ウルフバーク
(test)
function
c
2000000
7
.
initial_effect
(
c
)
--熱血獣士ウルフバーク
function
c
353407
7
.
initial_effect
(
c
)
--spsummon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
2000000
7
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
353407
7
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_IGNITION
)
e1
:
SetRange
(
LOCATION_MZONE
)
e1
:
SetCountLimit
(
1
)
e1
:
SetProperty
(
EFFECT_FLAG_CARD_TARGET
)
e1
:
SetCost
(
c
2000000
7
.
spcost
)
e1
:
SetTarget
(
c
2000000
7
.
sptg
)
e1
:
SetOperation
(
c
2000000
7
.
spop
)
e1
:
SetCost
(
c
353407
7
.
spcost
)
e1
:
SetTarget
(
c
353407
7
.
sptg
)
e1
:
SetOperation
(
c
353407
7
.
spop
)
c
:
RegisterEffect
(
e1
)
end
function
c
2000000
7
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
2000000
7
)
==
0
end
Duel
.
RegisterFlagEffect
(
tp
,
2000000
7
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
function
c
353407
7
.
spcost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
353407
7
)
==
0
end
Duel
.
RegisterFlagEffect
(
tp
,
353407
7
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
c
2000000
7
.
filter
(
c
,
e
,
tp
)
function
c
353407
7
.
filter
(
c
,
e
,
tp
)
return
c
:
IsRace
(
RACE_BEASTWARRIOR
)
and
c
:
IsAttribute
(
ATTRIBUTE_FIRE
)
and
c
:
GetLevel
()
==
4
and
c
:
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
function
c
2000000
7
.
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
2000000
7
.
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c
2000000
7
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
function
c
353407
7
.
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
353407
7
.
filter
(
chkc
,
e
,
tp
)
end
if
chk
==
0
then
return
Duel
.
IsExistingTarget
(
c
353407
7
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
nil
,
e
,
tp
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
end
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_SPSUMMON
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c
2000000
7
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
local
g
=
Duel
.
SelectTarget
(
tp
,
c
353407
7
.
filter
,
tp
,
LOCATION_GRAVE
,
0
,
1
,
1
,
nil
,
e
,
tp
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
g
,
1
,
0
,
0
)
end
function
c
2000000
7
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
353407
7
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
tc
=
Duel
.
GetFirstTarget
()
if
tc
:
IsRelateToEffect
(
e
)
and
Duel
.
SpecialSummonStep
(
tc
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP_DEFENCE
)
then
...
...
script/c
20000009
.lua
→
script/c
66413481
.lua
View file @
080bd0b5
--炎王獣 ヤクシャ
(test)
function
c
20000009
.
initial_effect
(
c
)
--炎王獣 ヤクシャ
function
c
66413481
.
initial_effect
(
c
)
--spsummon
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
20000009
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
66413481
,
0
))
e1
:
SetCategory
(
CATEGORY_SPECIAL_SUMMON
)
e1
:
SetType
(
EFFECT_TYPE_FIELD
+
EFFECT_TYPE_TRIGGER_O
)
e1
:
SetProperty
(
EFFECT_FLAG_DELAY
)
e1
:
SetRange
(
LOCATION_HAND
)
e1
:
SetCode
(
EVENT_DESTROYED
)
e1
:
SetCondition
(
c
20000009
.
spcon
)
e1
:
SetTarget
(
c
20000009
.
sptg
)
e1
:
SetOperation
(
c
20000009
.
spop
)
e1
:
SetCondition
(
c
66413481
.
spcon
)
e1
:
SetTarget
(
c
66413481
.
sptg
)
e1
:
SetOperation
(
c
66413481
.
spop
)
c
:
RegisterEffect
(
e1
)
--destroy
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
20000009
,
1
))
e2
:
SetDescription
(
aux
.
Stringid
(
66413481
,
1
))
e2
:
SetCategory
(
CATEGORY_DESTROY
)
e2
:
SetType
(
EFFECT_TYPE_SINGLE
+
EFFECT_TYPE_TRIGGER_O
)
e2
:
SetProperty
(
EFFECT_FLAG_DAMAGE_STEP
+
EFFECT_FLAG_DELAY
+
EFFECT_FLAG_CHAIN_UNIQUE
)
e2
:
SetCode
(
EVENT_TO_GRAVE
)
e2
:
SetCondition
(
c
20000009
.
descon
)
e2
:
SetCost
(
c
20000009
.
descost
)
e2
:
SetTarget
(
c
20000009
.
destg
)
e2
:
SetOperation
(
c
20000009
.
desop
)
e2
:
SetCondition
(
c
66413481
.
descon
)
e2
:
SetCost
(
c
66413481
.
descost
)
e2
:
SetTarget
(
c
66413481
.
destg
)
e2
:
SetOperation
(
c
66413481
.
desop
)
c
:
RegisterEffect
(
e2
)
end
function
c
20000009
.
cfilter
(
c
,
tp
)
function
c
66413481
.
cfilter
(
c
,
tp
)
return
c
:
IsPreviousLocation
(
LOCATION_MZONE
)
and
c
:
IsPreviousPosition
(
POS_FACEUP
)
and
c
:
GetPreviousControler
()
==
tp
and
c
:
IsReason
(
REASON_EFFECT
)
and
c
:
IsSetCard
(
0x81
)
end
function
c
20000009
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
c
20000009
.
cfilter
,
1
,
nil
,
tp
)
function
c
66413481
.
spcon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
eg
:
IsExists
(
c
66413481
.
cfilter
,
1
,
nil
,
tp
)
end
function
c
20000009
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
66413481
.
sptg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
e
:
GetHandler
():
IsRelateToEffect
(
e
)
and
Duel
.
GetLocationCount
(
tp
,
LOCATION_MZONE
)
>
0
and
e
:
GetHandler
():
IsCanBeSpecialSummoned
(
e
,
0
,
tp
,
false
,
false
)
end
Duel
.
SetOperationInfo
(
0
,
CATEGORY_SPECIAL_SUMMON
,
e
:
GetHandler
(),
1
,
0
,
0
)
end
function
c
20000009
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
66413481
.
spop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
if
c
:
IsRelateToEffect
(
e
)
then
Duel
.
SpecialSummon
(
c
,
0
,
tp
,
tp
,
false
,
false
,
POS_FACEUP
)
end
end
function
c
20000009
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
66413481
.
descon
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
return
e
:
GetHandler
():
IsReason
(
REASON_DESTROY
)
end
function
c
20000009
.
descost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
20000009
)
==
0
end
Duel
.
RegisterFlagEffect
(
tp
,
20000009
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
function
c
66413481
.
descost
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
GetFlagEffect
(
tp
,
66413481
)
==
0
end
Duel
.
RegisterFlagEffect
(
tp
,
66413481
,
RESET_PHASE
+
PHASE_END
,
0
,
1
)
end
function
c
20000009
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
function
c
66413481
.
destg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
Card
.
IsDestructable
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
1
,
nil
)
end
local
g
=
Duel
.
GetMatchingGroup
(
Card
.
IsDestructable
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
nil
)
Duel
.
SetOperationInfo
(
0
,
CATEGORY_DESTROY
,
g
,
1
,
0
,
0
)
end
function
c
20000009
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
66413481
.
desop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
Duel
.
Hint
(
HINT_SELECTMSG
,
tp
,
HINTMSG_DESTROY
)
local
g
=
Duel
.
SelectMatchingCard
(
tp
,
Card
.
IsDestructable
,
tp
,
LOCATION_ONFIELD
+
LOCATION_HAND
,
0
,
1
,
1
,
nil
)
if
g
:
GetCount
()
>
0
then
...
...
script/c
20000006
.lua
→
script/c
67136033
.lua
View file @
080bd0b5
--熱血獣王ベアーマン
(test)
function
c
20000006
.
initial_effect
(
c
)
--熱血獣王ベアーマン
function
c
67136033
.
initial_effect
(
c
)
--summon with no tribute
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetDescription
(
aux
.
Stringid
(
20000006
,
0
))
e1
:
SetDescription
(
aux
.
Stringid
(
67136033
,
0
))
e1
:
SetProperty
(
EFFECT_FLAG_CANNOT_DISABLE
+
EFFECT_FLAG_UNCOPYABLE
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
e1
:
SetCode
(
EFFECT_SUMMON_PROC
)
e1
:
SetCondition
(
c
20000006
.
ntcon
)
e1
:
SetOperation
(
c
20000006
.
ntop
)
e1
:
SetCondition
(
c
67136033
.
ntcon
)
e1
:
SetOperation
(
c
67136033
.
ntop
)
c
:
RegisterEffect
(
e1
)
--lvchange
local
e2
=
Effect
.
CreateEffect
(
c
)
e2
:
SetDescription
(
aux
.
Stringid
(
20000006
,
1
))
e2
:
SetDescription
(
aux
.
Stringid
(
67136033
,
1
))
e2
:
SetType
(
EFFECT_TYPE_IGNITION
)
e2
:
SetRange
(
LOCATION_MZONE
)
e2
:
SetCountLimit
(
1
)
e2
:
SetTarget
(
c
20000006
.
lvtg
)
e2
:
SetOperation
(
c
20000006
.
lvop
)
e2
:
SetTarget
(
c
67136033
.
lvtg
)
e2
:
SetOperation
(
c
67136033
.
lvop
)
c
:
RegisterEffect
(
e2
)
--xyz limit
local
e3
=
Effect
.
CreateEffect
(
c
)
e3
:
SetType
(
EFFECT_TYPE_SINGLE
)
e3
:
SetProperty
(
EFFECT_FLAG_UNCOPYABLE
+
EFFECT_FLAG_CANNOT_DISABLE
)
e3
:
SetCode
(
EFFECT_CANNOT_BE_XYZ_MATERIAL
)
e3
:
SetValue
(
c
20000006
.
xyzlimit
)
e3
:
SetValue
(
c
67136033
.
xyzlimit
)
c
:
RegisterEffect
(
e3
)
end
function
c
20000006
.
ntcon
(
e
,
c
)
function
c
67136033
.
ntcon
(
e
,
c
)
if
c
==
nil
then
return
true
end
return
c
:
GetLevel
()
>
4
and
Duel
.
GetLocationCount
(
c
:
GetControler
(),
LOCATION_MZONE
)
>
0
end
function
c
20000006
.
ntop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
function
c
67136033
.
ntop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
c
)
--change base attack
local
e1
=
Effect
.
CreateEffect
(
c
)
e1
:
SetType
(
EFFECT_TYPE_SINGLE
)
...
...
@@ -41,15 +41,15 @@ function c20000006.ntop(e,tp,eg,ep,ev,re,r,rp,c)
e1
:
SetValue
(
1300
)
c
:
RegisterEffect
(
e1
)
end
function
c
20000006
.
filter
(
c
)
function
c
67136033
.
filter
(
c
)
return
c
:
IsRace
(
RACE_BEASTWARRIOR
)
and
c
:
GetLevel
()
==
4
end
function
c
20000006
.
lvtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
20000006
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
end
function
c
67136033
.
lvtg
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
,
chk
)
if
chk
==
0
then
return
Duel
.
IsExistingMatchingCard
(
c
67136033
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
1
,
nil
)
end
end
function
c
20000006
.
lvop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
function
c
67136033
.
lvop
(
e
,
tp
,
eg
,
ep
,
ev
,
re
,
r
,
rp
)
local
c
=
e
:
GetHandler
()
local
g
=
Duel
.
GetMatchingGroup
(
c
20000006
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
local
g
=
Duel
.
GetMatchingGroup
(
c
67136033
.
filter
,
tp
,
LOCATION_MZONE
,
0
,
nil
)
local
tc
=
g
:
GetFirst
()
while
tc
do
local
e1
=
Effect
.
CreateEffect
(
c
)
...
...
@@ -62,7 +62,7 @@ function c20000006.lvop(e,tp,eg,ep,ev,re,r,rp)
tc
=
g
:
GetNext
()
end
end
function
c
20000006
.
xyzlimit
(
e
,
c
)
function
c
67136033
.
xyzlimit
(
e
,
c
)
if
not
c
then
return
false
end
return
not
c
:
IsAttribute
(
ATTRIBUTE_FIRE
)
or
not
c
:
IsRace
(
RACE_WARRIOR
)
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