Commit 576a0a1f authored by argon.sun's avatar argon.sun

Merge branch 'master' of github.com:Fluorohydride/ygopro

parents e70f7c34 81a9ecc8
--コアキメイル·ルークロード --コアキメイル·ルークロード
function c10060427.initial_effect(c) function c10060427.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -15,7 +15,7 @@ end ...@@ -15,7 +15,7 @@ end
function c10667321.target(e,tp,eg,ep,ev,re,r,rp,chk) function c10667321.target(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(c10667321.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c10667321.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end end
function c10667321.activate(e,tp,eg,ep,ev,re,r,rp) function c10667321.activate(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
......
...@@ -31,11 +31,11 @@ function c11373345.filter(c) ...@@ -31,11 +31,11 @@ function c11373345.filter(c)
return c:IsFaceup() and c:IsLevelBelow(5) and c:IsDestructable() return c:IsFaceup() and c:IsLevelBelow(5) and c:IsDestructable()
end end
function c11373345.target(e,tp,eg,ep,ev,re,r,rp,chk) function c11373345.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c11373345.filter,tp,0,LOCATION_MZONE,1,c) end if chk==0 then return Duel.IsExistingMatchingCard(c11373345.filter,tp,0,LOCATION_MZONE,1,nil) end
local sg=Duel.GetMatchingGroup(c11373345.filter,tp,0,LOCATION_MZONE,c) local sg=Duel.GetMatchingGroup(c11373345.filter,tp,0,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,sg,sg:GetCount(),0,0)
end end
function c11373345.activate(e,tp,eg,ep,ev,re,r,rp) function c11373345.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=Duel.GetMatchingGroup(c11373345.filter,tp,0,LOCATION_MZONE,e:GetHandler()) local sg=Duel.GetMatchingGroup(c11373345.filter,tp,0,LOCATION_MZONE,nil)
Duel.Destroy(sg,REASON_EFFECT) Duel.Destroy(sg,REASON_EFFECT)
end end
...@@ -31,7 +31,7 @@ end ...@@ -31,7 +31,7 @@ end
function c11390349.filter(c) function c11390349.filter(c)
return c:IsFaceup() and c:GetDefence()==0 and c:IsControlerCanBeChanged() return c:IsFaceup() and c:GetDefence()==0 and c:IsControlerCanBeChanged()
end end
function c11390349.ctltg(e,tp,eg,ep,ev,re,r,rp,chk) function c11390349.ctltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c11390349.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c11390349.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c11390349.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c11390349.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
......
...@@ -19,7 +19,7 @@ function c11508758.filter(c) ...@@ -19,7 +19,7 @@ function c11508758.filter(c)
return c:IsPosition(POS_FACEUP_ATTACK) and c:IsControlerCanBeChanged() return c:IsPosition(POS_FACEUP_ATTACK) and c:IsControlerCanBeChanged()
end end
function c11508758.ctltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c11508758.ctltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc~=Duel.GetAttackTarget() and c87910978.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc~=Duel.GetAttackTarget() and c11508758.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c11508758.filter,tp,0,LOCATION_MZONE,1,Duel.GetAttackTarget()) end if chk==0 then return Duel.IsExistingTarget(c11508758.filter,tp,0,LOCATION_MZONE,1,Duel.GetAttackTarget()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
local g=Duel.SelectTarget(tp,c11508758.filter,tp,0,LOCATION_MZONE,1,1,Duel.GetAttackTarget()) local g=Duel.SelectTarget(tp,c11508758.filter,tp,0,LOCATION_MZONE,1,1,Duel.GetAttackTarget())
......
--コアキメイル·ドラゴ --コアキメイル·ドラゴ
function c12435193.initial_effect(c) function c12435193.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -22,7 +22,7 @@ end ...@@ -22,7 +22,7 @@ end
function c13604200.target(e,tp,eg,ep,ev,re,r,rp,chk) function c13604200.target(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(c13604200.filter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c13604200.filter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_DECK+LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_HAND)
end end
function c13604200.activate(e,tp,eg,ep,ev,re,r,rp) function c13604200.activate(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
......
...@@ -11,7 +11,7 @@ function c14089428.initial_effect(c) ...@@ -11,7 +11,7 @@ function c14089428.initial_effect(c)
end end
function c14089428.target(e,tp,eg,ep,ev,re,r,rp,chk) function c14089428.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsRelateToBattle() end if chk==0 then return e:GetHandler():IsRelateToBattle() end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
end end
function c14089428.operation(e,tp,eg,ep,ev,re,r,rp) function c14089428.operation(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -72,7 +72,7 @@ end ...@@ -72,7 +72,7 @@ end
function c15187079.filter(c) function c15187079.filter(c)
return c:IsFaceup() and c:IsAbleToChangeControler() return c:IsFaceup() and c:IsAbleToChangeControler()
end end
function c15187079.cttg(e,tp,eg,ep,ev,re,r,rp,chk) function c15187079.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c15187079.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c15187079.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c15187079.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c15187079.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
......
...@@ -29,7 +29,7 @@ function c15471265.filter(c) ...@@ -29,7 +29,7 @@ function c15471265.filter(c)
return c:IsFaceup() and c:IsCode(57116033) return c:IsFaceup() and c:IsCode(57116033)
end end
function c15471265.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c15471265.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:isLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c15471265.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c15471265.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c15471265.filter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c15471265.filter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,c15471265.filter,tp,LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectTarget(tp,c15471265.filter,tp,LOCATION_MZONE,0,1,1,nil)
......
...@@ -65,7 +65,7 @@ function c16886617.desfilter(c) ...@@ -65,7 +65,7 @@ function c16886617.desfilter(c)
return c:IsFaceup() and c:IsDestructable() return c:IsFaceup() and c:IsDestructable()
end end
function c16886617.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c16886617.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocaion(LOCATION_MZONE) and chkc:IsControler(1-tp) and c16886617.desfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c16886617.desfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c16886617.desfilter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c16886617.desfilter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,c16886617.desfilter,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,c16886617.desfilter,tp,0,LOCATION_MZONE,1,1,nil)
......
...@@ -19,7 +19,7 @@ function c17021204.check(tp) ...@@ -19,7 +19,7 @@ function c17021204.check(tp)
end end
function c17021204.spcon(e,c) function c17021204.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c17021204.spfilter,c:GetControler(),0,LOCATION_MZONE,2,nil) and Duel.IsExistingMatchingCard(c17021204.spfilter,c:GetControler(),0,LOCATION_MZONE,2,nil)
and c17021204.check(c:GetControler()) and c17021204.check(c:GetControler())
end end
......
...@@ -22,7 +22,7 @@ function c18816758.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -22,7 +22,7 @@ function c18816758.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
end end
function c18816758.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c18816758.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:InOnField() and chkc:IsDestructable() end if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and chkc:IsDestructable() end
if chk==0 then return Duel.IsExistingTarget(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,1,nil)
......
...@@ -13,5 +13,5 @@ function c19204398.initial_effect(c) ...@@ -13,5 +13,5 @@ function c19204398.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c19204398.val(e,c) function c19204398.val(e,c)
return Duel.GetMatchingGroupCount(Card.IsAttribute,tp,0,LOCATION_GRAVE,nil,ATTRIBUTE_LIGHT)*200 return Duel.GetMatchingGroupCount(Card.IsAttribute,c:GetControler(),0,LOCATION_GRAVE,nil,ATTRIBUTE_LIGHT)*200
end end
--コアキメイル·パワーハンド --コアキメイル·パワーハンド
function c19642889.initial_effect(c) function c19642889.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
...@@ -10,12 +10,12 @@ function c19642889.initial_effect(c) ...@@ -10,12 +10,12 @@ function c19642889.initial_effect(c)
e1:SetOperation(c19642889.ccost) e1:SetOperation(c19642889.ccost)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--negate --negate
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:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetOperation(c19642889.negop1) e2:SetOperation(c19642889.negop1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_BE_BATTLE_TARGET) e3:SetCode(EVENT_BE_BATTLE_TARGET)
e3:SetOperation(c19642889.negop2) e3:SetOperation(c19642889.negop2)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
function c19980975.initial_effect(c) function c19980975.initial_effect(c)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY_CATEGORY_DRAW) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c19980975.target) e1:SetTarget(c19980975.target)
......
...@@ -17,7 +17,7 @@ function c20721759.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -17,7 +17,7 @@ function c20721759.condition(e,tp,eg,ep,ev,re,r,rp)
and ec:IsReason(REASON_DESTROY) and ec:IsReason(REASON_EFFECT) and ec:IsReason(REASON_DESTROY) and ec:IsReason(REASON_EFFECT)
end end
function c20721759.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c20721759.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsLopcation(LOCATION_MZONE) end if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) end
if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_MZONE,1,1,nil)
......
...@@ -31,7 +31,7 @@ function c21296383.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -31,7 +31,7 @@ function c21296383.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local g=Duel.SelectMatchingCard(tp,c21296383.cfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),lv) local g=Duel.SelectMatchingCard(tp,c21296383.cfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),lv)
g:AddCard(e:GetHandler()) g:AddCard(e:GetHandler())
Duel.Remove(g,POS_FACEUP,REASON_COST) Duel.Remove(g,POS_FACEUP,REASON_COST)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPECIAL_SUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
e:SetLevel(elv+g:GetFirst():GetLevel()) e:SetLevel(elv+g:GetFirst():GetLevel())
local g=sg:FilterSelect(tp,Card.IsLevelBelow,1,1,nil,elv+g:GetFirst():GetLevel()) local g=sg:FilterSelect(tp,Card.IsLevelBelow,1,1,nil,elv+g:GetFirst():GetLevel())
Duel.SetTargetCard(g) Duel.SetTargetCard(g)
......
...@@ -22,7 +22,7 @@ function c22046459.initial_effect(c) ...@@ -22,7 +22,7 @@ function c22046459.initial_effect(c)
e3:SetValue(1) e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c22046459.target(e,tp,eg,ep,ev,re,r,rp,chk) function c22046459.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:IsFaceup() end if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
......
--エーリアン·マザー --エーリアン·マザー
function c24104865.initial_effect(c) function c24104865.initial_effect(c)
--check --check
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_BATTLE_END) e1:SetCode(EVENT_BATTLE_END)
...@@ -11,7 +11,7 @@ function c24104865.initial_effect(c) ...@@ -11,7 +11,7 @@ function c24104865.initial_effect(c)
e1:SetLabelObject(g) e1:SetLabelObject(g)
g:KeepAlive() g:KeepAlive()
--special summon --special summon
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)
e2:SetCode(EVENT_BATTLE_DESTROYING) e2:SetCode(EVENT_BATTLE_DESTROYING)
...@@ -32,7 +32,7 @@ function c24104865.initial_effect(c) ...@@ -32,7 +32,7 @@ function c24104865.initial_effect(c)
e3:SetLabelObject(e2) e3:SetLabelObject(e2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--destroy --destroy
e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_LEAVE_FIELD) e4:SetCode(EVENT_LEAVE_FIELD)
e4:SetOperation(c24104865.desop) e4:SetOperation(c24104865.desop)
......
...@@ -36,7 +36,7 @@ function c24221808.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -36,7 +36,7 @@ function c24221808.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c24221808.rmfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c24221808.rmfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c24221808.rmfilter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c24221808.rmfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
Duel.SelectTarget(tp,c24221808.rmfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectTarget(tp,c24221808.rmfilter,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
end end
function c24221808.rmop(e,tp,eg,ep,ev,re,r,rp) function c24221808.rmop(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -16,7 +16,7 @@ function c24621460.initial_effect(c) ...@@ -16,7 +16,7 @@ function c24621460.initial_effect(c)
--pos change --pos change
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(24621460,0)) e3:SetDescription(aux.Stringid(24621460,0))
e3:SetCategory(CATEGIORY_POSITION) e3:SetCategory(CATEGORY_POSITION)
e3:SetType(EFFECT_TYPE_TRIGGER_F+EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_TRIGGER_F+EFFECT_TYPE_SINGLE)
e3:SetCode(EVENT_BE_BATTLE_TARGET) e3:SetCode(EVENT_BE_BATTLE_TARGET)
e3:SetOperation(c24621460.posop) e3:SetOperation(c24621460.posop)
......
...@@ -19,7 +19,7 @@ end ...@@ -19,7 +19,7 @@ end
function c24725825.filter(c) function c24725825.filter(c)
return c:IsFaceup() and c:IsRace(RACE_MACHINE+RACE_DRAGON) and c:IsControlerCanBeChanged() return c:IsFaceup() and c:IsRace(RACE_MACHINE+RACE_DRAGON) and c:IsControlerCanBeChanged()
end end
function c24725825.target(e,tp,eg,ep,ev,re,r,rp,chk) function c24725825.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c24725825.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c24725825.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c24725825.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c24725825.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
......
...@@ -119,7 +119,7 @@ function c24857466.descon(e,tp,eg,ep,ev,re,r,rp) ...@@ -119,7 +119,7 @@ function c24857466.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1 return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
and bit.band(e:GetLabelObject():GetLabel(),0x2)~=0 and bit.band(e:GetLabelObject():GetLabel(),0x2)~=0
end end
function c24857466.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c24857466.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and chkc:IsDestructable() end if chkc then return chkc:IsControler(1-tp) and chkc:IsOnField() and chkc:IsDestructable() end
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
...@@ -139,7 +139,7 @@ end ...@@ -139,7 +139,7 @@ end
function c24857466.spfilter(c,e,tp) function c24857466.spfilter(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c24857466.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c24857466.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c24857466.spfilter(chkc,e,tp) end if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c24857466.spfilter(chkc,e,tp) end
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
......
...@@ -18,7 +18,7 @@ function c25373678.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -18,7 +18,7 @@ function c25373678.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsLocation(LOCATION_GRAVE) and e:GetHandler():IsReason(REASON_BATTLE) return e:GetHandler():IsLocation(LOCATION_GRAVE) and e:GetHandler():IsReason(REASON_BATTLE)
end end
function c25373678.filter(c,e,tp) function c25373678.filter(c,e,tp)
return c:IsLavelBelow(4) and c:IsRace(RACE_WINDBEAST) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsLevelBelow(4) and c:IsRace(RACE_WINDBEAST) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c25373678.target(e,tp,eg,ep,ev,re,r,rp,chk) function c25373678.target(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
......
...@@ -28,7 +28,7 @@ function c25774450.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -28,7 +28,7 @@ function c25774450.activate(e,tp,eg,ep,ev,re,r,rp)
local cc=cg:GetFirst() local cc=cg:GetFirst()
if dc:IsRelateToEffect(e) and cc:IsRelateToEffect(e) then if dc:IsRelateToEffect(e) and cc:IsRelateToEffect(e) then
Duel.Destroy(dc,REASON_EFFECT) Duel.Destroy(dc,REASON_EFFECT)
if not Duel.GetControl(cc,1-tp,0,0) and not tc:IsImmuneToEffect(e) and tc:IsAbleToChangeControler() then if not Duel.GetControl(cc,1-tp,0,0) and not cc:IsImmuneToEffect(e) and cc:IsAbleToChangeControler() then
Duel.Destroy(cc,REASON_EFFECT) Duel.Destroy(cc,REASON_EFFECT)
end end
end end
......
...@@ -21,7 +21,7 @@ function c26257572.initial_effect(c) ...@@ -21,7 +21,7 @@ function c26257572.initial_effect(c)
e3:SetTarget(c26257572.target) e3:SetTarget(c26257572.target)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e3:Clone()
e4:SetCode(EFFECT_DISABLED) e4:SetCode(EFFECT_DISABLE)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e3:Clone() local e5=e3:Clone()
e5:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE) e5:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
......
...@@ -15,7 +15,7 @@ function c30494314.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -15,7 +15,7 @@ function c30494314.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_GRAVE) and re:GetHandler():IsRace(RACE_ZOMBIE) return e:GetHandler():IsPreviousLocation(LOCATION_GRAVE) and re:GetHandler():IsRace(RACE_ZOMBIE)
end end
function c30494314.filter(c) function c30494314.filter(c)
return c:IsFaceup() and c:IsRace(RACE_ZOMBIE) and not c:IsType(XYZ) return c:IsFaceup() and c:IsRace(RACE_ZOMBIE) and not c:IsType(TYPE_XYZ)
end end
function c30494314.target(e,tp,eg,ep,ev,re,r,rp,chk) function c30494314.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckRemoveOverlayCard(tp,1,1,1,REASON_EFFECT) if chk==0 then return Duel.CheckRemoveOverlayCard(tp,1,1,1,REASON_EFFECT)
......
--コアキメイル·ウルナイト --コアキメイル·ウルナイト
function c30936186.initial_effect(c) function c30936186.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -35,7 +35,7 @@ end ...@@ -35,7 +35,7 @@ end
function c313513.target(e,tp,eg,ep,ev,re,r,rp,chk) function c313513.target(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(c313513.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c313513.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_HAND+LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
end end
function c313513.dfilter(c) function c313513.dfilter(c)
return c:IsFacedown() or c:GetCode()~=83104731 return c:IsFacedown() or c:GetCode()~=83104731
......
...@@ -19,7 +19,7 @@ function c3204467.vfilter(c) ...@@ -19,7 +19,7 @@ function c3204467.vfilter(c)
return c:IsSetCard(0x3e) and c:IsRace(RACE_REPTILE) return c:IsSetCard(0x3e) and c:IsRace(RACE_REPTILE)
end end
function c3204467.defval(e,c) function c3204467.defval(e,c)
return Duel.GetMatchingGroupCount(c3204467.vfilter,tp,LOCATION_GRAVE,0,nil)*100 return Duel.GetMatchingGroupCount(c3204467.vfilter,c:GetControler(),LOCATION_GRAVE,0,nil)*100
end end
function c3204467.regop(e,tp,eg,ep,ev,re,r,rp) function c3204467.regop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
--コアキメイル·クルセイダー --コアキメイル·クルセイダー
function c32314730.initial_effect(c) function c32314730.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -39,9 +39,9 @@ function c32543380.spfilter(c) ...@@ -39,9 +39,9 @@ function c32543380.spfilter(c)
end end
function c32543380.spcon(e,c) function c32543380.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local p=c:GetControler() local tp=c:GetControler()
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c32543380.spfilter,p,LOCATION_ONFIELD,0,1,nil) and Duel.IsExistingMatchingCard(c32543380.spfilter,tp,LOCATION_ONFIELD,0,1,nil)
end end
function c32543380.spop(e,tp,eg,ep,ev,re,r,rp,c) function c32543380.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
......
...@@ -7,14 +7,14 @@ function c32752319.initial_effect(c) ...@@ -7,14 +7,14 @@ function c32752319.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetOperation(c32752319.atkcon) e1:SetCondition(c32752319.atkcon)
e1:SetOperation(c32752319.atkop) e1:SetOperation(c32752319.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
c32752319.material_count=1 c32752319.material_count=1
c32752319.material={7602840} c32752319.material={7602840}
function c32752319.atkcon(e,tp,eg,ep,ev,re,r,rp) function c32752319.atkcon(e,tp,eg,ep,ev,re,r,rp)
return bit.band(e:GetHandler():GetSumonType(),SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION return bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
end end
function c32752319.atkop(e,tp,eg,ep,ev,re,r,rp) function c32752319.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -15,11 +15,11 @@ function c33970665.filter(c,e,tp) ...@@ -15,11 +15,11 @@ function c33970665.filter(c,e,tp)
or c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp)) or c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp))
end end
function c33970665.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c33970665.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c82012319.filter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c33970665.filter(chkc,e,tp) end
if chk==0 then return (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 or Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0) if chk==0 then return (Duel.GetLocationCount(tp,LOCATION_MZONE)>0 or Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0)
and Duel.IsExistingTarget(c82012319.filter,tp,LOCATION_GRAVE,0,3,nil,e,tp) end and Duel.IsExistingTarget(c33970665.filter,tp,LOCATION_GRAVE,0,3,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(33970665,2)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(33970665,2))
local g=Duel.SelectTarget(tp,c82012319.filter,tp,LOCATION_GRAVE,0,3,3,nil,e,tp) local g=Duel.SelectTarget(tp,c33970665.filter,tp,LOCATION_GRAVE,0,3,3,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end end
function c33970665.activate(e,tp,eg,ep,ev,re,r,rp) function c33970665.activate(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -18,7 +18,7 @@ function c35262428.filter(c,e,tp) ...@@ -18,7 +18,7 @@ function c35262428.filter(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c35262428.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c35262428.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and c96765646.filter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(1-tp) and c35262428.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c35262428.filter,tp,0,LOCATION_GRAVE,1,nil,e,tp) end and Duel.IsExistingTarget(c35262428.filter,tp,0,LOCATION_GRAVE,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
......
...@@ -40,7 +40,7 @@ function c35514096.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -40,7 +40,7 @@ function c35514096.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
elseif op==3 then elseif op==3 then
e:SetProperty(0) e:SetProperty(0)
e:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN) e:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
else else
e:SetProperty(0) e:SetProperty(0)
......
...@@ -22,7 +22,7 @@ end ...@@ -22,7 +22,7 @@ end
function c36935434.target(e,tp,eg,ep,ev,re,r,rp,chk) function c36935434.target(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(c36935434.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c36935434.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end end
function c36935434.operation(e,tp,eg,ep,ev,re,r,rp) function c36935434.operation(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
......
...@@ -13,7 +13,7 @@ end ...@@ -13,7 +13,7 @@ end
function c37620434.filter(c) function c37620434.filter(c)
return c:IsFaceup() and c:IsRace(RACE_FIEND) and c:IsControlerCanBeChanged() return c:IsFaceup() and c:IsRace(RACE_FIEND) and c:IsControlerCanBeChanged()
end end
function c37620434.target(e,tp,eg,ep,ev,re,r,rp,chk) function c37620434.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:GetControler()~=tp and c37620434.filter(chkc) end if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:GetControler()~=tp and c37620434.filter(chkc) end
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
......
...@@ -21,7 +21,7 @@ end ...@@ -21,7 +21,7 @@ end
function c38973775.target(e,tp,eg,ep,ev,re,r,rp,chk) function c38973775.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,38973775)==0 if chk==0 then return Duel.GetFlagEffect(tp,38973775)==0
and Duel.IsExistingMatchingCard(c38973775.filter,tp,LOCATION_DECK,0,1,nil) end and Duel.IsExistingMatchingCard(c38973775.filter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
Duel.RegisterFlagEffect(tp,38973775,RESET_PHASE+PHASE_END,0,1) Duel.RegisterFlagEffect(tp,38973775,RESET_PHASE+PHASE_END,0,1)
end end
function c38973775.operation(e,tp,eg,ep,ev,re,r,rp) function c38973775.operation(e,tp,eg,ep,ev,re,r,rp)
......
--コアキメイル·ビートル --コアキメイル·ビートル
function c39037517.initial_effect(c) function c39037517.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -22,7 +22,7 @@ function c39507162.atkcon(e) ...@@ -22,7 +22,7 @@ function c39507162.atkcon(e)
return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_HAND,0)<=1 return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_HAND,0)<=1
end end
function c39507162.discon(e) function c39507162.discon(e)
return not Duel.IsExistingMatchingCard(nil,tp,LOCATION_MZONE,0,1,e:GetHandler()) return not Duel.IsExistingMatchingCard(nil,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler())
end end
function c39507162.disop(e,tp,eg,ep,ev,re,r,rp) function c39507162.disop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -21,7 +21,7 @@ function c39905966.filter(c) ...@@ -21,7 +21,7 @@ function c39905966.filter(c)
return c:IsSetCard(0x3a) and c:IsType(TYPE_RITUAL) and c:IsAbleToHand() return c:IsSetCard(0x3a) and c:IsType(TYPE_RITUAL) and c:IsAbleToHand()
end end
function c39905966.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c39905966.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return c:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c39905966.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c39905966.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c39905966.filter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c39905966.filter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectTarget(tp,c39905966.filter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectTarget(tp,c39905966.filter,tp,LOCATION_GRAVE,0,1,1,nil)
......
...@@ -39,7 +39,7 @@ function c40732515.spcon(e,c) ...@@ -39,7 +39,7 @@ function c40732515.spcon(e,c)
if c==nil then return true end if c==nil then return true end
local fd=Duel.GetFieldCard(c:GetControler(),LOCATION_SZONE,5) local fd=Duel.GetFieldCard(c:GetControler(),LOCATION_SZONE,5)
return fd and fd:IsCode(39910367) and fd:IsCanRemoveCounter(c:GetControler(),0x3001,6,REASON_COST) return fd and fd:IsCode(39910367) and fd:IsCanRemoveCounter(c:GetControler(),0x3001,6,REASON_COST)
and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
end end
function c40732515.spop(e,tp,eg,ep,ev,re,r,rp,c) function c40732515.spop(e,tp,eg,ep,ev,re,r,rp,c)
local fd=Duel.GetFieldCard(tp,LOCATION_SZONE,5) local fd=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
......
...@@ -51,7 +51,7 @@ function c40830387.descon(e,tp,eg,ep,ev,re,r,rp) ...@@ -51,7 +51,7 @@ function c40830387.descon(e,tp,eg,ep,ev,re,r,rp)
local ec=e:GetHandler():GetEquipTarget() local ec=e:GetHandler():GetEquipTarget()
local dt=nil local dt=nil
if ec==Duel.GetAttacker() then dt=Duel.GetAttackTarget() if ec==Duel.GetAttacker() then dt=Duel.GetAttackTarget()
elseif ec==Duel.GetAttackTarget() then di=Duel.GetAttacker() end elseif ec==Duel.GetAttackTarget() then dt=Duel.GetAttacker() end
e:SetLabelObject(dt) e:SetLabelObject(dt)
return dt and dt:IsRelateToBattle() return dt and dt:IsRelateToBattle()
end end
......
...@@ -62,7 +62,7 @@ function c41181774.sdcon(e) ...@@ -62,7 +62,7 @@ function c41181774.sdcon(e)
return ((f1==nil or not f1:IsFaceup()) and (f2==nil or not f2:IsFaceup())) return ((f1==nil or not f1:IsFaceup()) and (f2==nil or not f2:IsFaceup()))
or Duel.IsExistingMatchingCard(c41181774.exfilter,0,LOCATION_MZONE,LOCATION_MZONE,1,nil,c:GetFieldID()) or Duel.IsExistingMatchingCard(c41181774.exfilter,0,LOCATION_MZONE,LOCATION_MZONE,1,nil,c:GetFieldID())
end end
function c41181774.hdtg(e,tp,eg,ep,ev,re,r,rp,chk) function c41181774.hdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsAbleToDeck() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsAbleToDeck() end
if chk==0 then return true end if chk==0 then return true end
local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_HAND) local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)
...@@ -78,7 +78,7 @@ function c41181774.hdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -78,7 +78,7 @@ function c41181774.hdop(e,tp,eg,ep,ev,re,r,rp)
local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA) local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
if ct==0 then return end if ct==0 then return end
local dg=Duel.GetFieldGroup(tp,0,LOCATION_HAND):RandomSelect(tp,ct) local dg=Duel.GetFieldGroup(tp,0,LOCATION_HAND):RandomSelect(tp,ct)
local dt=Duel.SendtoGrave(dg,REASON_EFFECT_REASON_DISCARD) local dt=Duel.SendtoGrave(dg,REASON_EFFECT+REASON_DISCARD)
local c=e:GetHandler() local c=e:GetHandler()
if dt~=0 and c:IsRelateToEffect(e) and c:IsFaceup() then if dt~=0 and c:IsRelateToEffect(e) and c:IsFaceup() then
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
......
--コアキメイル·グラヴィローズ --コアキメイル·グラヴィローズ
function c41201555.initial_effect(c) function c41201555.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c41475424.filter(c) function c41475424.filter(c)
return c:IsFaceup() and c:IsSetCard(0x13) and c:IsDestructable() return c:IsFaceup() and c:IsSetCard(0x13) and c:IsDestructable()
end end
function c41475424.target(e,tp,eg,ep,ev,re,r,rp,chk) function c41475424.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(c41475424.filter,tp,LOCATION_MZONE,0,1,nil) if chk==0 then return Duel.IsExistingTarget(c41475424.filter,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsExistingTarget(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end and Duel.IsExistingTarget(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end
......
...@@ -16,7 +16,7 @@ function c41587307.initial_effect(c) ...@@ -16,7 +16,7 @@ function c41587307.initial_effect(c)
e2:SetValue(1) e2:SetValue(1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c41587307.target(e,tp,eg,ep,ev,re,r,rp,chk) function c41587307.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
......
...@@ -12,7 +12,7 @@ end ...@@ -12,7 +12,7 @@ end
function c42303365.filter(c) function c42303365.filter(c)
return c:IsFaceup() and c:IsControlerCanBeChanged() and c:GetAttack()==0 return c:IsFaceup() and c:IsControlerCanBeChanged() and c:GetAttack()==0
end end
function c42303365.ctltg(e,tp,eg,ep,ev,re,r,rp,chk) function c42303365.ctltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c42303365.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c42303365.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c42303365.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c42303365.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
......
...@@ -10,7 +10,7 @@ function c42793609.initial_effect(c) ...@@ -10,7 +10,7 @@ function c42793609.initial_effect(c)
e1:SetOperation(c42793609.operation) e1:SetOperation(c42793609.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c42793609.target(e,tp,eg,ep,ev,re,r,rp,chk) function c42793609.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end and Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
......
...@@ -16,7 +16,7 @@ function c43513897.filter(c) ...@@ -16,7 +16,7 @@ function c43513897.filter(c)
return c:IsFaceup() and c:IsSetCard(0x53) return c:IsFaceup() and c:IsSetCard(0x53)
end end
function c43513897.atkop(e,tp,eg,ep,ev,re,r,rp) function c43513897.atkop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c26329679.filter,tp,LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(c43513897.filter,tp,LOCATION_MZONE,0,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
......
...@@ -84,7 +84,7 @@ function c44505297.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -84,7 +84,7 @@ function c44505297.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g2=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,1,nil) local g2=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,1,nil)
g1:Merge(g2) g1:Merge(g2)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,2,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g1,2,0,0)
end end
function c44505297.tgfilter(c,e) function c44505297.tgfilter(c,e)
return c:IsFaceup() and c:IsRelateToEffect(e) return c:IsFaceup() and c:IsRelateToEffect(e)
......
--コアキメイル·ガーディアン --コアキメイル·ガーディアン
function c45041488.initial_effect(c) function c45041488.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -21,7 +21,7 @@ function c45305419.filter(c,e,tp) ...@@ -21,7 +21,7 @@ function c45305419.filter(c,e,tp)
and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,2,c,c:GetCode()) and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,2,c,c:GetCode())
end end
function c45305419.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c45305419.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:GetLocation()==LOCATION_GRAVE and chkc:GetControler()==tp and c45305419.filter(c,e,tp) end if chkc then return chkc:GetLocation()==LOCATION_GRAVE and chkc:GetControler()==tp and c45305419.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c45305419.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingTarget(c45305419.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
......
...@@ -24,7 +24,7 @@ function c46159582.thfilter(c) ...@@ -24,7 +24,7 @@ function c46159582.thfilter(c)
return c:IsSetCard(0x3a) and bit.band(c:GetType(),0x81)==0x81 and c:IsAbleToHand() return c:IsSetCard(0x3a) and bit.band(c:GetType(),0x81)==0x81 and c:IsAbleToHand()
end end
function c46159582.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c46159582.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return c:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c46159582.thfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c46159582.thfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c46159582.thfilter,tp,LOCATION_GRAVE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c46159582.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectTarget(tp,c46159582.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) local g=Duel.SelectTarget(tp,c46159582.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
......
...@@ -14,8 +14,8 @@ function c46291010.filter(c,lv) ...@@ -14,8 +14,8 @@ function c46291010.filter(c,lv)
return c:IsRace(RACE_PSYCHO) and c:GetLevel()~=lv and c:IsAbleToRemove() return c:IsRace(RACE_PSYCHO) and c:GetLevel()~=lv and c:IsAbleToRemove()
end end
function c46291010.rmtg(e,tp,eg,ep,ev,re,r,rp,chk) function c46291010.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c46291010.cfilter,tp,LOCATION_DECK,0,1,nil,e:GetHandler():GetLevel()) end if chk==0 then return Duel.IsExistingMatchingCard(c46291010.filter,tp,LOCATION_DECK,0,1,nil,e:GetHandler():GetLevel()) end
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_DECK)
end end
function c46291010.rmop(e,tp,eg,ep,ev,re,r,rp) function c46291010.rmop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -28,7 +28,7 @@ end ...@@ -28,7 +28,7 @@ end
function c46833854.filter(c) function c46833854.filter(c)
return c:IsDestructable() and c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsDestructable() and c:IsType(TYPE_SPELL+TYPE_TRAP)
end end
function c46833854.tg(e,tp,eg,ep,ev,re,r,rp,chk) function c46833854.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and c46833854.filter(chkc) end if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and c46833854.filter(chkc) end
if chk==0 then return Duel.IsExistingMatchingCard(c46833854.filter,tp,0,LOCATION_ONFIELD,2,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c46833854.filter,tp,0,LOCATION_ONFIELD,2,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
......
...@@ -17,7 +17,7 @@ end ...@@ -17,7 +17,7 @@ end
function c46848859.cfilter(c) function c46848859.cfilter(c)
return c:IsOnField() and c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsOnField() and c:IsType(TYPE_SPELL+TYPE_TRAP)
end end
function c46848859.tgfilter(c,yp) function c46848859.tgfilter(c,tp)
return c:IsOnField() and c:IsControler(tp) and c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsOnField() and c:IsControler(tp) and c:IsType(TYPE_SPELL+TYPE_TRAP)
end end
function c46848859.condition(e,tp,eg,ep,ev,re,r,rp) function c46848859.condition(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -13,7 +13,7 @@ end ...@@ -13,7 +13,7 @@ end
function c48216773.target(e,tp,eg,ep,ev,re,r,rp,chk) function c48216773.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_MZONE,0,1,nil) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_MZONE,0,1,nil)
and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,0,LOCATION_MZONE,1,nil) end and Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,0,LOCATION_MZONE,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,2,PLAYER_ALL,LOCATION_MZONE)
end end
function c48216773.activate(e,tp,eg,ep,ev,re,r,rp) function c48216773.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
......
...@@ -10,5 +10,5 @@ function c49522489.initial_effect(c) ...@@ -10,5 +10,5 @@ function c49522489.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c49522489.val(e,c) function c49522489.val(e,c)
return Duel.GetMatchingGroupCount(Card.IsCode,tp,LOCATION_GRAVE,0,nil,10456559)*300 return Duel.GetMatchingGroupCount(Card.IsCode,c:GetControler(),LOCATION_GRAVE,0,nil,10456559)*300
end end
...@@ -17,7 +17,7 @@ function c49600724.filter1(c,g) ...@@ -17,7 +17,7 @@ function c49600724.filter1(c,g)
return g:IsExists(Card.IsAttribute,1,c,c:GetAttribute()) return g:IsExists(Card.IsAttribute,1,c,c:GetAttribute())
end end
function c49600724.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c49600724.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return c:IsLocation(LOCATION_GRAVE) and c49600724.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c49600724.filter(chkc) end
if chk==0 then if chk==0 then
local g=Duel.GetMatchingGroup(c49600724.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,e) local g=Duel.GetMatchingGroup(c49600724.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,e)
return g:IsExists(c49600724.filter1,1,nil,g) return g:IsExists(c49600724.filter1,1,nil,g)
......
...@@ -40,6 +40,6 @@ function c49633574.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,6 +40,6 @@ function c49633574.op(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c49633574.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c49633574.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,flse,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
end end
--コアキメイル·サンドマン --コアキメイル·サンドマン
function c49680980.initial_effect(c) function c49680980.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -19,7 +19,7 @@ end ...@@ -19,7 +19,7 @@ end
function c51119924.filter(c) function c51119924.filter(c)
return c:IsFaceup() and c:IsRace(RACE_WARRIOR+RACE_SPELLCASTER) and c:IsControlerCanBeChanged() return c:IsFaceup() and c:IsRace(RACE_WARRIOR+RACE_SPELLCASTER) and c:IsControlerCanBeChanged()
end end
function c51119924.target(e,tp,eg,ep,ev,re,r,rp,chk) function c51119924.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c51119924.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c51119924.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c51119924.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c51119924.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
......
...@@ -15,7 +15,7 @@ end ...@@ -15,7 +15,7 @@ end
function c51365514.target(e,tp,eg,ep,ev,re,r,rp,chk) function c51365514.target(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(c51365514.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c51365514.filter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end end
function c51365514.activate(e,tp,eg,ep,ev,re,r,rp) function c51365514.activate(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
......
...@@ -31,7 +31,7 @@ function c51670553.filter(c) ...@@ -31,7 +31,7 @@ function c51670553.filter(c)
return c:GetEquipCount()~=0 and c:GetEquipGroup():IsExists(Card.IsSetCard,1,nil,0x60) return c:GetEquipCount()~=0 and c:GetEquipGroup():IsExists(Card.IsSetCard,1,nil,0x60)
end end
function c51670553.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c51670553.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return c:IsLocation(LOCATION_MZONE) and c51670553.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c51670553.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c51670553.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c51670553.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
e:GetHandler():SetTurnCounter(0) e:GetHandler():SetTurnCounter(0)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
......
...@@ -26,15 +26,15 @@ function c52558805.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -26,15 +26,15 @@ function c52558805.atkcost(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 c52558805.filter(c) function c52558805.filter(c,tp)
return c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT) return c:CheckRemoveOverlayCard(tp,1,REASON_EFFECT)
end end
function c52558805.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c52558805.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c52558805.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c52558805.filter(chkc,tp) end
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_EFFECT) if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_EFFECT)
and Duel.IsExistingTarget(c52558805.filter,tp,0,LOCATION_MZONE,1,nil) end and Duel.IsExistingTarget(c52558805.filter,tp,0,LOCATION_MZONE,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c52558805.filter,tp,0,LOCATION_MZONE,1,1,nil) Duel.SelectTarget(tp,c52558805.filter,tp,0,LOCATION_MZONE,1,1,nil,tp)
end end
function c52558805.atkfilter(c) function c52558805.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0x6d) return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsSetCard(0x6d)
......
...@@ -21,7 +21,7 @@ end ...@@ -21,7 +21,7 @@ end
function c52860176.target(e,tp,eg,ep,ev,re,r,rp,chk) function c52860176.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
and Duel.IsExistingMatchingCard(c52860176.filter,tp,0,LOCATION_MZONE,1,nil) end and Duel.IsExistingMatchingCard(c52860176.filter,tp,0,LOCATION_MZONE,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_CONTROL,nil,1,1-tp,LOCATION_MZONE)
end end
function c52860176.operation(e,tp,eg,ep,ev,re,r,rp) function c52860176.operation(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
......
...@@ -13,7 +13,7 @@ function c53257892.initial_effect(c) ...@@ -13,7 +13,7 @@ function c53257892.initial_effect(c)
e1:SetOperation(c53257892.operation) e1:SetOperation(c53257892.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c53257892.filter(c,e,sp) function c53257892.filter(c,e,tp)
return c:IsRace(RACE_INSECT+RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and not c:IsHasEffect(EFFECT_NECRO_VALLEY) return c:IsRace(RACE_INSECT+RACE_PLANT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
end end
function c53257892.target(e,tp,eg,ep,ev,re,r,rp,chk) function c53257892.target(e,tp,eg,ep,ev,re,r,rp,chk)
......
...@@ -15,5 +15,5 @@ end ...@@ -15,5 +15,5 @@ end
function c53944920.ntcon(e,c) function c53944920.ntcon(e,c)
if c==nil then return true end if c==nil then return true end
return c:GetLevel()>4 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 return c:GetLevel()>4 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c53944920.ntfilter,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(c53944920.ntfilter,c:GetControler(),LOCATION_MZONE,0,1,nil)
end end
...@@ -41,7 +41,7 @@ function c54289683.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -41,7 +41,7 @@ function c54289683.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
elseif op==2 then elseif op==2 then
e:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN) e:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
else else
e:SetCategory(CATEGORY_ATKCHANGE) e:SetCategory(CATEGORY_ATKCHANGE)
......
--コアキメイル·アイス --コアキメイル·アイス
function c54520292.initial_effect(c) function c54520292.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -24,7 +24,7 @@ end ...@@ -24,7 +24,7 @@ end
function c54913680.target(e,tp,eg,ep,ev,re,r,rp,chk) function c54913680.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-2 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-2
and Duel.IsExistingTarget(c54913680.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end and Duel.IsExistingTarget(c54913680.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c54913680.activate(e,tp,eg,ep,ev,re,r,rp) function c54913680.activate(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
......
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c55063681.filter(c,ec) function c55063681.filter(c,ec)
return c:IsFaceup() and ((ec==c and c:GetFlagEffect(55063681)==0) or (ec~=c and not ec:IsHasCardTarget(c))) return c:IsFaceup() and ((ec==c and c:GetFlagEffect(55063681)==0) or (ec~=c and not ec:IsHasCardTarget(c)))
end end
function c55063681.target(e,tp,eg,ep,ev,re,r,rp,chk) function c55063681.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c55063681.filter(chkc,e:GetHandler()) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c55063681.filter(chkc,e:GetHandler()) end
if chk==0 then return Duel.IsExistingTarget(c55063681.filter,tp,LOCATION_MZONE,0,1,nil,e:GetHandler()) end if chk==0 then return Duel.IsExistingTarget(c55063681.filter,tp,LOCATION_MZONE,0,1,nil,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
......
...@@ -19,7 +19,7 @@ function c55099248.filter(c,e,tp) ...@@ -19,7 +19,7 @@ function c55099248.filter(c,e,tp)
return c:IsFaceup() and c:IsLocation(LOCATION_MZONE) and c:IsCanBeEffectTarget(e) and c:GetSummonPlayer()~=tp return c:IsFaceup() and c:IsLocation(LOCATION_MZONE) and c:IsCanBeEffectTarget(e) and c:GetSummonPlayer()~=tp
end end
function c55099248.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c55099248.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return eg:Contains(chkc) and c55099248.filter(chkc,e,tp) end if chkc then return eg:IsContains(chkc) and c55099248.filter(chkc,e,tp) end
if chk==0 then return e:GetHandler():GetFlagEffect(55099248)==0 and eg:IsExists(c55099248.filter,1,nil,e,tp) end if chk==0 then return e:GetHandler():GetFlagEffect(55099248)==0 and eg:IsExists(c55099248.filter,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=eg:FilterSelect(tp,c55099248.filter,1,1,nil,e,tp) local g=eg:FilterSelect(tp,c55099248.filter,1,1,nil,e,tp)
......
...@@ -17,7 +17,7 @@ end ...@@ -17,7 +17,7 @@ end
function c55673611.filter(c) function c55673611.filter(c)
return c:IsRace(RACE_PSYCHO) and c:IsAbleToRemove() return c:IsRace(RACE_PSYCHO) and c:IsAbleToRemove()
end end
function c55673611.target(e,tp,eg,ep,ev,re,r,rp,chk) function c55673611.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c55673611.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c55673611.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c55673611.filter,tp,LOCATION_GRAVE,0,2,nil) and Duel.IsPlayerCanDraw(tp,2) end if chk==0 then return Duel.IsExistingTarget(c55673611.filter,tp,LOCATION_GRAVE,0,2,nil) and Duel.IsPlayerCanDraw(tp,2) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
function c56051648.initial_effect(c) function c56051648.initial_effect(c)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_ATTACK_ANNOUNCE) e1:SetCode(EVENT_ATTACK_ANNOUNCE)
e1:SetCondition(c56051648.condition) e1:SetCondition(c56051648.condition)
......
...@@ -43,7 +43,7 @@ function c56535497.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -43,7 +43,7 @@ function c56535497.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SelectTarget(tp,c56535497.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,rg:GetFirst()) Duel.SelectTarget(tp,c56535497.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,rg:GetFirst())
e:GetHandler():RegisterFlagEffect(56535497,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1) e:GetHandler():RegisterFlagEffect(56535497,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,0,1)
else else
e:SetLabalObject(nil) e:SetLabelObject(nil)
e:SetProperty(EFFECT_FLAG_DAMAGE_STEP) e:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
end end
end end
......
...@@ -4,7 +4,7 @@ function c57201737.initial_effect(c) ...@@ -4,7 +4,7 @@ function c57201737.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE) e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGETP) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetTarget(c57201737.target) e1:SetTarget(c57201737.target)
e1:SetOperation(c57201737.activate) e1:SetOperation(c57201737.activate)
......
...@@ -26,7 +26,7 @@ function c57384901.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -26,7 +26,7 @@ function c57384901.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
local g1=Duel.SelectTarget(tp,c57384901.filter1,tp,LOCATION_MZONE,0,1,1,nil) local g1=Duel.SelectTarget(tp,c57384901.filter1,tp,LOCATION_MZONE,0,1,1,nil)
g1:Merge(g2) g1:Merge(g2)
Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,2,0,0) Duel.SetOperationInfo(0,CATEGORY_CONTROL,g1,2,0,0)
end end
function c57384901.activate(e,tp,eg,ep,ev,re,r,rp) function c57384901.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
......
...@@ -22,7 +22,7 @@ end ...@@ -22,7 +22,7 @@ end
function c57421866.filter(c) function c57421866.filter(c)
return c:IsFaceup() and c:GetLevel()>=5 return c:IsFaceup() and c:GetLevel()>=5
end end
function c57421866.target(e,tp,eg,ep,ev,re,r,rp,chk) function c57421866.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:GetLevel()>=5 end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:GetLevel()>=5 end
local c=e:GetHandler() local c=e:GetHandler()
if chk==0 then return Duel.IsExistingTarget(c57421866.filter,tp,LOCATION_MZONE,0,1,nil) if chk==0 then return Duel.IsExistingTarget(c57421866.filter,tp,LOCATION_MZONE,0,1,nil)
......
...@@ -40,7 +40,7 @@ function c581014.filter2(c,e,tp) ...@@ -40,7 +40,7 @@ function c581014.filter2(c,e,tp)
return not c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return not c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c581014.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c581014.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c581014.filter1(c) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c581014.filter1(chkc) end
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingTarget(c581014.filter1,tp,LOCATION_GRAVE,0,3,nil) end if chk==0 then return Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingTarget(c581014.filter1,tp,LOCATION_GRAVE,0,3,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectTarget(tp,c581014.filter1,tp,LOCATION_GRAVE,0,3,3,nil) local g=Duel.SelectTarget(tp,c581014.filter1,tp,LOCATION_GRAVE,0,3,3,nil)
...@@ -48,7 +48,7 @@ function c581014.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -48,7 +48,7 @@ function c581014.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end end
function c581014.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c581014.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c581014.filter2(c,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c581014.filter2(chkc,e,tp) end
if chk==0 then return Duel.IsExistingTarget(c581014.filter2,tp,LOCATION_GRAVE,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingTarget(c581014.filter2,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c581014.filter2,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,c581014.filter2,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
......
...@@ -46,7 +46,7 @@ function c58551308.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +46,7 @@ function c58551308.spop(e,tp,eg,ep,ev,re,r,rp)
local spos=0 local spos=0
if tc:IsCanBeSpecialSummoned(e,0,sp,false,false) then spos=spos+POS_FACEUP_ATTACK end if tc:IsCanBeSpecialSummoned(e,0,sp,false,false) then spos=spos+POS_FACEUP_ATTACK end
if tc:IsCanBeSpecialSummoned(e,0,sp,false,false,POS_FACEDOWN) then spos=spos+POS_FACEDOWN_DEFENCE end if tc:IsCanBeSpecialSummoned(e,0,sp,false,false,POS_FACEDOWN) then spos=spos+POS_FACEDOWN_DEFENCE end
if pos~=0 then Duel.SpecialSummonStep(tc,0,sp,sp,false,false,spos) end if spos~=0 then Duel.SpecialSummonStep(tc,0,sp,sp,false,false,spos) end
end end
tc=sg:GetNext() tc=sg:GetNext()
if tc and Duel.GetLocationCount(tc:GetControler(),LOCATION_MZONE)>0 then if tc and Duel.GetLocationCount(tc:GetControler(),LOCATION_MZONE)>0 then
...@@ -54,7 +54,7 @@ function c58551308.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function c58551308.spop(e,tp,eg,ep,ev,re,r,rp)
local spos=0 local spos=0
if tc:IsCanBeSpecialSummoned(e,0,sp,false,false) then spos=spos+POS_FACEUP_ATTACK end if tc:IsCanBeSpecialSummoned(e,0,sp,false,false) then spos=spos+POS_FACEUP_ATTACK end
if tc:IsCanBeSpecialSummoned(e,0,sp,false,false,POS_FACEDOWN) then spos=spos+POS_FACEDOWN_DEFENCE end if tc:IsCanBeSpecialSummoned(e,0,sp,false,false,POS_FACEDOWN) then spos=spos+POS_FACEDOWN_DEFENCE end
if pos~=0 then Duel.SpecialSummonStep(tc,0,sp,sp,false,false,spos) end if spos~=0 then Duel.SpecialSummonStep(tc,0,sp,sp,false,false,spos) end
end end
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
end end
...@@ -14,7 +14,7 @@ end ...@@ -14,7 +14,7 @@ end
function c5914184.actop(e,tp,eg,ep,ev,re,r,rp) function c5914184.actop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) then if c:IsRelateToEffect(e) then
ct=math.floor(ev/1000) local ct=math.floor(ev/1000)
c:AddCounter(0x1a,ct) c:AddCounter(0x1a,ct)
--damage --damage
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
......
...@@ -22,7 +22,7 @@ function c62991886.initial_effect(c) ...@@ -22,7 +22,7 @@ function c62991886.initial_effect(c)
e3:SetValue(1) e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c62991886.target(e,tp,eg,ep,ev,re,r,rp,chk) function c62991886.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:IsFaceup() end if chkc then return chkc:GetLocation()==LOCATION_MZONE and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
......
...@@ -11,7 +11,7 @@ function c63102017.initial_effect(c) ...@@ -11,7 +11,7 @@ function c63102017.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c63102017.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c63102017.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chks:IsDefencePos() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsDefencePos() end
if chk==0 then return Duel.IsExistingTarget(Card.IsDefencePos,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsDefencePos,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
local g=Duel.SelectTarget(tp,Card.IsDefencePos,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsDefencePos,tp,0,LOCATION_MZONE,1,1,nil)
......
...@@ -51,7 +51,7 @@ function c63253763.spcon(e,c) ...@@ -51,7 +51,7 @@ function c63253763.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
and not Duel.IsExistingMatchingCard(c63253763.exfilter,c:GetControler(),LOCATION_ONFIELD,0,1,nil) and not Duel.IsExistingMatchingCard(c63253763.exfilter,c:GetControler(),LOCATION_ONFIELD,0,1,nil)
and Duel.IsCanRemoveCounter(tp,1,1,0xe,2,REASON_COST) and Duel.IsCanRemoveCounter(c:GetControler(),1,1,0xe,2,REASON_COST)
end end
function c63253763.spop(e,tp,eg,ep,ev,re,r,rp,c) function c63253763.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.RemoveCounter(tp,1,1,0xe,2,REASON_COST) Duel.RemoveCounter(tp,1,1,0xe,2,REASON_COST)
......
...@@ -27,7 +27,7 @@ function c63789924.initial_effect(c) ...@@ -27,7 +27,7 @@ function c63789924.initial_effect(c)
e3:SetOperation(c63789924.disop) e3:SetOperation(c63789924.disop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c63789924.target(e,tp,eg,ep,ev,re,r,rp,chk) function c63789924.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
......
...@@ -35,7 +35,7 @@ function c64801562.initial_effect(c) ...@@ -35,7 +35,7 @@ function c64801562.initial_effect(c)
e5:SetCondition(c64801562.descon) e5:SetCondition(c64801562.descon)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c64801562.target(e,tp,eg,ep,ev,re,r,rp,chk) function c64801562.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
......
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
function c65026212.initial_effect(c) function c65026212.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -58,7 +58,7 @@ function c65612454.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -58,7 +58,7 @@ function c65612454.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c65612454.val(e,c) function c65612454.val(e,c)
return Duel.GetMatchingGroupCount(Card.IsRace,tp,LOCATION_GRAVE,0,nil,RACE_THUNDER)*100 return Duel.GetMatchingGroupCount(Card.IsRace,c:GetControler(),LOCATION_GRAVE,0,nil,RACE_THUNDER)*100
end end
function c65612454.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c65612454.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c65612454.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c65612454.filter(chkc) end
......
...@@ -7,7 +7,7 @@ function c6588580.initial_effect(c) ...@@ -7,7 +7,7 @@ function c6588580.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RAMGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetValue(c6588580.val) e1:SetValue(c6588580.val)
c:RegisterEffect(e1) c:RegisterEffect(e1)
......
...@@ -22,7 +22,7 @@ end ...@@ -22,7 +22,7 @@ end
function c66214679.filter(c,e,tp) function c66214679.filter(c,e,tp)
return c:GetLevel()==4 and c:IsAttribute(ATTRIBUTE_DARK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:GetLevel()==4 and c:IsAttribute(ATTRIBUTE_DARK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c66214679.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c66214679.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c66214679.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c66214679.filter(chkc) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsRelateToEffect(e) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsRelateToEffect(e)
and e:GetHandler():IsFaceup() and Duel.IsExistingTarget(c66214679.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and e:GetHandler():IsFaceup() and Duel.IsExistingTarget(c66214679.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
......
...@@ -53,7 +53,7 @@ function c66625883.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -53,7 +53,7 @@ function c66625883.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_POSCHANGE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
end end
function c66625883.op(e,tp,eg,ep,ev,re,r,rp) function c66625883.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
......
--コアキメイル·ウォール --コアキメイル·ウォール
function c66816282.initial_effect(c) function c66816282.initial_effect(c)
--cost --cost
e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCode(EVENT_PHASE+PHASE_END)
......
...@@ -16,5 +16,5 @@ function c67211766.initial_effect(c) ...@@ -16,5 +16,5 @@ function c67211766.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c67211766.ccon(e) function c67211766.ccon(e)
return Duel.IsExistingMatchingCard(Card.IsType,tp,0,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) return Duel.IsExistingMatchingCard(Card.IsType,e:GetHandlerPlayer(),0,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP)
end end
...@@ -23,7 +23,7 @@ function c67675300.initial_effect(c) ...@@ -23,7 +23,7 @@ function c67675300.initial_effect(c)
end end
function c67675300.spcon(e,c) function c67675300.spcon(e,c)
if c==nil then return true end if c==nil then return true end
return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsCanRemoveCounter(c:GetControler(),1,1,0x15,4,REASON_COST) return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and Duel.IsCanRemoveCounter(c:GetControler(),1,1,0x15,4,REASON_COST)
end end
function c67675300.spop(e,tp,eg,ep,ev,re,r,rp,c) function c67675300.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.RemoveCounter(tp,1,1,0x15,4,REASON_RULE) Duel.RemoveCounter(tp,1,1,0x15,4,REASON_RULE)
......
...@@ -24,7 +24,7 @@ function c67934141.filter(c) ...@@ -24,7 +24,7 @@ function c67934141.filter(c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_FIRE) return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_FIRE)
end end
function c67934141.val(e,c) function c67934141.val(e,c)
return Duel.GetMatchingGroupCount(c67934141.filter,tp,LOCATION_MZONE,LOCATION_MZONE,c)*1000 return Duel.GetMatchingGroupCount(c67934141.filter,c:GetControler(),LOCATION_MZONE,LOCATION_MZONE,c)*1000
end end
function c67934141.costfilter(c) function c67934141.costfilter(c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsAbleToGraveAsCost() return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsAbleToGraveAsCost()
......
...@@ -5,7 +5,7 @@ function c68334074.initial_effect(c) ...@@ -5,7 +5,7 @@ function c68334074.initial_effect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMINT_END_PHASE) e1:SetHintTiming(0,TIMING_END_PHASE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCost(c68334074.cost) e1:SetCost(c68334074.cost)
e1:SetTarget(c68334074.target) e1:SetTarget(c68334074.target)
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
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