Commit fefe8ad1 authored by salix5's avatar salix5

update: 0x1~0xa

parent 8f9da55c
--マジカル・アブダクター --マジカル・アブダクター
function c10239627.initial_effect(c) function c10239627.initial_effect(c)
c:EnableCounterPermit(0x3001,LOCATION_PZONE+LOCATION_MZONE) c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--add counter --add counter
...@@ -43,12 +43,12 @@ function c10239627.initial_effect(c) ...@@ -43,12 +43,12 @@ function c10239627.initial_effect(c)
end end
function c10239627.acop(e,tp,eg,ep,ev,re,r,rp) function c10239627.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c10239627.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c10239627.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,3,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end end
function c10239627.thfilter1(c) function c10239627.thfilter1(c)
return c:IsType(TYPE_PENDULUM) and c:IsAbleToHand() return c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
...@@ -82,5 +82,5 @@ function c10239627.thop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -82,5 +82,5 @@ function c10239627.thop2(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c10239627.atkval(e,c) function c10239627.atkval(e,c)
return e:GetHandler():GetCounter(0x3001)*100 return e:GetHandler():GetCounter(0x1)*100
end end
--キックファイア --キックファイア
function c11501629.initial_effect(c) function c11501629.initial_effect(c)
c:EnableCounterPermit(0x2d)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -35,7 +36,7 @@ function c11501629.ctfilter(c,tp) ...@@ -35,7 +36,7 @@ function c11501629.ctfilter(c,tp)
end end
function c11501629.ctcon(e,tp,eg,ep,ev,re,r,rp) function c11501629.ctcon(e,tp,eg,ep,ev,re,r,rp)
local ct=eg:FilterCount(c11501629.ctfilter,nil,tp) local ct=eg:FilterCount(c11501629.ctfilter,nil,tp)
if ct>0 and e:GetHandler():IsCanAddCounter(0x2d+COUNTER_NEED_ENABLE,ct) then if ct>0 and e:GetHandler():IsCanAddCounter(0x2d,ct) then
e:SetLabel(ct) e:SetLabel(ct)
return true return true
else else
...@@ -43,7 +44,7 @@ function c11501629.ctcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,7 +44,7 @@ function c11501629.ctcon(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c11501629.ctop(e,tp,eg,ep,ev,re,r,rp) function c11501629.ctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x2d+COUNTER_NEED_ENABLE,e:GetLabel()) e:GetHandler():AddCounter(0x2d,e:GetLabel())
end end
function c11501629.damcon(e,tp,eg,ep,ev,re,r,rp) function c11501629.damcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()==PHASE_STANDBY return Duel.GetCurrentPhase()==PHASE_STANDBY
......
--サンダー・ボトル --サンダー・ボトル
function c11741041.initial_effect(c) function c11741041.initial_effect(c)
c:EnableCounterPermit(0xc)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -27,7 +28,7 @@ function c11741041.initial_effect(c) ...@@ -27,7 +28,7 @@ function c11741041.initial_effect(c)
end end
function c11741041.ctop(e,tp,eg,ep,ev,re,r,rp) function c11741041.ctop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetAttacker():IsControler(tp) then if Duel.GetAttacker():IsControler(tp) then
e:GetHandler():AddCounter(0xc+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0xc,1)
end end
end end
function c11741041.descon(e,tp,eg,ep,ev,re,r,rp) function c11741041.descon(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -61,6 +61,6 @@ end ...@@ -61,6 +61,6 @@ end
function c13474291.ctop(e,tp,eg,ep,ev,re,r,rp) function c13474291.ctop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x19,1) tc:AddCounter(0x1019,1)
end end
end end
--アーカナイト・マジシャン/バスター --アーカナイト・マジシャン/バスター
function c14553285.initial_effect(c) function c14553285.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--Cannot special summon --Cannot special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
...@@ -48,19 +48,19 @@ function c14553285.initial_effect(c) ...@@ -48,19 +48,19 @@ function c14553285.initial_effect(c)
end end
function c14553285.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c14553285.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x1)
end end
function c14553285.addc(e,tp,eg,ep,ev,re,r,rp) function c14553285.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2) e:GetHandler():AddCounter(0x1,2)
end end
end end
function c14553285.attackup(e,c) function c14553285.attackup(e,c)
return c:GetCounter(0x3001)*1000 return c:GetCounter(0x1)*1000
end end
function c14553285.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c14553285.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,2,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,2,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,2,REASON_COST)
end end
function c14553285.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c14553285.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end
......
...@@ -46,6 +46,6 @@ function c15475415.ctop(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,6 +46,6 @@ function c15475415.ctop(e,tp,eg,ep,ev,re,r,rp)
for i=1,2 do for i=1,2 do
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1) sg:GetFirst():AddCounter(0x100e,1)
end end
end end
...@@ -32,7 +32,7 @@ function c15893860.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,7 +32,7 @@ function c15893860.operation(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(15893860,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(15893860,1))
local tc=g:Select(tp,1,1,nil):GetFirst() local tc=g:Select(tp,1,1,nil):GetFirst()
tc:AddCounter(0x15,1) tc:AddCounter(0x1015,1)
end end
if ct>=3 and Duel.SelectYesNo(tp,aux.Stringid(15893860,2)) then if ct>=3 and Duel.SelectYesNo(tp,aux.Stringid(15893860,2)) then
Duel.BreakEffect() Duel.BreakEffect()
......
...@@ -42,12 +42,12 @@ end ...@@ -42,12 +42,12 @@ end
function c16197610.addc(e,tp,eg,ep,ev,re,r,rp) function c16197610.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c16197610.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) local ct=Duel.GetMatchingGroupCount(c16197610.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct) e:GetHandler():AddCounter(0x1019,ct)
end end
end end
function c16197610.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c16197610.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x19,1,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1019,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x19,1,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1019,1,REASON_COST)
end end
function c16197610.spfilter(c,e,tp) function c16197610.spfilter(c,e,tp)
return c:IsCode(80825553) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCode(80825553) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -43,12 +43,12 @@ end ...@@ -43,12 +43,12 @@ end
function c17810268.addc(e,tp,eg,ep,ev,re,r,rp) function c17810268.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c17810268.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) local ct=Duel.GetMatchingGroupCount(c17810268.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct) e:GetHandler():AddCounter(0x1019,ct)
end end
end end
function c17810268.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c17810268.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x19,2,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1019,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x19,2,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1019,2,REASON_COST)
end end
function c17810268.filter(c) function c17810268.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
--魔法族の結界 --魔法族の結界
function c17896384.initial_effect(c) function c17896384.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,4) c:SetCounterLimit(0x1,4)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -34,7 +34,7 @@ function c17896384.ctcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -34,7 +34,7 @@ function c17896384.ctcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c17896384.ctfilter,1,nil) return eg:IsExists(c17896384.ctfilter,1,nil)
end end
function c17896384.ctop(e,tp,eg,ep,ev,re,r,rp) function c17896384.ctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
function c17896384.cfilter(c) function c17896384.cfilter(c)
return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsAbleToGraveAsCost() return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsAbleToGraveAsCost()
...@@ -42,14 +42,14 @@ end ...@@ -42,14 +42,14 @@ end
function c17896384.drcost(e,tp,eg,ep,ev,re,r,rp,chk) function c17896384.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() if chk==0 then return e:GetHandler():IsAbleToGraveAsCost()
and Duel.IsExistingMatchingCard(c17896384.cfilter,tp,LOCATION_MZONE,0,1,nil) end and Duel.IsExistingMatchingCard(c17896384.cfilter,tp,LOCATION_MZONE,0,1,nil) end
e:SetLabel(e:GetHandler():GetCounter(0x3001)) e:SetLabel(e:GetHandler():GetCounter(0x1))
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c17896384.cfilter,tp,LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c17896384.cfilter,tp,LOCATION_MZONE,0,1,1,nil)
g:AddCard(e:GetHandler()) g:AddCard(e:GetHandler())
Duel.SendtoGrave(g,REASON_COST) Duel.SendtoGrave(g,REASON_COST)
end end
function c17896384.drtg(e,tp,eg,ep,ev,re,r,rp,chk) function c17896384.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetCounter(0x3001)>0 end if chk==0 then return e:GetHandler():GetCounter(0x1)>0 end
Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(e:GetLabel()) Duel.SetTargetParam(e:GetLabel())
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,e:GetLabel()) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,e:GetLabel())
......
...@@ -11,7 +11,7 @@ function c19980975.initial_effect(c) ...@@ -11,7 +11,7 @@ function c19980975.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c19980975.filter(c) function c19980975.filter(c)
return c:GetCounter(0x19)>=4 and c:IsDestructable() return c:GetCounter(0x1019)>=4 and c:IsDestructable()
end end
function c19980975.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c19980975.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c19980975.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c19980975.filter(chkc) end
...@@ -24,7 +24,7 @@ end ...@@ -24,7 +24,7 @@ end
function c19980975.activate(e,tp,eg,ep,ev,re,r,rp) function c19980975.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
local ct=math.floor(tc:GetCounter(0x19)/4) local ct=math.floor(tc:GetCounter(0x1019)/4)
if Duel.Destroy(tc,REASON_EFFECT)~=0 and ct~=0 then if Duel.Destroy(tc,REASON_EFFECT)~=0 and ct~=0 then
Duel.Draw(tp,ct,REASON_EFFECT) Duel.Draw(tp,ct,REASON_EFFECT)
end end
......
...@@ -76,9 +76,9 @@ function c20003527.addcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -76,9 +76,9 @@ function c20003527.addcon(e,tp,eg,ep,ev,re,r,rp)
end end
function c20003527.addc(e,tp,eg,ep,ev,re,r,rp) function c20003527.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x19,e:GetLabelObject():GetLabel()) e:GetHandler():AddCounter(0x1019,e:GetLabelObject():GetLabel())
end end
end end
function c20003527.atkval(e,c) function c20003527.atkval(e,c)
return Duel.GetCounter(0,1,1,0x19)*500 return Duel.GetCounter(0,1,1,0x1019)*500
end end
...@@ -11,7 +11,7 @@ function c20985997.initial_effect(c) ...@@ -11,7 +11,7 @@ function c20985997.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c20985997.filter(c) function c20985997.filter(c)
return c:GetCounter(0xe)>0 and c:IsDestructable() return c:GetCounter(0x100e)>0 and c:IsDestructable()
end end
function c20985997.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c20985997.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c20985997.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c20985997.filter(chkc) end
...@@ -23,7 +23,7 @@ function c20985997.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -23,7 +23,7 @@ function c20985997.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end end
function c20985997.activate(e,tp,eg,ep,ev,re,r,rp) function c20985997.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:GetCounter(0xe)>0 and tc:IsRelateToEffect(e) then if tc:GetCounter(0x100e)>0 and tc:IsRelateToEffect(e) then
if Duel.Destroy(tc,REASON_EFFECT)>0 then if Duel.Destroy(tc,REASON_EFFECT)>0 then
Duel.Damage(1-tp,1000,REASON_EFFECT) Duel.Damage(1-tp,1000,REASON_EFFECT)
Duel.Damage(tp,1000,REASON_EFFECT) Duel.Damage(tp,1000,REASON_EFFECT)
......
--ブラッド・マジシャン-煉獄の魔術師- --ブラッド・マジシャン-煉獄の魔術師-
function c21051146.initial_effect(c) function c21051146.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -28,13 +28,13 @@ function c21051146.initial_effect(c) ...@@ -28,13 +28,13 @@ function c21051146.initial_effect(c)
end end
function c21051146.acop(e,tp,eg,ep,ev,re,r,rp) function c21051146.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c21051146.filter(c,cc,tp) function c21051146.filter(c,cc,tp)
local ct=math.ceil(c:GetAttack()/700) local ct=math.ceil(c:GetAttack()/700)
if ct==0 then ct=1 end if ct==0 then ct=1 end
return c:IsFaceup() and c:IsDestructable() and cc:IsCanRemoveCounter(tp,0x3001,ct,REASON_COST) return c:IsFaceup() and c:IsDestructable() and cc:IsCanRemoveCounter(tp,0x1,ct,REASON_COST)
end end
function c21051146.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c21051146.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c21051146.filter(chkc,e:GetHandler(),tp) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c21051146.filter(chkc,e:GetHandler(),tp) end
...@@ -43,7 +43,7 @@ function c21051146.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -43,7 +43,7 @@ function c21051146.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local g=Duel.SelectTarget(tp,c21051146.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,e:GetHandler(),tp) local g=Duel.SelectTarget(tp,c21051146.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,e:GetHandler(),tp)
local ct=math.ceil(g:GetFirst():GetAttack()/700) local ct=math.ceil(g:GetFirst():GetAttack()/700)
if ct==0 then ct=1 end if ct==0 then ct=1 end
e:GetHandler():RemoveCounter(tp,0x3001,ct,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,ct,REASON_COST)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end end
function c21051146.desop(e,tp,eg,ep,ev,re,r,rp) function c21051146.desop(e,tp,eg,ep,ev,re,r,rp)
......
--覇魔導士アーカナイト・マジシャン --覇魔導士アーカナイト・マジシャン
function c21113684.initial_effect(c) function c21113684.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--fusion material --fusion material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddFusionProcFun2(c,c21113684.ffilter,aux.FilterBoolFunction(Card.IsRace,RACE_SPELLCASTER),true) aux.AddFusionProcFun2(c,c21113684.ffilter,aux.FilterBoolFunction(Card.IsRace,RACE_SPELLCASTER),true)
...@@ -63,24 +63,24 @@ function c21113684.ffilter(c) ...@@ -63,24 +63,24 @@ function c21113684.ffilter(c)
return c:IsType(TYPE_SYNCHRO) and c:IsRace(RACE_SPELLCASTER) return c:IsType(TYPE_SYNCHRO) and c:IsRace(RACE_SPELLCASTER)
end end
function c21113684.attackup(e,c) function c21113684.attackup(e,c)
return c:GetCounter(0x3001)*1000 return c:GetCounter(0x1)*1000
end end
function c21113684.addcc(e,tp,eg,ep,ev,re,r,rp) function c21113684.addcc(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_FUSION return e:GetHandler():GetSummonType()==SUMMON_TYPE_FUSION
end end
function c21113684.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c21113684.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x1)
end end
function c21113684.addc(e,tp,eg,ep,ev,re,r,rp) function c21113684.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2) e:GetHandler():AddCounter(0x1,2)
end end
end end
function c21113684.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c21113684.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,1,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
end end
function c21113684.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c21113684.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsDestructable() end if chkc then return chkc:IsOnField() and chkc:IsDestructable() end
......
...@@ -29,7 +29,7 @@ function c21768554.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -29,7 +29,7 @@ function c21768554.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c21768554.cfilter,tp,LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(c21768554.cfilter,tp,LOCATION_MZONE,0,1,nil)
end end
function c21768554.filter(c) function c21768554.filter(c)
return c:GetCounter(0xe)>0 and c:IsControlerCanBeChanged() return c:GetCounter(0x100e)>0 and c:IsControlerCanBeChanged()
end end
function c21768554.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c21768554.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 c21768554.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c21768554.filter(chkc) end
...@@ -47,7 +47,7 @@ function c21768554.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,7 +47,7 @@ function c21768554.operation(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>Duel.GetLocationCount(tp,LOCATION_MZONE) then return end if g:GetCount()>Duel.GetLocationCount(tp,LOCATION_MZONE) then return end
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
if tc:IsFaceup() and tc:GetCounter(0xe)>0 and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:GetCounter(0x100e)>0 and tc:IsRelateToEffect(e) then
c:SetCardTarget(tc) c:SetCardTarget(tc)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
...@@ -65,7 +65,7 @@ end ...@@ -65,7 +65,7 @@ end
function c21768554.con(e) function c21768554.con(e)
local c=e:GetOwner() local c=e:GetOwner()
local h=e:GetHandler() local h=e:GetHandler()
return c:IsHasCardTarget(h) and not c:IsDisabled() and h:GetCounter(0xe)>0 return c:IsHasCardTarget(h) and not c:IsDisabled() and h:GetCounter(0x100e)>0
end end
function c21768554.descon(e,tp,eg,ep,ev,re,r,rp) function c21768554.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(21768554)~=0 return e:GetHandler():GetFlagEffect(21768554)~=0
......
--黒魔導戦士 ブレイカー --黒魔導戦士 ブレイカー
function c22923081.initial_effect(c) function c22923081.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(22923081,0)) e1:SetDescription(aux.Stringid(22923081,0))
...@@ -45,22 +45,22 @@ function c22923081.initial_effect(c) ...@@ -45,22 +45,22 @@ function c22923081.initial_effect(c)
end end
function c22923081.addtg(e,tp,eg,ep,ev,re,r,rp,chk) function c22923081.addtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,e:GetLabel(),0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,e:GetLabel(),0,0x1)
end end
function c22923081.addop(e,tp,eg,ep,ev,re,r,rp) function c22923081.addop(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,e:GetLabel()) e:GetHandler():AddCounter(0x1,e:GetLabel())
end end
end end
function c22923081.addcon(e,tp,eg,ep,ev,re,r,rp) function c22923081.addcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end end
function c22923081.atkval(e,c) function c22923081.atkval(e,c)
return c:GetCounter(0x3001)*400 return c:GetCounter(0x1)*400
end end
function c22923081.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c22923081.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,1,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end end
function c22923081.filter(c) function c22923081.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
...@@ -13,8 +13,8 @@ function c23212990.initial_effect(c) ...@@ -13,8 +13,8 @@ function c23212990.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c23212990.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c23212990.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3003,1,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3,1,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3003,1,REASON_COST) Duel.RemoveCounter(tp,1,0,0x3,1,REASON_COST)
end end
function c23212990.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c23212990.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsDestructable() end if chkc then return chkc:IsOnField() and chkc:IsDestructable() end
......
...@@ -31,6 +31,6 @@ function c23639291.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -31,6 +31,6 @@ function c23639291.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+0x1fe0000) e1:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
Duel.SpecialSummonComplete() Duel.SpecialSummonComplete()
tc:AddCounter(0x19,1) tc:AddCounter(0x1019,1)
end end
end end
...@@ -40,7 +40,7 @@ end ...@@ -40,7 +40,7 @@ end
function c24104865.checkop(e,tp,eg,ep,ev,re,r,rp) function c24104865.checkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local t=Duel.GetAttackTarget() local t=Duel.GetAttackTarget()
if t and t~=c and t:GetCounter(0xe)>0 then if t and t~=c and t:GetCounter(0x100e)>0 then
e:SetLabel(1) e:SetLabel(1)
else e:SetLabel(0) end else e:SetLabel(0) end
end end
......
...@@ -25,18 +25,18 @@ function c24661486.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -25,18 +25,18 @@ function c24661486.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD) Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
end end
function c24661486.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c24661486.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCanAddCounter(0x15,1) end if chkc then return chkc:IsCanAddCounter(0x1015,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,0x15,1) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,0x1015,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,0x15,1) local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,0x1015,1)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c24661486.operation(e,tp,eg,ep,ev,re,r,rp) function c24661486.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x15,1) then if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1015,1) then
tc:AddCounter(0x15,1) tc:AddCounter(0x1015,1)
end end
end end
function c24661486.atkval(e,c) function c24661486.atkval(e,c)
return Duel.GetCounter(0,1,1,0x15)*300 return Duel.GetCounter(0,1,1,0x1015)*300
end end
--魔導騎士 ディフェンダー --魔導騎士 ディフェンダー
function c2525268.initial_effect(c) function c2525268.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,1) c:SetCounterLimit(0x1,1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(2525268,0)) e1:SetDescription(aux.Stringid(2525268,0))
...@@ -24,11 +24,11 @@ function c2525268.initial_effect(c) ...@@ -24,11 +24,11 @@ function c2525268.initial_effect(c)
end end
function c2525268.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c2525268.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c2525268.addc(e,tp,eg,ep,ev,re,r,rp) function c2525268.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c2525268.dfilter(c) function c2525268.dfilter(c)
...@@ -38,7 +38,7 @@ function c2525268.destg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -38,7 +38,7 @@ function c2525268.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
local count=eg:FilterCount(c2525268.dfilter,nil) local count=eg:FilterCount(c2525268.dfilter,nil)
e:SetLabel(count) e:SetLabel(count)
return count>0 and Duel.IsCanRemoveCounter(tp,1,0,0x3001,count,REASON_COST) return count>0 and Duel.IsCanRemoveCounter(tp,1,0,0x1,count,REASON_COST)
end end
return Duel.SelectYesNo(tp,aux.Stringid(2525268,1)) return Duel.SelectYesNo(tp,aux.Stringid(2525268,1))
end end
...@@ -47,5 +47,5 @@ function c2525268.value(e,c) ...@@ -47,5 +47,5 @@ function c2525268.value(e,c)
end end
function c2525268.desop(e,tp,eg,ep,ev,re,r,rp) function c2525268.desop(e,tp,eg,ep,ev,re,r,rp)
local count=e:GetLabel() local count=e:GetLabel()
Duel.RemoveCounter(tp,1,0,0x3001,count,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,count,REASON_COST)
end end
...@@ -15,11 +15,11 @@ function c2561846.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -15,11 +15,11 @@ function c2561846.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,g,1,0xe,1) Duel.SetOperationInfo(0,CATEGORY_COUNTER,g,1,0x100e,1)
end end
function c2561846.operation(e,tp,eg,ep,ev,re,r,rp) function c2561846.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0xe,1) tc:AddCounter(0x100e,1)
end end
end end
--六武の門 --六武の門
function c27970830.initial_effect(c) function c27970830.initial_effect(c)
c:EnableCounterPermit(0x3003) c:EnableCounterPermit(0x3)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -54,13 +54,13 @@ function c27970830.ctfilter(c) ...@@ -54,13 +54,13 @@ function c27970830.ctfilter(c)
end end
function c27970830.ctop(e,tp,eg,ep,ev,re,r,rp) function c27970830.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c27970830.ctfilter,1,nil) then if eg:IsExists(c27970830.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,2) e:GetHandler():AddCounter(0x3,2)
end end
end end
function c27970830.cost1(e,tp,eg,ep,ev,re,r,rp,chk) function c27970830.cost1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3003,2,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3,2,REASON_COST) end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
Duel.RemoveCounter(tp,1,0,0x3003,2,REASON_COST) Duel.RemoveCounter(tp,1,0,0x3,2,REASON_COST)
end end
function c27970830.filter1(c) function c27970830.filter1(c)
return c:IsFaceup() and (c:IsSetCard(0x3d) or c:IsSetCard(0x20)) and c:IsType(TYPE_EFFECT) return c:IsFaceup() and (c:IsSetCard(0x3d) or c:IsSetCard(0x20)) and c:IsType(TYPE_EFFECT)
...@@ -85,9 +85,9 @@ function c27970830.op1(e,tp,eg,ep,ev,re,r,rp) ...@@ -85,9 +85,9 @@ function c27970830.op1(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c27970830.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function c27970830.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3003,4,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3,4,REASON_COST) end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
Duel.RemoveCounter(tp,1,0,0x3003,4,REASON_COST) Duel.RemoveCounter(tp,1,0,0x3,4,REASON_COST)
end end
function c27970830.filter2(c) function c27970830.filter2(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x3d) and c:IsAbleToHand() return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x3d) and c:IsAbleToHand()
...@@ -106,9 +106,9 @@ function c27970830.op2(e,tp,eg,ep,ev,re,r,rp) ...@@ -106,9 +106,9 @@ function c27970830.op2(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c27970830.cost3(e,tp,eg,ep,ev,re,r,rp,chk) function c27970830.cost3(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3003,6,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3,6,REASON_COST) end
Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription()) Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
Duel.RemoveCounter(tp,1,0,0x3003,6,REASON_COST) Duel.RemoveCounter(tp,1,0,0x3,6,REASON_COST)
end end
function c27970830.filter3(c,e,tp) function c27970830.filter3(c,e,tp)
return c:IsSetCard(0x20) and c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x20) and c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -16,7 +16,7 @@ function c3070049.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -16,7 +16,7 @@ function c3070049.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
tc:AddCounter(0x15,1,REASON_EFFECT) tc:AddCounter(0x1015,1,REASON_EFFECT)
tc=g:GetNext() tc=g:GetNext()
end end
end end
--Emハットトリッカー --Emハットトリッカー
function c31292357.initial_effect(c) function c31292357.initial_effect(c)
c:EnableCounterPermit(0x3036) c:EnableCounterPermit(0x36)
c:SetCounterLimit(0x3036,3) c:SetCounterLimit(0x36,3)
--special summon rule --special summon rule
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -23,7 +23,7 @@ function c31292357.initial_effect(c) ...@@ -23,7 +23,7 @@ function c31292357.initial_effect(c)
--atk --atk
local 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_ADD_COUNTER+0x3036) e3:SetCode(EVENT_ADD_COUNTER+0x36)
e3:SetCondition(c31292357.atkcon) e3:SetCondition(c31292357.atkcon)
e3:SetOperation(c31292357.atkop) e3:SetOperation(c31292357.atkop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
...@@ -35,11 +35,11 @@ function c31292357.spcon(e,c) ...@@ -35,11 +35,11 @@ function c31292357.spcon(e,c)
and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,LOCATION_MZONE)>=2 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,LOCATION_MZONE)>=2
end end
function c31292357.cttg(e,tp,eg,ep,ev,re,r,rp,chk) function c31292357.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanAddCounter(0x3036,1) end if chk==0 then return e:GetHandler():IsCanAddCounter(0x36,1) end
end end
function c31292357.ctop(e,tp,eg,ep,ev,re,r,rp) function c31292357.ctop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:AddCounter(0x3036,1) then if c:IsRelateToEffect(e) and c:AddCounter(0x36,1) then
local cid=Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID) local cid=Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -60,7 +60,7 @@ function c31292357.damval(e,re,val,r,rp,rc) ...@@ -60,7 +60,7 @@ function c31292357.damval(e,re,val,r,rp,rc)
return 0 return 0
end end
function c31292357.atkcon(e,tp,eg,ep,ev,re,r,rp) function c31292357.atkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x3036)==3 return e:GetHandler():GetCounter(0x36)==3
end end
function c31292357.atkop(e,tp,eg,ep,ev,re,r,rp) function c31292357.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
--アーカナイト・マジシャン --アーカナイト・マジシャン
function c31924889.initial_effect(c) function c31924889.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_SPELLCASTER),1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_SPELLCASTER),1)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -33,23 +33,23 @@ function c31924889.initial_effect(c) ...@@ -33,23 +33,23 @@ function c31924889.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c31924889.attackup(e,c) function c31924889.attackup(e,c)
return c:GetCounter(0x3001)*1000 return c:GetCounter(0x1)*1000
end end
function c31924889.addcc(e,tp,eg,ep,ev,re,r,rp) function c31924889.addcc(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
end end
function c31924889.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c31924889.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x1)
end end
function c31924889.addc(e,tp,eg,ep,ev,re,r,rp) function c31924889.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2) e:GetHandler():AddCounter(0x1,2)
end end
end end
function c31924889.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c31924889.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,1,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
end end
function c31924889.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c31924889.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsDestructable() end if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsDestructable() end
......
...@@ -11,8 +11,8 @@ function c32062913.initial_effect(c) ...@@ -11,8 +11,8 @@ function c32062913.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c32062913.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c32062913.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,10,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,10,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3001,10,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,10,REASON_COST)
end end
function c32062913.target(e,tp,eg,ep,ev,re,r,rp,chk) function c32062913.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDestructable,tp,0,LOCATION_ONFIELD,1,nil) end
......
...@@ -41,16 +41,16 @@ function c32750510.spop(e,tp,eg,ep,ev,re,r,rp,c) ...@@ -41,16 +41,16 @@ function c32750510.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c32750510.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c32750510.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCanAddCounter(0x15,1) end if chkc then return chkc:IsCanAddCounter(0x1015,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,0x15,1) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,0x1015,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,0x15,1) local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,0x1015,1)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c32750510.operation(e,tp,eg,ep,ev,re,r,rp) function c32750510.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x15,1) then if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1015,1) then
tc:AddCounter(0x15,1) tc:AddCounter(0x1015,1)
end end
end end
function c32750510.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c32750510.descost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -58,7 +58,7 @@ function c32750510.descost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -58,7 +58,7 @@ function c32750510.descost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(e:GetHandler(),REASON_COST) Duel.Release(e:GetHandler(),REASON_COST)
end end
function c32750510.desfilter(c) function c32750510.desfilter(c)
return c:GetCounter(0x15)~=0 and c:IsDestructable() return c:GetCounter(0x1015)~=0 and c:IsDestructable()
end end
function c32750510.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c32750510.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c32750510.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler()) end if chk==0 then return Duel.IsExistingMatchingCard(c32750510.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,e:GetHandler()) end
......
...@@ -16,8 +16,8 @@ function c33413279.initial_effect(c) ...@@ -16,8 +16,8 @@ function c33413279.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c33413279.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c33413279.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,2,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3001,2,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
end end
function c33413279.filter(c) function c33413279.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
--ダーク・カタパルター --ダーク・カタパルター
function c33875961.initial_effect(c) function c33875961.initial_effect(c)
c:EnableCounterPermit(0x3028) c:EnableCounterPermit(0x28)
--counter --counter
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(33875961,0)) e1:SetDescription(aux.Stringid(33875961,0))
...@@ -30,15 +30,15 @@ function c33875961.addccon(e,tp,eg,ep,ev,re,r,rp) ...@@ -30,15 +30,15 @@ function c33875961.addccon(e,tp,eg,ep,ev,re,r,rp)
end end
function c33875961.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c33875961.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3028) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x28)
end end
function c33875961.addc(e,tp,eg,ep,ev,re,r,rp) function c33875961.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3028,1) e:GetHandler():AddCounter(0x28,1)
end end
end end
function c33875961.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c33875961.descost(e,tp,eg,ep,ev,re,r,rp,chk)
local ct=e:GetHandler():GetCounter(0x3028) local ct=e:GetHandler():GetCounter(0x28)
if chk==0 then return ct>0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_GRAVE,0,ct,nil) end if chk==0 then return ct>0 and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_GRAVE,0,ct,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_GRAVE,0,ct,ct,nil) local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_GRAVE,0,ct,ct,nil)
...@@ -49,7 +49,7 @@ function c33875961.filter(c) ...@@ -49,7 +49,7 @@ function c33875961.filter(c)
end end
function c33875961.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c33875961.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c33875961.filter(chkc) end if chkc then return chkc:IsOnField() and c33875961.filter(chkc) end
local ct=e:GetHandler():GetCounter(0x3028) local ct=e:GetHandler():GetCounter(0x28)
if chk==0 then return Duel.IsExistingTarget(c33875961.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,ct,nil) end if chk==0 then return Duel.IsExistingTarget(c33875961.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,ct,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,c33875961.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,ct,ct,nil) local g=Duel.SelectTarget(tp,c33875961.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,ct,ct,nil)
...@@ -60,6 +60,6 @@ function c33875961.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -60,6 +60,6 @@ function c33875961.desop(e,tp,eg,ep,ev,re,r,rp)
if g:FilterCount(Card.IsRelateToEffect,nil,e)==g:GetCount() then if g:FilterCount(Card.IsRelateToEffect,nil,e)==g:GetCount() then
Duel.Destroy(g,REASON_EFFECT) Duel.Destroy(g,REASON_EFFECT)
end end
local ct=e:GetHandler():GetCounter(0x3028) local ct=e:GetHandler():GetCounter(0x28)
e:GetHandler():RemoveCounter(tp,0x3028,ct,REASON_EFFECT) e:GetHandler():RemoveCounter(tp,0x28,ct,REASON_EFFECT)
end end
...@@ -3,7 +3,7 @@ function c34029630.initial_effect(c) ...@@ -3,7 +3,7 @@ function c34029630.initial_effect(c)
--counter permit --counter permit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_COUNTER_PERMIT+0x3001) e1:SetCode(EFFECT_COUNTER_PERMIT+0x1)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCondition(c34029630.ctpermit) e1:SetCondition(c34029630.ctpermit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -45,8 +45,8 @@ function c34029630.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -45,8 +45,8 @@ function c34029630.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c34029630.filter(chkc) end if chkc then return chkc:IsOnField() and c34029630.filter(chkc) end
if chk==0 then return true end if chk==0 then return true end
local c=e:GetHandler() local c=e:GetHandler()
c:AddCounter(0x3001,3) c:AddCounter(0x1,3)
if Duel.GetTurnPlayer()==tp and c:IsCanRemoveCounter(tp,0x3001,1,REASON_EFFECT) if Duel.GetTurnPlayer()==tp and c:IsCanRemoveCounter(tp,0x1,1,REASON_EFFECT)
and Duel.IsExistingTarget(c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) and Duel.IsExistingTarget(c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler())
and Duel.SelectYesNo(tp,aux.Stringid(34029630,0)) then and Duel.SelectYesNo(tp,aux.Stringid(34029630,0)) then
e:SetProperty(EFFECT_FLAG_CARD_TARGET) e:SetProperty(EFFECT_FLAG_CARD_TARGET)
...@@ -61,24 +61,24 @@ function c34029630.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -61,24 +61,24 @@ function c34029630.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and c:IsCanRemoveCounter(tp,0x3001,1,REASON_EFFECT) and tc:IsCanAddCounter(0x3001,1) then if tc and tc:IsRelateToEffect(e) and c:IsCanRemoveCounter(tp,0x1,1,REASON_EFFECT) and tc:IsCanAddCounter(0x1,1) then
c:RemoveCounter(tp,0x3001,1,REASON_EFFECT) c:RemoveCounter(tp,0x1,1,REASON_EFFECT)
tc:AddCounter(0x3001,1) tc:AddCounter(0x1,1)
end end
end end
function c34029630.condition(e,tp,eg,ep,ev,re,r,rp) function c34029630.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
end end
function c34029630.filter(c) function c34029630.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c34029630.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c34029630.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c34029630.filter(chkc) end if chkc then return chkc:IsOnField() and c34029630.filter(chkc) end
if chk==0 then return e:GetHandler():GetFlagEffect(34029630)==0 and e:GetHandler():IsCanRemoveCounter(tp,0x3001,1,REASON_EFFECT) if chk==0 then return e:GetHandler():GetFlagEffect(34029630)==0 and e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_EFFECT)
and Duel.IsExistingTarget(c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end and Duel.IsExistingTarget(c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(34029630,2)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(34029630,2))
Duel.SelectTarget(tp,c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler()) Duel.SelectTarget(tp,c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
end end
function c34029630.descon(e) function c34029630.descon(e)
return e:GetHandler():GetCounter(0x3001)==0 return e:GetHandler():GetCounter(0x1)==0
end end
\ No newline at end of file
...@@ -26,12 +26,12 @@ function c34541863.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -26,12 +26,12 @@ function c34541863.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,g,1,0xe,1) Duel.SetOperationInfo(0,CATEGORY_COUNTER,g,1,0x100e,1)
end end
function c34541863.operation(e,tp,eg,ep,ev,re,r,rp) function c34541863.operation(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 tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0xe,1) tc:AddCounter(0x100e,1)
end end
end end
--ジャスティス・ワールド --ジャスティス・ワールド
function c36099620.initial_effect(c) function c36099620.initial_effect(c)
c:EnableCounterPermit(0x5)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -39,7 +40,7 @@ function c36099620.cfilter(c,tp) ...@@ -39,7 +40,7 @@ function c36099620.cfilter(c,tp)
end end
function c36099620.acop(e,tp,eg,ep,ev,re,r,rp) function c36099620.acop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c36099620.cfilter,1,nil,tp) then if eg:IsExists(c36099620.cfilter,1,nil,tp) then
e:GetHandler():AddCounter(0x5+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x5,1)
end end
end end
function c36099620.desreptg(e,tp,eg,ep,ev,re,r,rp,chk) function c36099620.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
......
...@@ -13,17 +13,17 @@ function c36278828.initial_effect(c) ...@@ -13,17 +13,17 @@ function c36278828.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c36278828.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c36278828.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsCanAddCounter(0x9,1) end if chkc then return chkc:IsControler(1-tp) and chkc:IsCanAddCounter(0x1009,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x9,1) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1009,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x9,1) local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1009,1)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c36278828.operation(e,tp,eg,ep,ev,re,r,rp) function c36278828.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x9,1) then if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1009,1) then
local atk=tc:GetAttack() local atk=tc:GetAttack()
tc:AddCounter(0x9,1) tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0) Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end end
......
...@@ -14,7 +14,7 @@ function c38468214.initial_effect(c) ...@@ -14,7 +14,7 @@ function c38468214.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c38468214.filter(c) function c38468214.filter(c)
return c:GetCounter(0xe)>0 and c:IsControlerCanBeChanged() return c:GetCounter(0x100e)>0 and c:IsControlerCanBeChanged()
end end
function c38468214.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c38468214.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 c38468214.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c38468214.filter(chkc) end
...@@ -27,7 +27,7 @@ function c38468214.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -27,7 +27,7 @@ function c38468214.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsFacedown() or not c:IsRelateToEffect(e) then return end if c:IsFacedown() or not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:GetCounter(0xe)>0 and tc:IsRelateToEffect(e) then if tc:GetCounter(0x100e)>0 and tc:IsRelateToEffect(e) then
c:SetCardTarget(tc) c:SetCardTarget(tc)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
...@@ -63,9 +63,9 @@ function c38468214.rmctcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -63,9 +63,9 @@ function c38468214.rmctcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==e:GetLabel() return Duel.GetTurnPlayer()==e:GetLabel()
end end
function c38468214.rmctop(e,tp,eg,ep,ev,re,r,rp) function c38468214.rmctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RemoveCounter(tp,0xe,1,REASON_EFFECT) e:GetHandler():RemoveCounter(tp,0x100e,1,REASON_EFFECT)
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0xe,e,REASON_EFFECT,tp,tp,1) Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0x100e,e,REASON_EFFECT,tp,tp,1)
end end
function c38468214.descon(e) function c38468214.descon(e)
return e:GetHandler():GetCounter(0xe)==0 return e:GetHandler():GetCounter(0x100e)==0
end end
...@@ -24,11 +24,11 @@ function c38834303.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -24,11 +24,11 @@ function c38834303.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=sg:GetFirst() local tc=sg:GetFirst()
local count=0 local count=0
while tc do while tc do
count=count+tc:GetCounter(0xe) count=count+tc:GetCounter(0x100e)
tc:RemoveCounter(tp,0,0,0) tc:RemoveCounter(tp,0,0,0)
tc=sg:GetNext() tc=sg:GetNext()
end end
if count>0 then if count>0 then
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0xe,e,REASON_EFFECT,tp,tp,count) Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0x100e,e,REASON_EFFECT,tp,tp,count)
end end
end end
...@@ -17,7 +17,7 @@ function c39163598.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -17,7 +17,7 @@ function c39163598.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c39163598.tgfilter(c) function c39163598.tgfilter(c)
return c:IsFaceup() and c:GetCounter(0xe)==0 and c:IsDestructable() return c:IsFaceup() and c:GetCounter(0x100e)==0 and c:IsDestructable()
end end
function c39163598.target(e,tp,eg,ep,ev,re,r,rp,chk) function c39163598.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
...@@ -43,14 +43,14 @@ function c39163598.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,14 +43,14 @@ function c39163598.activate(e,tp,eg,ep,ev,re,r,rp)
end end
function c39163598.ctop1(e,tp,eg,ep,ev,re,r,rp) function c39163598.ctop1(e,tp,eg,ep,ev,re,r,rp)
if ep~=tp then if ep~=tp then
eg:GetFirst():AddCounter(0xe,1) eg:GetFirst():AddCounter(0x100e,1)
end end
end end
function c39163598.ctop2(e,tp,eg,ep,ev,re,r,rp) function c39163598.ctop2(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst() local tc=eg:GetFirst()
while tc do while tc do
if tc:IsFaceup() and tc:GetSummonPlayer()~=tp then if tc:IsFaceup() and tc:GetSummonPlayer()~=tp then
tc:AddCounter(0xe,1) tc:AddCounter(0x100e,1)
end end
tc=eg:GetNext() tc=eg:GetNext()
end end
......
--魔法都市エンディミオン --魔法都市エンディミオン
function c39910367.initial_effect(c) function c39910367.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -18,7 +18,7 @@ function c39910367.initial_effect(c) ...@@ -18,7 +18,7 @@ function c39910367.initial_effect(c)
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(39910367,0)) e4:SetDescription(aux.Stringid(39910367,0))
e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_RCOUNTER_REPLACE+0x3001) e4:SetCode(EFFECT_RCOUNTER_REPLACE+0x1)
e4:SetRange(LOCATION_FZONE) e4:SetRange(LOCATION_FZONE)
e4:SetCountLimit(1) e4:SetCountLimit(1)
e4:SetCondition(c39910367.rcon) e4:SetCondition(c39910367.rcon)
...@@ -44,33 +44,33 @@ end ...@@ -44,33 +44,33 @@ end
function c39910367.op(e,tp,eg,ep,ev,re,r,rp) function c39910367.op(e,tp,eg,ep,ev,re,r,rp)
local c=re:GetHandler() local c=re:GetHandler()
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c~=e:GetHandler() then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c~=e:GetHandler() then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c39910367.rcon(e,tp,eg,ep,ev,re,r,rp) function c39910367.rcon(e,tp,eg,ep,ev,re,r,rp)
return bit.band(r,REASON_COST)~=0 and ep==e:GetOwnerPlayer() and e:GetHandler():GetCounter(0x3001)>=ev return bit.band(r,REASON_COST)~=0 and ep==e:GetOwnerPlayer() and e:GetHandler():GetCounter(0x1)>=ev
end end
function c39910367.rop(e,tp,eg,ep,ev,re,r,rp) function c39910367.rop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RemoveCounter(ep,0x3001,ev,REASON_EFFECT) e:GetHandler():RemoveCounter(ep,0x1,ev,REASON_EFFECT)
end end
function c39910367.desreptg(e,tp,eg,ep,ev,re,r,rp,chk) function c39910367.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsReason(REASON_RULE) if chk==0 then return not e:GetHandler():IsReason(REASON_RULE)
and e:GetHandler():GetCounter(0x3001)>0 end and e:GetHandler():GetCounter(0x1)>0 end
return Duel.SelectYesNo(tp,aux.Stringid(39910367,1)) return Duel.SelectYesNo(tp,aux.Stringid(39910367,1))
end end
function c39910367.desrepop(e,tp,eg,ep,ev,re,r,rp) function c39910367.desrepop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RemoveCounter(ep,0x3001,1,REASON_EFFECT) e:GetHandler():RemoveCounter(ep,0x1,1,REASON_EFFECT)
end end
function c39910367.addop2(e,tp,eg,ep,ev,re,r,rp) function c39910367.addop2(e,tp,eg,ep,ev,re,r,rp)
local count=0 local count=0
local c=eg:GetFirst() local c=eg:GetFirst()
while c~=nil do while c~=nil do
if not c:IsCode(39910367) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then if not c:IsCode(39910367) and c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then
count=count+c:GetCounter(0x3001) count=count+c:GetCounter(0x1)
end end
c=eg:GetNext() c=eg:GetNext()
end end
if count>0 then if count>0 then
e:GetHandler():AddCounter(0x3001,count) e:GetHandler():AddCounter(0x1,count)
end end
end end
--混沌の場 --混沌の場
function c40089744.initial_effect(c) function c40089744.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,6) c:SetCounterLimit(0x1,6)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
...@@ -51,12 +51,12 @@ end ...@@ -51,12 +51,12 @@ end
function c40089744.acop(e,tp,eg,ep,ev,re,r,rp) function c40089744.acop(e,tp,eg,ep,ev,re,r,rp)
local ct=eg:FilterCount(c40089744.cfilter,nil) local ct=eg:FilterCount(c40089744.cfilter,nil)
if ct>0 then if ct>0 then
e:GetHandler():AddCounter(0x3001,ct,true) e:GetHandler():AddCounter(0x1,ct,true)
end end
end end
function c40089744.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c40089744.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,3,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end end
function c40089744.thfilter(c) function c40089744.thfilter(c)
return c:GetType()==TYPE_SPELL+TYPE_RITUAL and c:IsAbleToHand() return c:GetType()==TYPE_SPELL+TYPE_RITUAL and c:IsAbleToHand()
......
...@@ -38,12 +38,12 @@ end ...@@ -38,12 +38,12 @@ end
function c40732515.spcon(e,c) 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(),0x1,6,REASON_COST)
and Duel.GetLocationCount(c:GetControler(),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)
fd:RemoveCounter(tp,0x3001,6,REASON_RULE) fd:RemoveCounter(tp,0x1,6,REASON_RULE)
end end
function c40732515.condition(e,tp,eg,ep,ev,re,r,rp) function c40732515.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1 return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
......
...@@ -43,12 +43,12 @@ end ...@@ -43,12 +43,12 @@ end
function c43318266.addc(e,tp,eg,ep,ev,re,r,rp) function c43318266.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c43318266.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) local ct=Duel.GetMatchingGroupCount(c43318266.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct) e:GetHandler():AddCounter(0x1019,ct)
end end
end end
function c43318266.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c43318266.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x19,2,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1019,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x19,2,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1019,2,REASON_COST)
end end
function c43318266.filter(c) function c43318266.filter(c)
return c:IsDestructable() return c:IsDestructable()
......
...@@ -11,20 +11,20 @@ function c4466015.initial_effect(c) ...@@ -11,20 +11,20 @@ function c4466015.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c4466015.filter(c) function c4466015.filter(c)
return c:GetCounter(0x9)>0 return c:GetCounter(0x1009)>0
end end
function c4466015.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c4466015.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c4466015.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c4466015.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c4466015.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c4466015.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,c4466015.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) local g=Duel.SelectTarget(tp,c4466015.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,g:GetFirst():GetCounter(0x9)*700) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,g:GetFirst():GetCounter(0x1009)*700)
end end
function c4466015.activate(e,tp,eg,ep,ev,re,r,rp) function c4466015.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
local ct=tc:GetCounter(0x9) local ct=tc:GetCounter(0x1009)
if ct>0 then if ct>0 then
tc:RemoveCounter(tp,0x9,ct,REASON_EFFECT) tc:RemoveCounter(tp,0x1009,ct,REASON_EFFECT)
Duel.Damage(1-tp,ct*700,REASON_EFFECT) Duel.Damage(1-tp,ct*700,REASON_EFFECT)
end end
end end
--闇紅の魔導師 --闇紅の魔導師
function c45462639.initial_effect(c) function c45462639.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(45462639,0)) e1:SetDescription(aux.Stringid(45462639,0))
...@@ -46,24 +46,24 @@ function c45462639.initial_effect(c) ...@@ -46,24 +46,24 @@ function c45462639.initial_effect(c)
end end
function c45462639.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c45462639.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x1)
end end
function c45462639.addc(e,tp,eg,ep,ev,re,r,rp) function c45462639.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2) e:GetHandler():AddCounter(0x1,2)
end end
end end
function c45462639.acop(e,tp,eg,ep,ev,re,r,rp) function c45462639.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c45462639.attackup(e,c) function c45462639.attackup(e,c)
return c:GetCounter(0x3001)*300 return c:GetCounter(0x1)*300
end end
function c45462639.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c45462639.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,2,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,2,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,2,REASON_COST)
end end
function c45462639.destarg(e,tp,eg,ep,ev,re,r,rp,chk) function c45462639.destarg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 end if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 end
......
--熟練の白魔導師 --熟練の白魔導師
function c46363422.initial_effect(c) function c46363422.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,3) c:SetCounterLimit(0x1,3)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -29,11 +29,11 @@ function c46363422.initial_effect(c) ...@@ -29,11 +29,11 @@ function c46363422.initial_effect(c)
end end
function c46363422.acop(e,tp,eg,ep,ev,re,r,rp) function c46363422.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c46363422.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c46363422.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetCounter(0x3001)==3 and e:GetHandler():IsReleasable() end if chk==0 then return e:GetHandler():GetCounter(0x1)==3 and e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST) Duel.Release(e:GetHandler(),REASON_COST)
end end
function c46363422.filter(c,e,tp) function c46363422.filter(c,e,tp)
......
...@@ -34,30 +34,30 @@ function c4694209.initial_effect(c) ...@@ -34,30 +34,30 @@ function c4694209.initial_effect(c)
end end
function c4694209.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c4694209.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x21) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1021)
end end
function c4694209.addc(e,tp,eg,ep,ev,re,r,rp) function c4694209.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x21+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x1021+COUNTER_NEED_ENABLE,1)
end end
end end
function c4694209.attackup(e,c) function c4694209.attackup(e,c)
return c:GetCounter(0x21)*300 return c:GetCounter(0x1021)*300
end end
function c4694209.addct2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c4694209.addct2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and chkc:IsFaceup() end if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and chkc:IsFaceup() end
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x21,1,REASON_EFFECT) if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1021,1,REASON_EFFECT)
and Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) end and Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(4694209,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(4694209,1))
Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler()) Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler())
end end
function c4694209.addc2(e,tp,eg,ep,ev,re,r,rp) function c4694209.addc2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:GetCounter(0x21)==0 then return end if c:GetCounter(0x1021)==0 then return end
c:RemoveCounter(tp,0x21,1,REASON_EFFECT) c:RemoveCounter(tp,0x1021,1,REASON_EFFECT)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x21,1) tc:AddCounter(0x1021,1)
if tc:GetFlagEffect(4694209)~=0 then return end if tc:GetFlagEffect(4694209)~=0 then return end
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)
...@@ -70,9 +70,9 @@ function c4694209.addc2(e,tp,eg,ep,ev,re,r,rp) ...@@ -70,9 +70,9 @@ function c4694209.addc2(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c4694209.reptg(e,tp,eg,ep,ev,re,r,rp,chk) function c4694209.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsReason(REASON_RULE) and e:GetHandler():GetCounter(0x21)>0 end if chk==0 then return not e:GetHandler():IsReason(REASON_RULE) and e:GetHandler():GetCounter(0x1021)>0 end
return true return true
end end
function c4694209.repop(e,tp,eg,ep,ev,re,r,rp,chk) function c4694209.repop(e,tp,eg,ep,ev,re,r,rp,chk)
e:GetHandler():RemoveCounter(tp,0x21,1,REASON_EFFECT) e:GetHandler():RemoveCounter(tp,0x1021,1,REASON_EFFECT)
end end
--宝玉の樹 --宝玉の樹
function c47408488.initial_effect(c) function c47408488.initial_effect(c)
c:EnableCounterPermit(0x6)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -40,7 +41,7 @@ function c47408488.eqcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -40,7 +41,7 @@ function c47408488.eqcon(e,tp,eg,ep,ev,re,r,rp)
return tc:IsFaceup() and tc:IsSetCard(0x1034) return tc:IsFaceup() and tc:IsSetCard(0x1034)
end end
function c47408488.ctop(e,tp,eg,ep,ev,re,r,rp) function c47408488.ctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x6+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x6,1)
end end
function c47408488.plcost(e,tp,eg,ep,ev,re,r,rp,chk) function c47408488.plcost(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
......
--紫炎の道場 --紫炎の道場
function c47436247.initial_effect(c) function c47436247.initial_effect(c)
c:EnableCounterPermit(0x3003) c:EnableCounterPermit(0x3)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -32,12 +32,12 @@ function c47436247.ctfilter(c) ...@@ -32,12 +32,12 @@ function c47436247.ctfilter(c)
end end
function c47436247.ctop(e,tp,eg,ep,ev,re,r,rp) function c47436247.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c47436247.ctfilter,1,nil) then if eg:IsExists(c47436247.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,1) e:GetHandler():AddCounter(0x3,1)
end end
end end
function c47436247.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c47436247.spcost(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
local ct=e:GetHandler():GetCounter(0x3003) local ct=e:GetHandler():GetCounter(0x3)
e:SetLabel(ct) e:SetLabel(ct)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
...@@ -47,7 +47,7 @@ function c47436247.filter(c,ct,e,tp) ...@@ -47,7 +47,7 @@ function c47436247.filter(c,ct,e,tp)
end end
function c47436247.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47436247.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(c47436247.filter,tp,LOCATION_DECK,0,1,nil,e:GetHandler():GetCounter(0x3003),e,tp) end and Duel.IsExistingMatchingCard(c47436247.filter,tp,LOCATION_DECK,0,1,nil,e:GetHandler():GetCounter(0x3),e,tp) end
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 c47436247.spop(e,tp,eg,ep,ev,re,r,rp) function c47436247.spop(e,tp,eg,ep,ev,re,r,rp)
......
--No.88 ギミック・パペット-デステニー・レオ --No.88 ギミック・パペット-デステニー・レオ
function c48995978.initial_effect(c) function c48995978.initial_effect(c)
c:EnableCounterPermit(0x302b) c:EnableCounterPermit(0x2b)
--xyz summon --xyz summon
aux.AddXyzProcedure(c,nil,8,3) aux.AddXyzProcedure(c,nil,8,3)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -44,19 +44,19 @@ function c48995978.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -44,19 +44,19 @@ function c48995978.cost(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c48995978.target(e,tp,eg,ep,ev,re,r,rp,chk) function c48995978.target(e,tp,eg,ep,ev,re,r,rp,chk)
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 e:GetHandler():IsCanAddCounter(0x302b,1) end and e:GetHandler():IsCanAddCounter(0x2b,1) end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x302b) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x2b)
end end
function c48995978.operation(e,tp,eg,ep,ev,re,r,rp) function c48995978.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() and c:RemoveOverlayCard(tp,1,1,REASON_EFFECT) then if c:IsRelateToEffect(e) and c:IsFaceup() and c:RemoveOverlayCard(tp,1,1,REASON_EFFECT) then
c:AddCounter(0x302b,1) c:AddCounter(0x2b,1)
end end
end end
function c48995978.winop(e,tp,eg,ep,ev,re,r,rp) function c48995978.winop(e,tp,eg,ep,ev,re,r,rp)
local WIN_REASON_DESTINY_LEO=0x17 local WIN_REASON_DESTINY_LEO=0x17
local c=e:GetHandler() local c=e:GetHandler()
if c:GetCounter(0x302b)==3 then if c:GetCounter(0x2b)==3 then
Duel.Win(tp,WIN_REASON_DESTINY_LEO) Duel.Win(tp,WIN_REASON_DESTINY_LEO)
end end
end end
--剣闘獣の檻-コロッセウム --剣闘獣の檻-コロッセウム
function c52518793.initial_effect(c) function c52518793.initial_effect(c)
c:EnableCounterPermit(0x7)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -46,7 +47,7 @@ function c52518793.accon(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +47,7 @@ function c52518793.accon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c52518793.cfilter,1,nil,tp) return eg:IsExists(c52518793.cfilter,1,nil,tp)
end end
function c52518793.acop(e,tp,eg,ep,ev,re,r,rp) function c52518793.acop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x7+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x7,1)
end end
function c52518793.desreptg(e,tp,eg,ep,ev,re,r,rp,chk) function c52518793.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsReason(REASON_RULE) if chk==0 then return not e:GetHandler():IsReason(REASON_RULE)
......
--ライトロードの神域 --ライトロードの神域
function c52665542.initial_effect(c) function c52665542.initial_effect(c)
c:EnableCounterPermit(0x5)
--activate --activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -73,7 +74,7 @@ function c52665542.accon(e,tp,eg,ep,ev,re,r,rp) ...@@ -73,7 +74,7 @@ function c52665542.accon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c52665542.cfilter,1,nil,tp) return eg:IsExists(c52665542.cfilter,1,nil,tp)
end end
function c52665542.acop(e,tp,eg,ep,ev,re,r,rp) function c52665542.acop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x5+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x5,1)
end end
function c52665542.dfilter(c,tp) function c52665542.dfilter(c,tp)
return c:IsFaceup() and c:IsLocation(LOCATION_ONFIELD) return c:IsFaceup() and c:IsLocation(LOCATION_ONFIELD)
......
...@@ -15,8 +15,8 @@ function c53112492.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -15,8 +15,8 @@ function c53112492.condition(e,tp,eg,ep,ev,re,r,rp)
return re:IsActiveType(TYPE_SPELL) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev) return re:IsActiveType(TYPE_SPELL) and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
end end
function c53112492.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c53112492.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,2,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3001,2,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
end end
function c53112492.target(e,tp,eg,ep,ev,re,r,rp,chk) function c53112492.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
......
...@@ -12,7 +12,7 @@ function c53291093.initial_effect(c) ...@@ -12,7 +12,7 @@ function c53291093.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c53291093.filter(c) function c53291093.filter(c)
return c:GetCounter(0xe)>0 and c:IsDestructable() return c:GetCounter(0x100e)>0 and c:IsDestructable()
end end
function c53291093.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c53291093.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c53291093.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c53291093.filter(chkc) end
......
--六武院 --六武院
function c53819808.initial_effect(c) function c53819808.initial_effect(c)
c:EnableCounterPermit(0x3003) c:EnableCounterPermit(0x3)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -30,9 +30,9 @@ function c53819808.ctfilter(c) ...@@ -30,9 +30,9 @@ function c53819808.ctfilter(c)
end end
function c53819808.ctop(e,tp,eg,ep,ev,re,r,rp) function c53819808.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c53819808.ctfilter,1,nil) then if eg:IsExists(c53819808.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,1) e:GetHandler():AddCounter(0x3,1)
end end
end end
function c53819808.val(e) function c53819808.val(e)
return e:GetHandler():GetCounter(0x3003)*-100 return e:GetHandler():GetCounter(0x3)*-100
end end
...@@ -35,16 +35,16 @@ function c54306223.initial_effect(c) ...@@ -35,16 +35,16 @@ function c54306223.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c54306223.atkval(e,c) function c54306223.atkval(e,c)
return c:GetCounter(0x9)*-500 return c:GetCounter(0x1009)*-500
end end
function c54306223.acop(e,tp,eg,ep,ev,re,r,rp) function c54306223.acop(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 g=Group.CreateGroup() local g=Group.CreateGroup()
for i=0,4 do for i=0,4 do
local tc=Duel.GetFieldCard(tp,LOCATION_MZONE,i) local tc=Duel.GetFieldCard(tp,LOCATION_MZONE,i)
if tc and tc:IsCanAddCounter(0x9,1) and not tc:IsSetCard(0x50) then if tc and tc:IsCanAddCounter(0x1009,1) and not tc:IsSetCard(0x50) then
local atk=tc:GetAttack() local atk=tc:GetAttack()
tc:AddCounter(0x9,1) tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then if atk>0 and tc:GetAttack()==0 then
g:AddCard(tc) g:AddCard(tc)
end end
...@@ -52,9 +52,9 @@ function c54306223.acop(e,tp,eg,ep,ev,re,r,rp) ...@@ -52,9 +52,9 @@ function c54306223.acop(e,tp,eg,ep,ev,re,r,rp)
end end
for i=0,4 do for i=0,4 do
local tc=Duel.GetFieldCard(1-tp,LOCATION_MZONE,i) local tc=Duel.GetFieldCard(1-tp,LOCATION_MZONE,i)
if tc and tc:IsCanAddCounter(0x9,1) and not tc:IsSetCard(0x50) then if tc and tc:IsCanAddCounter(0x1009,1) and not tc:IsSetCard(0x50) then
local atk=tc:GetAttack() local atk=tc:GetAttack()
tc:AddCounter(0x9,1) tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then if atk>0 and tc:GetAttack()==0 then
g:AddCard(tc) g:AddCard(tc)
end end
......
--魔導獣 ケルベロス --魔導獣 ケルベロス
function c55424270.initial_effect(c) function c55424270.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -33,17 +33,17 @@ function c55424270.initial_effect(c) ...@@ -33,17 +33,17 @@ function c55424270.initial_effect(c)
end end
function c55424270.acop(e,tp,eg,ep,ev,re,r,rp) function c55424270.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c55424270.attackup(e,c) function c55424270.attackup(e,c)
return c:GetCounter(0x3001)*500 return c:GetCounter(0x1)*500
end end
function c55424270.condition(e,tp,eg,ep,ev,re,r,rp) function c55424270.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetBattledGroupCount()>0 return e:GetHandler():GetBattledGroupCount()>0
end end
function c55424270.operation(e,tp,eg,ep,ev,re,r,rp) function c55424270.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local n=c:GetCounter(0x3001) local n=c:GetCounter(0x1)
if n~=0 then c:RemoveCounter(tp,0x3001,n,REASON_EFFECT) end if n~=0 then c:RemoveCounter(tp,0x1,n,REASON_EFFECT) end
end end
--D・フィールド --D・フィールド
function c56074358.initial_effect(c) function c56074358.initial_effect(c)
c:EnableCounterPermit(0x8)
--activate --activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -46,7 +47,7 @@ function c56074358.accon(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +47,7 @@ function c56074358.accon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c56074358.cfilter,1,nil) return eg:IsExists(c56074358.cfilter,1,nil)
end end
function c56074358.acop(e,tp,eg,ep,ev,re,r,rp) function c56074358.acop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x8+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x8,1)
end end
function c56074358.spcon(e,tp,eg,ep,ev,re,r,rp) function c56074358.spcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
--魔導書廊エトワール --魔導書廊エトワール
function c56321639.initial_effect(c) function c56321639.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -48,14 +48,14 @@ function c56321639.ctcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -48,14 +48,14 @@ function c56321639.ctcon(e,tp,eg,ep,ev,re,r,rp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c:IsSetCard(0x106e) and e:GetHandler():GetFlagEffect(1)>0 return re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c:IsSetCard(0x106e) and e:GetHandler():GetFlagEffect(1)>0
end end
function c56321639.ctop(e,tp,eg,ep,ev,re,r,rp) function c56321639.ctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
function c56321639.atkval(e,c) function c56321639.atkval(e,c)
return e:GetHandler():GetCounter(0x3001)*100 return e:GetHandler():GetCounter(0x1)*100
end end
function c56321639.thcon(e,tp,eg,ep,ev,re,r,rp) function c56321639.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local ct=c:GetCounter(0x3001) local ct=c:GetCounter(0x1)
e:SetLabel(ct) e:SetLabel(ct)
return ct>0 and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_DESTROY) return ct>0 and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_DESTROY)
end end
......
--ハンニバル・ネクロマンサー --ハンニバル・ネクロマンサー
function c5640330.initial_effect(c) function c5640330.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,1) c:SetCounterLimit(0x1,1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(5640330,0)) e1:SetDescription(aux.Stringid(5640330,0))
...@@ -25,16 +25,16 @@ function c5640330.initial_effect(c) ...@@ -25,16 +25,16 @@ function c5640330.initial_effect(c)
end end
function c5640330.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c5640330.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c5640330.addc(e,tp,eg,ep,ev,re,r,rp) function c5640330.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c5640330.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c5640330.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,1,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end end
function c5640330.filter(c) function c5640330.filter(c)
return c:IsType(TYPE_TRAP) and c:IsFaceup() and c:IsDestructable() return c:IsType(TYPE_TRAP) and c:IsFaceup() and c:IsDestructable()
......
...@@ -15,7 +15,7 @@ function c57384901.filter1(c) ...@@ -15,7 +15,7 @@ function c57384901.filter1(c)
return c:IsAbleToChangeControler() return c:IsAbleToChangeControler()
end end
function c57384901.filter2(c) function c57384901.filter2(c)
return c:GetCounter(0xe)>0 and c:IsAbleToChangeControler() return c:GetCounter(0x100e)>0 and c:IsAbleToChangeControler()
end end
function c57384901.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c57384901.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
......
...@@ -32,5 +32,5 @@ function c58012107.poop(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,5 +32,5 @@ function c58012107.poop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c58012107.atktg(e,c) function c58012107.atktg(e,c)
return c:GetCounter(0xe)>0 return c:GetCounter(0x100e)>0
end end
...@@ -36,7 +36,7 @@ function c59258334.initial_effect(c) ...@@ -36,7 +36,7 @@ function c59258334.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c59258334.filter(c) function c59258334.filter(c)
return c:GetCounter(0xe)>0 and c:IsControlerCanBeChanged() return c:GetCounter(0x100e)>0 and c:IsControlerCanBeChanged()
end end
function c59258334.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c59258334.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 c59258334.filter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c59258334.filter(chkc) end
...@@ -49,7 +49,7 @@ function c59258334.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -49,7 +49,7 @@ function c59258334.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:GetCounter(0xe)>0 and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:GetCounter(0x100e)>0 and tc:IsRelateToEffect(e) then
c:SetCardTarget(tc) c:SetCardTarget(tc)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_OWNER_RELATE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_OWNER_RELATE)
...@@ -68,7 +68,7 @@ end ...@@ -68,7 +68,7 @@ end
function c59258334.descon(e) function c59258334.descon(e)
local c=e:GetHandler() local c=e:GetHandler()
if c:GetCardTargetCount()==0 then return false end if c:GetCardTargetCount()==0 then return false end
return c:GetFirstCardTarget():GetCounter(0xe)==0 return c:GetFirstCardTarget():GetCounter(0x100e)==0
end end
function c59258334.descon2(e,tp,eg,ep,ev,re,r,rp) function c59258334.descon2(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget() local tc=e:GetHandler():GetFirstCardTarget()
...@@ -82,6 +82,6 @@ function c59258334.rccon(e,tp,eg,ep,ev,re,r,rp) ...@@ -82,6 +82,6 @@ function c59258334.rccon(e,tp,eg,ep,ev,re,r,rp)
end end
function c59258334.rcop(e,tp,eg,ep,ev,re,r,rp) function c59258334.rcop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget() local tc=e:GetHandler():GetFirstCardTarget()
tc:RemoveCounter(tp,0xe,1,REASON_EFFECT) tc:RemoveCounter(tp,0x100e,1,REASON_EFFECT)
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0xe,e,REASON_EFFECT,tp,tp,1) Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0x100e,e,REASON_EFFECT,tp,tp,1)
end end
--伝説の爆炎使い --伝説の爆炎使い
function c60258960.initial_effect(c) function c60258960.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -29,12 +29,12 @@ function c60258960.initial_effect(c) ...@@ -29,12 +29,12 @@ function c60258960.initial_effect(c)
end end
function c60258960.acop(e,tp,eg,ep,ev,re,r,rp) function c60258960.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c60258960.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c60258960.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,3,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end end
function c60258960.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c60258960.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
--マジカル・コンダクター --マジカル・コンダクター
function c6061630.initial_effect(c) function c6061630.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -28,12 +28,12 @@ function c6061630.initial_effect(c) ...@@ -28,12 +28,12 @@ function c6061630.initial_effect(c)
end end
function c6061630.acop(e,tp,eg,ep,ev,re,r,rp) function c6061630.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,2) e:GetHandler():AddCounter(0x1,2)
end end
end end
function c6061630.filter(c,cc,e,tp) function c6061630.filter(c,cc,e,tp)
return c:IsRace(RACE_SPELLCASTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsRace(RACE_SPELLCASTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
and c:GetLevel()>0 and cc:IsCanRemoveCounter(tp,0x3001,c:GetLevel(),REASON_COST) and c:GetLevel()>0 and cc:IsCanRemoveCounter(tp,0x1,c:GetLevel(),REASON_COST)
end end
function c6061630.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c6061630.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
...@@ -53,7 +53,7 @@ function c6061630.sptg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -53,7 +53,7 @@ function c6061630.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
lvt[pc]=nil lvt[pc]=nil
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(6061630,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(6061630,1))
local lv=Duel.AnnounceNumber(tp,table.unpack(lvt)) local lv=Duel.AnnounceNumber(tp,table.unpack(lvt))
e:GetHandler():RemoveCounter(tp,0x3001,lv,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,lv,REASON_COST)
e:SetLabel(lv) e:SetLabel(lv)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
end end
......
...@@ -21,11 +21,11 @@ function c60728397.tgfilter(c) ...@@ -21,11 +21,11 @@ function c60728397.tgfilter(c)
return c:IsRace(RACE_REPTILE) and c:IsAbleToGrave() return c:IsRace(RACE_REPTILE) and c:IsAbleToGrave()
end end
function c60728397.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c60728397.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsCanAddCounter(0x9,2) end if chkc then return chkc:IsControler(1-tp) and chkc:IsCanAddCounter(0x1009,2) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x9,2) if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1009,2)
and Duel.IsExistingMatchingCard(c60728397.tgfilter,tp,LOCATION_DECK,0,1,nil) end and Duel.IsExistingMatchingCard(c60728397.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x9,2) local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1009,2)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c60728397.activate(e,tp,eg,ep,ev,re,r,rp) function c60728397.activate(e,tp,eg,ep,ev,re,r,rp)
...@@ -34,9 +34,9 @@ function c60728397.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -34,9 +34,9 @@ function c60728397.activate(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT) Duel.SendtoGrave(g,REASON_EFFECT)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x9,2) and g:GetFirst():IsLocation(LOCATION_GRAVE) then if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1009,2) and g:GetFirst():IsLocation(LOCATION_GRAVE) then
local atk=tc:GetAttack() local atk=tc:GetAttack()
tc:AddCounter(0x9,2) tc:AddCounter(0x1009,2)
if atk>0 and tc:GetAttack()==0 then if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0) Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end end
......
--マジカルフィシアリスト --マジカルフィシアリスト
function c62154416.initial_effect(c) function c62154416.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,1) c:SetCounterLimit(0x1,1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(62154416,0)) e1:SetDescription(aux.Stringid(62154416,0))
...@@ -25,16 +25,16 @@ function c62154416.initial_effect(c) ...@@ -25,16 +25,16 @@ function c62154416.initial_effect(c)
end end
function c62154416.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c62154416.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c62154416.addc(e,tp,eg,ep,ev,re,r,rp) function c62154416.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c62154416.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) function c62154416.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,1,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end end
function c62154416.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c62154416.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsFaceup() end
......
...@@ -13,7 +13,7 @@ function c62315111.atcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -13,7 +13,7 @@ function c62315111.atcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local bc=c:GetBattleTarget() local bc=c:GetBattleTarget()
return bc and bc:IsStatus(STATUS_BATTLE_DESTROYED) and c:IsChainAttackable() return bc and bc:IsStatus(STATUS_BATTLE_DESTROYED) and c:IsChainAttackable()
and bc:GetCounter(0xe)>0 and bc:GetCounter(0x100e)>0
end end
function c62315111.atop(e,tp,eg,ep,ev,re,r,rp) function c62315111.atop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChainAttack() Duel.ChainAttack()
......
--マジックテンペスター --マジックテンペスター
function c63101919.initial_effect(c) function c63101919.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_SPELLCASTER),1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_SPELLCASTER),1)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -42,11 +42,11 @@ function c63101919.addcc1(e,tp,eg,ep,ev,re,r,rp) ...@@ -42,11 +42,11 @@ function c63101919.addcc1(e,tp,eg,ep,ev,re,r,rp)
end end
function c63101919.addct1(e,tp,eg,ep,ev,re,r,rp,chk) function c63101919.addct1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x1)
end end
function c63101919.addc1(e,tp,eg,ep,ev,re,r,rp) function c63101919.addc1(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c63101919.ctcost(e,tp,eg,ep,ev,re,r,rp,chk) function c63101919.ctcost(e,tp,eg,ep,ev,re,r,rp,chk)
...@@ -58,28 +58,28 @@ function c63101919.ctcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -58,28 +58,28 @@ function c63101919.ctcost(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c63101919.cttg(e,tp,eg,ep,ev,re,r,rp,chk) function c63101919.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,e:GetLabel(),0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,e:GetLabel(),0,0x1)
end end
function c63101919.ctop(e,tp,eg,ep,ev,re,r,rp) function c63101919.ctop(e,tp,eg,ep,ev,re,r,rp)
local ct=e:GetLabel() local ct=e:GetLabel()
for i=1,ct do for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(63101919,3)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(63101919,3))
local g=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,1,nil,0x3001,1) local g=Duel.SelectMatchingCard(tp,Card.IsCanAddCounter,tp,LOCATION_MZONE,0,1,1,nil,0x1,1)
if g:GetCount()==0 then return end if g:GetCount()==0 then return end
g:GetFirst():AddCounter(0x3001,1) g:GetFirst():AddCounter(0x1,1)
end end
end end
function c63101919.damfilter(c) function c63101919.damfilter(c)
return c:GetCounter(0x3001)>0 return c:GetCounter(0x1)>0
end end
function c63101919.damcost(e,tp,eg,ep,ev,re,r,rp,chk) function c63101919.damcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCounter(tp,1,1,0x3001)>0 end if chk==0 then return Duel.GetCounter(tp,1,1,0x1)>0 end
local g=Duel.GetMatchingGroup(c63101919.damfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c63101919.damfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
local sum=0 local sum=0
while tc do while tc do
local sct=tc:GetCounter(0x3001) local sct=tc:GetCounter(0x1)
tc:RemoveCounter(tp,0x3001,sct,0) tc:RemoveCounter(tp,0x1,sct,0)
sum=sum+sct sum=sum+sct
tc=g:GetNext() tc=g:GetNext()
end end
......
...@@ -27,6 +27,6 @@ end ...@@ -27,6 +27,6 @@ end
function c63741331.activate(e,tp,eg,ep,ev,re,r,rp) function c63741331.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x19,3) tc:AddCounter(0x1019,3)
end end
end end
...@@ -8,7 +8,7 @@ function c64163367.initial_effect(c) ...@@ -8,7 +8,7 @@ function c64163367.initial_effect(c)
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:SetRange(LOCATION_SZONE) e2:SetRange(LOCATION_SZONE)
e2:SetCode(EVENT_REMOVE_COUNTER+0xe) e2:SetCode(EVENT_REMOVE_COUNTER+0x100e)
e2:SetOperation(c64163367.ctop1) e2:SetOperation(c64163367.ctop1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--counter2 --counter2
...@@ -22,10 +22,10 @@ function c64163367.initial_effect(c) ...@@ -22,10 +22,10 @@ function c64163367.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c64163367.ctop1(e,tp,eg,ep,ev,re,r,rp) function c64163367.ctop1(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(COUNTER_NEED_ENABLE+0xe,1) e:GetHandler():AddCounter(COUNTER_NEED_ENABLE+0x100e,1)
end end
function c64163367.ctcon2(e,tp,eg,ep,ev,re,r,rp) function c64163367.ctcon2(e,tp,eg,ep,ev,re,r,rp)
local ct=e:GetHandler():GetCounter(0xe) local ct=e:GetHandler():GetCounter(0x100e)
e:SetLabel(ct) e:SetLabel(ct)
return e:GetHandler():IsReason(REASON_DESTROY) and ct>0 return e:GetHandler():IsReason(REASON_DESTROY) and ct>0
end end
...@@ -36,6 +36,6 @@ function c64163367.ctop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -36,6 +36,6 @@ function c64163367.ctop2(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(64163367,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(64163367,1))
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1) sg:GetFirst():AddCounter(0x100e,1)
end end
end end
--熟練の赤魔術士 --熟練の赤魔術士
function c65338781.initial_effect(c) function c65338781.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,3) c:SetCounterLimit(0x1,3)
--add counter --add counter
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -39,11 +39,11 @@ function c65338781.initial_effect(c) ...@@ -39,11 +39,11 @@ function c65338781.initial_effect(c)
end end
function c65338781.acop(e,tp,eg,ep,ev,re,r,rp) function c65338781.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c65338781.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c65338781.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetCounter(0x3001)==3 and e:GetHandler():IsReleasable() end if chk==0 then return e:GetHandler():GetCounter(0x1)==3 and e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST) Duel.Release(e:GetHandler(),REASON_COST)
end end
function c65338781.filter(c,e,tp) function c65338781.filter(c,e,tp)
...@@ -67,18 +67,18 @@ function c65338781.ctcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -67,18 +67,18 @@ function c65338781.ctcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST) Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end end
function c65338781.ctfilter(c) function c65338781.ctfilter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c65338781.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c65338781.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c65338781.ctfilter(chkc) end if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c65338781.ctfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c65338781.ctfilter,tp,LOCATION_ONFIELD,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c65338781.ctfilter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(65338781,2)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(65338781,2))
Duel.SelectTarget(tp,c65338781.ctfilter,tp,LOCATION_ONFIELD,0,1,1,nil) Duel.SelectTarget(tp,c65338781.ctfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c65338781.ctop(e,tp,eg,ep,ev,re,r,rp) function c65338781.ctop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1) tc:AddCounter(0x1,1)
end end
end end
...@@ -23,11 +23,11 @@ function c67675300.initial_effect(c) ...@@ -23,11 +23,11 @@ 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(c:GetControler(),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,0x1015,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,0x1015,4,REASON_RULE)
end end
function c67675300.target(e,c) function c67675300.target(e,c)
return c~=e:GetHandler() and c:GetCounter(0x15)~=0 return c~=e:GetHandler() and c:GetCounter(0x1015)~=0
end end
...@@ -47,12 +47,12 @@ function c68319538.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,12 +47,12 @@ function c68319538.operation(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(68319538,2)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(68319538,2))
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1) sg:GetFirst():AddCounter(0x100e,1)
end end
end end
function c68319538.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c68319538.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0xe,2,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x100e,2,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0xe,2,REASON_COST) Duel.RemoveCounter(tp,1,1,0x100e,2,REASON_COST)
end end
function c68319538.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c68319538.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsDestructable() end if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsDestructable() end
......
...@@ -14,8 +14,8 @@ function c68334074.initial_effect(c) ...@@ -14,8 +14,8 @@ function c68334074.initial_effect(c)
end end
c68334074.dark_magician_list=true c68334074.dark_magician_list=true
function c68334074.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c68334074.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,2,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3001,2,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
end end
function c68334074.filter(c,e,tp) function c68334074.filter(c,e,tp)
return c:IsCode(46986414,78193831) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCode(46986414,78193831) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -35,23 +35,23 @@ function c69031175.initial_effect(c) ...@@ -35,23 +35,23 @@ function c69031175.initial_effect(c)
end end
function c69031175.condition1(e,tp,eg,ep,ev,re,r,rp) function c69031175.condition1(e,tp,eg,ep,ev,re,r,rp)
local atg=Duel.GetAttackTarget() local atg=Duel.GetAttackTarget()
return Duel.GetAttacker()==e:GetHandler() and atg and atg:IsRelateToBattle() and atg:GetCounter(0x2)==0 return Duel.GetAttacker()==e:GetHandler() and atg and atg:IsRelateToBattle() and atg:GetCounter(0x1002)==0
end end
function c69031175.operation1(e,tp,eg,ep,ev,re,r,rp) function c69031175.operation1(e,tp,eg,ep,ev,re,r,rp)
local atg=Duel.GetAttackTarget() local atg=Duel.GetAttackTarget()
if atg:IsRelateToBattle() then if atg:IsRelateToBattle() then
atg:AddCounter(0x2,1) atg:AddCounter(0x1002,1)
end end
end end
function c69031175.filter(c) function c69031175.filter(c)
return c:GetCounter(0x2)>0 return c:GetCounter(0x1002)>0
end end
function c69031175.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function c69031175.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c69031175.filter,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c69031175.filter,tp,0,LOCATION_MZONE,1,nil) end
local g=Duel.GetMatchingGroup(c69031175.filter,tp,0,LOCATION_MZONE,nil) local g=Duel.GetMatchingGroup(c69031175.filter,tp,0,LOCATION_MZONE,nil)
local t=g:GetFirst() local t=g:GetFirst()
while t do while t do
t:RemoveCounter(tp,0x2,t:GetCounter(0x2),REASON_COST) t:RemoveCounter(tp,0x1002,t:GetCounter(0x1002),REASON_COST)
t=g:GetNext() t=g:GetNext()
end end
Duel.SetTargetCard(g) Duel.SetTargetCard(g)
......
...@@ -26,7 +26,7 @@ function c69170557.initial_effect(c) ...@@ -26,7 +26,7 @@ function c69170557.initial_effect(c)
end end
c69170557.xyz_number=40 c69170557.xyz_number=40
function c69170557.desfilter(c) function c69170557.desfilter(c)
return c:GetCounter(0x24)~=0 and c:IsDestructable() return c:GetCounter(0x1024)~=0 and c:IsDestructable()
end end
function c69170557.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c69170557.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
...@@ -57,7 +57,7 @@ function c69170557.ctop(e,tp,eg,ep,ev,re,r,rp) ...@@ -57,7 +57,7 @@ function c69170557.ctop(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()
while tc do while tc do
tc:AddCounter(0x24,1) tc:AddCounter(0x1024,1)
tc=g:GetNext() tc=g:GetNext()
end end
end end
--王立魔法図書館 --王立魔法図書館
function c70791313.initial_effect(c) function c70791313.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,3) c:SetCounterLimit(0x1,3)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -30,12 +30,12 @@ function c70791313.initial_effect(c) ...@@ -30,12 +30,12 @@ function c70791313.initial_effect(c)
end end
function c70791313.acop(e,tp,eg,ep,ev,re,r,rp) function c70791313.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c70791313.drcost(e,tp,eg,ep,ev,re,r,rp,chk) function c70791313.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,3,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end end
function c70791313.drtg(e,tp,eg,ep,ev,re,r,rp,chk) function c70791313.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
......
--魔導戦士 ブレイカー --魔導戦士 ブレイカー
function c71413901.initial_effect(c) function c71413901.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,1) c:SetCounterLimit(0x1,1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(71413901,0)) e1:SetDescription(aux.Stringid(71413901,0))
...@@ -33,19 +33,19 @@ function c71413901.initial_effect(c) ...@@ -33,19 +33,19 @@ function c71413901.initial_effect(c)
end end
function c71413901.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c71413901.addct(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c71413901.addc(e,tp,eg,ep,ev,re,r,rp) function c71413901.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c71413901.attackup(e,c) function c71413901.attackup(e,c)
return c:GetCounter(0x3001)*300 return c:GetCounter(0x1)*300
end end
function c71413901.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c71413901.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,1,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end end
function c71413901.filter(c) function c71413901.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
...@@ -30,8 +30,8 @@ function c7180418.atklimit(e,tp,eg,ep,ev,re,r,rp) ...@@ -30,8 +30,8 @@ function c7180418.atklimit(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterEffect(e1) e:GetHandler():RegisterEffect(e1)
end end
function c7180418.ccost(e,tp,eg,ep,ev,re,r,rp) function c7180418.ccost(e,tp,eg,ep,ev,re,r,rp)
if Duel.IsCanRemoveCounter(tp,1,0,0x3001,1,REASON_COST) and Duel.SelectYesNo(tp,aux.Stringid(7180418,0)) then if Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) and Duel.SelectYesNo(tp,aux.Stringid(7180418,0)) then
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
else else
Duel.Destroy(e:GetHandler(),REASON_COST) Duel.Destroy(e:GetHandler(),REASON_COST)
end end
......
--六武衆の結束 --六武衆の結束
function c72345736.initial_effect(c) function c72345736.initial_effect(c)
c:EnableCounterPermit(0x3003) c:EnableCounterPermit(0x3)
c:SetCounterLimit(0x3003,2) c:SetCounterLimit(0x3,2)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -33,18 +33,18 @@ function c72345736.ctfilter(c) ...@@ -33,18 +33,18 @@ function c72345736.ctfilter(c)
end end
function c72345736.ctop(e,tp,eg,ep,ev,re,r,rp) function c72345736.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c72345736.ctfilter,1,nil) then if eg:IsExists(c72345736.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,1) e:GetHandler():AddCounter(0x3,1)
end end
end end
function c72345736.drcost(e,tp,eg,ep,ev,re,r,rp,chk) function c72345736.drcost(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
local ct=e:GetHandler():GetCounter(0x3003) local ct=e:GetHandler():GetCounter(0x3)
e:SetLabel(ct) e:SetLabel(ct)
Duel.SendtoGrave(e:GetHandler(),REASON_COST) Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end end
function c72345736.drtg(e,tp,eg,ep,ev,re,r,rp,chk) function c72345736.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
if chk==0 then return c:GetCounter(0x3003)>0 and Duel.IsPlayerCanDraw(tp,c:GetCounter(0x3003)) end if chk==0 then return c:GetCounter(0x3)>0 and Duel.IsPlayerCanDraw(tp,c:GetCounter(0x3)) end
local ct=e:GetLabel() local ct=e:GetLabel()
Duel.SetTargetPlayer(tp) Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(ct) Duel.SetTargetParam(ct)
......
...@@ -30,7 +30,7 @@ function c73262676.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -30,7 +30,7 @@ function c73262676.operation(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()==0 then return end if g:GetCount()==0 then return end
for i=1,lv do for i=1,lv do
local sg=g:Select(tp,1,1,nil) local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1) sg:GetFirst():AddCounter(0x100e,1)
end end
end end
end end
...@@ -44,12 +44,12 @@ function c73659078.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -44,12 +44,12 @@ function c73659078.operation(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(73659078,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(73659078,1))
local tc=g:Select(tp,1,1,nil):GetFirst() local tc=g:Select(tp,1,1,nil):GetFirst()
tc:AddCounter(0x15,1) tc:AddCounter(0x1015,1)
end end
end end
function c73659078.atktg(e,c) function c73659078.atktg(e,c)
return not c:IsAttribute(ATTRIBUTE_WATER) return not c:IsAttribute(ATTRIBUTE_WATER)
end end
function c73659078.atkval(e,c) function c73659078.atkval(e,c)
return Duel.GetCounter(0,1,1,0x15)*-200 return Duel.GetCounter(0,1,1,0x1015)*-200
end end
--サイレント・マジシャン LV4 --サイレント・マジシャン LV4
function c73665146.initial_effect(c) function c73665146.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,5) c:SetCounterLimit(0x1,5)
--draw --draw
local 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)
...@@ -32,14 +32,14 @@ c73665146.lvupcount=1 ...@@ -32,14 +32,14 @@ c73665146.lvupcount=1
c73665146.lvup={72443568} c73665146.lvup={72443568}
function c73665146.addc(e,tp,eg,ep,ev,re,r,rp) function c73665146.addc(e,tp,eg,ep,ev,re,r,rp)
if ep~=tp then if ep~=tp then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c73665146.attackup(e,c) function c73665146.attackup(e,c)
return c:GetCounter(0x3001)*500 return c:GetCounter(0x1)*500
end end
function c73665146.spcon(e,tp,eg,ep,ev,re,r,rp) function c73665146.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x3001)==5 and tp==Duel.GetTurnPlayer() return e:GetHandler():GetCounter(0x1)==5 and tp==Duel.GetTurnPlayer()
end end
function c73665146.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c73665146.spcost(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
......
--熟練の黒魔術師 --熟練の黒魔術師
function c73752131.initial_effect(c) function c73752131.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,3) c:SetCounterLimit(0x1,3)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -29,11 +29,11 @@ function c73752131.initial_effect(c) ...@@ -29,11 +29,11 @@ function c73752131.initial_effect(c)
end end
function c73752131.acop(e,tp,eg,ep,ev,re,r,rp) function c73752131.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c73752131.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c73752131.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetCounter(0x3001)==3 and e:GetHandler():IsReleasable() end if chk==0 then return e:GetHandler():GetCounter(0x1)==3 and e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST) Duel.Release(e:GetHandler(),REASON_COST)
end end
function c73752131.filter(c,e,tp) function c73752131.filter(c,e,tp)
......
...@@ -15,17 +15,17 @@ function c73853830.initial_effect(c) ...@@ -15,17 +15,17 @@ function c73853830.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c73853830.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c73853830.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCanAddCounter(0x3001,1) end if chkc then return chkc:IsCanAddCounter(0x1,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,0x3001,1) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,0x1,1) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(73853830,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(73853830,1))
local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,0x3001,1) local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,0x1,1)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c73853830.operation(e,tp,eg,ep,ev,re,r,rp) function c73853830.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x3001,1) then if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1,1) then
tc:AddCounter(0x3001,1) tc:AddCounter(0x1,1)
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)
......
...@@ -23,17 +23,17 @@ function c73899015.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -23,17 +23,17 @@ function c73899015.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:GetHandler():RegisterEffect(e1) e:GetHandler():RegisterEffect(e1)
end end
function c73899015.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c73899015.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(1-tp) and chkc:IsCanAddCounter(0x9,1) end if chkc then return chkc:IsControler(1-tp) and chkc:IsCanAddCounter(0x1009,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x9,1) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1009,1) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPPO)
local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x9,1) local g=Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,1,nil,0x1009,1)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c73899015.operation(e,tp,eg,ep,ev,re,r,rp) function c73899015.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x9,1) then if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1009,1) then
local atk=tc:GetAttack() local atk=tc:GetAttack()
tc:AddCounter(0x9,1) tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0) Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end end
......
...@@ -12,21 +12,21 @@ function c75014062.initial_effect(c) ...@@ -12,21 +12,21 @@ function c75014062.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c75014062.filter(c) function c75014062.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c75014062.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c75014062.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c75014062.filter(chkc) end if chkc then return chkc:IsOnField() and c75014062.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c75014062.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(c75014062.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75014062,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(75014062,1))
Duel.SelectTarget(tp,c75014062.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) Duel.SelectTarget(tp,c75014062.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c75014062.tfilter(c) function c75014062.tfilter(c)
return c:IsCode(75014062) and c:IsAbleToHand() return c:IsCode(75014062) and c:IsAbleToHand()
end end
function c75014062.activate(e,tp,eg,ep,ev,re,r,rp) function c75014062.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc and tc:IsFaceup() and tc:IsRelateToEffect(e) and tc:AddCounter(0x3001,1) then if tc and tc:IsFaceup() and tc:IsRelateToEffect(e) and tc:AddCounter(0x1,1) then
local th=Duel.GetFirstMatchingCard(c75014062.tfilter,tp,LOCATION_DECK,0,nil) local th=Duel.GetFirstMatchingCard(c75014062.tfilter,tp,LOCATION_DECK,0,nil)
if th and Duel.SelectYesNo(tp,aux.Stringid(75014062,0)) then if th and Duel.SelectYesNo(tp,aux.Stringid(75014062,0)) then
Duel.SendtoHand(th,nil,REASON_EFFECT) Duel.SendtoHand(th,nil,REASON_EFFECT)
......
...@@ -37,7 +37,7 @@ function c75433814.ctop(e,tp,eg,ep,ev,re,r,rp) ...@@ -37,7 +37,7 @@ function c75433814.ctop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,e:GetHandler()) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,e:GetHandler())
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
tc:AddCounter(0x24,1) tc:AddCounter(0x1024,1)
tc=g:GetNext() tc=g:GetNext()
end end
Duel.RegisterFlagEffect(tp,75433814,RESET_PHASE+PHASE_END,0,2) Duel.RegisterFlagEffect(tp,75433814,RESET_PHASE+PHASE_END,0,2)
...@@ -46,7 +46,7 @@ function c75433814.descon(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +46,7 @@ function c75433814.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,75433814)~=0 and Duel.GetTurnPlayer()~=tp return Duel.GetFlagEffect(tp,75433814)~=0 and Duel.GetTurnPlayer()~=tp
end end
function c75433814.desfilter(c) function c75433814.desfilter(c)
return c:GetCounter(0x24)~=0 and c:IsDestructable() return c:GetCounter(0x1024)~=0 and c:IsDestructable()
end end
function c75433814.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c75433814.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c75433814.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c75433814.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
......
...@@ -14,8 +14,8 @@ function c76137614.initial_effect(c) ...@@ -14,8 +14,8 @@ function c76137614.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c76137614.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c76137614.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x3001,1,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1,1,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x3001,1,REASON_COST) Duel.RemoveCounter(tp,1,1,0x1,1,REASON_COST)
end end
function c76137614.filter(c) function c76137614.filter(c)
return c:IsType(TYPE_SPELL) and c:IsFaceup() and c:IsAbleToHand() return c:IsType(TYPE_SPELL) and c:IsFaceup() and c:IsAbleToHand()
......
...@@ -26,7 +26,7 @@ function c77972406.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -26,7 +26,7 @@ function c77972406.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE,1) Duel.SkipPhase(1-tp,PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE,1)
Duel.BreakEffect() Duel.BreakEffect()
local atk=tc:GetAttack() local atk=tc:GetAttack()
tc:AddCounter(0x9,1) tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0) Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end end
......
...@@ -9,13 +9,13 @@ function c7802006.initial_effect(c) ...@@ -9,13 +9,13 @@ function c7802006.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c7802006.filter(c) function c7802006.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c7802006.operation(e,tp,eg,ep,ev,re,r,rp) function c7802006.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c7802006.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c7802006.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
tc:AddCounter(0x3001,1) tc:AddCounter(0x1,1)
tc=g:GetNext() tc=g:GetNext()
end end
end end
...@@ -17,14 +17,14 @@ function c78121572.con(e,tp,eg,ep,ev,re,r,rp) ...@@ -17,14 +17,14 @@ function c78121572.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPosition(POS_FACEUP_ATTACK) return e:GetHandler():IsPosition(POS_FACEUP_ATTACK)
end end
function c78121572.filter(c) function c78121572.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c78121572.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c78121572.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c78121572.filter(chkc) end if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c78121572.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c78121572.filter,tp,LOCATION_ONFIELD,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c78121572.filter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(78121572,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(78121572,1))
local g=Duel.SelectTarget(tp,c78121572.filter,tp,LOCATION_ONFIELD,0,1,1,nil) local g=Duel.SelectTarget(tp,c78121572.filter,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3001) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1)
end end
function c78121572.op(e,tp,eg,ep,ev,re,r,rp) function c78121572.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -32,7 +32,7 @@ function c78121572.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,7 +32,7 @@ function c78121572.op(e,tp,eg,ep,ev,re,r,rp)
if c:IsRelateToEffect(e) and c:IsPosition(POS_FACEUP_ATTACK) then if c:IsRelateToEffect(e) and c:IsPosition(POS_FACEUP_ATTACK) then
Duel.ChangePosition(c,POS_FACEUP_DEFENCE) Duel.ChangePosition(c,POS_FACEUP_DEFENCE)
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1) tc:AddCounter(0x1,1)
end end
end end
end end
...@@ -42,12 +42,12 @@ end ...@@ -42,12 +42,12 @@ end
function c79703905.addc(e,tp,eg,ep,ev,re,r,rp) function c79703905.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c79703905.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) local ct=Duel.GetMatchingGroupCount(c79703905.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct) e:GetHandler():AddCounter(0x1019,ct)
end end
end end
function c79703905.hdcost(e,tp,eg,ep,ev,re,r,rp,chk) function c79703905.hdcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x19,3,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1019,3,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x19,3,REASON_COST) Duel.RemoveCounter(tp,1,1,0x1019,3,REASON_COST)
end end
function c79703905.hdtg(e,tp,eg,ep,ev,re,r,rp,chk) function c79703905.hdtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)~=0 end if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)~=0 end
......
...@@ -41,8 +41,8 @@ function c799183.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -41,8 +41,8 @@ function c799183.activate(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c799183.setcost(e,tp,eg,ep,ev,re,r,rp,chk) function c799183.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3001,1,REASON_COST) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST) Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
end end
function c799183.settg(e,tp,eg,ep,ev,re,r,rp,chk) function c799183.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsSSetable() end if chk==0 then return e:GetHandler():IsSSetable() end
......
--魔法の操り人形 --魔法の操り人形
function c8034697.initial_effect(c) function c8034697.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--add counter --add counter
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -36,15 +36,15 @@ function c8034697.initial_effect(c) ...@@ -36,15 +36,15 @@ function c8034697.initial_effect(c)
end end
function c8034697.acop(e,tp,eg,ep,ev,re,r,rp) function c8034697.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
end end
function c8034697.attackup(e,c) function c8034697.attackup(e,c)
return c:GetCounter(0x3001)*200 return c:GetCounter(0x1)*200
end end
function c8034697.descost(e,tp,eg,ep,ev,re,r,rp,chk) function c8034697.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,2,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,2,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,2,REASON_COST)
end end
function c8034697.destarg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c8034697.destarg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsDestructable() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsDestructable() end
......
...@@ -5,7 +5,7 @@ function c83269557.initial_effect(c) ...@@ -5,7 +5,7 @@ function c83269557.initial_effect(c)
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_COUNTER_PERMIT+0x3001) e1:SetCode(EFFECT_COUNTER_PERMIT+0x1)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetCondition(aux.IsDualState) e1:SetCondition(aux.IsDualState)
c:RegisterEffect(e1) c:RegisterEffect(e1)
...@@ -44,18 +44,18 @@ function c83269557.initial_effect(c) ...@@ -44,18 +44,18 @@ function c83269557.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c83269557.atkval(e,c) function c83269557.atkval(e,c)
return c:GetCounter(0x3001)*300 return c:GetCounter(0x1)*300
end end
function c83269557.target1(e,tp,eg,ep,ev,re,r,rp,chk) function c83269557.target1(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanAddCounter(0x3001,1) end if chk==0 then return e:GetHandler():IsCanAddCounter(0x1,1) end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0)
end end
function c83269557.operation1(e,tp,eg,ep,ev,re,r,rp) function c83269557.operation1(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
function c83269557.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function c83269557.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3001,1,REASON_COST) end if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST) e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end end
function c83269557.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c83269557.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsDestructable() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsDestructable() end
......
...@@ -31,6 +31,6 @@ function c83604828.ctop(e,tp,eg,ep,ev,re,r,rp) ...@@ -31,6 +31,6 @@ function c83604828.ctop(e,tp,eg,ep,ev,re,r,rp)
for i=1,lv do for i=1,lv do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(83604828,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(83604828,1))
local tc=g:Select(tp,1,1,nil):GetFirst() local tc=g:Select(tp,1,1,nil):GetFirst()
tc:AddCounter(0x19,1) tc:AddCounter(0x1019,1)
end end
end end
--ゲイシャドウ --ゲイシャドウ
function c84055227.initial_effect(c) function c84055227.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
--add counter --add counter
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(84055227,0)) e1:SetDescription(aux.Stringid(84055227,0))
...@@ -23,8 +23,8 @@ function c84055227.condition(e,tp,eg,ep,ev,re,r,rp) ...@@ -23,8 +23,8 @@ function c84055227.condition(e,tp,eg,ep,ev,re,r,rp)
return c:IsRelateToBattle() and c:GetBattleTarget():IsType(TYPE_MONSTER) return c:IsRelateToBattle() and c:GetBattleTarget():IsType(TYPE_MONSTER)
end end
function c84055227.operation(e,tp,eg,ep,ev,re,r,rp) function c84055227.operation(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1) e:GetHandler():AddCounter(0x1,1)
end end
function c84055227.attackup(e,c) function c84055227.attackup(e,c)
return c:GetCounter(0x3001)*200 return c:GetCounter(0x1)*200
end end
...@@ -12,7 +12,7 @@ function c84491298.initial_effect(c) ...@@ -12,7 +12,7 @@ function c84491298.initial_effect(c)
end end
function c84491298.condition(e,tp,eg,ep,ev,re,r,rp) function c84491298.condition(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
return a:IsControler(1-tp) and a:GetCounter(0xe)>0 return a:IsControler(1-tp) and a:GetCounter(0x100e)>0
end end
function c84491298.filter(c) function c84491298.filter(c)
return c:IsAttackPos() and c:IsDestructable() return c:IsAttackPos() and c:IsDestructable()
......
--脳開発研究所 --脳開発研究所
function c85668449.initial_effect(c) function c85668449.initial_effect(c)
c:EnableCounterPermit(0x3004) c:EnableCounterPermit(0x4)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -38,7 +38,7 @@ function c85668449.initial_effect(c) ...@@ -38,7 +38,7 @@ function c85668449.initial_effect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c85668449.esop(e,c) function c85668449.esop(e,c)
e:GetHandler():AddCounter(0x3004,1) e:GetHandler():AddCounter(0x4,1)
end end
function c85668449.lrcon(e,tp,eg,ep,ev,re,r,rp) function c85668449.lrcon(e,tp,eg,ep,ev,re,r,rp)
if tp~=ep then return false end if tp~=ep then return false end
...@@ -49,11 +49,11 @@ function c85668449.lrcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -49,11 +49,11 @@ function c85668449.lrcon(e,tp,eg,ep,ev,re,r,rp)
return rc:IsLocation(LOCATION_MZONE) and rc:IsRace(RACE_PSYCHO) return rc:IsLocation(LOCATION_MZONE) and rc:IsRace(RACE_PSYCHO)
end end
function c85668449.lrop(e,tp,eg,ep,ev,re,r,rp) function c85668449.lrop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3004,1) e:GetHandler():AddCounter(0x4,1)
end end
function c85668449.damp(e,tp,eg,ep,ev,re,r,rp) function c85668449.damp(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local ct=c:GetCounter(0x3004) local ct=c:GetCounter(0x4)
e:SetLabel(ct) e:SetLabel(ct)
end end
function c85668449.damop(e,tp,eg,ep,ev,re,r,rp) function c85668449.damop(e,tp,eg,ep,ev,re,r,rp)
......
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