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