Commit e7efc73f authored by Tachibana's avatar Tachibana

eme

parent 82a0f83f
Pipeline #6305 passed with stages
in 32 minutes and 46 seconds
No preview for this file type
......@@ -16,6 +16,7 @@ function cm.initial_effect(c)
--tograve
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOGRAVE)
e2:SetDescription(aux.Stringid(m,1))
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DELAY)
......
......@@ -3,7 +3,7 @@ local m=10071211
local cm=_G["c"..m]
function cm.initial_effect(c)
c:EnableReviveLimit()
c:EnableCounterPermit(0x6500,LOCATION_MZONE)
c:EnableCounterPermit(0x50b,LOCATION_MZONE)
--changecode
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
......@@ -61,19 +61,19 @@ function cm.countercost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
end
function cm.counterfilter(c)
return c:IsFaceup() and c:IsSetCard(0x9501) and c:IsCanAddCounter(0x6500,2)
return c:IsFaceup() and c:IsSetCard(0x9501) and c:IsCanAddCounter(0x50b,2)
end
function cm.countertg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsOnField() and cm.counterfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(cm.counterfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,cm.counterfilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x6500)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x50b)
end
function cm.counterop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x6500,2)
tc:AddCounter(0x50b,2)
end
end
--to gave
......@@ -95,8 +95,8 @@ function cm.tgop(e,tp,eg,ep,ev,re,r,rp)
end
--Destroy
function cm.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x6500,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x6500,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x50b,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x50b,1,REASON_COST)
end
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
......@@ -114,7 +114,7 @@ end
--set counter
function cm.countercon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:GetCounter(0x6500)>0
return c:GetCounter(0x50b)>0
end
function cm.countertg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.counterfilter,tp,LOCATION_MZONE,0,1,nil) end
......@@ -126,6 +126,6 @@ function cm.counterop2(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,cm.counterfilter,tp,LOCATION_MZONE,0,1,1,nil)
if g:GetCount()>0 then
local tc=g.GetFirstTarget()
tc:AddCounter(0x6500,c:GetCounter(0x6500))
tc:AddCounter(0x50b,c:GetCounter(0x50b))
end
end
......@@ -3,7 +3,7 @@ local m=10071221
local cm=_G["c"..m]
function cm.initial_effect(c)
c:EnableReviveLimit()
c:EnableCounterPermit(0x6500,LOCATION_MZONE)
c:EnableCounterPermit(0x50b,LOCATION_MZONE)
--changecode
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
......@@ -61,19 +61,19 @@ function cm.countercost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
end
function cm.counterfilter(c)
return c:IsFaceup() and c:IsSetCard(0x9501) and c:IsCanAddCounter(0x6500,2)
return c:IsFaceup() and c:IsSetCard(0x9501) and c:IsCanAddCounter(0x50b,2)
end
function cm.countertg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsOnField() and cm.counterfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(cm.counterfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,cm.counterfilter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x6500)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x50b)
end
function cm.counterop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x6500,2)
tc:AddCounter(0x50b,2)
end
end
--Search
......@@ -98,8 +98,8 @@ function cm.shop(e,tp,eg,ep,ev,re,r,rp)
end
--disable
function cm.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x6500,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x6500,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x50b,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x50b,1,REASON_COST)
end
function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
......@@ -128,7 +128,7 @@ end
--set counter
function cm.countercon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:GetCounter(0x6500)>0
return c:GetCounter(0x50b)>0
end
function cm.countertg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(cm.counterfilter,tp,LOCATION_MZONE,0,1,nil) end
......@@ -140,6 +140,6 @@ function cm.counterop2(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,cm.counterfilter,tp,LOCATION_MZONE,0,1,1,nil)
if g:GetCount()>0 then
local tc=g.GetFirstTarget()
tc:AddCounter(0x6500,c:GetCounter(0x6500))
tc:AddCounter(0x50b,c:GetCounter(0x50b))
end
end
......@@ -3,7 +3,7 @@ local m=10071231
local cm=_G["c"..m]
function cm.initial_effect(c)
c:EnableReviveLimit()
c:EnableCounterPermit(0x6500,LOCATION_MZONE)
c:EnableCounterPermit(0x50b,LOCATION_MZONE)
--SpecialSummon limit
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
......@@ -91,15 +91,15 @@ function cm.condition(e,tp,eg,ep,ev,re,r,rp)
end
--immune
function cm.imcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetCounter(0x6500)>0
return e:GetHandler():GetCounter(0x50b)>0
end
--NegateActivation
function cm.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x6500,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x6500,1,REASON_COST)
if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0x50b,1,REASON_COST) end
e:GetHandler():RemoveCounter(tp,0x50b,1,REASON_COST)
end
function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
......
......@@ -30,11 +30,11 @@ function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingTarget(cm.filter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,cm.filter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x6500)
Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,2,0,0x50b)
end
function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
tc:AddCounter(0x6500,2)
tc:AddCounter(0x50b,2)
end
end
......@@ -82,7 +82,7 @@ function c33200421.rmfilter(c)
return c:IsAbleToRemove()
end
function c33200421.chcon(e,tp,eg,ep,ev,re,r,rp)
return ep~=tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsExistingMatchingCard(c33200421.chfilter,tp,LOCATION_MZONE,0,1,nil)
return ep~=tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsExistingMatchingCard(c33200421.chfilter,tp,LOCATION_MZONE,0,1,e:GetHandler())
end
function c33200421.chtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c33200421.rmfilter,rp,LOCATION_GRAVE,0,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