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)
......
--熟練の青魔道士 --熟練の青魔道士
function c88901771.initial_effect(c) function c88901771.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)
...@@ -39,11 +39,11 @@ function c88901771.initial_effect(c) ...@@ -39,11 +39,11 @@ function c88901771.initial_effect(c)
end end
function c88901771.acop(e,tp,eg,ep,ev,re,r,rp) function c88901771.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 c88901771.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c88901771.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 c88901771.filter(c,e,tp) function c88901771.filter(c,e,tp)
...@@ -67,18 +67,18 @@ function c88901771.ctcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -67,18 +67,18 @@ function c88901771.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 c88901771.ctfilter(c) function c88901771.ctfilter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c88901771.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c88901771.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c88901771.ctfilter(chkc) end if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and c88901771.ctfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c88901771.ctfilter,tp,LOCATION_ONFIELD,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c88901771.ctfilter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(88901771,2)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(88901771,2))
Duel.SelectTarget(tp,c88901771.ctfilter,tp,LOCATION_ONFIELD,0,1,1,nil) Duel.SelectTarget(tp,c88901771.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 c88901771.ctop(e,tp,eg,ep,ev,re,r,rp) function c88901771.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
--ブラックフェザー・ドラゴン --ブラックフェザー・ドラゴン
function c9012916.initial_effect(c) function c9012916.initial_effect(c)
c:EnableCounterPermit(0x3010) c:EnableCounterPermit(0x10)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -38,19 +38,19 @@ function c9012916.initial_effect(c) ...@@ -38,19 +38,19 @@ function c9012916.initial_effect(c)
end end
function c9012916.damval(e,re,val,r,rp,rc) function c9012916.damval(e,re,val,r,rp,rc)
if bit.band(r,REASON_EFFECT)~=0 then if bit.band(r,REASON_EFFECT)~=0 then
e:GetHandler():AddCounter(0x3010,1) e:GetHandler():AddCounter(0x10,1)
return 0 return 0
end end
return val return val
end end
function c9012916.atkval(e,c) function c9012916.atkval(e,c)
return c:GetCounter(0x3010)*-700 return c:GetCounter(0x10)*-700
end end
function c9012916.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c9012916.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetCounter(0x3010)>0 end if chk==0 then return e:GetHandler():GetCounter(0x10)>0 end
local ct=e:GetHandler():GetCounter(0x3010) local ct=e:GetHandler():GetCounter(0x10)
e:SetLabel(ct*700) e:SetLabel(ct*700)
e:GetHandler():RemoveCounter(tp,0x3010,ct,REASON_COST) e:GetHandler():RemoveCounter(tp,0x10,ct,REASON_COST)
end end
function c9012916.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c9012916.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 chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsFaceup() end
......
...@@ -24,7 +24,7 @@ function c90135989.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -24,7 +24,7 @@ function c90135989.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(0x19,1) tc:AddCounter(0x1019,1)
tc=g:GetNext() tc=g:GetNext()
end end
end end
...@@ -12,7 +12,7 @@ function c90557975.initial_effect(c) ...@@ -12,7 +12,7 @@ function c90557975.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c90557975.filter(c) function c90557975.filter(c)
return c:GetCounter(0x19)>0 return c:GetCounter(0x1019)>0
end end
function c90557975.damcost(e,tp,eg,ep,ev,re,r,rp,chk) function c90557975.damcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c90557975.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c90557975.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
...@@ -20,9 +20,9 @@ function c90557975.damcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -20,9 +20,9 @@ function c90557975.damcost(e,tp,eg,ep,ev,re,r,rp,chk)
local tc=g:GetFirst() local tc=g:GetFirst()
local s=0 local s=0
while tc do while tc do
local ct=tc:GetCounter(0x19) local ct=tc:GetCounter(0x1019)
s=s+ct s=s+ct
tc:RemoveCounter(tp,0x19,ct,REASON_COST) tc:RemoveCounter(tp,0x1019,ct,REASON_COST)
tc=g:GetNext() tc=g:GetNext()
end end
e:SetLabel(s*300) e:SetLabel(s*300)
......
--A・ジェネクス・ベルフレイム --A・ジェネクス・ベルフレイム
function c91438994.initial_effect(c) function c91438994.initial_effect(c)
c:EnableCounterPermit(0xa)
--add counter --add counter
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)
...@@ -44,7 +45,7 @@ function c91438994.filter1(c,tp) ...@@ -44,7 +45,7 @@ function c91438994.filter1(c,tp)
end end
function c91438994.addc1(e,tp,eg,ep,ev,re,r,rp) function c91438994.addc1(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c91438994.filter1,1,nil,tp) then if eg:IsExists(c91438994.filter1,1,nil,tp) then
e:GetHandler():AddCounter(0xa+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0xa,1)
end end
end end
function c91438994.filter2(c,tp) function c91438994.filter2(c,tp)
...@@ -52,7 +53,7 @@ function c91438994.filter2(c,tp) ...@@ -52,7 +53,7 @@ function c91438994.filter2(c,tp)
end end
function c91438994.addc2(e,tp,eg,ep,ev,re,r,rp) function c91438994.addc2(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c91438994.filter2,1,nil,tp) then if eg:IsExists(c91438994.filter2,1,nil,tp) then
e:GetHandler():AddCounter(0xa+COUNTER_NEED_ENABLE,2) e:GetHandler():AddCounter(0xa,2)
end end
end end
function c91438994.attackup(e,c) function c91438994.attackup(e,c)
......
...@@ -28,19 +28,19 @@ function c9156135.initial_effect(c) ...@@ -28,19 +28,19 @@ function c9156135.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c9156135.filter(c) function c9156135.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1) return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end end
function c9156135.addct(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c9156135.addct(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and c9156135.filter(chkc) end if chkc then return chkc:IsOnField() and c9156135.filter(chkc) end
if chk==0 then return true end if chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,c9156135.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) Duel.SelectTarget(tp,c9156135.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 c9156135.addc(e,tp,eg,ep,ev,re,r,rp) function c9156135.addc(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) then if tc and tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1) tc:AddCounter(0x1,1)
end end
end end
function c9156135.condition(e,tp,eg,ep,ev,re,r,rp) function c9156135.condition(e,tp,eg,ep,ev,re,r,rp)
......
--D・クロックン --D・クロックン
function c91607976.initial_effect(c) function c91607976.initial_effect(c)
c:EnableCounterPermit(0x8)
--atk --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
...@@ -43,7 +44,7 @@ function c91607976.cond1(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,7 +44,7 @@ function c91607976.cond1(e,tp,eg,ep,ev,re,r,rp)
end end
function c91607976.opd1(e,tp,eg,ep,ev,re,r,rp) function c91607976.opd1(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x8+COUNTER_NEED_ENABLE,1) e:GetHandler():AddCounter(0x8,1)
end end
end end
function c91607976.cond2(e,tp,eg,ep,ev,re,r,rp) function c91607976.cond2(e,tp,eg,ep,ev,re,r,rp)
......
--古代の機械城 --古代の機械城
function c92001300.initial_effect(c) function c92001300.initial_effect(c)
c:EnableCounterPermit(0x300b) c:EnableCounterPermit(0xb)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -42,12 +42,12 @@ function c92001300.initial_effect(c) ...@@ -42,12 +42,12 @@ function c92001300.initial_effect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c92001300.addc(e,tp,eg,ep,ev,re,r,rp) function c92001300.addc(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x300b,1) e:GetHandler():AddCounter(0xb,1)
end end
function c92001300.sumcon(e,c) function c92001300.sumcon(e,c)
if c==nil then return e:GetHandler():IsReleasable() end if c==nil then return e:GetHandler():IsReleasable() end
local mi,ma=c:GetTributeRequirement() local mi,ma=c:GetTributeRequirement()
return ma>0 and e:GetHandler():GetCounter(0x300b)>=mi and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 return ma>0 and e:GetHandler():GetCounter(0xb)>=mi and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
end end
function c92001300.sumop(e,tp,eg,ep,ev,re,r,rp,c) function c92001300.sumop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Release(e:GetHandler(),REASON_COST) Duel.Release(e:GetHandler(),REASON_COST)
......
...@@ -23,17 +23,17 @@ function c9284723.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -23,17 +23,17 @@ function c9284723.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:GetHandler():RegisterEffect(e1) e:GetHandler():RegisterEffect(e1)
end end
function c9284723.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c9284723.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) end if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x1009,2) 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,2,0,0) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0)
end end
function c9284723.operation(e,tp,eg,ep,ev,re,r,rp) function c9284723.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,2) then if tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1009,2) 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 c94256039.initial_effect(c) function c94256039.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)
...@@ -33,7 +33,7 @@ function c94256039.initial_effect(c) ...@@ -33,7 +33,7 @@ function c94256039.initial_effect(c)
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_DESTROY) e5:SetCategory(CATEGORY_DESTROY)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e5:SetCode(EVENT_ADD_COUNTER+0x3001) e5:SetCode(EVENT_ADD_COUNTER+0x1)
e5:SetCondition(c94256039.descon) e5:SetCondition(c94256039.descon)
e5:SetTarget(c94256039.destg) e5:SetTarget(c94256039.destg)
e5:SetOperation(c94256039.desop) e5:SetOperation(c94256039.desop)
...@@ -43,8 +43,8 @@ function c94256039.acop(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,8 +43,8 @@ function c94256039.acop(e,tp,eg,ep,ev,re,r,rp)
local p=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_PLAYER) local p=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_PLAYER)
local c=e:GetHandler() local c=e:GetHandler()
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c:GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c:GetFlagEffect(1)>0 then
c:AddCounter(0x3001,1) c:AddCounter(0x1,1)
if c:GetCounter(0x3001)==4 then if c:GetCounter(0x1)==4 then
Duel.RaiseSingleEvent(c,EVENT_CUSTOM+94256039,re,0,0,p,0) Duel.RaiseSingleEvent(c,EVENT_CUSTOM+94256039,re,0,0,p,0)
end end
end end
...@@ -61,7 +61,7 @@ function c94256039.damop(e,tp,eg,ep,ev,re,r,rp) ...@@ -61,7 +61,7 @@ function c94256039.damop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c94256039.descon(e,tp,eg,ep,ev,re,r,rp) function c94256039.descon(e,tp,eg,ep,ev,re,r,rp)
return re:GetHandler()~=e:GetHandler() and e:GetHandler():GetCounter(0x3001)>=4 return re:GetHandler()~=e:GetHandler() and e:GetHandler():GetCounter(0x1)>=4
end end
function c94256039.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c94256039.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
......
--臨時収入 --臨時収入
function c94937430.initial_effect(c) function c94937430.initial_effect(c)
c:EnableCounterPermit(0x3001) c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x3001,3) c:SetCounterLimit(0x1,3)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -33,11 +33,11 @@ end ...@@ -33,11 +33,11 @@ end
function c94937430.acop(e,tp,eg,ep,ev,re,r,rp) function c94937430.acop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if eg:IsExists(c94937430.cfilter,1,nil,tp) then if eg:IsExists(c94937430.cfilter,1,nil,tp) then
c:AddCounter(0x3001,1) c:AddCounter(0x1,1)
end end
end end
function c94937430.drcon(e,tp,eg,ep,ev,re,r,rp) function c94937430.drcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x3001)==3 return e:GetHandler():GetCounter(0x1)==3
end end
function c94937430.drcost(e,tp,eg,ep,ev,re,r,rp,chk) function c94937430.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
......
...@@ -9,17 +9,17 @@ function c95451366.initial_effect(c) ...@@ -9,17 +9,17 @@ function c95451366.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c95451366.target(e,tp,eg,ep,ev,re,r,rp,chk) function c95451366.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x3001,1,REASON_EFFECT) end if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1,1,REASON_EFFECT) end
end end
function c95451366.filter(c) function c95451366.filter(c)
return c:IsFaceup() and c:GetCounter(0x3001)~=0 return c:IsFaceup() and c:GetCounter(0x1)~=0
end end
function c95451366.activate(e,tp,eg,ep,ev,re,r,rp) function c95451366.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c95451366.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(c95451366.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
local cc=tc:GetCounter(0x3001) local cc=tc:GetCounter(0x1)
tc:RemoveCounter(tp,0x3001,cc,REASON_EFFECT) tc:RemoveCounter(tp,0x1,cc,REASON_EFFECT)
tc=g:GetNext() tc=g:GetNext()
end end
end end
--紫炎の荒武者 --紫炎の荒武者
function c98162021.initial_effect(c) function c98162021.initial_effect(c)
c:EnableCounterPermit(0x3003) c:EnableCounterPermit(0x3)
c:SetCounterLimit(0x3003,1) c:SetCounterLimit(0x3,1)
--summon success --summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(98162021,0)) e1:SetDescription(aux.Stringid(98162021,0))
...@@ -33,29 +33,29 @@ function c98162021.initial_effect(c) ...@@ -33,29 +33,29 @@ function c98162021.initial_effect(c)
end end
function c98162021.addct(e,tp,eg,ep,ev,re,r,rp,chk) function c98162021.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,0x3003) Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x3)
end end
function c98162021.addc(e,tp,eg,ep,ev,re,r,rp) function c98162021.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3003,1) e:GetHandler():AddCounter(0x3,1)
end end
end end
function c98162021.attackup(e,c) function c98162021.attackup(e,c)
return c:GetCounter(0x3003)*300 return c:GetCounter(0x3)*300
end end
function c98162021.addct2(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c98162021.addct2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsCanAddCounter(0x3003,1) end if chkc then return chkc:IsOnField() and chkc:IsCanAddCounter(0x3,1) end
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3003,1,REASON_EFFECT) if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3,1,REASON_EFFECT)
and Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler(),0x3003,1) end and Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler(),0x3,1) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(98162021,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(98162021,1))
Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler(),0x3003,1) Duel.SelectTarget(tp,Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler(),0x3,1)
end end
function c98162021.addc2(e,tp,eg,ep,ev,re,r,rp) function c98162021.addc2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if c:GetCounter(0x3003)==0 then return end if c:GetCounter(0x3)==0 then return end
c:RemoveCounter(tp,0x3003,1,REASON_EFFECT) c:RemoveCounter(tp,0x3,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(0x3003,1) tc:AddCounter(0x3,1)
end end
end end
...@@ -32,11 +32,11 @@ function c99342953.ctcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -32,11 +32,11 @@ function c99342953.ctcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c99342953.ctfilter,1,nil) return eg:IsExists(c99342953.ctfilter,1,nil)
end end
function c99342953.ctop(e,tp,eg,ep,ev,re,r,rp) function c99342953.ctop(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 c99342953.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c99342953.spcost(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 c99342953.filter(c,e,tp) function c99342953.filter(c,e,tp)
return c:IsSetCard(0xc) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0xc) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
...@@ -10,5 +10,5 @@ function c99532708.initial_effect(c) ...@@ -10,5 +10,5 @@ function c99532708.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c99532708.distg(e,c) function c99532708.distg(e,c)
return c:GetCounter(0xe)>0 and c:GetCode()~=99532708 return c:GetCounter(0x100e)>0 and c:GetCode()~=99532708
end end
...@@ -168,8 +168,8 @@ ASSUME_RACE =6 ...@@ -168,8 +168,8 @@ ASSUME_RACE =6
ASSUME_ATTACK =7 ASSUME_ATTACK =7
ASSUME_DEFENCE =8 ASSUME_DEFENCE =8
--Counter --指示物 --Counter --指示物
COUNTER_NEED_PERMIT =0x1000 --可以放置某指示物 COUNTER_WITHOUT_PERMIT =0x1000 --可以放置在非特定對象的指示物
COUNTER_NEED_ENABLE =0x2000 --放在自己身上的指示物(卡片守衛) COUNTER_NEED_ENABLE =0x2000 --在卡片本身放置上述指示物的標記(卡片守衛)
--Phase --阶段 --Phase --阶段
PHASE_DRAW =0x01 --抽卡阶段 PHASE_DRAW =0x01 --抽卡阶段
PHASE_STANDBY =0x02 --准备阶段 PHASE_STANDBY =0x02 --准备阶段
......
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