Commit 71e64b18 authored by TanakaKotoha's avatar TanakaKotoha

Black Square

parent 4dd0f913
......@@ -20,8 +20,8 @@ function c65020154.initial_effect(c)
c:RegisterEffect(e3)
end
function c65020154.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x12da)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x12da,1,REASON_COST)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x1da2)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x1da2,1,REASON_COST)
end
function c65020154.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsFaceup() end
......@@ -31,10 +31,10 @@ end
function c65020154.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
tc:AddCounter(0x12da,1)
tc:AddCounter(0x1da2,1)
end
end
function c65020154.target(e,c)
return c:GetCounter(0x12da)>0
return c:GetCounter(0x1da2)>0
end
\ No newline at end of file
......@@ -20,8 +20,8 @@ function c65020155.initial_effect(c)
c:RegisterEffect(e3)
end
function c65020155.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x12da)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x12da,1,REASON_COST)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x1da2)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x1da2,1,REASON_COST)
end
function c65020155.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsFaceup() end
......@@ -31,10 +31,10 @@ end
function c65020155.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
tc:AddCounter(0x12da,1)
tc:AddCounter(0x1da2,1)
end
end
function c65020155.target(e,c)
return c:GetCounter(0x12da)>0
return c:GetCounter(0x1da2)>0
end
......@@ -24,8 +24,8 @@ function c65020156.initial_effect(c)
c:RegisterEffect(e2)
end
function c65020156.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x12da)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x12da,1,REASON_COST)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x1da2)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x1da2,1,REASON_COST)
end
function c65020156.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsFaceup() end
......@@ -35,11 +35,11 @@ end
function c65020156.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
tc:AddCounter(0x12da,1)
tc:AddCounter(0x1da2,1)
end
end
function c65020156.target(e,c)
return c:GetCounter(0x12da)>0
return c:GetCounter(0x1da2)>0
end
......@@ -31,8 +31,8 @@ function c65020157.ettg(e,c)
return c:IsType(TYPE_CONTINUOUS) and c:IsType(TYPE_SPELL)
end
function c65020157.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x12da)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x12da,1,REASON_COST)
if chk==0 then return Duel.GetCounter(tp,LOCATION_ONFIELD,0,0x1da2)>0 end
Duel.RemoveCounter(tp,LOCATION_ONFIELD,0,0x1da2,1,REASON_COST)
end
function c65020157.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,nil) end
......@@ -41,7 +41,7 @@ function c65020157.op(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_ONFIELD,nil)
local tc=g:GetFirst()
while tc do
tc:AddCounter(0x12da,1)
tc:AddCounter(0x1da2,1)
tc=g:GetNext()
end
end
......@@ -58,14 +58,14 @@ function c65020157.addop(e,tp,eg,ep,ev,re,r,rp)
local c=eg:GetFirst()
while c~=nil do
if c:IsLocation(LOCATION_ONFIELD) then
count=count+c:GetCounter(0x12da)
count=count+c:GetCounter(0x1da2)
end
c=eg:GetNext()
end
if count>0 and Duel.SelectYesNo(tp,aux.Stringid(65020157,0)) then
local g=Duel.SelectMatchingCard(tp,c65020157.addfil,tp,LOCATION_SZONE,0,1,1,nil)
local tc=g:GetFirst()
tc:AddCounter(0x12da,count)
tc:AddCounter(0x1da2,count)
e:GetHandler():RegisterFlagEffect(65020157,RESET_PHASE+PHASE_END,0,1)
end
end
\ No newline at end of file
......@@ -21,7 +21,7 @@ function c65020158.initial_effect(c)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_REMOVE_COUNTER+0x12da)
e3:SetCode(EVENT_REMOVE_COUNTER+0x1da2)
e3:SetRange(LOCATION_SZONE)
e3:SetOperation(c65020158.rop2)
c:RegisterEffect(e3)
......@@ -41,12 +41,12 @@ end
function c65020158.ac(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
c:AddCounter(0x12da,2)
c:AddCounter(0x1da2,2)
end
end
function c65020158.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x12da)<=0
return e:GetHandler():GetCounter(0x1da2)<=0
end
function c65020158.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......@@ -73,6 +73,6 @@ function c65020158.rop(e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then
local tc=g:GetFirst()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
tc:AddCounter(0x12da,1)
tc:AddCounter(0x1da2,1)
end
end
......@@ -21,7 +21,7 @@ function c65020159.initial_effect(c)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_REMOVE_COUNTER+0x12da)
e3:SetCode(EVENT_REMOVE_COUNTER+0x1da2)
e3:SetRange(LOCATION_SZONE)
e3:SetOperation(c65020159.rop2)
c:RegisterEffect(e3)
......@@ -41,12 +41,12 @@ end
function c65020159.ac(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
c:AddCounter(0x12da,2)
c:AddCounter(0x1da2,2)
end
end
function c65020159.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x12da)<=0
return e:GetHandler():GetCounter(0x1da2)<=0
end
function c65020159.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
......@@ -21,7 +21,7 @@ function c65020160.initial_effect(c)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetCode(EVENT_REMOVE_COUNTER+0x12da)
e3:SetCode(EVENT_REMOVE_COUNTER+0x1da2)
e3:SetRange(LOCATION_SZONE)
e3:SetOperation(c65020160.rop2)
c:RegisterEffect(e3)
......@@ -42,12 +42,12 @@ end
function c65020160.ac(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
c:AddCounter(0x12da,2)
c:AddCounter(0x1da2,2)
end
end
function c65020160.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x12da)<=0
return e:GetHandler():GetCounter(0x1da2)<=0
end
function c65020160.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
......@@ -42,18 +42,18 @@ function c65020161.eop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
local tc=e:GetHandler()
Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
tc:AddCounter(0x12da,1)
tc:AddCounter(0x1da2,1)
end
function c65020161.ac(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and c:IsFaceup() then
c:AddCounter(0x12da,2)
c:AddCounter(0x1da2,2)
end
end
function c65020161.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x12da)<=0
return e:GetHandler():GetCounter(0x1da2)<=0
end
function c65020161.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
......@@ -49,7 +49,7 @@ end
function c65020162.desfil(c)
return c:GetCounter(0x12da)>0
return c:GetCounter(0x1da2)>0
end
function c65020162.tg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c65020162.desfil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
......
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