Skip to content

Y
ygopro-scripts
Commit fefe8ad1 authored by salix5's avatar salix5
Browse files
Options

update: 0x1~0xa

parent 8f9da55c
Hide whitespace changes
Inline Side-by-side
Showing with 431 additions and 422 deletions
c10239627.lua
View file @ fefe8ad1
--マジカル・アブダクター
function c10239627.initial_effect(c)
c:EnableCounterPermit(0x3001,LOCATION_PZONE+LOCATION_MZONE)
c:EnableCounterPermit(0x1,LOCATION_PZONE+LOCATION_MZONE)
--pendulum summon
aux.EnablePendulumAttribute(c)
--add counter
......@@ -43,12 +43,12 @@ function c10239627.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end
function c10239627.thfilter1(c)
return c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
......@@ -82,5 +82,5 @@ function c10239627.thop2(e,tp,eg,ep,ev,re,r,rp)
end
end
function c10239627.atkval(e,c)
return e:GetHandler():GetCounter(0x3001)*100
return e:GetHandler():GetCounter(0x1)*100
end
c11501629.lua
View file @ fefe8ad1
--キックファイア
function c11501629.initial_effect(c)
c:EnableCounterPermit(0x2d)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -35,7 +36,7 @@ function c11501629.ctfilter(c,tp)
end
function c11501629.ctcon(e,tp,eg,ep,ev,re,r,rp)
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)
return true
else
......@@ -43,7 +44,7 @@ function c11501629.ctcon(e,tp,eg,ep,ev,re,r,rp)
end
end
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
function c11501629.damcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetCurrentPhase()==PHASE_STANDBY
......
c11741041.lua
View file @ fefe8ad1
--サンダー・ボトル
function c11741041.initial_effect(c)
c:EnableCounterPermit(0xc)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -27,7 +28,7 @@ function c11741041.initial_effect(c)
end
function c11741041.ctop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetAttacker():IsControler(tp) then
e:GetHandler():AddCounter(0xc+COUNTER_NEED_ENABLE,1)
e:GetHandler():AddCounter(0xc,1)
end
end
function c11741041.descon(e,tp,eg,ep,ev,re,r,rp)
......
c13474291.lua
View file @ fefe8ad1
......@@ -61,6 +61,6 @@ end
function c13474291.ctop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x19,1)
tc:AddCounter(0x1019,1)
end
end
c14553285.lua
View file @ fefe8ad1
--アーカナイト・マジシャン／バスター
function c14553285.initial_effect(c)
c:EnableReviveLimit()
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--Cannot special summon
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
......@@ -48,19 +48,19 @@ function c14553285.initial_effect(c)
end
function c14553285.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c14553285.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2)
e:GetHandler():AddCounter(0x1,2)
end
end
function c14553285.attackup(e,c)
return c:GetCounter(0x3001)*1000
return c:GetCounter(0x1)*1000
end
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
e:GetHandler():RemoveCounter(tp,0x3001,2,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,2,REASON_COST)
end
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
......
c15475415.lua
View file @ fefe8ad1
......@@ -46,6 +46,6 @@ function c15475415.ctop(e,tp,eg,ep,ev,re,r,rp)
for i=1,2 do
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1)
sg:GetFirst():AddCounter(0x100e,1)
end
end
c15893860.lua
View file @ fefe8ad1
......@@ -32,7 +32,7 @@ function c15893860.operation(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(15893860,1))
local tc=g:Select(tp,1,1,nil):GetFirst()
tc:AddCounter(0x15,1)
tc:AddCounter(0x1015,1)
end
if ct>=3 and Duel.SelectYesNo(tp,aux.Stringid(15893860,2)) then
Duel.BreakEffect()
......
c16197610.lua
View file @ fefe8ad1
......@@ -42,12 +42,12 @@ end
function c16197610.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c16197610.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct)
e:GetHandler():AddCounter(0x1019,ct)
end
end
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
e:GetHandler():RemoveCounter(tp,0x19,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1019,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1019,1,REASON_COST)
end
function c16197610.spfilter(c,e,tp)
return c:IsCode(80825553) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
c17810268.lua
View file @ fefe8ad1
......@@ -43,12 +43,12 @@ end
function c17810268.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c17810268.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct)
e:GetHandler():AddCounter(0x1019,ct)
end
end
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
e:GetHandler():RemoveCounter(tp,0x19,2,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1019,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1019,2,REASON_COST)
end
function c17810268.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
c17896384.lua
View file @ fefe8ad1
--魔法族の結界
function c17896384.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,4)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,4)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -34,7 +34,7 @@ function c17896384.ctcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c17896384.ctfilter,1,nil)
end
function c17896384.ctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
function c17896384.cfilter(c)
return c:IsFaceup() and c:IsRace(RACE_SPELLCASTER) and c:IsAbleToGraveAsCost()
......@@ -42,14 +42,14 @@ end
function c17896384.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost()
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)
local g=Duel.SelectMatchingCard(tp,c17896384.cfilter,tp,LOCATION_MZONE,0,1,1,nil)
g:AddCard(e:GetHandler())
Duel.SendtoGrave(g,REASON_COST)
end
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.SetTargetParam(e:GetLabel())
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,e:GetLabel())
......
c19980975.lua
View file @ fefe8ad1
......@@ -11,7 +11,7 @@ function c19980975.initial_effect(c)
c:RegisterEffect(e1)
end
function c19980975.filter(c)
return c:GetCounter(0x19)>=4 and c:IsDestructable()
return c:GetCounter(0x1019)>=4 and c:IsDestructable()
end
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
......@@ -24,7 +24,7 @@ end
function c19980975.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
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
Duel.Draw(tp,ct,REASON_EFFECT)
end
......
c20003527.lua
View file @ fefe8ad1
......@@ -76,9 +76,9 @@ function c20003527.addcon(e,tp,eg,ep,ev,re,r,rp)
end
function c20003527.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x19,e:GetLabelObject():GetLabel())
e:GetHandler():AddCounter(0x1019,e:GetLabelObject():GetLabel())
end
end
function c20003527.atkval(e,c)
return Duel.GetCounter(0,1,1,0x19)*500
return Duel.GetCounter(0,1,1,0x1019)*500
end
c20985997.lua
View file @ fefe8ad1
......@@ -11,7 +11,7 @@ function c20985997.initial_effect(c)
c:RegisterEffect(e1)
end
function c20985997.filter(c)
return c:GetCounter(0xe)>0 and c:IsDestructable()
return c:GetCounter(0x100e)>0 and c:IsDestructable()
end
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
......@@ -23,7 +23,7 @@ function c20985997.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
end
function c20985997.activate(e,tp,eg,ep,ev,re,r,rp)
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
Duel.Damage(1-tp,1000,REASON_EFFECT)
Duel.Damage(tp,1000,REASON_EFFECT)
......
c21051146.lua
View file @ fefe8ad1
--ブラッド・マジシャン－煉獄の魔術師－
function c21051146.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -28,13 +28,13 @@ function c21051146.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c21051146.filter(c,cc,tp)
local ct=math.ceil(c:GetAttack()/700)
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
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
......@@ -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 ct=math.ceil(g:GetFirst():GetAttack()/700)
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)
end
function c21051146.desop(e,tp,eg,ep,ev,re,r,rp)
......
c21113684.lua
View file @ fefe8ad1
--覇魔導士アーカナイト・マジシャン
function c21113684.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--fusion material
c:EnableReviveLimit()
aux.AddFusionProcFun2(c,c21113684.ffilter,aux.FilterBoolFunction(Card.IsRace,RACE_SPELLCASTER),true)
......@@ -63,24 +63,24 @@ function c21113684.ffilter(c)
return c:IsType(TYPE_SYNCHRO) and c:IsRace(RACE_SPELLCASTER)
end
function c21113684.attackup(e,c)
return c:GetCounter(0x3001)*1000
return c:GetCounter(0x1)*1000
end
function c21113684.addcc(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_FUSION
end
function c21113684.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c21113684.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2)
e:GetHandler():AddCounter(0x1,2)
end
end
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.RemoveCounter(tp,1,0,0x3001,1,REASON_COST)
Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
end
function c21113684.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsDestructable() end
......
c21768554.lua
View file @ fefe8ad1
......@@ -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)
end
function c21768554.filter(c)
return c:GetCounter(0xe)>0 and c:IsControlerCanBeChanged()
return c:GetCounter(0x100e)>0 and c:IsControlerCanBeChanged()
end
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
......@@ -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
local tc=g:GetFirst()
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)
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
......@@ -65,7 +65,7 @@ end
function c21768554.con(e)
local c=e:GetOwner()
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
function c21768554.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(21768554)~=0
......
c22923081.lua
View file @ fefe8ad1
--黒魔導戦士 ブレイカー
function c22923081.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(22923081,0))
......@@ -45,22 +45,22 @@ function c22923081.initial_effect(c)
end
function c22923081.addtg(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c22923081.addop(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,e:GetLabel())
e:GetHandler():AddCounter(0x1,e:GetLabel())
end
end
function c22923081.addcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_PENDULUM
end
function c22923081.atkval(e,c)
return c:GetCounter(0x3001)*400
return c:GetCounter(0x1)*400
end
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
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end
function c22923081.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
c23212990.lua
View file @ fefe8ad1
......@@ -13,8 +13,8 @@ function c23212990.initial_effect(c)
c:RegisterEffect(e1)
end
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
Duel.RemoveCounter(tp,1,0,0x3003,1,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x3,1,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x3,1,REASON_COST)
end
function c23212990.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsDestructable() end
......
c23639291.lua
View file @ fefe8ad1
......@@ -31,6 +31,6 @@ function c23639291.operation(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_EVENT+0x1fe0000)
tc:RegisterEffect(e1)
Duel.SpecialSummonComplete()
tc:AddCounter(0x19,1)
tc:AddCounter(0x1019,1)
end
end
c24104865.lua
View file @ fefe8ad1
......@@ -40,7 +40,7 @@ end
function c24104865.checkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
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)
else e:SetLabel(0) end
end
......
c24661486.lua
View file @ fefe8ad1
......@@ -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)
end
function c24661486.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCanAddCounter(0x15,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,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,0x1015,1) end
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)
end
function c24661486.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x15,1) then
tc:AddCounter(0x15,1)
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1015,1) then
tc:AddCounter(0x1015,1)
end
end
function c24661486.atkval(e,c)
return Duel.GetCounter(0,1,1,0x15)*300
return Duel.GetCounter(0,1,1,0x1015)*300
end
c2525268.lua
View file @ fefe8ad1
--魔導騎士 ディフェンダー
function c2525268.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,1)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(2525268,0))
......@@ -24,11 +24,11 @@ function c2525268.initial_effect(c)
end
function c2525268.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c2525268.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c2525268.dfilter(c)
......@@ -38,7 +38,7 @@ function c2525268.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local count=eg:FilterCount(c2525268.dfilter,nil)
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
return Duel.SelectYesNo(tp,aux.Stringid(2525268,1))
end
......@@ -47,5 +47,5 @@ function c2525268.value(e,c)
end
function c2525268.desop(e,tp,eg,ep,ev,re,r,rp)
local count=e:GetLabel()
Duel.RemoveCounter(tp,1,0,0x3001,count,REASON_COST)
Duel.RemoveCounter(tp,1,0,0x1,count,REASON_COST)
end
c2561846.lua
View file @ fefe8ad1
......@@ -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
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
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
function c2561846.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0xe,1)
tc:AddCounter(0x100e,1)
end
end
c27970830.lua
View file @ fefe8ad1
--六武の門
function c27970830.initial_effect(c)
c:EnableCounterPermit(0x3003)
c:EnableCounterPermit(0x3)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -54,13 +54,13 @@ function c27970830.ctfilter(c)
end
function c27970830.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c27970830.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,2)
e:GetHandler():AddCounter(0x3,2)
end
end
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.RemoveCounter(tp,1,0,0x3003,2,REASON_COST)
Duel.RemoveCounter(tp,1,0,0x3,2,REASON_COST)
end
function c27970830.filter1(c)
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)
end
end
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.RemoveCounter(tp,1,0,0x3003,4,REASON_COST)
Duel.RemoveCounter(tp,1,0,0x3,4,REASON_COST)
end
function c27970830.filter2(c)
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)
end
end
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.RemoveCounter(tp,1,0,0x3003,6,REASON_COST)
Duel.RemoveCounter(tp,1,0,0x3,6,REASON_COST)
end
function c27970830.filter3(c,e,tp)
return c:IsSetCard(0x20) and c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
c3070049.lua
View file @ fefe8ad1
......@@ -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 tc=g:GetFirst()
while tc do
tc:AddCounter(0x15,1,REASON_EFFECT)
tc:AddCounter(0x1015,1,REASON_EFFECT)
tc=g:GetNext()
end
end
c31292357.lua
View file @ fefe8ad1
--Emハットトリッカー
function c31292357.initial_effect(c)
c:EnableCounterPermit(0x3036)
c:SetCounterLimit(0x3036,3)
c:EnableCounterPermit(0x36)
c:SetCounterLimit(0x36,3)
--special summon rule
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
......@@ -23,7 +23,7 @@ function c31292357.initial_effect(c)
--atk
local e3=Effect.CreateEffect(c)
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:SetOperation(c31292357.atkop)
c:RegisterEffect(e3)
......@@ -35,11 +35,11 @@ function c31292357.spcon(e,c)
and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,LOCATION_MZONE)>=2
end
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
function c31292357.ctop(e,tp,eg,ep,ev,re,r,rp)
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 e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
......@@ -60,7 +60,7 @@ function c31292357.damval(e,re,val,r,rp,rc)
return 0
end
function c31292357.atkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x3036)==3
return e:GetHandler():GetCounter(0x36)==3
end
function c31292357.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
c31924889.lua
View file @ fefe8ad1
--アーカナイト・マジシャン
function c31924889.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_SPELLCASTER),1)
c:EnableReviveLimit()
......@@ -33,23 +33,23 @@ function c31924889.initial_effect(c)
c:RegisterEffect(e3)
end
function c31924889.attackup(e,c)
return c:GetCounter(0x3001)*1000
return c:GetCounter(0x1)*1000
end
function c31924889.addcc(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
end
function c31924889.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c31924889.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2)
e:GetHandler():AddCounter(0x1,2)
end
end
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
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
end
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
......
c32062913.lua
View file @ fefe8ad1
......@@ -11,8 +11,8 @@ function c32062913.initial_effect(c)
c:RegisterEffect(e1)
end
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
Duel.RemoveCounter(tp,1,0,0x3001,10,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,10,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,10,REASON_COST)
end
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
......
c32750510.lua
View file @ fefe8ad1
......@@ -41,16 +41,16 @@ function c32750510.spop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Release(g,REASON_COST)
end
function c32750510.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCanAddCounter(0x15,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,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,0x1015,1) end
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)
end
function c32750510.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x15,1) then
tc:AddCounter(0x15,1)
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1015,1) then
tc:AddCounter(0x1015,1)
end
end
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)
end
function c32750510.desfilter(c)
return c:GetCounter(0x15)~=0 and c:IsDestructable()
return c:GetCounter(0x1015)~=0 and c:IsDestructable()
end
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
......
c33413279.lua
View file @ fefe8ad1
......@@ -16,8 +16,8 @@ function c33413279.initial_effect(c)
c:RegisterEffect(e1)
end
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
Duel.RemoveCounter(tp,1,0,0x3001,2,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
end
function c33413279.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
c33875961.lua
View file @ fefe8ad1
--ダーク・カタパルター
function c33875961.initial_effect(c)
c:EnableCounterPermit(0x3028)
c:EnableCounterPermit(0x28)
--counter
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(33875961,0))
......@@ -30,15 +30,15 @@ function c33875961.addccon(e,tp,eg,ep,ev,re,r,rp)
end
function c33875961.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c33875961.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3028,1)
e:GetHandler():AddCounter(0x28,1)
end
end
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
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_GRAVE,0,ct,ct,nil)
......@@ -49,7 +49,7 @@ function c33875961.filter(c)
end
function c33875961.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
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
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
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)
if g:FilterCount(Card.IsRelateToEffect,nil,e)==g:GetCount() then
Duel.Destroy(g,REASON_EFFECT)
end
local ct=e:GetHandler():GetCounter(0x3028)
e:GetHandler():RemoveCounter(tp,0x3028,ct,REASON_EFFECT)
local ct=e:GetHandler():GetCounter(0x28)
e:GetHandler():RemoveCounter(tp,0x28,ct,REASON_EFFECT)
end
c34029630.lua
View file @ fefe8ad1
......@@ -3,7 +3,7 @@ function c34029630.initial_effect(c)
--counter permit
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_COUNTER_PERMIT+0x3001)
e1:SetCode(EFFECT_COUNTER_PERMIT+0x1)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCondition(c34029630.ctpermit)
c:RegisterEffect(e1)
......@@ -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 chk==0 then return true end
local c=e:GetHandler()
c:AddCounter(0x3001,3)
if Duel.GetTurnPlayer()==tp and c:IsCanRemoveCounter(tp,0x3001,1,REASON_EFFECT)
c:AddCounter(0x1,3)
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.SelectYesNo(tp,aux.Stringid(34029630,0)) then
e:SetProperty(EFFECT_FLAG_CARD_TARGET)
......@@ -61,24 +61,24 @@ function c34029630.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and c:IsCanRemoveCounter(tp,0x3001,1,REASON_EFFECT) and tc:IsCanAddCounter(0x3001,1) then
c:RemoveCounter(tp,0x3001,1,REASON_EFFECT)
tc:AddCounter(0x3001,1)
if tc and tc:IsRelateToEffect(e) and c:IsCanRemoveCounter(tp,0x1,1,REASON_EFFECT) and tc:IsCanAddCounter(0x1,1) then
c:RemoveCounter(tp,0x1,1,REASON_EFFECT)
tc:AddCounter(0x1,1)
end
end
function c34029630.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp
end
function c34029630.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
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 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
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(34029630,2))
Duel.SelectTarget(tp,c34029630.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
end
function c34029630.descon(e)
return e:GetHandler():GetCounter(0x3001)==0
return e:GetHandler():GetCounter(0x1)==0
end
\ No newline at end of file
c34541863.lua
View file @ fefe8ad1
......@@ -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
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
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
function c34541863.operation(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0xe,1)
tc:AddCounter(0x100e,1)
end
end
c36099620.lua
View file @ fefe8ad1
--ジャスティス・ワールド
function c36099620.initial_effect(c)
c:EnableCounterPermit(0x5)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -39,7 +40,7 @@ function c36099620.cfilter(c,tp)
end
function c36099620.acop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c36099620.cfilter,1,nil,tp) then
e:GetHandler():AddCounter(0x5+COUNTER_NEED_ENABLE,1)
e:GetHandler():AddCounter(0x5,1)
end
end
function c36099620.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
......
c36278828.lua
View file @ fefe8ad1
......@@ -13,17 +13,17 @@ function c36278828.initial_effect(c)
c:RegisterEffect(e1)
end
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 chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,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,0x1009,1) end
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)
end
function c36278828.operation(e,tp,eg,ep,ev,re,r,rp)
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()
tc:AddCounter(0x9,1)
tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end
......
c38468214.lua
View file @ fefe8ad1
......@@ -14,7 +14,7 @@ function c38468214.initial_effect(c)
c:RegisterEffect(e1)
end
function c38468214.filter(c)
return c:GetCounter(0xe)>0 and c:IsControlerCanBeChanged()
return c:GetCounter(0x100e)>0 and c:IsControlerCanBeChanged()
end
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
......@@ -27,7 +27,7 @@ function c38468214.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsFacedown() or not c:IsRelateToEffect(e) then return end
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)
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
......@@ -63,9 +63,9 @@ function c38468214.rmctcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==e:GetLabel()
end
function c38468214.rmctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RemoveCounter(tp,0xe,1,REASON_EFFECT)
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0xe,e,REASON_EFFECT,tp,tp,1)
e:GetHandler():RemoveCounter(tp,0x100e,1,REASON_EFFECT)
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0x100e,e,REASON_EFFECT,tp,tp,1)
end
function c38468214.descon(e)
return e:GetHandler():GetCounter(0xe)==0
return e:GetHandler():GetCounter(0x100e)==0
end
c38834303.lua
View file @ fefe8ad1
......@@ -24,11 +24,11 @@ function c38834303.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=sg:GetFirst()
local count=0
while tc do
count=count+tc:GetCounter(0xe)
count=count+tc:GetCounter(0x100e)
tc:RemoveCounter(tp,0,0,0)
tc=sg:GetNext()
end
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
c39163598.lua
View file @ fefe8ad1
......@@ -17,7 +17,7 @@ function c39163598.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(g,REASON_COST)
end
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
function c39163598.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......@@ -43,14 +43,14 @@ function c39163598.activate(e,tp,eg,ep,ev,re,r,rp)
end
function c39163598.ctop1(e,tp,eg,ep,ev,re,r,rp)
if ep~=tp then
eg:GetFirst():AddCounter(0xe,1)
eg:GetFirst():AddCounter(0x100e,1)
end
end
function c39163598.ctop2(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
if tc:IsFaceup() and tc:GetSummonPlayer()~=tp then
tc:AddCounter(0xe,1)
tc:AddCounter(0x100e,1)
end
tc=eg:GetNext()
end
......
c39910367.lua
View file @ fefe8ad1
--魔法都市エンディミオン
function c39910367.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -18,7 +18,7 @@ function c39910367.initial_effect(c)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(39910367,0))
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:SetCountLimit(1)
e4:SetCondition(c39910367.rcon)
......@@ -44,33 +44,33 @@ end
function c39910367.op(e,tp,eg,ep,ev,re,r,rp)
local c=re:GetHandler()
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
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
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
function c39910367.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
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))
end
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
function c39910367.addop2(e,tp,eg,ep,ev,re,r,rp)
local count=0
local c=eg:GetFirst()
while c~=nil do
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
c=eg:GetNext()
end
if count>0 then
e:GetHandler():AddCounter(0x3001,count)
e:GetHandler():AddCounter(0x1,count)
end
end
c40089744.lua
View file @ fefe8ad1
--混沌の場
function c40089744.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,6)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,6)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
......@@ -51,12 +51,12 @@ end
function c40089744.acop(e,tp,eg,ep,ev,re,r,rp)
local ct=eg:FilterCount(c40089744.cfilter,nil)
if ct>0 then
e:GetHandler():AddCounter(0x3001,ct,true)
e:GetHandler():AddCounter(0x1,ct,true)
end
end
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
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end
function c40089744.thfilter(c)
return c:GetType()==TYPE_SPELL+TYPE_RITUAL and c:IsAbleToHand()
......
c40732515.lua
View file @ fefe8ad1
......@@ -38,12 +38,12 @@ end
function c40732515.spcon(e,c)
if c==nil then return true end
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
end
function c40732515.spop(e,tp,eg,ep,ev,re,r,rp,c)
local fd=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
fd:RemoveCounter(tp,0x3001,6,REASON_RULE)
fd:RemoveCounter(tp,0x1,6,REASON_RULE)
end
function c40732515.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+1
......
c43318266.lua
View file @ fefe8ad1
......@@ -43,12 +43,12 @@ end
function c43318266.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c43318266.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct)
e:GetHandler():AddCounter(0x1019,ct)
end
end
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
e:GetHandler():RemoveCounter(tp,0x19,2,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1019,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1019,2,REASON_COST)
end
function c43318266.filter(c)
return c:IsDestructable()
......
c4466015.lua
View file @ fefe8ad1
......@@ -11,20 +11,20 @@ function c4466015.initial_effect(c)
c:RegisterEffect(e1)
end
function c4466015.filter(c)
return c:GetCounter(0x9)>0
return c:GetCounter(0x1009)>0
end
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 chk==0 then return Duel.IsExistingTarget(c4466015.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
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
function c4466015.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
local ct=tc:GetCounter(0x9)
local ct=tc:GetCounter(0x1009)
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)
end
end
c45462639.lua
View file @ fefe8ad1
--闇紅の魔導師
function c45462639.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(45462639,0))
......@@ -46,24 +46,24 @@ function c45462639.initial_effect(c)
end
function c45462639.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c45462639.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,2)
e:GetHandler():AddCounter(0x1,2)
end
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c45462639.attackup(e,c)
return c:GetCounter(0x3001)*300
return c:GetCounter(0x1)*300
end
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
e:GetHandler():RemoveCounter(tp,0x3001,2,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,2,REASON_COST)
end
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
......
c46363422.lua
View file @ fefe8ad1
--熟練の白魔導師
function c46363422.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,3)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,3)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -29,11 +29,11 @@ function c46363422.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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)
end
function c46363422.filter(c,e,tp)
......
c4694209.lua
View file @ fefe8ad1
......@@ -34,30 +34,30 @@ function c4694209.initial_effect(c)
end
function c4694209.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c4694209.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x21+COUNTER_NEED_ENABLE,1)
e:GetHandler():AddCounter(0x1021+COUNTER_NEED_ENABLE,1)
end
end
function c4694209.attackup(e,c)
return c:GetCounter(0x21)*300
return c:GetCounter(0x1021)*300
end
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 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
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(4694209,1))
Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler())
end
function c4694209.addc2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:GetCounter(0x21)==0 then return end
c:RemoveCounter(tp,0x21,1,REASON_EFFECT)
if c:GetCounter(0x1021)==0 then return end
c:RemoveCounter(tp,0x1021,1,REASON_EFFECT)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x21,1)
tc:AddCounter(0x1021,1)
if tc:GetFlagEffect(4694209)~=0 then return end
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
......@@ -70,9 +70,9 @@ function c4694209.addc2(e,tp,eg,ep,ev,re,r,rp)
end
end
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
end
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
c47408488.lua
View file @ fefe8ad1
--宝玉の樹
function c47408488.initial_effect(c)
c:EnableCounterPermit(0x6)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -40,7 +41,7 @@ function c47408488.eqcon(e,tp,eg,ep,ev,re,r,rp)
return tc:IsFaceup() and tc:IsSetCard(0x1034)
end
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
function c47408488.plcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
......
c47436247.lua
View file @ fefe8ad1
--紫炎の道場
function c47436247.initial_effect(c)
c:EnableCounterPermit(0x3003)
c:EnableCounterPermit(0x3)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -32,12 +32,12 @@ function c47436247.ctfilter(c)
end
function c47436247.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c47436247.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,1)
e:GetHandler():AddCounter(0x3,1)
end
end
function c47436247.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
local ct=e:GetHandler():GetCounter(0x3003)
local ct=e:GetHandler():GetCounter(0x3)
e:SetLabel(ct)
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
......@@ -47,7 +47,7 @@ function c47436247.filter(c,ct,e,tp)
end
function c47436247.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
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)
end
function c47436247.spop(e,tp,eg,ep,ev,re,r,rp)
......
c48995978.lua
View file @ fefe8ad1
--No.88 ギミック・パペット－デステニー・レオ
function c48995978.initial_effect(c)
c:EnableCounterPermit(0x302b)
c:EnableCounterPermit(0x2b)
--xyz summon
aux.AddXyzProcedure(c,nil,8,3)
c:EnableReviveLimit()
......@@ -44,19 +44,19 @@ function c48995978.cost(e,tp,eg,ep,ev,re,r,rp,chk)
end
function c48995978.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_EFFECT)
and e:GetHandler():IsCanAddCounter(0x302b,1) end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x302b)
and e:GetHandler():IsCanAddCounter(0x2b,1) end
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x2b)
end
function c48995978.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
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
function c48995978.winop(e,tp,eg,ep,ev,re,r,rp)
local WIN_REASON_DESTINY_LEO=0x17
local c=e:GetHandler()
if c:GetCounter(0x302b)==3 then
if c:GetCounter(0x2b)==3 then
Duel.Win(tp,WIN_REASON_DESTINY_LEO)
end
end
c52518793.lua
View file @ fefe8ad1
--剣闘獣の檻－コロッセウム
function c52518793.initial_effect(c)
c:EnableCounterPermit(0x7)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -46,7 +47,7 @@ function c52518793.accon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c52518793.cfilter,1,nil,tp)
end
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
function c52518793.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsReason(REASON_RULE)
......
c52665542.lua
View file @ fefe8ad1
--ライトロードの神域
function c52665542.initial_effect(c)
c:EnableCounterPermit(0x5)
--activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -73,7 +74,7 @@ function c52665542.accon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c52665542.cfilter,1,nil,tp)
end
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
function c52665542.dfilter(c,tp)
return c:IsFaceup() and c:IsLocation(LOCATION_ONFIELD)
......
c53112492.lua
View file @ fefe8ad1
......@@ -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)
end
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
Duel.RemoveCounter(tp,1,0,0x3001,2,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
end
function c53112492.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
c53291093.lua
View file @ fefe8ad1
......@@ -12,7 +12,7 @@ function c53291093.initial_effect(c)
c:RegisterEffect(e1)
end
function c53291093.filter(c)
return c:GetCounter(0xe)>0 and c:IsDestructable()
return c:GetCounter(0x100e)>0 and c:IsDestructable()
end
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
......
c53819808.lua
View file @ fefe8ad1
--六武院
function c53819808.initial_effect(c)
c:EnableCounterPermit(0x3003)
c:EnableCounterPermit(0x3)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -30,9 +30,9 @@ function c53819808.ctfilter(c)
end
function c53819808.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c53819808.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,1)
e:GetHandler():AddCounter(0x3,1)
end
end
function c53819808.val(e)
return e:GetHandler():GetCounter(0x3003)*-100
return e:GetHandler():GetCounter(0x3)*-100
end
c54306223.lua
View file @ fefe8ad1
......@@ -35,16 +35,16 @@ function c54306223.initial_effect(c)
c:RegisterEffect(e4)
end
function c54306223.atkval(e,c)
return c:GetCounter(0x9)*-500
return c:GetCounter(0x1009)*-500
end
function c54306223.acop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end
local g=Group.CreateGroup()
for i=0,4 do
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()
tc:AddCounter(0x9,1)
tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then
g:AddCard(tc)
end
......@@ -52,9 +52,9 @@ function c54306223.acop(e,tp,eg,ep,ev,re,r,rp)
end
for i=0,4 do
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()
tc:AddCounter(0x9,1)
tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then
g:AddCard(tc)
end
......
c55424270.lua
View file @ fefe8ad1
--魔導獣 ケルベロス
function c55424270.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -33,17 +33,17 @@ function c55424270.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c55424270.attackup(e,c)
return c:GetCounter(0x3001)*500
return c:GetCounter(0x1)*500
end
function c55424270.condition(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetBattledGroupCount()>0
end
function c55424270.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local n=c:GetCounter(0x3001)
if n~=0 then c:RemoveCounter(tp,0x3001,n,REASON_EFFECT) end
local n=c:GetCounter(0x1)
if n~=0 then c:RemoveCounter(tp,0x1,n,REASON_EFFECT) end
end
c56074358.lua
View file @ fefe8ad1
--D・フィールド
function c56074358.initial_effect(c)
c:EnableCounterPermit(0x8)
--activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -46,7 +47,7 @@ function c56074358.accon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c56074358.cfilter,1,nil)
end
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
function c56074358.spcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
c56321639.lua
View file @ fefe8ad1
--魔導書廊エトワール
function c56321639.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -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
end
function c56321639.ctop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
function c56321639.atkval(e,c)
return e:GetHandler():GetCounter(0x3001)*100
return e:GetHandler():GetCounter(0x1)*100
end
function c56321639.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local ct=c:GetCounter(0x3001)
local ct=c:GetCounter(0x1)
e:SetLabel(ct)
return ct>0 and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_DESTROY)
end
......
c5640330.lua
View file @ fefe8ad1
--ハンニバル・ネクロマンサー
function c5640330.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,1)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(5640330,0))
......@@ -25,16 +25,16 @@ function c5640330.initial_effect(c)
end
function c5640330.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c5640330.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end
function c5640330.filter(c)
return c:IsType(TYPE_TRAP) and c:IsFaceup() and c:IsDestructable()
......
c57384901.lua
View file @ fefe8ad1
......@@ -15,7 +15,7 @@ function c57384901.filter1(c)
return c:IsAbleToChangeControler()
end
function c57384901.filter2(c)
return c:GetCounter(0xe)>0 and c:IsAbleToChangeControler()
return c:GetCounter(0x100e)>0 and c:IsAbleToChangeControler()
end
function c57384901.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end
......
c58012107.lua
View file @ fefe8ad1
......@@ -32,5 +32,5 @@ function c58012107.poop(e,tp,eg,ep,ev,re,r,rp)
end
end
function c58012107.atktg(e,c)
return c:GetCounter(0xe)>0
return c:GetCounter(0x100e)>0
end
c59258334.lua
View file @ fefe8ad1
......@@ -36,7 +36,7 @@ function c59258334.initial_effect(c)
c:RegisterEffect(e4)
end
function c59258334.filter(c)
return c:GetCounter(0xe)>0 and c:IsControlerCanBeChanged()
return c:GetCounter(0x100e)>0 and c:IsControlerCanBeChanged()
end
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
......@@ -49,7 +49,7 @@ function c59258334.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
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)
local e1=Effect.CreateEffect(c)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_OWNER_RELATE)
......@@ -68,7 +68,7 @@ end
function c59258334.descon(e)
local c=e:GetHandler()
if c:GetCardTargetCount()==0 then return false end
return c:GetFirstCardTarget():GetCounter(0xe)==0
return c:GetFirstCardTarget():GetCounter(0x100e)==0
end
function c59258334.descon2(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget()
......@@ -82,6 +82,6 @@ function c59258334.rccon(e,tp,eg,ep,ev,re,r,rp)
end
function c59258334.rcop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetFirstCardTarget()
tc:RemoveCounter(tp,0xe,1,REASON_EFFECT)
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0xe,e,REASON_EFFECT,tp,tp,1)
tc:RemoveCounter(tp,0x100e,1,REASON_EFFECT)
Duel.RaiseEvent(e:GetHandler(),EVENT_REMOVE_COUNTER+0x100e,e,REASON_EFFECT,tp,tp,1)
end
c60258960.lua
View file @ fefe8ad1
--伝説の爆炎使い
function c60258960.initial_effect(c)
c:EnableReviveLimit()
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -29,12 +29,12 @@ function c60258960.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end
function c60258960.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
......
c6061630.lua
View file @ fefe8ad1
--マジカル・コンダクター
function c6061630.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -28,12 +28,12 @@ function c6061630.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,2)
e:GetHandler():AddCounter(0x1,2)
end
end
function c6061630.filter(c,cc,e,tp)
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
function c6061630.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
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)
lvt[pc]=nil
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(6061630,1))
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)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
end
......
c60728397.lua
View file @ fefe8ad1
......@@ -21,11 +21,11 @@ function c60728397.tgfilter(c)
return c:IsRace(RACE_REPTILE) and c:IsAbleToGrave()
end
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 chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,0x9,2)
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,0x1009,2)
and Duel.IsExistingMatchingCard(c60728397.tgfilter,tp,LOCATION_DECK,0,1,nil) end
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)
end
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
Duel.SendtoGrave(g,REASON_EFFECT)
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()
tc:AddCounter(0x9,2)
tc:AddCounter(0x1009,2)
if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end
......
c62154416.lua
View file @ fefe8ad1
--マジカルフィシアリスト
function c62154416.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,1)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(62154416,0))
......@@ -25,16 +25,16 @@ function c62154416.initial_effect(c)
end
function c62154416.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c62154416.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end
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
......
c62315111.lua
View file @ fefe8ad1
......@@ -13,7 +13,7 @@ function c62315111.atcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local bc=c:GetBattleTarget()
return bc and bc:IsStatus(STATUS_BATTLE_DESTROYED) and c:IsChainAttackable()
and bc:GetCounter(0xe)>0
and bc:GetCounter(0x100e)>0
end
function c62315111.atop(e,tp,eg,ep,ev,re,r,rp)
Duel.ChainAttack()
......
c63101919.lua
View file @ fefe8ad1
--マジックテンペスター
function c63101919.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_SPELLCASTER),1)
c:EnableReviveLimit()
......@@ -42,11 +42,11 @@ function c63101919.addcc1(e,tp,eg,ep,ev,re,r,rp)
end
function c63101919.addct1(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c63101919.addc1(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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
function c63101919.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c63101919.ctop(e,tp,eg,ep,ev,re,r,rp)
local ct=e:GetLabel()
for i=1,ct do
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
g:GetFirst():AddCounter(0x3001,1)
g:GetFirst():AddCounter(0x1,1)
end
end
function c63101919.damfilter(c)
return c:GetCounter(0x3001)>0
return c:GetCounter(0x1)>0
end
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 tc=g:GetFirst()
local sum=0
while tc do
local sct=tc:GetCounter(0x3001)
tc:RemoveCounter(tp,0x3001,sct,0)
local sct=tc:GetCounter(0x1)
tc:RemoveCounter(tp,0x1,sct,0)
sum=sum+sct
tc=g:GetNext()
end
......
c63741331.lua
View file @ fefe8ad1
......@@ -27,6 +27,6 @@ end
function c63741331.activate(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x19,3)
tc:AddCounter(0x1019,3)
end
end
c64163367.lua
View file @ fefe8ad1
......@@ -8,7 +8,7 @@ function c64163367.initial_effect(c)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetRange(LOCATION_SZONE)
e2:SetCode(EVENT_REMOVE_COUNTER+0xe)
e2:SetCode(EVENT_REMOVE_COUNTER+0x100e)
e2:SetOperation(c64163367.ctop1)
c:RegisterEffect(e2)
--counter2
......@@ -22,10 +22,10 @@ function c64163367.initial_effect(c)
c:RegisterEffect(e3)
end
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
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)
return e:GetHandler():IsReason(REASON_DESTROY) and ct>0
end
......@@ -36,6 +36,6 @@ function c64163367.ctop2(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(64163367,1))
local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1)
sg:GetFirst():AddCounter(0x100e,1)
end
end
c65338781.lua
View file @ fefe8ad1
--熟練の赤魔術士
function c65338781.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,3)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,3)
--add counter
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -39,11 +39,11 @@ function c65338781.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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)
end
function c65338781.filter(c,e,tp)
......@@ -67,18 +67,18 @@ function c65338781.ctcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end
function c65338781.ctfilter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
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 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.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
function c65338781.ctop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1)
tc:AddCounter(0x1,1)
end
end
c67675300.lua
View file @ fefe8ad1
......@@ -23,11 +23,11 @@ function c67675300.initial_effect(c)
end
function c67675300.spcon(e,c)
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
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
function c67675300.target(e,c)
return c~=e:GetHandler() and c:GetCounter(0x15)~=0
return c~=e:GetHandler() and c:GetCounter(0x1015)~=0
end
c68319538.lua
View file @ fefe8ad1
......@@ -47,12 +47,12 @@ function c68319538.operation(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(68319538,2))
local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1)
sg:GetFirst():AddCounter(0x100e,1)
end
end
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
Duel.RemoveCounter(tp,1,1,0xe,2,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x100e,2,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x100e,2,REASON_COST)
end
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
......
c68334074.lua
View file @ fefe8ad1
......@@ -14,8 +14,8 @@ function c68334074.initial_effect(c)
end
c68334074.dark_magician_list=true
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
Duel.RemoveCounter(tp,1,0,0x3001,2,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,2,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,2,REASON_COST)
end
function c68334074.filter(c,e,tp)
return c:IsCode(46986414,78193831) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
c69031175.lua
View file @ fefe8ad1
......@@ -35,23 +35,23 @@ function c69031175.initial_effect(c)
end
function c69031175.condition1(e,tp,eg,ep,ev,re,r,rp)
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
function c69031175.operation1(e,tp,eg,ep,ev,re,r,rp)
local atg=Duel.GetAttackTarget()
if atg:IsRelateToBattle() then
atg:AddCounter(0x2,1)
atg:AddCounter(0x1002,1)
end
end
function c69031175.filter(c)
return c:GetCounter(0x2)>0
return c:GetCounter(0x1002)>0
end
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
local g=Duel.GetMatchingGroup(c69031175.filter,tp,0,LOCATION_MZONE,nil)
local t=g:GetFirst()
while t do
t:RemoveCounter(tp,0x2,t:GetCounter(0x2),REASON_COST)
t:RemoveCounter(tp,0x1002,t:GetCounter(0x1002),REASON_COST)
t=g:GetNext()
end
Duel.SetTargetCard(g)
......
c69170557.lua
View file @ fefe8ad1
......@@ -26,7 +26,7 @@ function c69170557.initial_effect(c)
end
c69170557.xyz_number=40
function c69170557.desfilter(c)
return c:GetCounter(0x24)~=0 and c:IsDestructable()
return c:GetCounter(0x1024)~=0 and c:IsDestructable()
end
function c69170557.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......@@ -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 tc=g:GetFirst()
while tc do
tc:AddCounter(0x24,1)
tc:AddCounter(0x1024,1)
tc=g:GetNext()
end
end
c70791313.lua
View file @ fefe8ad1
--王立魔法図書館
function c70791313.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,3)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,3)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -30,12 +30,12 @@ function c70791313.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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
e:GetHandler():RemoveCounter(tp,0x3001,3,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,3,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,3,REASON_COST)
end
function c70791313.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
......
c71413901.lua
View file @ fefe8ad1
--魔導戦士 ブレイカー
function c71413901.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,1)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(71413901,0))
......@@ -33,19 +33,19 @@ function c71413901.initial_effect(c)
end
function c71413901.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c71413901.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c71413901.attackup(e,c)
return c:GetCounter(0x3001)*300
return c:GetCounter(0x1)*300
end
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
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end
function c71413901.filter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
c7180418.lua
View file @ fefe8ad1
......@@ -30,8 +30,8 @@ function c7180418.atklimit(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterEffect(e1)
end
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
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST)
if Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) and Duel.SelectYesNo(tp,aux.Stringid(7180418,0)) then
Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
else
Duel.Destroy(e:GetHandler(),REASON_COST)
end
......
c72345736.lua
View file @ fefe8ad1
--六武衆の結束
function c72345736.initial_effect(c)
c:EnableCounterPermit(0x3003)
c:SetCounterLimit(0x3003,2)
c:EnableCounterPermit(0x3)
c:SetCounterLimit(0x3,2)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -33,18 +33,18 @@ function c72345736.ctfilter(c)
end
function c72345736.ctop(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c72345736.ctfilter,1,nil) then
e:GetHandler():AddCounter(0x3003,1)
e:GetHandler():AddCounter(0x3,1)
end
end
function c72345736.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
local ct=e:GetHandler():GetCounter(0x3003)
local ct=e:GetHandler():GetCounter(0x3)
e:SetLabel(ct)
Duel.SendtoGrave(e:GetHandler(),REASON_COST)
end
function c72345736.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
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()
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(ct)
......
c73262676.lua
View file @ fefe8ad1
......@@ -30,7 +30,7 @@ function c73262676.operation(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()==0 then return end
for i=1,lv do
local sg=g:Select(tp,1,1,nil)
sg:GetFirst():AddCounter(0xe,1)
sg:GetFirst():AddCounter(0x100e,1)
end
end
end
c73659078.lua
View file @ fefe8ad1
......@@ -44,12 +44,12 @@ function c73659078.operation(e,tp,eg,ep,ev,re,r,rp)
for i=1,ct do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(73659078,1))
local tc=g:Select(tp,1,1,nil):GetFirst()
tc:AddCounter(0x15,1)
tc:AddCounter(0x1015,1)
end
end
function c73659078.atktg(e,c)
return not c:IsAttribute(ATTRIBUTE_WATER)
end
function c73659078.atkval(e,c)
return Duel.GetCounter(0,1,1,0x15)*-200
return Duel.GetCounter(0,1,1,0x1015)*-200
end
c73665146.lua
View file @ fefe8ad1
--サイレント・マジシャン LV4
function c73665146.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,5)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,5)
--draw
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
......@@ -32,14 +32,14 @@ c73665146.lvupcount=1
c73665146.lvup={72443568}
function c73665146.addc(e,tp,eg,ep,ev,re,r,rp)
if ep~=tp then
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c73665146.attackup(e,c)
return c:GetCounter(0x3001)*500
return c:GetCounter(0x1)*500
end
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
function c73665146.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
......
c73752131.lua
View file @ fefe8ad1
--熟練の黒魔術師
function c73752131.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,3)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,3)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -29,11 +29,11 @@ function c73752131.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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)
end
function c73752131.filter(c,e,tp)
......
c73853830.lua
View file @ fefe8ad1
......@@ -15,17 +15,17 @@ function c73853830.initial_effect(c)
c:RegisterEffect(e1)
end
function c73853830.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsCanAddCounter(0x3001,1) end
if chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,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,0x1,1) end
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)
end
function c73853830.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x3001,1) then
tc:AddCounter(0x3001,1)
if tc and tc:IsRelateToEffect(e) and tc:IsCanAddCounter(0x1,1) then
tc:AddCounter(0x1,1)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK)
......
c73899015.lua
View file @ fefe8ad1
......@@ -23,17 +23,17 @@ function c73899015.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:GetHandler():RegisterEffect(e1)
end
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 chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,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,0x1009,1) end
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)
end
function c73899015.operation(e,tp,eg,ep,ev,re,r,rp)
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()
tc:AddCounter(0x9,1)
tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end
......
c75014062.lua
View file @ fefe8ad1
......@@ -12,21 +12,21 @@ function c75014062.initial_effect(c)
c:RegisterEffect(e1)
end
function c75014062.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
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 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.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
function c75014062.tfilter(c)
return c:IsCode(75014062) and c:IsAbleToHand()
end
function c75014062.activate(e,tp,eg,ep,ev,re,r,rp)
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)
if th and Duel.SelectYesNo(tp,aux.Stringid(75014062,0)) then
Duel.SendtoHand(th,nil,REASON_EFFECT)
......
c75433814.lua
View file @ fefe8ad1
......@@ -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 tc=g:GetFirst()
while tc do
tc:AddCounter(0x24,1)
tc:AddCounter(0x1024,1)
tc=g:GetNext()
end
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)
return Duel.GetFlagEffect(tp,75433814)~=0 and Duel.GetTurnPlayer()~=tp
end
function c75433814.desfilter(c)
return c:GetCounter(0x24)~=0 and c:IsDestructable()
return c:GetCounter(0x1024)~=0 and c:IsDestructable()
end
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
......
c76137614.lua
View file @ fefe8ad1
......@@ -14,8 +14,8 @@ function c76137614.initial_effect(c)
c:RegisterEffect(e1)
end
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
Duel.RemoveCounter(tp,1,1,0x3001,1,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1,1,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x1,1,REASON_COST)
end
function c76137614.filter(c)
return c:IsType(TYPE_SPELL) and c:IsFaceup() and c:IsAbleToHand()
......
c77972406.lua
View file @ fefe8ad1
......@@ -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.BreakEffect()
local atk=tc:GetAttack()
tc:AddCounter(0x9,1)
tc:AddCounter(0x1009,1)
if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end
......
c7802006.lua
View file @ fefe8ad1
......@@ -9,13 +9,13 @@ function c7802006.initial_effect(c)
c:RegisterEffect(e1)
end
function c7802006.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
function c7802006.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c7802006.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local tc=g:GetFirst()
while tc do
tc:AddCounter(0x3001,1)
tc:AddCounter(0x1,1)
tc=g:GetNext()
end
end
c78121572.lua
View file @ fefe8ad1
......@@ -17,14 +17,14 @@ function c78121572.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPosition(POS_FACEUP_ATTACK)
end
function c78121572.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
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 chk==0 then return Duel.IsExistingTarget(c78121572.filter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(78121572,1))
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
function c78121572.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -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
Duel.ChangePosition(c,POS_FACEUP_DEFENCE)
if tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1)
tc:AddCounter(0x1,1)
end
end
end
c79703905.lua
View file @ fefe8ad1
......@@ -42,12 +42,12 @@ end
function c79703905.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
local ct=Duel.GetMatchingGroupCount(c79703905.cfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
e:GetHandler():AddCounter(0x19,ct)
e:GetHandler():AddCounter(0x1019,ct)
end
end
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
Duel.RemoveCounter(tp,1,1,0x19,3,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x1019,3,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x1019,3,REASON_COST)
end
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
......
c799183.lua
View file @ fefe8ad1
......@@ -41,8 +41,8 @@ function c799183.activate(e,tp,eg,ep,ev,re,r,rp)
end
end
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
Duel.RemoveCounter(tp,1,0,0x3001,1,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x1,1,REASON_COST) end
Duel.RemoveCounter(tp,1,0,0x1,1,REASON_COST)
end
function c799183.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsSSetable() end
......
c8034697.lua
View file @ fefe8ad1
--魔法の操り人形
function c8034697.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -36,15 +36,15 @@ function c8034697.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
function c8034697.attackup(e,c)
return c:GetCounter(0x3001)*200
return c:GetCounter(0x1)*200
end
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
e:GetHandler():RemoveCounter(tp,0x3001,2,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,2,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,2,REASON_COST)
end
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
......
c83269557.lua
View file @ fefe8ad1
......@@ -5,7 +5,7 @@ function c83269557.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EFFECT_COUNTER_PERMIT+0x3001)
e1:SetCode(EFFECT_COUNTER_PERMIT+0x1)
e1:SetRange(LOCATION_MZONE)
e1:SetCondition(aux.IsDualState)
c:RegisterEffect(e1)
......@@ -44,18 +44,18 @@ function c83269557.initial_effect(c)
c:RegisterEffect(e4)
end
function c83269557.atkval(e,c)
return c:GetCounter(0x3001)*300
return c:GetCounter(0x1)*300
end
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)
end
function c83269557.operation1(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
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
e:GetHandler():RemoveCounter(tp,0x3001,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x1,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x1,1,REASON_COST)
end
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
......
c83604828.lua
View file @ fefe8ad1
......@@ -31,6 +31,6 @@ function c83604828.ctop(e,tp,eg,ep,ev,re,r,rp)
for i=1,lv do
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(83604828,1))
local tc=g:Select(tp,1,1,nil):GetFirst()
tc:AddCounter(0x19,1)
tc:AddCounter(0x1019,1)
end
end
c84055227.lua
View file @ fefe8ad1
--ゲイシャドウ
function c84055227.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--add counter
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(84055227,0))
......@@ -23,8 +23,8 @@ function c84055227.condition(e,tp,eg,ep,ev,re,r,rp)
return c:IsRelateToBattle() and c:GetBattleTarget():IsType(TYPE_MONSTER)
end
function c84055227.operation(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
function c84055227.attackup(e,c)
return c:GetCounter(0x3001)*200
return c:GetCounter(0x1)*200
end
c84491298.lua
View file @ fefe8ad1
......@@ -12,7 +12,7 @@ function c84491298.initial_effect(c)
end
function c84491298.condition(e,tp,eg,ep,ev,re,r,rp)
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
function c84491298.filter(c)
return c:IsAttackPos() and c:IsDestructable()
......
c85668449.lua
View file @ fefe8ad1
--脳開発研究所
function c85668449.initial_effect(c)
c:EnableCounterPermit(0x3004)
c:EnableCounterPermit(0x4)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -38,7 +38,7 @@ function c85668449.initial_effect(c)
c:RegisterEffect(e5)
end
function c85668449.esop(e,c)
e:GetHandler():AddCounter(0x3004,1)
e:GetHandler():AddCounter(0x4,1)
end
function c85668449.lrcon(e,tp,eg,ep,ev,re,r,rp)
if tp~=ep then return false end
......@@ -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)
end
function c85668449.lrop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x3004,1)
e:GetHandler():AddCounter(0x4,1)
end
function c85668449.damp(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local ct=c:GetCounter(0x3004)
local ct=c:GetCounter(0x4)
e:SetLabel(ct)
end
function c85668449.damop(e,tp,eg,ep,ev,re,r,rp)
......
c88901771.lua
View file @ fefe8ad1
--熟練の青魔道士
function c88901771.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,3)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,3)
--add counter
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
......@@ -39,11 +39,11 @@ function c88901771.initial_effect(c)
end
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
e:GetHandler():AddCounter(0x3001,1)
e:GetHandler():AddCounter(0x1,1)
end
end
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)
end
function c88901771.filter(c,e,tp)
......@@ -67,18 +67,18 @@ function c88901771.ctcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
end
function c88901771.ctfilter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
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 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.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
function c88901771.ctop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1)
tc:AddCounter(0x1,1)
end
end
c9012916.lua
View file @ fefe8ad1
--ブラックフェザー・ドラゴン
function c9012916.initial_effect(c)
c:EnableCounterPermit(0x3010)
c:EnableCounterPermit(0x10)
--synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
c:EnableReviveLimit()
......@@ -38,19 +38,19 @@ function c9012916.initial_effect(c)
end
function c9012916.damval(e,re,val,r,rp,rc)
if bit.band(r,REASON_EFFECT)~=0 then
e:GetHandler():AddCounter(0x3010,1)
e:GetHandler():AddCounter(0x10,1)
return 0
end
return val
end
function c9012916.atkval(e,c)
return c:GetCounter(0x3010)*-700
return c:GetCounter(0x10)*-700
end
function c9012916.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetCounter(0x3010)>0 end
local ct=e:GetHandler():GetCounter(0x3010)
if chk==0 then return e:GetHandler():GetCounter(0x10)>0 end
local ct=e:GetHandler():GetCounter(0x10)
e:SetLabel(ct*700)
e:GetHandler():RemoveCounter(tp,0x3010,ct,REASON_COST)
e:GetHandler():RemoveCounter(tp,0x10,ct,REASON_COST)
end
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
......
c90135989.lua
View file @ fefe8ad1
......@@ -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 tc=g:GetFirst()
while tc do
tc:AddCounter(0x19,1)
tc:AddCounter(0x1019,1)
tc=g:GetNext()
end
end
c90557975.lua
View file @ fefe8ad1
......@@ -12,7 +12,7 @@ function c90557975.initial_effect(c)
c:RegisterEffect(e1)
end
function c90557975.filter(c)
return c:GetCounter(0x19)>0
return c:GetCounter(0x1019)>0
end
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
......@@ -20,9 +20,9 @@ function c90557975.damcost(e,tp,eg,ep,ev,re,r,rp,chk)
local tc=g:GetFirst()
local s=0
while tc do
local ct=tc:GetCounter(0x19)
local ct=tc:GetCounter(0x1019)
s=s+ct
tc:RemoveCounter(tp,0x19,ct,REASON_COST)
tc:RemoveCounter(tp,0x1019,ct,REASON_COST)
tc=g:GetNext()
end
e:SetLabel(s*300)
......
c91438994.lua
View file @ fefe8ad1
--A・ジェネクス・ベルフレイム
function c91438994.initial_effect(c)
c:EnableCounterPermit(0xa)
--add counter
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
......@@ -44,7 +45,7 @@ function c91438994.filter1(c,tp)
end
function c91438994.addc1(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c91438994.filter1,1,nil,tp) then
e:GetHandler():AddCounter(0xa+COUNTER_NEED_ENABLE,1)
e:GetHandler():AddCounter(0xa,1)
end
end
function c91438994.filter2(c,tp)
......@@ -52,7 +53,7 @@ function c91438994.filter2(c,tp)
end
function c91438994.addc2(e,tp,eg,ep,ev,re,r,rp)
if eg:IsExists(c91438994.filter2,1,nil,tp) then
e:GetHandler():AddCounter(0xa+COUNTER_NEED_ENABLE,2)
e:GetHandler():AddCounter(0xa,2)
end
end
function c91438994.attackup(e,c)
......
c9156135.lua
View file @ fefe8ad1
......@@ -28,19 +28,19 @@ function c9156135.initial_effect(c)
c:RegisterEffect(e4)
end
function c9156135.filter(c)
return c:IsFaceup() and c:IsCanAddCounter(0x3001,1)
return c:IsFaceup() and c:IsCanAddCounter(0x1,1)
end
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 chk==0 then return true end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
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
function c9156135.addc(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc and tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x3001,1)
tc:AddCounter(0x1,1)
end
end
function c9156135.condition(e,tp,eg,ep,ev,re,r,rp)
......
c91607976.lua
View file @ fefe8ad1
--D・クロックン
function c91607976.initial_effect(c)
c:EnableCounterPermit(0x8)
--atk
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......@@ -43,7 +44,7 @@ function c91607976.cond1(e,tp,eg,ep,ev,re,r,rp)
end
function c91607976.opd1(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x8+COUNTER_NEED_ENABLE,1)
e:GetHandler():AddCounter(0x8,1)
end
end
function c91607976.cond2(e,tp,eg,ep,ev,re,r,rp)
......
c92001300.lua
View file @ fefe8ad1
--古代の機械城
function c92001300.initial_effect(c)
c:EnableCounterPermit(0x300b)
c:EnableCounterPermit(0xb)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -42,12 +42,12 @@ function c92001300.initial_effect(c)
c:RegisterEffect(e5)
end
function c92001300.addc(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():AddCounter(0x300b,1)
e:GetHandler():AddCounter(0xb,1)
end
function c92001300.sumcon(e,c)
if c==nil then return e:GetHandler():IsReleasable() end
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
function c92001300.sumop(e,tp,eg,ep,ev,re,r,rp,c)
Duel.Release(e:GetHandler(),REASON_COST)
......
c9284723.lua
View file @ fefe8ad1
......@@ -23,17 +23,17 @@ function c9284723.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:GetHandler():RegisterEffect(e1)
end
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 chk==0 then return Duel.IsExistingTarget(Card.IsCanAddCounter,tp,0,LOCATION_MZONE,1,nil,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,0x1009,2) end
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)
end
function c9284723.operation(e,tp,eg,ep,ev,re,r,rp)
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()
tc:AddCounter(0x9,2)
tc:AddCounter(0x1009,2)
if atk>0 and tc:GetAttack()==0 then
Duel.RaiseEvent(tc,EVENT_CUSTOM+54306223,e,0,0,0,0)
end
......
c94256039.lua
View file @ fefe8ad1
--バベル・タワー
function c94256039.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:EnableCounterPermit(0x1)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -33,7 +33,7 @@ function c94256039.initial_effect(c)
local e5=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_DESTROY)
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:SetTarget(c94256039.destg)
e5:SetOperation(c94256039.desop)
......@@ -43,8 +43,8 @@ function c94256039.acop(e,tp,eg,ep,ev,re,r,rp)
local p=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_PLAYER)
local c=e:GetHandler()
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and c:GetFlagEffect(1)>0 then
c:AddCounter(0x3001,1)
if c:GetCounter(0x3001)==4 then
c:AddCounter(0x1,1)
if c:GetCounter(0x1)==4 then
Duel.RaiseSingleEvent(c,EVENT_CUSTOM+94256039,re,0,0,p,0)
end
end
......@@ -61,7 +61,7 @@ function c94256039.damop(e,tp,eg,ep,ev,re,r,rp)
end
end
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
function c94256039.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
c94937430.lua
View file @ fefe8ad1
--臨時収入
function c94937430.initial_effect(c)
c:EnableCounterPermit(0x3001)
c:SetCounterLimit(0x3001,3)
c:EnableCounterPermit(0x1)
c:SetCounterLimit(0x1,3)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -33,11 +33,11 @@ end
function c94937430.acop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if eg:IsExists(c94937430.cfilter,1,nil,tp) then
c:AddCounter(0x3001,1)
c:AddCounter(0x1,1)
end
end
function c94937430.drcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x3001)==3
return e:GetHandler():GetCounter(0x1)==3
end
function c94937430.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
......
c95451366.lua
View file @ fefe8ad1
......@@ -9,17 +9,17 @@ function c95451366.initial_effect(c)
c:RegisterEffect(e1)
end
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
function c95451366.filter(c)
return c:IsFaceup() and c:GetCounter(0x3001)~=0
return c:IsFaceup() and c:GetCounter(0x1)~=0
end
function c95451366.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c95451366.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local tc=g:GetFirst()
while tc do
local cc=tc:GetCounter(0x3001)
tc:RemoveCounter(tp,0x3001,cc,REASON_EFFECT)
local cc=tc:GetCounter(0x1)
tc:RemoveCounter(tp,0x1,cc,REASON_EFFECT)
tc=g:GetNext()
end
end
c98162021.lua
View file @ fefe8ad1
--紫炎の荒武者
function c98162021.initial_effect(c)
c:EnableCounterPermit(0x3003)
c:SetCounterLimit(0x3003,1)
c:EnableCounterPermit(0x3)
c:SetCounterLimit(0x3,1)
--summon success
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(98162021,0))
......@@ -33,29 +33,29 @@ function c98162021.initial_effect(c)
end
function c98162021.addct(e,tp,eg,ep,ev,re,r,rp,chk)
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
function c98162021.addc(e,tp,eg,ep,ev,re,r,rp)
if e:GetHandler():IsRelateToEffect(e) then
e:GetHandler():AddCounter(0x3003,1)
e:GetHandler():AddCounter(0x3,1)
end
end
function c98162021.attackup(e,c)
return c:GetCounter(0x3003)*300
return c:GetCounter(0x3)*300
end
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 chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x3003,1,REASON_EFFECT)
and Duel.IsExistingTarget(Card.IsCanAddCounter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler(),0x3003,1) end
if chkc then return chkc:IsOnField() and chkc:IsCanAddCounter(0x3,1) end
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(),0x3,1) end
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
function c98162021.addc2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:GetCounter(0x3003)==0 then return end
c:RemoveCounter(tp,0x3003,1,REASON_EFFECT)
if c:GetCounter(0x3)==0 then return end
c:RemoveCounter(tp,0x3,1,REASON_EFFECT)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x3003,1)
tc:AddCounter(0x3,1)
end
end
c99342953.lua
View file @ fefe8ad1
......@@ -32,11 +32,11 @@ function c99342953.ctcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c99342953.ctfilter,1,nil)
end
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
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
Duel.RemoveCounter(tp,1,1,0xe,2,REASON_COST)
if chk==0 then return Duel.IsCanRemoveCounter(tp,1,1,0x100e,2,REASON_COST) end
Duel.RemoveCounter(tp,1,1,0x100e,2,REASON_COST)
end
function c99342953.filter(c,e,tp)
return c:IsSetCard(0xc) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
c99532708.lua
View file @ fefe8ad1
......@@ -10,5 +10,5 @@ function c99532708.initial_effect(c)
c:RegisterEffect(e1)
end
function c99532708.distg(e,c)
return c:GetCounter(0xe)>0 and c:GetCode()~=99532708
return c:GetCounter(0x100e)>0 and c:GetCode()~=99532708
end
constant.lua
View file @ fefe8ad1
......@@ -168,8 +168,8 @@ ASSUME_RACE =6
ASSUME_ATTACK =7
ASSUME_DEFENCE =8
--Counter --指示物
COUNTER_NEED_PERMIT =0x1000 --可以放置某指示物
COUNTER_NEED_ENABLE =0x2000 --放在自己身上的指示物(卡片守衛)
COUNTER_WITHOUT_PERMIT =0x1000 --可以放置在非特定對象的指示物
COUNTER_NEED_ENABLE =0x2000 --在卡片本身放置上述指示物的標記(卡片守衛)
--Phase --阶段
PHASE_DRAW =0x01 --抽卡阶段
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