Skip to content

Y
ygopro-222DIY-cards
Commit 2e732a83 authored by Tachibana's avatar Tachibana
Browse files
Options

ndyd

parent addb8557
Hide whitespace changes
Inline Side-by-side
Showing with 903 additions and 829 deletions
expansions/222DIY.cdb
View file @ 2e732a83
No preview for this file type
expansions/script/c12014000.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--special summon proc --special summon proc
......
expansions/script/c12014001.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
......
expansions/script/c12014003.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --
......
expansions/script/c12014011.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand --tohand
......
expansions/script/c12014012.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
......
expansions/script/c12014013.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
......
expansions/script/c12014014.lua
View file @ 2e732a83
...@@ -10,8 +10,8 @@ function cm.initial_effect(c) ...@@ -10,8 +10,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand --to hand
......
expansions/script/c12014015.lua
View file @ 2e732a83
...@@ -10,8 +10,8 @@ function cm.initial_effect(c) ...@@ -10,8 +10,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--immune --immune
......
expansions/script/c12014016.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function cm.initial_effect(c) ...@@ -7,8 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand --tohand
......
expansions/script/c12014020.lua
View file @ 2e732a83
...@@ -10,8 +10,8 @@ function cm.initial_effect(c) ...@@ -10,8 +10,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(0xff) e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_MACHINE) e1:SetValue(RACE_MACHINE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--special summon --special summon
......
expansions/script/c12025009.lua
View file @ 2e732a83
...@@ -21,6 +21,15 @@ function c12025009.initial_effect(c) ...@@ -21,6 +21,15 @@ function c12025009.initial_effect(c)
e1:SetTarget(c12025009.target) e1:SetTarget(c12025009.target)
e1:SetOperation(c12025009.operation) e1:SetOperation(c12025009.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--RACE_DRAGON
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_ADD_RACE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetRange(LOCATION_MZONE)
e2:SetValue(RACE_DRAGON)
c:RegisterEffect(e2)
end end
function c12025009.cfilter(c,tp) function c12025009.cfilter(c,tp)
return c:IsPreviousLocation(LOCATION_DECK) return c:IsPreviousLocation(LOCATION_DECK)
......
expansions/script/c12083001.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--special summon proc --special summon proc
......
expansions/script/c12083003.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--target --target
...@@ -81,7 +82,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -81,7 +82,7 @@ function cm.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EFFECT_ADD_TYPE) e1:SetCode(EFFECT_ADD_TYPE)
e1:SetRange(LOCATION_SZONE) e1:SetRange(LOCATION_SZONE)
e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS) e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET) e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
......
expansions/script/c12083004.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search --search
......
expansions/script/c12083005.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --
......
expansions/script/c12083010.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--target --target
......
expansions/script/c12083011.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--draw --draw
......
expansions/script/c12083012.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--draw --draw
......
expansions/script/c12083013.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
......
expansions/script/c12083014.lua
View file @ 2e732a83
...@@ -10,7 +10,8 @@ function cm.initial_effect(c) ...@@ -10,7 +10,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand --to hand
...@@ -87,7 +88,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -87,7 +88,7 @@ function cm.thop(e,tp,eg,ep,ev,re,r,rp)
e1:SetCode(EFFECT_ADD_TYPE) e1:SetCode(EFFECT_ADD_TYPE)
e1:SetRange(LOCATION_SZONE) e1:SetRange(LOCATION_SZONE)
e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS) e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET) e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TEMP_REMOVE-RESET_TURN_SET)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
......
expansions/script/c12083015.lua
View file @ 2e732a83
...@@ -10,7 +10,8 @@ function cm.initial_effect(c) ...@@ -10,7 +10,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--immune --immune
......
expansions/script/c12083020.lua
View file @ 2e732a83
...@@ -10,7 +10,8 @@ function cm.initial_effect(c) ...@@ -10,7 +10,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to grave --to grave
...@@ -26,7 +27,7 @@ function cm.initial_effect(c) ...@@ -26,7 +27,7 @@ function cm.initial_effect(c)
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e5:SetCode(EVENT_SPSUMMON_SUCCESS) e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetCondition(cm.matcon) e5:SetCondition(cm.matcon)
e5:SetOperation(cm.matop) e5:SetOperation(cm.matop)
......
expansions/script/c12083021.lua
View file @ 2e732a83
...@@ -11,13 +11,14 @@ function cm.initial_effect(c) ...@@ -11,13 +11,14 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0xff) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_SPELLCASTER) e1:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--indes --indes
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCondition(cm.immcon) e2:SetCondition(cm.immcon)
e2:SetOperation(cm.immop) e2:SetOperation(cm.immop)
......
expansions/script/c16101183.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function cm.initial_effect(c) ...@@ -7,7 +7,8 @@ function cm.initial_effect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(0x7f) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(RACE_ZOMBIE) e1:SetValue(RACE_ZOMBIE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
expansions/script/c16107119.lua
View file @ 2e732a83
...@@ -54,6 +54,15 @@ function cm.initial_effect(c) ...@@ -54,6 +54,15 @@ function cm.initial_effect(c)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCondition(cm.copycon2) e4:SetCondition(cm.copycon2)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--attribute
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_ADD_ATTRIBUTE)
e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(0x2f)
c:RegisterEffect(e5)
end end
function cm.mfilter(c,xyzc) function cm.mfilter(c,xyzc)
return c:IsRankAbove(10) return c:IsRankAbove(10)
......
expansions/script/c40008626.lua
View file @ 2e732a83
...@@ -12,6 +12,7 @@ function c40008626.initial_effect(c) ...@@ -12,6 +12,7 @@ function c40008626.initial_effect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_ADD_ATTRIBUTE) e2:SetCode(EFFECT_ADD_ATTRIBUTE)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetValue(ATTRIBUTE_DARK) e2:SetValue(ATTRIBUTE_DARK)
c:RegisterEffect(e2) c:RegisterEffect(e2)
......
expansions/script/c4210007.lua
View file @ 2e732a83
...@@ -28,7 +28,8 @@ function c4210007.initial_effect(c) ...@@ -28,7 +28,8 @@ function c4210007.initial_effect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_ATTRIBUTE) e3:SetCode(EFFECT_ADD_ATTRIBUTE)
e3:SetRange(0xff) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetRange(LOCATION_MZONE)
e3:SetValue(ATTRIBUTE_EARTH) e3:SetValue(ATTRIBUTE_EARTH)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
......
expansions/script/c4210008.lua
View file @ 2e732a83
...@@ -16,7 +16,7 @@ function c4210008.initial_effect(c) ...@@ -16,7 +16,7 @@ function c4210008.initial_effect(c)
e2:SetCategory(CATEGORY_TODECK) e2:SetCategory(CATEGORY_TODECK)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_RELEASE) e2:SetCode(EVENT_RELEASE)
e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetRange(LOCATION_GRAVE) e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,4210008) e2:SetCountLimit(1,4210008)
e2:SetCondition(c4210008.otcon) e2:SetCondition(c4210008.otcon)
...@@ -28,7 +28,8 @@ function c4210008.initial_effect(c) ...@@ -28,7 +28,8 @@ function c4210008.initial_effect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_ATTRIBUTE) e3:SetCode(EFFECT_ADD_ATTRIBUTE)
e3:SetRange(0xff) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetRange(LOCATION_MZONE)
e3:SetValue(ATTRIBUTE_WIND) e3:SetValue(ATTRIBUTE_WIND)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
......
expansions/script/c4210009.lua
View file @ 2e732a83
...@@ -26,7 +26,8 @@ function c4210009.initial_effect(c) ...@@ -26,7 +26,8 @@ function c4210009.initial_effect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_ATTRIBUTE) e3:SetCode(EFFECT_ADD_ATTRIBUTE)
e3:SetRange(0xff) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetRange(LOCATION_MZONE)
e3:SetValue(ATTRIBUTE_DARK) e3:SetValue(ATTRIBUTE_DARK)
c:RegisterEffect(e3) c:RegisterEffect(e3)
c4210009.tgcard = nil c4210009.tgcard = nil
...@@ -39,7 +40,7 @@ function c4210009.spcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -39,7 +40,7 @@ function c4210009.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(c4210009.cfilter,tp,LOCATION_MZONE,0,1,nil,ft) end if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(c4210009.cfilter,tp,LOCATION_MZONE,0,1,nil,ft) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
local g=Duel.SelectMatchingCard(tp,c4210009.cfilter,tp,LOCATION_MZONE,0,1,1,nil,ft) local g=Duel.SelectMatchingCard(tp,c4210009.cfilter,tp,LOCATION_MZONE,0,1,1,nil,ft)
if g:GetFirst():GetFlagEffect(4210010)~=0 then e:SetLabel(1) c4210009.tgcard = g:GetFirst() else e:SetLabel(0) end if g:GetFirst():GetFlagEffect(4210010)~=0 then e:SetLabel(1) c4210009.tgcard = g:GetFirst() else e:SetLabel(0) end
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c4210009.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c4210009.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
......
expansions/script/c46564044.lua
View file @ 2e732a83
...@@ -26,18 +26,10 @@ function cm.initial_effect(c) ...@@ -26,18 +26,10 @@ function cm.initial_effect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_RACE) e3:SetCode(EFFECT_ADD_RACE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetValue(RACE_ZOMBIE) e3:SetValue(RACE_ZOMBIE)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetRange(LOCATION_EXTRA)
c:RegisterEffect(e4)
local e5=e3:Clone()
e5:SetRange(LOCATION_GRAVE)
c:RegisterEffect(e5)
local e6=e3:Clone()
e6:SetRange(LOCATION_REMOVED)
c:RegisterEffect(e6)
--spsummon --spsummon
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetCategory(CATEGORY_SPECIAL_SUMMON) e7:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
expansions/script/c47500015.lua
View file @ 2e732a83
--黑猫道士 姬塔 --黑猫道士 姬塔
function c47500015.initial_effect(c) function c47500015.initial_effect(c)
aux.AddCodeList(c,47500000) aux.AddCodeList(c,47500000)
c:EnableCounterPermit(0x1) c:EnableCounterPermit(0x1)
c:EnableReviveLimit() c:EnableReviveLimit()
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--activate --activate
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetDescription(aux.Stringid(47500015,0)) e0:SetDescription(aux.Stringid(47500015,0))
e0:SetCategory(CATEGORY_SPECIAL_SUMMON) e0:SetCategory(CATEGORY_SPECIAL_SUMMON)
e0:SetType(EFFECT_TYPE_IGNITION) e0:SetType(EFFECT_TYPE_IGNITION)
e0:SetRange(LOCATION_PZONE) e0:SetRange(LOCATION_PZONE)
e0:SetCountLimit(1,47500014) e0:SetCountLimit(1,47500014)
e0:SetTarget(c47500015.target) e0:SetTarget(c47500015.target)
e0:SetOperation(c47500015.activate) e0:SetOperation(c47500015.activate)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--kuroneko --kuroneko
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetValue(RACE_BEASTWARRIOR) e1:SetRange(LOCATION_MZONE)
c:RegisterEffect(e1) e1:SetValue(RACE_BEASTWARRIOR)
--moon magic c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) --moon magic
e2:SetCategory(CATEGORY_DAMAGE) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCategory(CATEGORY_DAMAGE)
e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetOperation(c47500015.actop) e2:SetCode(EVENT_ATTACK_ANNOUNCE)
c:RegisterEffect(e2) e2:SetOperation(c47500015.actop)
local e3=e2:Clone() c:RegisterEffect(e2)
e3:SetCode(EVENT_BE_BATTLE_TARGET) local e3=e2:Clone()
c:RegisterEffect(e3) e3:SetCode(EVENT_BE_BATTLE_TARGET)
--Activate c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) --Activate
e4:SetDescription(aux.Stringid(47500015,1)) local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_COUNTER) e4:SetDescription(aux.Stringid(47500015,1))
e4:SetType(EFFECT_TYPE_IGNITION) e4:SetCategory(CATEGORY_COUNTER)
e4:SetCountLimit(1) e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_MZONE) e4:SetCountLimit(1)
e4:SetCost(c47500015.mncost) e4:SetRange(LOCATION_MZONE)
e4:SetOperation(c47500015.mnop) e4:SetCost(c47500015.mncost)
c:RegisterEffect(e4) e4:SetOperation(c47500015.mnop)
local e5=Effect.CreateEffect(c) c:RegisterEffect(e4)
e5:SetCategory(CATEGORY_TOHAND) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e5:SetCategory(CATEGORY_TOHAND)
e5:SetCode(EVENT_BATTLE_END) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetCondition(c47500015.damcon) e5:SetCode(EVENT_BATTLE_END)
e5:SetOperation(c47500015.damop) e5:SetCondition(c47500015.damcon)
c:RegisterEffect(e5) e5:SetOperation(c47500015.damop)
--special summon c:RegisterEffect(e5)
local e6=Effect.CreateEffect(c) --special summon
e6:SetDescription(aux.Stringid(47500015,2)) local e6=Effect.CreateEffect(c)
e6:SetCategory(CATEGORY_SPECIAL_SUMMON) e6:SetDescription(aux.Stringid(47500015,2))
e6:SetType(EFFECT_TYPE_IGNITION) e6:SetCategory(CATEGORY_SPECIAL_SUMMON)
e6:SetCountLimit(1,47500015) e6:SetType(EFFECT_TYPE_IGNITION)
e6:SetRange(LOCATION_MZONE) e6:SetCountLimit(1,47500015)
e6:SetTarget(c47500015.sptg) e6:SetRange(LOCATION_MZONE)
e6:SetOperation(c47500015.spop) e6:SetTarget(c47500015.sptg)
c:RegisterEffect(e6) e6:SetOperation(c47500015.spop)
c:RegisterEffect(e6)
end end
function c47500015.mfilter(c) function c47500015.mfilter(c)
return c:IsCode(47500000) and c:IsFaceup() return c:IsCode(47500000) and c:IsFaceup()
end end
function c47500015.target(e,tp,eg,ep,ev,re,r,rp,chk) function c47500015.target(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
if chk==0 then return Duel.IsExistingMatchingCard(c47500015.mfilter,tp,LOCATION_EXTRA,0,2,nil,e,tp) end if chk==0 then return Duel.IsExistingMatchingCard(c47500015.mfilter,tp,LOCATION_EXTRA,0,2,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
end end
function c47500015.activate(e,tp,eg,ep,ev,re,r,rp) function c47500015.activate(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.SelectMatchingCard(tp,c47500015.mfilter,tp,LOCATION_EXTRA,0,2,2,nil) local g=Duel.SelectMatchingCard(tp,c47500015.mfilter,tp,LOCATION_EXTRA,0,2,2,nil)
if Duel.SendtoGrave(g,REASON_COST) then if Duel.SendtoGrave(g,REASON_COST) then
Duel.SpecialSummon(c,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP) Duel.SpecialSummon(c,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
c:CompleteProcedure() c:CompleteProcedure()
end end
end end
function c47500015.actop(e,tp,eg,ep,ev,re,r,rp) function c47500015.actop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetRange(LOCATION_MZONE,0) e1:SetRange(LOCATION_MZONE,0)
e1:SetValue(c47500015.efilter) e1:SetValue(c47500015.efilter)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_EXTRA_ATTACK) e2:SetCode(EFFECT_EXTRA_ATTACK)
e2:SetTargetRange(LOCATION_MZONE,0) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetValue(1) e2:SetValue(1)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
function c47500015.efilter(e,te) function c47500015.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() return te:GetOwnerPlayer()~=e:GetHandlerPlayer()
end end
function c47500015.mncost(e,tp,eg,ep,ev,re,r,rp,chk,val) function c47500015.mncost(e,tp,eg,ep,ev,re,r,rp,chk,val)
if chk==0 then return true end if chk==0 then return true end
local val=e:SetLabel(math.floor(Duel.GetLP(tp)/2)) local val=e:SetLabel(math.floor(Duel.GetLP(tp)/2))
Duel.PayLPCost(tp,e:GetLabel()) Duel.PayLPCost(tp,e:GetLabel())
end end
function c47500015.mnop(e,tp,eg,ep,ev,re,r,rp) function c47500015.mnop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local ct=e:GetLabel()/500 local ct=e:GetLabel()/500
c:AddCounter(0x1,ct) c:AddCounter(0x1,ct)
end end
function c47500015.damcon(e) function c47500015.damcon(e)
local c=e:GetHandler() local c=e:GetHandler()
return c:GetBattleTarget()~=nil return c:GetBattleTarget()~=nil
end end
function c47500015.damop(e,tp,eg,ep,ev,re,r,rp) function c47500015.damop(e,tp,eg,ep,ev,re,r,rp)
local mp=c:GetCounter(0x1)*1 local mp=c:GetCounter(0x1)*1
Duel.Damage(1-tp,mp*400,REASON_EFFECT) Duel.Damage(1-tp,mp*400,REASON_EFFECT)
end end
function c47500015.filter(c,cc,e,tp) function c47500015.filter(c,cc,e,tp)
return c:IsRace(RACE_SPELLCASTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:GetLevel()>0 and c:IsType(TYPE_PENDULUM) and cc:IsCanRemoveCounter(tp,0x1,c:GetLevel(),REASON_COST) return c:IsRace(RACE_SPELLCASTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:GetLevel()>0 and c:IsType(TYPE_PENDULUM) and cc:IsCanRemoveCounter(tp,0x1,c:GetLevel(),REASON_COST)
end end
function c47500015.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47500015.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c47500015.filter,tp,LOCATION_DECK,0,1,nil,e:GetHandler(),e,tp) end and Duel.IsExistingMatchingCard(c47500015.filter,tp,LOCATION_DECK,0,1,nil,e:GetHandler(),e,tp) end
local g=Duel.GetMatchingGroup(c47500015.filter,tp,LOCATION_DECK,0,nil,e:GetHandler(),e,tp) local g=Duel.GetMatchingGroup(c47500015.filter,tp,LOCATION_DECK,0,nil,e:GetHandler(),e,tp)
local lvt={} local lvt={}
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local tlv=tc:GetLevel() local tlv=tc:GetLevel()
lvt[tlv]=tlv lvt[tlv]=tlv
tc=g:GetNext() tc=g:GetNext()
end end
local pc=1 local pc=1
for i=1,12 do for i=1,12 do
if lvt[i] then lvt[i]=nil lvt[pc]=i pc=pc+1 end if lvt[i] then lvt[i]=nil lvt[pc]=i pc=pc+1 end
end end
lvt[pc]=nil lvt[pc]=nil
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(47500015,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(47500015,1))
local lv=Duel.AnnounceNumber(tp,table.unpack(lvt)) local lv=Duel.AnnounceNumber(tp,table.unpack(lvt))
Duel.RemoveCounter(tp,1,1,0x1,lv,REASON_COST) Duel.RemoveCounter(tp,1,1,0x1,lv,REASON_COST)
e:SetLabel(lv) e:SetLabel(lv)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c47500015.sfilter(c,lv,e,tp) function c47500015.sfilter(c,lv,e,tp)
return c:IsRace(RACE_SPELLCASTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevel(lv) return c:IsRace(RACE_SPELLCASTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevel(lv)
end end
function c47500015.spop(e,tp,eg,ep,ev,re,r,rp) function c47500015.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
local lv=e:GetLabel() local lv=e:GetLabel()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47500015.sfilter,tp,LOCATION_DECK,0,1,1,nil,lv,e,tp) local g=Duel.SelectMatchingCard(tp,c47500015.sfilter,tp,LOCATION_DECK,0,1,1,nil,lv,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
end end
\ No newline at end of file
expansions/script/c47510025.lua
View file @ 2e732a83
--双子的星晶兽 弗拉姆=格拉姆 --双子的星晶兽 弗拉姆=格拉姆
function c47510025.initial_effect(c) function c47510025.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--tohand --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN) e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCode(EVENT_FREE_CHAIN) e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1,47510025+EFFECT_COUNT_CODE_DUEL) e2:SetCountLimit(1,47510025+EFFECT_COUNT_CODE_DUEL)
e2:SetTarget(c47510025.tktg) e2:SetTarget(c47510025.tktg)
e2:SetOperation(c47510025.tkop) e2:SetOperation(c47510025.tkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--Attribute Dark --Attribute Dark
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_ATTRIBUTE) e3:SetCode(EFFECT_ADD_ATTRIBUTE)
e3:SetRange(LOCATION_MZONE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetValue(ATTRIBUTE_WATER) e3:SetRange(LOCATION_MZONE)
c:RegisterEffect(e3) e3:SetValue(ATTRIBUTE_WATER)
--destroy c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) --destroy
e4:SetCategory(CATEGORY_DRAW+CATEGORY_DESTROY) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetCategory(CATEGORY_DRAW+CATEGORY_DESTROY)
e4:SetCode(EVENT_SUMMON_SUCCESS) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DELAY) e4:SetCode(EVENT_SUMMON_SUCCESS)
e4:SetCountLimit(1,47510026) e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetTarget(c47510025.destg) e4:SetCountLimit(1,47510026)
e4:SetOperation(c47510025.desop) e4:SetTarget(c47510025.destg)
c:RegisterEffect(e4) e4:SetOperation(c47510025.desop)
local e5=e4:Clone() c:RegisterEffect(e4)
e5:SetCode(EVENT_SPSUMMON_SUCCESS) local e5=e4:Clone()
c:RegisterEffect(e5) e5:SetCode(EVENT_SPSUMMON_SUCCESS)
--sunmoneffect c:RegisterEffect(e5)
local e6=Effect.CreateEffect(c) --sunmoneffect
e6:SetType(EFFECT_TYPE_QUICK_O) local e6=Effect.CreateEffect(c)
e6:SetRange(LOCATION_EXTRA) e6:SetType(EFFECT_TYPE_QUICK_O)
e6:SetCode(EVENT_FREE_CHAIN) e6:SetRange(LOCATION_EXTRA)
e6:SetCountLimit(1,47510000) e6:SetCode(EVENT_FREE_CHAIN)
e6:SetCondition(c47510025.condition) e6:SetCountLimit(1,47510000)
e6:SetCost(c47510025.cost) e6:SetCondition(c47510025.condition)
e6:SetOperation(c47510025.disop) e6:SetCost(c47510025.cost)
c:RegisterEffect(e6) e6:SetOperation(c47510025.disop)
c47510025.ss_effect=e6 c:RegisterEffect(e6)
--recover c47510025.ss_effect=e6
local e7=Effect.CreateEffect(c) --recover
e7:SetCategory(CATEGORY_RECOVER) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e7:SetCategory(CATEGORY_RECOVER)
e7:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e7:SetRange(LOCATION_MZONE) e7:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e7:SetCode(EVENT_BATTLE_DAMAGE) e7:SetRange(LOCATION_MZONE)
e7:SetCondition(c47510025.reccon) e7:SetCode(EVENT_BATTLE_DAMAGE)
e7:SetTarget(c47510025.rectg) e7:SetCondition(c47510025.reccon)
e7:SetOperation(c47510025.recop) e7:SetTarget(c47510025.rectg)
c:RegisterEffect(e7) e7:SetOperation(c47510025.recop)
--recover c:RegisterEffect(e7)
local e8=Effect.CreateEffect(c) --recover
e8:SetCategory(CATEGORY_RECOVER) local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e8:SetCategory(CATEGORY_RECOVER)
e8:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e8:SetRange(LOCATION_MZONE) e8:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e8:SetCode(EVENT_BATTLE_DAMAGE) e8:SetRange(LOCATION_MZONE)
e8:SetCondition(c47510025.descon2) e8:SetCode(EVENT_BATTLE_DAMAGE)
e8:SetTarget(c47510025.destg2) e8:SetCondition(c47510025.descon2)
e8:SetOperation(c47510025.desop2) e8:SetTarget(c47510025.destg2)
c:RegisterEffect(e8) e8:SetOperation(c47510025.desop2)
c:RegisterEffect(e8)
end end
function c47510025.tktg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510025.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
local atk=2000 local atk=2000
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,47511001,0,0x5da,atk,atk,1,RACE_AQUA,ATTRIBUTE_WATER,POS_FACEUP_DEFENSE) end and Duel.IsPlayerCanSpecialSummonMonster(tp,47511001,0,0x5da,atk,atk,1,RACE_AQUA,ATTRIBUTE_WATER,POS_FACEUP_DEFENSE) end
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end end
function c47510025.tkop(e,tp,eg,ep,ev,re,r,rp) function c47510025.tkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local atk=2000 local atk=2000
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=2 if Duel.GetLocationCount(tp,LOCATION_MZONE)<=2
or not Duel.IsPlayerCanSpecialSummonMonster(tp,47511001,0,0x5da,atk,atk,1,RACE_AQUA,ATTRIBUTE_WATER,POS_FACEUP_DEFENSE) then return end or not Duel.IsPlayerCanSpecialSummonMonster(tp,47511001,0,0x5da,atk,atk,1,RACE_AQUA,ATTRIBUTE_WATER,POS_FACEUP_DEFENSE) then return end
local token=Duel.CreateToken(tp,47511001) local token=Duel.CreateToken(tp,47511001)
if Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then if Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UNRELEASABLE_SUM) e1:SetCode(EFFECT_UNRELEASABLE_SUM)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(1) e1:SetValue(1)
e1:SetReset(RESET_EVENT+RESETS_STANDARD) e1:SetReset(RESET_EVENT+RESETS_STANDARD)
token:RegisterEffect(e1) token:RegisterEffect(e1)
local e2=e1:Clone() local e2=e1:Clone()
e2:SetCode(EFFECT_UNRELEASABLE_NONSUM) e2:SetCode(EFFECT_UNRELEASABLE_NONSUM)
token:RegisterEffect(e2) token:RegisterEffect(e2)
end end
if Duel.SpecialSummonComplete()~=0 and c:IsRelateToEffect(e) then if Duel.SpecialSummonComplete()~=0 and c:IsRelateToEffect(e) then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end end
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,0) e1:SetTargetRange(1,0)
e1:SetTarget(c47510025.splimit) e1:SetTarget(c47510025.splimit)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
end end
function c47510025.splimit(e,c) function c47510025.splimit(e,c)
return not c:IsSetCard(0x5da) or c:IsType(TYPE_PENDULUM) return not c:IsSetCard(0x5da) or c:IsType(TYPE_PENDULUM)
end end
function c47510025.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510025.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,nil) end
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD+LOCATION_HAND,0,nil) local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD+LOCATION_HAND,0,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end end
function c47510025.desop(e,tp,eg,ep,ev,re,r,rp) function c47510025.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
Duel.Draw(tp,1,REASON_EFFECT) Duel.Draw(tp,1,REASON_EFFECT)
end end
end end
function c47510025.condition(e,tp,eg,ep,ev,re,r,rp) function c47510025.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetLP(tp)<=1000 return Duel.GetLP(tp)<=1000
end end
function c47510025.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c47510025.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c47510025.disop(e,tp,eg,ep,ev,re,r,rp) function c47510025.disop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
local c=e:GetHandler() local c=e:GetHandler()
while tc do while tc do
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_CANNOT_TRIGGER) e1:SetCode(EFFECT_CANNOT_TRIGGER)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local e3=Effect.CreateEffect(e:GetHandler()) local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_CANNOT_ATTACK) e3:SetCode(EFFECT_CANNOT_ATTACK)
e3:SetReset(RESET_EVENT+RESETS_STANDARD) e3:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e3) tc:RegisterEffect(e3)
tc=g:GetNext() tc=g:GetNext()
end end
end end
function c47510025.reccon(e,tp,eg,ep,ev,re,r,rp) function c47510025.reccon(e,tp,eg,ep,ev,re,r,rp)
if ep==tp then return false end if ep==tp then return false end
local rc=eg:GetFirst() local rc=eg:GetFirst()
return rc:IsControler(tp) and rc:IsAttribute(ATTRIBUTE_WATER) return rc:IsControler(tp) and rc:IsAttribute(ATTRIBUTE_WATER)
end end
function c47510025.rectg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510025.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(ev) Duel.SetTargetParam(ev)
Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,ev) Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,ev)
end end
function c47510025.recop(e,tp,eg,ep,ev,re,r,rp) function c47510025.recop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
Duel.Recover(p,d,REASON_EFFECT) Duel.Recover(p,d,REASON_EFFECT)
end end
function c47510025.descon2(e,tp,eg,ep,ev,re,r,rp) function c47510025.descon2(e,tp,eg,ep,ev,re,r,rp)
if ep==tp then return false end if ep==tp then return false end
local rc=eg:GetFirst() local rc=eg:GetFirst()
return rc:IsControler(tp) and rc:IsAttribute(ATTRIBUTE_FIRE) return rc:IsControler(tp) and rc:IsAttribute(ATTRIBUTE_FIRE)
end end
function c47510025.destg2(e,tp,eg,ep,ev,re,r,rp,chk) function c47510025.destg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil) local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end end
function c47510025.desop2(e,tp,eg,ep,ev,re,r,rp) function c47510025.desop2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.HintSelection(g) Duel.HintSelection(g)
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
end end
\ No newline at end of file
expansions/script/c47510028.lua
View file @ 2e732a83
...@@ -55,6 +55,15 @@ function c47510028.initial_effect(c) ...@@ -55,6 +55,15 @@ function c47510028.initial_effect(c)
e8:SetTarget(c47510028.drtg) e8:SetTarget(c47510028.drtg)
e8:SetOperation(c47510028.drop) e8:SetOperation(c47510028.drop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--attribute light
local ea=Effect.CreateEffect(c)
ea:SetType(EFFECT_TYPE_SINGLE)
ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
ea:SetCode(EFFECT_ADD_ATTRIBUTE)
ea:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
ea:SetRange(LOCATION_MZONE)
ea:SetValue(ATTRIBUTE_FIRE)
c:RegisterEffect(ea)
end end
function c47510028.pcon(e,tp,eg,ep,ev,re,r,rp) function c47510028.pcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
...@@ -74,7 +83,8 @@ function c47510028.pop(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,7 +83,8 @@ function c47510028.pop(e,tp,eg,ep,ev,re,r,rp)
if a:IsControler(1-tp) then a,d=d,a end if a:IsControler(1-tp) then a,d=d,a end
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) then
local e1=Effect.CreateEffect(c) local e1=Effect.
CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(2700) e1:SetValue(2700)
......
expansions/script/c47510115.lua
View file @ 2e732a83
...@@ -2,101 +2,102 @@ ...@@ -2,101 +2,102 @@
local m=47510115 local m=47510115
local cm=_G["c"..m] local cm=_G["c"..m]
function c47510115.initial_effect(c) function c47510115.initial_effect(c)
c:SetSPSummonOnce(47510115) c:SetSPSummonOnce(47510115)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(c47510115.sfilter),1,1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(c47510115.sfilter),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--Fraunhofer --Fraunhofer
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_REVERSE_RECOVER) e1:SetCode(EFFECT_REVERSE_RECOVER)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0) e1:SetTargetRange(1,0)
e1:SetValue(1) e1:SetValue(1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_REFLECT_DAMAGE) e2:SetCode(EFFECT_REFLECT_DAMAGE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetValue(c47510115.refcon) e2:SetValue(c47510115.refcon)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--Attribute Dark --Attribute Dark
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_ADD_ATTRIBUTE) e3:SetCode(EFFECT_ADD_ATTRIBUTE)
e3:SetRange(LOCATION_MZONE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetValue(ATTRIBUTE_FIRE) e3:SetRange(LOCATION_MZONE)
c:RegisterEffect(e3) e3:SetValue(ATTRIBUTE_FIRE)
--Fraunhofer c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) --Fraunhofer
e4:SetType(EFFECT_TYPE_FIELD) local e4=Effect.CreateEffect(c)
e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_REVERSE_RECOVER) e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e4:SetRange(LOCATION_MZONE) e4:SetCode(EFFECT_REVERSE_RECOVER)
e4:SetTargetRange(1,0) e4:SetRange(LOCATION_MZONE)
e4:SetValue(1) e4:SetTargetRange(1,0)
c:RegisterEffect(e4) e4:SetValue(1)
local e5=Effect.CreateEffect(c) c:RegisterEffect(e4)
e5:SetType(EFFECT_TYPE_FIELD) local e5=Effect.CreateEffect(c)
e5:SetCode(EFFECT_REFLECT_DAMAGE) e5:SetType(EFFECT_TYPE_FIELD)
e5:SetRange(LOCATION_MZONE) e5:SetCode(EFFECT_REFLECT_DAMAGE)
e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e5:SetRange(LOCATION_MZONE)
e5:SetTargetRange(1,0) e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e5:SetValue(c47510115.refcon) e5:SetTargetRange(1,0)
c:RegisterEffect(e5) e5:SetValue(c47510115.refcon)
--Sol Shot c:RegisterEffect(e5)
local e6=Effect.CreateEffect(c) --Sol Shot
e6:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE) local e6=Effect.CreateEffect(c)
e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e6:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_DESTROY_REPLACE) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e6:SetRange(LOCATION_MZONE) e6:SetCode(EFFECT_DESTROY_REPLACE)
e6:SetTarget(c47510115.reptg) e6:SetRange(LOCATION_MZONE)
c:RegisterEffect(e6) e6:SetTarget(c47510115.reptg)
--pendulum c:RegisterEffect(e6)
local e10=Effect.CreateEffect(c) --pendulum
e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) local e10=Effect.CreateEffect(c)
e10:SetCode(EVENT_DESTROYED) e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e10:SetProperty(EFFECT_FLAG_DELAY) e10:SetCode(EVENT_DESTROYED)
e10:SetCondition(c47510115.pencon) e10:SetProperty(EFFECT_FLAG_DELAY)
e10:SetTarget(c47510115.pentg) e10:SetCondition(c47510115.pencon)
e10:SetOperation(c47510115.penop) e10:SetTarget(c47510115.pentg)
c:RegisterEffect(e10) e10:SetOperation(c47510115.penop)
c:RegisterEffect(e10)
end end
function c47510115.sfilter(c) function c47510115.sfilter(c)
return c:IsType(TYPE_PENDULUM) and c:IsAttribute(ATTRIBUTE_LIGHT) return c:IsType(TYPE_PENDULUM) and c:IsAttribute(ATTRIBUTE_LIGHT)
end end
function c47510115.refcon(e,re,val,r,rp,rc) function c47510115.refcon(e,re,val,r,rp,rc)
return bit.band(r,REASON_EFFECT)~=0 and rp==e:GetHandler():GetControler() return bit.band(r,REASON_EFFECT)~=0 and rp==e:GetHandler():GetControler()
end end
function c47510115.f(c,e) function c47510115.f(c,e)
return c:IsAbleToGraveAsCost() and not c:IsImmuneToEffect(e) return c:IsAbleToGraveAsCost() and not c:IsImmuneToEffect(e)
end end
function c47510115.reptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510115.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) and Duel.IsExistingMatchingCard(c47510115.f,tp,0,LOCATION_ONFIELD,1,nil,e) end if chk==0 then return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) and Duel.IsExistingMatchingCard(c47510115.f,tp,0,LOCATION_ONFIELD,1,nil,e) end
if Duel.SelectYesNo(tp,aux.Stringid(47510115,1)) then if Duel.SelectYesNo(tp,aux.Stringid(47510115,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c47510115.f,tp,0,LOCATION_ONFIELD,1,1,nil,e) local g=Duel.SelectMatchingCard(tp,c47510115.f,tp,0,LOCATION_ONFIELD,1,1,nil,e)
Duel.SendtoGrave(g,REASON_EFFECT) Duel.SendtoGrave(g,REASON_EFFECT)
return true return true
else return false end else return false end
end end
function c47510115.pencon(e,tp,eg,ep,ev,re,r,rp) function c47510115.pencon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0 and c:IsPreviousLocation(LOCATION_MZONE) and c:IsFaceup() return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0 and c:IsPreviousLocation(LOCATION_MZONE) and c:IsFaceup()
end end
function c47510115.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510115.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
end end
function c47510115.penop(e,tp,eg,ep,ev,re,r,rp) function c47510115.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510119.lua
View file @ 2e732a83
...@@ -2,183 +2,178 @@ ...@@ -2,183 +2,178 @@
local m=47510119 local m=47510119
local cm=_G["c"..m] local cm=_G["c"..m]
function c47510119.initial_effect(c) function c47510119.initial_effect(c)
c:SetSPSummonOnce(47510119) c:SetSPSummonOnce(47510119)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--xyz summon --xyz summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddXyzProcedure(c,c47510119.mfilter,8,2) aux.AddXyzProcedure(c,c47510119.mfilter,8,2)
--destroy --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47510119,0)) e1:SetDescription(aux.Stringid(47510119,0))
e1:SetCategory(CATEGORY_REMOVE) e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP) e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e1:SetCode(EVENT_DESTROYED) e1:SetCode(EVENT_DESTROYED)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,47510119+EFFECT_COUNT_CODE_DUEL) e1:SetCountLimit(1,47510119+EFFECT_COUNT_CODE_DUEL)
e1:SetCondition(c47510119.descon) e1:SetCondition(c47510119.descon)
e1:SetTarget(c47510119.destg) e1:SetTarget(c47510119.destg)
e1:SetOperation(c47510119.desop) e1:SetOperation(c47510119.desop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e11=e1:Clone() local e11=e1:Clone()
e11:SetCondition(c47510119.descon2) e11:SetCondition(c47510119.descon2)
c:RegisterEffect(e11) c:RegisterEffect(e11)
--RACE_DRAGON --RACE_DRAGON
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_ADD_RACE) e2:SetCode(EFFECT_ADD_RACE)
e2:SetRange(LOCATION_MZONE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetValue(RACE_DRAGON) e2:SetRange(LOCATION_MZONE)
c:RegisterEffect(e2) e2:SetValue(RACE_DRAGON)
local e3=e2:Clone() c:RegisterEffect(e2)
e3:SetRange(LOCATION_EXTRA) --Judecca
c:RegisterEffect(e3) local e5=Effect.CreateEffect(c)
local e4=e2:Clone() e5:SetDescription(aux.Stringid(47510119,0))
e4:SetRange(LOCATION_GRAVE) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
c:RegisterEffect(e4) e5:SetCode(EVENT_SPSUMMON_SUCCESS)
--Judecca e5:SetCondition(c47510119.lpcon)
local e5=Effect.CreateEffect(c) e5:SetOperation(c47510119.lpop)
e5:SetDescription(aux.Stringid(47510119,0)) c:RegisterEffect(e5)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) --Antenora
e5:SetCode(EVENT_SPSUMMON_SUCCESS) local e8=Effect.CreateEffect(c)
e5:SetCondition(c47510119.lpcon) e8:SetDescription(aux.Stringid(47510119,1))
e5:SetOperation(c47510119.lpop) e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
c:RegisterEffect(e5) e8:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
--Antenora e8:SetRange(LOCATION_MZONE)
local e8=Effect.CreateEffect(c) e8:SetCountLimit(1)
e8:SetDescription(aux.Stringid(47510119,1)) e8:SetCondition(c47510119.bacon)
e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e8:SetCost(c47510119.cost)
e8:SetCode(EVENT_PHASE+PHASE_BATTLE_START) e8:SetOperation(c47510119.op)
e8:SetRange(LOCATION_MZONE) c:RegisterEffect(e8)
e8:SetCountLimit(1) --pendulum
e8:SetCondition(c47510119.bacon) local e10=Effect.CreateEffect(c)
e8:SetCost(c47510119.cost) e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e8:SetOperation(c47510119.op) e10:SetCode(EVENT_DESTROYED)
c:RegisterEffect(e8) e10:SetProperty(EFFECT_FLAG_DELAY)
--pendulum e10:SetCondition(c47510119.pencon)
local e10=Effect.CreateEffect(c) e10:SetTarget(c47510119.pentg)
e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e10:SetOperation(c47510119.penop)
e10:SetCode(EVENT_DESTROYED) c:RegisterEffect(e10)
e10:SetProperty(EFFECT_FLAG_DELAY)
e10:SetCondition(c47510119.pencon)
e10:SetTarget(c47510119.pentg)
e10:SetOperation(c47510119.penop)
c:RegisterEffect(e10)
end end
function c47510119.bacon(e,tp,eg,ep,ev,re,r,rp) function c47510119.bacon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
end end
function c47510119.mfilter(c,xyzc) function c47510119.mfilter(c,xyzc)
return c:IsSetCard(0x5da) or c:IsAttribute(ATTRIBUTE_WATER) return c:IsSetCard(0x5da) or c:IsAttribute(ATTRIBUTE_WATER)
end end
function c47510119.cfilter(c,tp) function c47510119.cfilter(c,tp)
return c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_MZONE) and (c:IsReason(REASON_DESTROY) and c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp or c:IsReason(REASON_BATTLE) and Duel.GetTurnPlayer()==1-tp) and c:IsType(TYPE_MONSTER) return c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_MZONE) and (c:IsReason(REASON_DESTROY) and c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp or c:IsReason(REASON_BATTLE) and Duel.GetTurnPlayer()==1-tp) and c:IsType(TYPE_MONSTER)
end end
function c47510119.descon(e,tp,eg,ep,ev,re,r,rp) function c47510119.descon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c47510119.cfilter,1,nil,tp) and Duel.GetLP(tp)<=4000 return eg:IsExists(c47510119.cfilter,1,nil,tp) and Duel.GetLP(tp)<=4000
end end
function c47510119.descon2(e,tp,eg,ep,ev,re,r,rp) function c47510119.descon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetAttacker():IsControler(1-tp) and Duel.GetAttackTarget()==nil and Duel.GetLP(tp)<=4000 return Duel.GetAttacker():IsControler(1-tp) and Duel.GetAttackTarget()==nil and Duel.GetLP(tp)<=4000
end end
function c47510119.filter(c) function c47510119.filter(c)
return c:IsAbleToRemove() return c:IsAbleToRemove()
end end
function c47510119.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510119.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47510119.filter,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c47510119.filter,tp,0,LOCATION_ONFIELD,1,nil) end
local g=Duel.GetMatchingGroup(c47510119.filter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c47510119.filter,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),0,0)
end end
function c47510119.desop(e,tp,eg,ep,ev,re,r,rp) function c47510119.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c47510119.filter,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c47510119.filter,tp,0,LOCATION_ONFIELD,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Remove(g,REASON_EFFECT,POS_FACEDOWN) Duel.Remove(g,REASON_EFFECT,POS_FACEDOWN)
end end
end end
function c47510119.lpcon(e,tp,eg,ep,ev,re,r,rp) function c47510119.lpcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ) return e:GetHandler():IsSummonType(SUMMON_TYPE_XYZ)
end end
function c47510119.lpop(e,tp,eg,ep,ev,re,r,rp) function c47510119.lpop(e,tp,eg,ep,ev,re,r,rp)
Duel.SetLP(tp,4000) Duel.SetLP(tp,4000)
end end
function c47510119.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c47510119.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST) e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
end end
function c47510119.filter2(c) function c47510119.filter2(c)
return c:IsFaceup() and (c:IsLocation(LOCATION_SZONE) or c:IsType(TYPE_EFFECT)) and not c:IsDisabled() return c:IsFaceup() and (c:IsLocation(LOCATION_SZONE) or c:IsType(TYPE_EFFECT)) and not c:IsDisabled()
end end
function c47510119.filter3(c) function c47510119.filter3(c)
return c:IsType(TYPE_MONSTER) and c:IsCanChangePosition() return c:IsType(TYPE_MONSTER) and c:IsCanChangePosition()
end end
function c47510119.op(e,tp,eg,ep,ev,re,r,rp) function c47510119.op(e,tp,eg,ep,ev,re,r,rp)
local d=Duel.TossDice(tp,1) local d=Duel.TossDice(tp,1)
if d==1 or d==2 then if d==1 or d==2 then
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_ACTIVATE) e1:SetCode(EFFECT_CANNOT_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetTargetRange(1,1) e1:SetTargetRange(1,1)
e1:SetCondition(c47510119.accon) e1:SetCondition(c47510119.accon)
e1:SetValue(1) e1:SetValue(1)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
elseif d==3 then elseif d==3 then
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then if c:IsRelateToEffect(e) and c:IsFaceup() then
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_EXTRA_ATTACK) e1:SetCode(EFFECT_EXTRA_ATTACK)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetValue(2) e1:SetValue(2)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
elseif d==4 or d==5 then elseif d==4 or d==5 then
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c47510119.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,aux.ExceptThisCard(e)) local g=Duel.GetMatchingGroup(c47510119.filter2,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,aux.ExceptThisCard(e))
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DISABLE_EFFECT) e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e2) tc:RegisterEffect(e2)
tc=g:GetNext() tc=g:GetNext()
end end
elseif d==6 then elseif d==6 then
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c47510119.filter3,tp,0,LOCATION_MZONE,nil) local g=Duel.GetMatchingGroup(c47510119.filter3,tp,0,LOCATION_MZONE,nil)
Duel.ChangePosition(g,POS_FACEDOWN_DEFENSE) Duel.ChangePosition(g,POS_FACEDOWN_DEFENSE)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_PIERCE) e1:SetCode(EFFECT_PIERCE)
e1:SetTargetRange(LOCATION_MZONE,0) e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetValue(1) e1:SetValue(1)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
end end
end end
function c47510119.accon(e) function c47510119.accon(e)
local ph=Duel.GetCurrentPhase() local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end end
function c47510119.pencon(e,tp,eg,ep,ev,re,r,rp) function c47510119.pencon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0 and c:IsPreviousLocation(LOCATION_MZONE) and c:IsFaceup() return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0 and c:IsPreviousLocation(LOCATION_MZONE) and c:IsFaceup()
end end
function c47510119.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510119.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
end end
function c47510119.penop(e,tp,eg,ep,ev,re,r,rp) function c47510119.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
end end
end end
\ No newline at end of file
expansions/script/c47510241.lua
View file @ 2e732a83
...@@ -2,72 +2,81 @@ ...@@ -2,72 +2,81 @@
local m=47510241 local m=47510241
local cm=_G["c"..m] local cm=_G["c"..m]
function c47510241.initial_effect(c) function c47510241.initial_effect(c)
--immune --immune
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetValue(c47510241.efilter) e1:SetValue(c47510241.efilter)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--charnge --RACE_DRAGON
local e3=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EVENT_FREE_CHAIN) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE) e2:SetCode(EFFECT_ADD_RACE)
e3:SetCountLimit(1,47510241) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetCondition(c47510241.crcon) e2:SetRange(LOCATION_MZONE)
e3:SetOperation(c47510241.crop) e2:SetValue(RACE_FIEND)
c:RegisterEffect(e3) c:RegisterEffect(e2)
--Change --charnge
local e7=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(47510241,0)) e3:SetType(EFFECT_TYPE_QUICK_O)
e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetCode(EVENT_FREE_CHAIN)
e7:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e7:SetCode(EVENT_PHASE+PHASE_STANDBY) e3:SetCountLimit(1,47510241)
e7:SetTarget(c47510241.changetg) e3:SetCondition(c47510241.crcon)
e7:SetOperation(c47510241.changeop) e3:SetOperation(c47510241.crop)
c:RegisterEffect(e7) c:RegisterEffect(e3)
--Change
local e7=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(47510241,0))
e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e7:SetRange(LOCATION_MZONE)
e7:SetCode(EVENT_PHASE+PHASE_STANDBY)
e7:SetTarget(c47510241.changetg)
e7:SetOperation(c47510241.changeop)
c:RegisterEffect(e7)
end end
function c47510241.efilter(e,te) function c47510241.efilter(e,te)
return te:GetOwner()~=e:GetOwner() return te:GetOwner()~=e:GetOwner()
end end
function c47510241.changetg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510241.changetg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
if chk==0 then return c.dfc_front_side and c.dfc_back_side==c:GetOriginalCode() end if chk==0 then return c.dfc_front_side and c.dfc_back_side==c:GetOriginalCode() end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
end end
function c47510241.changeop(e,tp,eg,ep,ev,re,r,rp,chk) function c47510241.changeop(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) or c:IsFacedown() or c:IsImmuneToEffect(e) then return end if not c:IsRelateToEffect(e) or c:IsFacedown() or c:IsImmuneToEffect(e) then return end
local tcode=c.dfc_front_side local tcode=c.dfc_front_side
c:SetEntityCode(tcode,true) c:SetEntityCode(tcode,true)
c:ReplaceEffect(tcode,0,0) c:ReplaceEffect(tcode,0,0)
end end
function c47510241.crcon(e,tp,eg,ep,ev,re,r,rp) function c47510241.crcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()==PHASE_MAIN1 return Duel.GetCurrentPhase()==PHASE_MAIN1
end end
function c47510241.crop(e,tp,eg,ep,ev,re,r,rp) function c47510241.crop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,aux.ExceptThisCard(e)) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,aux.ExceptThisCard(e))
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DISABLE_EFFECT) e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE)
tc:RegisterEffect(e2) tc:RegisterEffect(e2)
tc=g:GetNext() tc=g:GetNext()
end end
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_SET_ATTACK_FINAL) e3:SetCode(EFFECT_SET_ATTACK_FINAL)
e3:SetValue(4500) e3:SetValue(4500)
e3:SetReset(RESET_EVENT+RESETS_STANDARD) e3:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
\ No newline at end of file
expansions/script/c47510254.lua
View file @ 2e732a83
...@@ -2,146 +2,155 @@ ...@@ -2,146 +2,155 @@
local m=47510254 local m=47510254
local cm=_G["c"..m] local cm=_G["c"..m]
function c47510254.initial_effect(c) function c47510254.initial_effect(c)
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsType,TYPE_PENDULUM),1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsType,TYPE_PENDULUM),1)
c:EnableReviveLimit() c:EnableReviveLimit()
--splimit --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_PZONE) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0) e1:SetTargetRange(1,0)
e1:SetTarget(c47510254.splimit) e1:SetTarget(c47510254.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetCode(EVENT_CHAIN_SOLVING)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c47510254.discon) e2:SetCondition(c47510254.discon)
e2:SetOperation(c47510254.disop) e2:SetOperation(c47510254.disop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(0,LOCATION_MZONE) e3:SetTargetRange(0,LOCATION_MZONE)
e3:SetValue(-500) e3:SetValue(-500)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e3:Clone()
e4:SetCode(EFFECT_UPDATE_DEFENSE) e4:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD) e5:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_UPDATE_ATTACK) e5:SetCode(EFFECT_UPDATE_ATTACK)
e5:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e5:SetTargetRange(LOCATION_MZONE,0) e5:SetTargetRange(LOCATION_MZONE,0)
e5:SetValue(500) e5:SetValue(500)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e6=e5:Clone() local e6=e5:Clone()
e6:SetCode(EFFECT_UPDATE_DEFENSE) e6:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e6) c:RegisterEffect(e6)
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetCode(EFFECT_EXTRA_ATTACK) e7:SetCode(EFFECT_EXTRA_ATTACK)
e7:SetCondition(c47510254.tacon) e7:SetCondition(c47510254.tacon)
e7:SetValue(3) e7:SetValue(3)
c:RegisterEffect(e7) c:RegisterEffect(e7)
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e8:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e8:SetCode(EVENT_CHAIN_SOLVING) e8:SetCode(EVENT_CHAIN_SOLVING)
e8:SetRange(LOCATION_MZONE) e8:SetRange(LOCATION_MZONE)
e8:SetCondition(c47510254.discon2) e8:SetCondition(c47510254.discon2)
e8:SetOperation(c47510254.disop2) e8:SetOperation(c47510254.disop2)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--back --back
local e9=Effect.CreateEffect(c) local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e9:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e9:SetCode(EVENT_ADJUST) e9:SetCode(EVENT_ADJUST)
e9:SetRange(LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_HAND+LOCATION_EXTRA) e9:SetRange(LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_HAND+LOCATION_EXTRA)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SET_AVAILABLE) e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_SET_AVAILABLE)
e9:SetCondition(c47510254.backon) e9:SetCondition(c47510254.backon)
e9:SetOperation(c47510254.backop) e9:SetOperation(c47510254.backop)
c:RegisterEffect(e9) c:RegisterEffect(e9)
--attribute light
local ea=Effect.CreateEffect(c)
ea:SetType(EFFECT_TYPE_SINGLE)
ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
ea:SetCode(EFFECT_ADD_ATTRIBUTE)
ea:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
ea:SetRange(LOCATION_MZONE)
ea:SetValue(ATTRIBUTE_DARK)
c:RegisterEffect(ea)
end end
c47510254.list={ c47510254.list={
CATEGORY_DESTROY, CATEGORY_DESTROY,
CATEGORY_RELEASE, CATEGORY_RELEASE,
CATEGORY_REMOVE, CATEGORY_REMOVE,
CATEGORY_TOHAND, CATEGORY_TOHAND,
CATEGORY_TODECK, CATEGORY_TODECK,
CATEGORY_TOGRAVE, CATEGORY_TOGRAVE,
CATEGORY_DECKDES, CATEGORY_DECKDES,
CATEGORY_HANDES, CATEGORY_HANDES,
CATEGORY_POSITION, CATEGORY_POSITION,
CATEGORY_CONTROL, CATEGORY_CONTROL,
CATEGORY_DISABLE, CATEGORY_DISABLE,
CATEGORY_DISABLE_SUMMON, CATEGORY_DISABLE_SUMMON,
CATEGORY_EQUIP, CATEGORY_EQUIP,
CATEGORY_DAMAGE, CATEGORY_DAMAGE,
CATEGORY_RECOVER, CATEGORY_RECOVER,
CATEGORY_ATKCHANGE, CATEGORY_ATKCHANGE,
CATEGORY_DEFCHANGE, CATEGORY_DEFCHANGE,
CATEGORY_COUNTER, CATEGORY_COUNTER,
CATEGORY_LVCHANGE, CATEGORY_LVCHANGE,
CATEGORY_NEGATE, CATEGORY_NEGATE,
} }
function c47510254.splimit(e,c,tp,sumtp,sumpos) function c47510254.splimit(e,c,tp,sumtp,sumpos)
return not c:IsType(TYPE_PENDULUM) return not c:IsType(TYPE_PENDULUM)
end end
function c47510254.indfilter(c) function c47510254.indfilter(c)
return c:IsLocation(LOCATION_PZONE) return c:IsLocation(LOCATION_PZONE)
end end
function c47510254.discon(e,tp,eg,ep,ev,re,r,rp) function c47510254.discon(e,tp,eg,ep,ev,re,r,rp)
if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end
local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
return g and g:IsExists(c47510254.indfilter,1,nil) and ep~=tp and e:GetHandler():GetFlagEffect(47510254)==0 return g and g:IsExists(c47510254.indfilter,1,nil) and ep~=tp and e:GetHandler():GetFlagEffect(47510254)==0
end end
function c47510254.disop(e,tp,eg,ep,ev,re,r,rp) function c47510254.disop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
Duel.NegateActivation(ev) Duel.NegateActivation(ev)
c:RegisterFlagEffect(47510254,RESET_EVENT+0x7e0000+RESET_PHASE+PHASE_END,0,1) c:RegisterFlagEffect(47510254,RESET_EVENT+0x7e0000+RESET_PHASE+PHASE_END,0,1)
end end
function c47510254.tacon(e,tp,eg,ep,ev,re,r,rp) function c47510254.tacon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(47510255)~=0 return e:GetHandler():GetFlagEffect(47510255)~=0
end end
function c47510254.nfilter(c) function c47510254.nfilter(c)
return c:IsLocation(LOCATION_MZONE) and c:IsFaceup() and c:IsType(TYPE_PENDULUM) return c:IsLocation(LOCATION_MZONE) and c:IsFaceup() and c:IsType(TYPE_PENDULUM)
end end
function c47510254.discon2(e,tp,eg,ep,ev,re,r,rp) function c47510254.discon2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if e:GetHandler():GetFlagEffect(47510255)~=0 then return end if e:GetHandler():GetFlagEffect(47510255)~=0 then return end
if e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) or not Duel.IsChainNegatable(ev) or not rp==1-tp then return false end if e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) or not Duel.IsChainNegatable(ev) or not rp==1-tp then return false end
if c47510254.nfilter(re:GetHandler()) then return true end if c47510254.nfilter(re:GetHandler()) then return true end
local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
if g and g:IsExists(c47510254.nfilter,1,nil) then return true end if g and g:IsExists(c47510254.nfilter,1,nil) then return true end
local res,ceg,cep,cev,re,r,rp=Duel.CheckEvent(re:GetCode()) local res,ceg,cep,cev,re,r,rp=Duel.CheckEvent(re:GetCode())
if res and ceg and ceg:IsExists(c47510254.nfilter,1,nil) then return true end if res and ceg and ceg:IsExists(c47510254.nfilter,1,nil) then return true end
for i,ctg in pairs(c47510254.list) do for i,ctg in pairs(c47510254.list) do
local ex,tg,ct,p,v=Duel.GetOperationInfo(ev,ctg) local ex,tg,ct,p,v=Duel.GetOperationInfo(ev,ctg)
if tg then if tg then
if tg:IsExists(c47510254.nfilter,1,c) then return true end if tg:IsExists(c47510254.nfilter,1,c) then return true end
elseif v and v>0 and Duel.IsExistingMatchingCard(c47510254.nfilter,tp,v,0,1,nil) then elseif v and v>0 and Duel.IsExistingMatchingCard(c47510254.nfilter,tp,v,0,1,nil) then
return true return true
end end
end end
return false return false
end end
function c47510254.disop2(e,tp,eg,ep,ev,re,r,rp) function c47510254.disop2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
Duel.NegateEffect(ev) Duel.NegateEffect(ev)
c:RegisterFlagEffect(47510255,RESET_EVENT+0x7e0000+RESET_PHASE+PHASE_END,0,1) c:RegisterFlagEffect(47510255,RESET_EVENT+0x7e0000+RESET_PHASE+PHASE_END,0,1)
end end
function c47510254.backon(e,tp,eg,ep,ev,re,r,rp) function c47510254.backon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return c.dfc_front_side and c:GetOriginalCode()==c.dfc_back_side return c.dfc_front_side and c:GetOriginalCode()==c.dfc_back_side
end end
function c47510254.backop(e,tp,eg,ep,ev,re,r,rp) function c47510254.backop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tcode=c.dfc_front_side local tcode=c.dfc_front_side
c:SetEntityCode(tcode) c:SetEntityCode(tcode)
Duel.ConfirmCards(tp,Group.FromCards(c)) Duel.ConfirmCards(tp,Group.FromCards(c))
Duel.ConfirmCards(1-tp,Group.FromCards(c)) Duel.ConfirmCards(1-tp,Group.FromCards(c))
c:ReplaceEffect(tcode,0,0) c:ReplaceEffect(tcode,0,0)
end end
\ No newline at end of file
expansions/script/c47530157.lua
View file @ 2e732a83
...@@ -2,84 +2,85 @@ ...@@ -2,84 +2,85 @@
local m=47530157 local m=47530157
local cm=_G["c"..m] local cm=_G["c"..m]
function c47530157.initial_effect(c) function c47530157.initial_effect(c)
--Attribute Dark --Attribute Dark
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_ADD_RACE) e1:SetCode(EFFECT_ADD_RACE)
e1:SetRange(LOCATION_MZONE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e1:SetValue(RACE_PSYCHO) e1:SetRange(LOCATION_MZONE)
c:RegisterEffect(e1) e1:SetValue(RACE_PSYCHO)
--special summon c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) --special summon
e2:SetDescription(aux.Stringid(47530157,0)) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetDescription(aux.Stringid(47530157,0))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetRange(LOCATION_HAND) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCountLimit(1,47530157) e2:SetRange(LOCATION_HAND)
e2:SetCondition(c47530157.spcon) e2:SetCountLimit(1,47530157)
e2:SetTarget(c47530157.sptg) e2:SetCondition(c47530157.spcon)
e2:SetOperation(c47530157.spop) e2:SetTarget(c47530157.sptg)
c:RegisterEffect(e2) e2:SetOperation(c47530157.spop)
--effect c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) --effect
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) local e3=Effect.CreateEffect(c)
e3:SetCode(EVENT_BE_MATERIAL) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER) e3:SetCode(EVENT_BE_MATERIAL)
e3:SetCondition(c47530157.efcon) e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
e3:SetOperation(c47530157.efop) e3:SetCondition(c47530157.efcon)
c:RegisterEffect(e3) e3:SetOperation(c47530157.efop)
c:RegisterEffect(e3)
end end
c47530157.is_named_with_EFSF=1 c47530157.is_named_with_EFSF=1
function c47530157.IsEFSF(c) function c47530157.IsEFSF(c)
local m=_G["c"..c:GetCode()] local m=_G["c"..c:GetCode()]
return m and m.is_named_with_EFSF return m and m.is_named_with_EFSF
end end
function c47530157.spfilter(c) function c47530157.spfilter(c)
return c:IsFaceup() and c:IsCode(47530143) return c:IsFaceup() and c:IsCode(47530143)
end end
function c47530157.spcon(e,tp,eg,ep,ev,re,r,rp) function c47530157.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c47530157.spfilter,tp,LOCATION_SZONE,0,1,nil) return Duel.IsExistingMatchingCard(c47530157.spfilter,tp,LOCATION_SZONE,0,1,nil)
end end
function c47530157.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47530157.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function c47530157.spop(e,tp,eg,ep,ev,re,r,rp) function c47530157.spop(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)
end end
end end
function c47530157.efcon(e,tp,eg,ep,ev,re,r,rp) function c47530157.efcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetReasonCard():IsSetCard(0x5d5) return e:GetHandler():GetReasonCard():IsSetCard(0x5d5)
end end
function c47530157.efop(e,tp,eg,ep,ev,re,r,rp) function c47530157.efop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local rc=c:GetReasonCard() local rc=c:GetReasonCard()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47530157,1)) e1:SetDescription(aux.Stringid(47530157,1))
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e1:SetCode(EFFECT_CANNOT_ACTIVATE) e1:SetCode(EFFECT_CANNOT_ACTIVATE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetTargetRange(0,1) e1:SetTargetRange(0,1)
e1:SetValue(1) e1:SetValue(1)
e1:SetCondition(c47530157.actcon) e1:SetCondition(c47530157.actcon)
e1:SetReset(RESET_EVENT+RESETS_STANDARD) e1:SetReset(RESET_EVENT+RESETS_STANDARD)
rc:RegisterEffect(e1,true) rc:RegisterEffect(e1,true)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47530157,2)) e2:SetDescription(aux.Stringid(47530157,2))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) e2:SetProperty(EFFECT_FLAG_CLIENT_HINT)
e2:SetCode(EVENT_BATTLE_DESTROYING) e2:SetCode(EVENT_BATTLE_DESTROYING)
e2:SetCondition(aux.bdocon) e2:SetCondition(aux.bdocon)
e2:SetOperation(c47530157.caop) e2:SetOperation(c47530157.caop)
rc:RegisterEffect(e2,true) rc:RegisterEffect(e2,true)
end end
function c47530157.actcon(e) function c47530157.actcon(e)
return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler() return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()
end end
function c47530157.caop(e,tp,eg,ep,ev,re,r,rp) function c47530157.caop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChainAttack() Duel.ChainAttack()
end end
\ No newline at end of file
expansions/script/c60150814.lua
View file @ 2e732a83
...@@ -16,7 +16,8 @@ function c60150814.initial_effect(c) ...@@ -16,7 +16,8 @@ function c60150814.initial_effect(c)
e12:SetType(EFFECT_TYPE_SINGLE) e12:SetType(EFFECT_TYPE_SINGLE)
e12:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e12:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e12:SetCode(EFFECT_ADD_ATTRIBUTE) e12:SetCode(EFFECT_ADD_ATTRIBUTE)
e12:SetRange(LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA+LOCATION_OVERLAY) e12:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e12:SetRange(LOCATION_MZONE)
e12:SetValue(ATTRIBUTE_DARK) e12:SetValue(ATTRIBUTE_DARK)
c:RegisterEffect(e12) c:RegisterEffect(e12)
--特招免疫 --特招免疫
......
expansions/script/c60159907.lua
View file @ 2e732a83
...@@ -7,7 +7,8 @@ function c60159907.initial_effect(c) ...@@ -7,7 +7,8 @@ function c60159907.initial_effect(c)
e12:SetType(EFFECT_TYPE_SINGLE) e12:SetType(EFFECT_TYPE_SINGLE)
e12:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e12:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e12:SetCode(EFFECT_ADD_ATTRIBUTE) e12:SetCode(EFFECT_ADD_ATTRIBUTE)
e12:SetRange(LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED+LOCATION_EXTRA+LOCATION_OVERLAY) e12:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e12:SetRange(LOCATION_MZONE)
e12:SetValue(ATTRIBUTE_DARK) e12:SetValue(ATTRIBUTE_DARK)
c:RegisterEffect(e12) c:RegisterEffect(e12)
--spsummon condition --spsummon condition
......
expansions/script/c60159941.lua
View file @ 2e732a83
...@@ -17,16 +17,25 @@ function c60159941.initial_effect(c) ...@@ -17,16 +17,25 @@ function c60159941.initial_effect(c)
e1:SetValue(c60159941.linklimit) e1:SetValue(c60159941.linklimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--base atk/def --base atk/def
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_SET_BASE_ATTACK) e2:SetCode(EFFECT_SET_BASE_ATTACK)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetValue(c60159941.atkval) e2:SetValue(c60159941.atkval)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone() local e3=e2:Clone()
e3:SetCode(EFFECT_SET_BASE_DEFENSE) e3:SetCode(EFFECT_SET_BASE_DEFENSE)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--attribute light
local ea=Effect.CreateEffect(c)
ea:SetType(EFFECT_TYPE_SINGLE)
ea:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
ea:SetCode(EFFECT_ADD_ATTRIBUTE)
ea:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
ea:SetRange(LOCATION_MZONE)
ea:SetValue(ATTRIBUTE_DARK)
c:RegisterEffect(ea)
end end
function c60159941.cfilter(c,tp,lc) function c60159941.cfilter(c,tp,lc)
return c:IsCanBeLinkMaterial(lc) and c:IsFaceup() and c:GetSummonLocation()&(LOCATION_DECK+LOCATION_EXTRA)~=0 return c:IsCanBeLinkMaterial(lc) and c:IsFaceup() and c:GetSummonLocation()&(LOCATION_DECK+LOCATION_EXTRA)~=0
...@@ -73,5 +82,5 @@ function c60159941.linklimit(e,se,sp,st) ...@@ -73,5 +82,5 @@ function c60159941.linklimit(e,se,sp,st)
return bit.band(st,SUMMON_TYPE_XYZ)==SUMMON_TYPE_XYZ return bit.band(st,SUMMON_TYPE_XYZ)==SUMMON_TYPE_XYZ
end end
function c60159941.atkval(e,c) function c60159941.atkval(e,c)
return Duel.GetMatchingGroupCount(nil,c:GetControler(),LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_GRAVE+LOCATION_REMOVED,nil)*100 return Duel.GetMatchingGroupCount(nil,c:GetControler(),LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_GRAVE+LOCATION_REMOVED,nil)*100
end end
\ No newline at end of file
expansions/script/c72411180.lua
View file @ 2e732a83
...@@ -4,16 +4,16 @@ function c72411180.initial_effect(c) ...@@ -4,16 +4,16 @@ function c72411180.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,nil,2,2,c72411180.lcheck) aux.AddLinkProcedure(c,nil,2,2,c72411180.lcheck)
c:EnableReviveLimit() c:EnableReviveLimit()
--[[as spellcaster --
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_RACE) e0:SetCode(EFFECT_ADD_RACE)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetRange(0xff) e0:SetRange(LOCATION_MZONE)
e0:SetValue(RACE_SPELLCASTER) e0:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e0)]] c:RegisterEffect(e0)
--des --def
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY) e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
......
expansions/script/c72411190.lua
View file @ 2e732a83
...@@ -4,16 +4,16 @@ function c72411190.initial_effect(c) ...@@ -4,16 +4,16 @@ function c72411190.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,nil,2,4,c72411190.lcheck) aux.AddLinkProcedure(c,nil,2,4,c72411190.lcheck)
c:EnableReviveLimit() c:EnableReviveLimit()
--[[ --
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_RACE) e0:SetCode(EFFECT_ADD_RACE)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetRange(0xff) e0:SetRange(LOCATION_MZONE)
e0:SetValue(RACE_SPELLCASTER) e0:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e0) c:RegisterEffect(e0)
]] --
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetCode(EFFECT_UPDATE_ATTACK)
...@@ -82,13 +82,13 @@ function c72411190.atkop(e,tp,eg,ep,ev,re,r,rp) ...@@ -82,13 +82,13 @@ function c72411190.atkop(e,tp,eg,ep,ev,re,r,rp)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e2:SetValue(math.ceil(atk/2)) e2:SetValue(math.ceil(atk/2))
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e3:SetCode(EFFECT_EXTRA_ATTACK) e3:SetCode(EFFECT_EXTRA_ATTACK)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e3:SetValue(1) e3:SetValue(1)
......
expansions/script/c72411200.lua
View file @ 2e732a83
...@@ -7,8 +7,8 @@ function c72411200.initial_effect(c) ...@@ -7,8 +7,8 @@ function c72411200.initial_effect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e7:SetCode(EFFECT_ADD_RACE) e7:SetCode(EFFECT_ADD_RACE)
e7:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e7:SetRange(0xff) e7:SetRange(LOCATION_MZONE)
e7:SetValue(RACE_SPELLCASTER) e7:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--des --des
......
expansions/script/c72411440.lua
View file @ 2e732a83
...@@ -4,15 +4,15 @@ function c72411440.initial_effect(c) ...@@ -4,15 +4,15 @@ function c72411440.initial_effect(c)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,10,3) aux.AddXyzProcedure(c,nil,10,3)
c:EnableReviveLimit() c:EnableReviveLimit()
--[[ --as spellcaster --
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_RACE) e0:SetCode(EFFECT_ADD_RACE)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetRange(0xff) e0:SetRange(LOCATION_MZONE)
e0:SetValue(RACE_SPELLCASTER) e0:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e0)]] c:RegisterEffect(e0)
--negate --negate
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(72411440,0)) e2:SetDescription(aux.Stringid(72411440,0))
......
expansions/script/c72411510.lua
View file @ 2e732a83
...@@ -5,14 +5,14 @@ function c72411510.initial_effect(c) ...@@ -5,14 +5,14 @@ function c72411510.initial_effect(c)
aux.AddXyzProcedure(c,nil,6,2) aux.AddXyzProcedure(c,nil,6,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--as spellcaster --as spellcaster
--[[ local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_RACE) e0:SetCode(EFFECT_ADD_RACE)
e0:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetRange(0xff) e0:SetRange(LOCATION_MZONE)
e0:SetValue(RACE_SPELLCASTER) e0:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e0)]] c:RegisterEffect(e0)
--cannot be targeted --cannot be targeted
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
expansions/script/c72411610.lua
View file @ 2e732a83
--雷格尼斯之主·古蕾娅 --雷格尼斯之主·古蕾娅
function c72411610.initial_effect(c) function c72411610.initial_effect(c)
--
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetCode(EFFECT_ADD_RACE)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
e0:SetRange(LOCATION_MZONE)
e0:SetValue(RACE_SPELLCASTER)
c:RegisterEffect(e0)
--search --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_TOGRAVE+CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_TOGRAVE+CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment